Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus-es / 2012-12

zeos, store procedure y problemas!

5 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Paola Bruccoleri

Hola todos..
tengo un sp en firebird que desde el ibexpert funciona correctamente. Ese sp tiene 2 par�metros de entrada:
desde date
codigo integer

uso un TZquery para ejecutar ese sp, que me devuelve un conjunto de datos que muestro en un grid.
EXECUTE PROCEDURE ESTADO_CUENTA_INQ (:desde, :codigo)

en el bot�n que uso para cargar los datos en el grid coloco este c�digo:
   spCuenta.Close;
   spCuenta.ParamByName('codigo').AsInteger:= StrToInt(edtCod.Text);
   spCuenta.ParamByName('desde').AsDate:= edtFDesde.Date;
   spCuenta.Open;

ac� van los problemas :(
1) si ejecuto el sp desde el ibexpert, con determinados datos, me devuelve 2 registros, y est� correcto
Si lo ejecuto desde el programa, me devuelve 1 SOLO REGISTRO!, que ser�a el primero... no se cu�l ser� la causa.

2) si intento cargar de nuevo el grid con otra fecha, me salta este error...

muchas gracias por cq idea y FELIZ 2013!!
sALUDOS

------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20121228/cc7da190/attachment.html> ------------ pr�xima parte ------------
A non-text attachment was scrubbed...
Name: moz-screenshot-15.png
Type: image/png
Size: 3794 bytes
Desc: no disponible
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20121228/cc7da190/attachment.png>

Reply by email

Paola Bruccoleri
to Paola Bruccoleri

El 28/12/2012 07:20 p.m., Paola Bruccoleri escribi�:

Show quoted text 29 lines
Hola todos.. tengo un sp en firebird que desde el ibexpert funciona correctamente. Ese sp tiene 2 par�metros de entrada: desde date codigo integer uso un TZquery para ejecutar ese sp, que me devuelve un conjunto de datos que muestro en un grid. EXECUTE PROCEDURE ESTADO_CUENTA_INQ (:desde, :codigo) en el bot�n que uso para cargar los datos en el grid coloco este c�digo: spCuenta.Close; spCuenta.ParamByName('codigo').AsInteger:= StrToInt(edtCod.Text); spCuenta.ParamByName('desde').AsDate:= edtFDesde.Date; spCuenta.Open; ac� van los problemas :( 1) si ejecuto el sp desde el ibexpert, con determinados datos, me devuelve 2 registros, y est� correcto Si lo ejecuto desde el programa, me devuelve 1 SOLO REGISTRO!, que ser�a el primero... no se cu�l ser� la causa. 2) si intento cargar de nuevo el grid con otra fecha, me salta este error... muchas gracias por cq idea y FELIZ 2013!! sALUDOS

Hola de nuevo..

us� un TZStoreProc y ahora por lo menos me devuelve los registros correctos!.. es que no lo usaba porque antes ese componente ten�a un bug y no funcionaba bien, por eso us� un tzquery como lo he hecho otras veces con sp menos complicados (simples inserts)

Ya tampoco me sale el error que report�. El close da error si uso el tzquery

en fin... no se si ser� lo mejor pero ya me est� funcionando!

muchas gracias!

Ahora, lo que todav�a no logro es
------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20121228/5f1fe821/attachment-0001.html> ------------ pr�xima parte ------------
A non-text attachment was scrubbed...
Name: no disponible
Type: image/png
Size: 3794 bytes
Desc: no disponible
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20121228/5f1fe821/attachment-0001.png>

Reply by email

Ismael L. Donis Garcia
to Paola Bruccoleri

Y como est�s creando el SQL, por ah� debe estar el error.

Prueba de la siguiente forma: (no uso ZEOS por lo que no se bien como se asigna el sql debe ser algo como lo que sigue)

TZquery.SQL = 'select * from estado_cuenta_inq (:desde, :codigo) p'
TZquery.ParamByName('desde').AsDate:= edtFDesde.Date;
TZquery.ParamByName('codigo').AsInteger:= StrToInt(edtCod.Text);
TZquery.Open;

Saludos
=========
|| ISMAEL ||
=========

Earlier message 52 lines
----- Original Message ----- From: Paola Bruccoleri To: Spanish version of Lazarus List Sent: Friday, December 28, 2012 4:53 PM Subject: Re: [Lazarus-es] zeos, store procedure y problemas! El 28/12/2012 07:20 p.m., Paola Bruccoleri escribi�: Hola todos.. tengo un sp en firebird que desde el ibexpert funciona correctamente. Ese sp tiene 2 par�metros de entrada: desde date codigo integer uso un TZquery para ejecutar ese sp, que me devuelve un conjunto de datos que muestro en un grid. EXECUTE PROCEDURE ESTADO_CUENTA_INQ (:desde, :codigo) en el bot�n que uso para cargar los datos en el grid coloco este c�digo: spCuenta.Close; spCuenta.ParamByName('codigo').AsInteger:= StrToInt(edtCod.Text); spCuenta.ParamByName('desde').AsDate:= edtFDesde.Date; spCuenta.Open; ac� van los problemas :( 1) si ejecuto el sp desde el ibexpert, con determinados datos, me devuelve 2 registros, y est� correcto Si lo ejecuto desde el programa, me devuelve 1 SOLO REGISTRO!, que ser�a el primero... no se cu�l ser� la causa. 2) si intento cargar de nuevo el grid con otra fecha, me salta este error... muchas gracias por cq idea y FELIZ 2013!! sALUDOS Hola de nuevo.. us� un TZStoreProc y ahora por lo menos me devuelve los registros correctos!.. es que no lo usaba porque antes ese componente ten�a un bug y no funcionaba bien, por eso us� un tzquery como lo he hecho otras veces con sp menos complicados (simples inserts) Ya tampoco me sale el error que report�. El close da error si uso el tzquery en fin... no se si ser� lo mejor pero ya me est� funcionando! muchas gracias! Ahora, lo que todav�a no logro es ------------------------------------------------------------------------------

Reply by email

Paola Bruccoleri
to Ismael L. Donis Garcia

El 29/12/2012 12:33 p.m., Ismael L. Donis Garcia escribi�:

Show quoted text 8 lines
Y como est�s creando el SQL, por ah� debe estar el error. Prueba de la siguiente forma: (no uso ZEOS por lo que no se bien como se asigna el sql debe ser algo como lo que sigue) TZquery.SQL = 'select * from estado_cuenta_inq (:desde, :codigo) p' TZquery .ParamByName('desde').AsDate:= edtFDesde.Date; TZquery .ParamByName('codigo').AsInteger:= StrToInt(edtCod.Text); TZquery .Open;

Hola Ismael!
tienes mucha raz�n, funciona!.. me hab�a olvidado de esa forma de ejecutar un sp cuando devuelve valores..
muchas gracias!

------------ pr�xima parte ------------
Se ha borrado un adjunto en formato HTML...
URL: <http://lists.lazarus.freepascal.org/pipermail/lazarus-es/attachments/20121229/38a7b548/attachment.html>

Reply by email

Ismael L. Donis Garcia
to Paola Bruccoleri

La forma que estabas utilizando es para ejecutar un procedimiento que no devuelve valores. Y la que te dije es para obtener valores.

Saludos Reiterados
=========
|| ISMAEL ||
=========

Earlier message 29 lines
----- Original Message ----- From: Paola Bruccoleri To: Spanish version of Lazarus List Sent: Saturday, December 29, 2012 9:48 AM Subject: Re: [Lazarus-es] zeos, store procedure y problemas! El 29/12/2012 12:33 p.m., Ismael L. Donis Garcia escribi�: Y como est�s creando el SQL, por ah� debe estar el error. Prueba de la siguiente forma: (no uso ZEOS por lo que no se bien como se asigna el sql debe ser algo como lo que sigue) TZquery.SQL = 'select * from estado_cuenta_inq (:desde, :codigo) p' TZquery .ParamByName('desde').AsDate:= edtFDesde.Date; TZquery .ParamByName('codigo').AsInteger:= StrToInt(edtCod.Text); TZquery .Open; Hola Ismael! tienes mucha raz�n, funciona!.. me hab�a olvidado de esa forma de ejecutar un sp cuando devuelve valores.. muchas gracias! ------------------------------------------------------------------------------

Reply by email