FiveTech Software tech support forums

Estimados, favor de orientar... tengo una tabla con un campo numero de recepción, que es numérico, cuando hago una consulta y lo quiero filtrar..
me muestra todos los registros.. no me respeta la condición del filtro, favor de indicarme que puedo estar haciendo mal.


Mensaje:="Recepciones Periodo.. : "+Transform(cFolio1,"999999")+" al "+Transform(cFolio2,"999999")
cExt_Rec1:=xServer:Query("SELECT a.*, b.* FROM ext_rec1 AS a LEFT JOIN tab_cte AS b ON b.rut_cte = a.rut_cte WHERE a.nro_rec >='"+Alltrim(Str(cFolio1))+"' and a.nro_rec<='"+Alltrim(Str(cFolio2))+"' ORDER BY a.nro_rec")

Prueba sin las comillas en estas expresiones

Code: Select all  Expand view

'"+Alltrim(Str(cFolio1))+"'
 

asi

Code: Select all  Expand view

+Alltrim(Str(cFolio1))+
 

Mi estimado, saque las comillas y me arrojo error de sintaxis, comando no valido en Mysql....

Mi estimado, gracias, hice un cambio y funciono bien... error de sintaxis.. pero de quien escribe... si no me dices.. no veo mi error... muchas gracias

Saludos, un codigo limpio y ordenado puede ayudar a resolver mas rapido un error, pero cada quien tiene su estilo...te recomiendo que intentes asi...saludos...

Code: Select all  Expand view

cSql := "SELECT a.*, b.* "

cSql += "FROM ext_rec1 AS a "

cSql += "LEFT JOIN tab_cte AS b ON b.rut_cte = a.rut_cte "

cSql += "WHERE a.nro_rec >= '" + Alltrim(Str(cFolio1)) + "' "
cSql += "AND a.nro_rec <= '" + Alltrim(Str(cFolio2)) + "' "

cSql += "ORDER BY a.nro_rec"

cExt_Rec1 := xServer:Query(cSql)
 

joseluisysturiz wrote:Saludos, un codigo limpio y ordenado puede ayudar a resolver mas rapido un error, pero cada quien tiene su estilo...te recomiendo que intentes asi...saludos...

Code: Select all  Expand view

cSql := "SELECT a.*, b.* "

cSql += "FROM ext_rec1 AS a "

cSql += "LEFT JOIN tab_cte AS b ON b.rut_cte = a.rut_cte "

cSql += "WHERE a.nro_rec >= '" + Alltrim(Str(cFolio1)) + "' "
cSql += "AND a.nro_rec <= '" + Alltrim(Str(cFolio2)) + "' "

cSql += "ORDER BY a.nro_rec"

cExt_Rec1 := xServer:Query(cSql)
 

Que comentario fuera de lugar.

Saludos

Compuin wrote:

joseluisysturiz wrote:Saludos, un codigo limpio y ordenado puede ayudar a resolver mas rapido un error, pero cada quien tiene su estilo...te recomiendo que intentes asi...saludos...

Code: Select all  Expand view

cSql := "SELECT a.*, b.* "

cSql += "FROM ext_rec1 AS a "

cSql += "LEFT JOIN tab_cte AS b ON b.rut_cte = a.rut_cte "

cSql += "WHERE a.nro_rec >= '" + Alltrim(Str(cFolio1)) + "' "
cSql += "AND a.nro_rec <= '" + Alltrim(Str(cFolio2)) + "' "

cSql += "ORDER BY a.nro_rec"

cExt_Rec1 := xServer:Query(cSql)
 

Que comentario fuera de lugar.

Saludos

Compuin....leistes y entendistes lo que pregunta el colega y analizastes el porque de mi respuesta o solucion propuesta o solo dijstes algo por decir..? porque consideras fuera de lugar mi comentario.? es solo una recomendacion o mi punto de vista que me ha ayudado y lo comparto, saludos...gracias...

kpidata wrote:Mi estimado, gracias, hice un cambio y funciono bien... error de sintaxis.. pero de quien escribe... si no me dices.. no veo mi error... muchas gracias

Saludos

prodrias mirar los ejemplos
testqry4.prg
y
teststm.prg

dentro de dolphin y la forma de como usar variables dentro de las sentencias, te olvidas de hacer las concatenaciones de strings