<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=UTF-8" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.19328">
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff text=#000000>
<DIV><FONT size=2 face=Arial>Ponlo en un procedimiento almacenado que retorne el
valor. Si analizas el ejemplo que te mandé retorna 2 valores: 1 el ide del campo
y otro que si es mayor que 0 insertó el registro.</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Como dice Martín debes hacer un .Open y revisas el
valor del registro.</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Saludos Reiterados</FONT></DIV>
<DIV>=========<BR>|| ISMAEL ||<BR>=========</DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=pbruccoleri@adinet.com.uy
href="mailto:pbruccoleri@adinet.com.uy">Paola Bruccoleri</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A
title=lazarus-es@lists.lazarus.freepascal.org
href="mailto:lazarus-es@lists.lazarus.freepascal.org">Spanish version of
Lazarus List</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Wednesday, December 19, 2012 3:10
PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> Re: [Lazarus-es] obtener id
recién grabado</DIV>
<DIV><BR></DIV>El 19/12/2012 12:18 p.m., Martin Gomez escribió:
<BLOCKQUOTE
cite=mid:CAFGJXk0jUt3Jb4XxEKtX+0_XB5+g-1WVPU2sfi5saTXNguQCrw@mail.gmail.com
type="cite">
<META content="text/html; charset=UTF-8" http-equiv=Context-Type>
<DIV>para cada base de datos hay una función (distinta en cada caso) que te
devuelve el valor del último id automático utilizado.
<DIV><BR></DIV>
<DIV>aparentemente, en firebird la forma mas sencilla es ejecutar el INSERT
con un RETURNING al final, en vez de Query.ExecSQL utilizas Query.Open y ya
tenes el resultado. </DIV>
<DIV><BR></DIV>
<DIV><A href="http://www.firebirdfaq.org/faq243/"
moz-do-not-send="true">http://www.firebirdfaq.org/faq243/</A><BR></DIV><BR></DIV></BLOCKQUOTE>Hola
MArtín y demás compañeros..<BR>ya tengo definidos generadores y disparadores
en esas tablas. Ya he probado en otras tablas que al grabar, se genera
automáticamente el id correspondiente sin necesidad de usar un componente
zsequence.<BR>Ahora estoy probando de usar el RETURNING... en un zquery
coloqué algo así:<BR><BR>insert into tabla (c1, c2, c3) values (:c1, :c2, :c3)
returning codigo<BR><BR>cargo los parámetros <BR>hago un qry.open;<BR><BR>pero
no se como capturar el campo código para usarlo en el otro query con el
insert.<BR><BR>hice algo así:<BR>nCodigo:=
qry.FieldByName('codigo').AsInteger;
<BR>pero no funciona!.. (lo mismo usando ParamByName)<BR>no se cual será la
sintaxis correcta...<BR><BR>muchas gracias!<BR><BR><BR><BR>
<P>
<HR>
<P></P>_______________________________________________<BR>Lazarus-es mailing
list<BR>Lazarus-es@lists.lazarus.freepascal.org<BR>http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus-es<BR></BLOCKQUOTE></BODY></HTML>