Problema con consulta

[Nomad]

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!

[[coso]]

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

[Nomad]

Empezado por coso

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

[[coso]]

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

[Nomad]

Empezado por coso

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

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

[[coso]]

vale, es adoquery...

[[coso]]

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.

[[Delphius]]

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,

[[egostar]]

Hola.

Yo sugiero que hagas esto:

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

Salud OS

[Nomad]

Empezado por egostar

Hola.

Yo sugiero que hagas esto:

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


Salud OS

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

[Xcalibur]

¿y si cambias?

"(From_Bench = : Desde)"

por

"(From_Bench = :Desde)"

[Nomad]

Empezado por Xcalibur

¿y si cambias?

"(From_Bench = : Desde)"

por

"(From_Bench = esde)"

Asi esta, pero la verdad tampoco funciona!

[[coso]]

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

[Nomad]

Empezado por coso

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

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

[Softweb]

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