topic-43303

Posts: 1279

Joined: Mon Feb 06, 2006 04:28 PM

FWMariaDb- tengo un error
Posted: Fri Jun 09, 2023 11:31 AM

Hola,
Temo que quizá se me esté escapando la tortuga.
Tengo este código:

FUNCTION DatosCortesHora( oCn, aDatosCortesHora )
     LOCAL cScript
     
     cScript := 'SELECT p.fecha, p.hora, p.corte, p.corte_descripcion, p.cajas, p.piezas, p.kilosnetos, r.target FROM prodalba AS p INNER JOIN rendcortes AS r ON p.corte = r.idcorte ORDER BY r.ordinal'
           
     aDatosCortesHora := oCn:QueryResult( cScript, .t. )  
     ?oCn:nError
     ?oCn:cError
RETURN nil

oCn:nError da 0
oCn:cError da ''

y si hago :
?aDatosCortesHora
resulta en : {}

si copio el script en HeidiSQL y lo ejecuto funciona perfectamente.

Me tiene desconcertado........
Gracias desde ya por vuestra ayuda.

Saludos/Regards,

José Murugosa

"Los errores en programación, siempre están entre la silla, el teclado y la IA!!"

Willi Quintana

Posts: 1054

Joined: Sun Oct 09, 2005 10:41 PM

Re: FWMariaDb- tengo un error
Posted: Fri Jun 09, 2023 02:10 PM

Hola, prueba con:

Code (fw): Select all Collapse

aDatosCortesHora := oCn:Query( cScript )

cjcardoza

Posts: 42

Joined: Thu Jul 13, 2006 12:20 AM

Re: FWMariaDb- tengo un error
Posted: Mon Jun 12, 2023 06:30 PM

espero que este ejemplo aclare lo que quieras obtener

  aVerultpr:=MEMVAR-&gt;oConex:QueryResult("SELECT B.feccpg,A.precio,A.undmed FROM movimdet AS A "+;

                                         "LEFT JOIN movimmov AS B ON B.tipcpg=A.tipcpg AND B.sercpg=A.sercpg AND B.nrocpg=A.nrocpg "+;

                                         "WHERE A.tipcpg='"+iTabVta+"' AND A.codart='"+cCodArt+"' AND B.tipcod='C' AND B.codigo='"+cCodCli+"' "+;

                                         "ORDER BY B.feccpg DESC LIMIT 1")

  IF aVerultpr!=Nil

     ::vGet:dFecUltVta:=aVerultpr[1]

     ::vGet:nPreUltVta:=aVerultpr[2]

     ::vGet:cUndUltVta:=aVerultpr[3]

  ENDIF

FiveTech Support Forums

Continue the discussion