Problema con consulta
 

Hola estoy realizando la siguiente consulta

Código Delphi [-]
SQL := 'Select Id from Distribution Where (IdGh = :GH) and (SectionLetter = :Sec) and '
      +' (From_Bench = : Desde) AND (To_Bench = :Hacia)';
LocalQuery.SQL.Text := SQL;
LocalQuery.Parameters.ParamByName('GH').Value      := Vivero;;
LocalQuery.Parameters.ParamByName('Sec').Value     := Secc;
LocalQuery.Parameters.ParamByName('Desde').Value   := StrToFloat(From);
LocalQuery.Parameters.ParamByName('Hacia').Value   := StrToFloat(Hacia);
LocalQuery.Active := true;
ExisteDistribucion := LocalQuery.Fields[0].AsString

cuando ejecuto el procedimiento, lleva unos valores que se encuentra en la base datos

Adjunto screenshots:
(el procedimiento cuando es llamado)
http://i401.photobucket.com/albums/p.../variables.gif


(datos en la DB)
http://i401.photobucket.com/albums/p.../basedatos.gif

Sin embargo, aunque los datos de la consulta existen en la Db, no encuentra nada...

Que error estoy cometiendo, llevo como 5 dias, batallando con esto, ya no se que hacer...

Gracias!

Hola, creo que es por usar .value en vez de los correspondientes .asfloat, .asstring...

Pero para eso el cast, ademas creo que no admite la propiedad asfloat

bueno, el .asdouble...lo has probado por eso?

No soporta ningun As..... asdouble, asfloat, nada solo Value...

vale, es adoquery...

ni idea...si en vez de usar parametros lo colocas directamente en la consulta...¿tampoco te funciona? si es asi, entonces el error tiene que estar en otras lineas.

PD: prueba de poner secc como quotedstr(secc), de la misma manera vivero si es un texto. Los campos de texto tienen que ir con el quotedstr en la consulta. Es probable que usando el variant te interprete, por ejemplo, :GH := vivero como entero, y al compararlo en la consulta, tambien interprete la cadena como entero... lo que yo haria es eso: colocar todo sin usar parametros, usando el quotedstr y el strtofloat segun convenga. saludos.

No estoy totalmente seguro pero tengo entendido que al trabajar con ADO y parámetros hay que establecer el DataType o el tipo de datos:

Código Delphi [-]
TUQuery.Parameters.ParamByName('tu_parametro').Value := ....
TUQuery.Parameters.ParamByName('tu_parametro').DataType := ....

Saludos,

Hola.

Yo sugiero que hagas esto:

Código Delphi [-]
LocalQuery.Parameters.ParamByName('Sec').Value := QuotedStr(Secc);

Salud OS

No sirvio... sigue sin retornar nada...

¿y si cambias?

"(From_Bench = : Desde)"

por

"(From_Bench = :Desde)"

Asi esta, pero la verdad tampoco funciona!

¿probaste lo de poner todo en una sola linea sin usar argumentos?

No lo he probado, el miercoles lo hago y les aviso!

Deverias tener en cuenta que un valor float tiene decimales y por lo tanto te va a poner como separador de los decimales una coma, ante lo cual te va a cambiar la sentencia.

Saludos