Saber el id de mi ultimo registro insertado

[voldemmor]

Saludos a todos, espero q estes bien.

Solicito su ayu nuevamente.

D7 + MySql 5 + Zeos 6.6...

Necesito saber cual es el registro de mi ultimo registro ingresado:
Algo como esto

mi tabla recibo es algo asi:

id PK autoincrement e Integer
Nombre Varchar

mas campos.....
.....

Código Delphi [-]
ZQ.text:= 'INSERT INTO recibo ( cliente,..... )     VALUES  ( :PNombre,...)';
ZQ.parambyname('PNombre').asstring:='JOSE';
ZQ.Execsql;
zq....retur(id) (esto es lo que busco)

espero me haya explicado
y agradesco de antemano su ayuda

[roman]

Ejecuta esta consulta:

Código SQL [-]
select last_insert_id()

inmediatamente después de la inserción. Te devuelve un único registro con el valor deseado.

// Saludos

[voldemmor]

muchas gracias roman.
te agradesco mucho.


Puedo aprovechar este hilo para preguntar como manejo transacciones con zeos, la verdad es hace mucho q no programo y no lo recuerdo.

a ver si estoy bien:

Código Delphi [-]
try zconn.begintran
begin
......
end
catch
 zconn.rollback.

La verdad no se si estoy en lo correcto.
Pero muchas gracias por su ayuda

[roman]

Hace tiempo que no uso ZEOS, creo que no usé transacciones con él, pero supongo que es como lo pones, excepto que en lugar de catch es except .

// Saludos

[voldemmor]

Gracias por la respuesta, y disculpas por la demora en le respuesta.

Bueno me referia a que hace mucho no uso zeos y la verdad no se si esta bien lo escrito, como que es un pequeño indicio sobre como lo usaba.


Gracias por todo

[waly2k1]

Para el manejo de transacciones en zeos es algo asi:
ZeosConx.StartTransaction;
// insert/Update/delete
ZeosConx.Commit;

Error:
ZeosConx.Rollback;

Espero te sirva de algo, y no te olvides que para el uso de transacciones las tablas deben ser de tipo innodb y no myisam.
Saludos
Walter

[voldemmor]

muchas gracias por su ayuda.
lo resolvi asi:

Código Delphi [-]
try
Zconn.startransaction;
zquery.exec;
zconn.commit;
except
zconn.rollback;
end;

Gracias a todos por su colaboracion

[roman]

Hola,

Yo añadiría un detallito:

Código Delphi [-]
try
  Zconn.startransaction;
  zquery.exec;
  zconn.commit;
except
  zconn.rollback;
  raise; // <-- para que relanzar la excepción
end;

Si no lanzas la excepción, el usuario no se enterará de qué fue lo que pasó, simplemente estarás ocultando el error.

// Saludos

[voldemmor]

Gracias Roman por la aclaraciòn.
Me confirman nuevamente que el apuro no es bueno, pror responder rapidamente uno se olvida de detallitos muy importantes.

Tienes toda la razon debemos informar al usuario de que ocurrio un error.

Gracias por todo

[Panasys]

Pregunto, continuando el hilo, la solucion para saber el ultimo ID sirve para multiples usuarios accediendo a la tabla? Es decir a mi aplicacion la van a acceder 3 o 4 usuarios asi es que cuando hago el INSERT (tambien con ZEOS) y luego pido el ultimo ID es seguro que me traera el mio y no el de otro usuario?

Gracias y abrazo

Javier

[Casimiro Notevi]

El último insertado. Sin importar quién haya sido.

[anubis]

Buenas,

Dando una vuelta por los foros, queria comentar que, en relacion a las transacciones con zeos y, segun lo que comentais

try
Zconn.startransaction;
zquery.exec;
zconn.commit;
except zconn.rollback;
raise; // <-- para que relanzar la excepción
end;

si tenemos el componente zconn.autocommit:=false;
el sistema te arroja que zconn.startrarnsaccion no esta permitido para non autocommit.

espero que sirva.

un saludo

[anubis]

ya aprovechando el post, con permiso de ustedes.

tengo un problema que no se por donde es el asunto por mas vueltas que le doy

si pongo

Código Delphi [-]
zquery1.sql.clear;
zquery1.sql.text:='select id_folio from compras';
zquery1.active:=true;

No tengo problemas.

pero si pongo

Código Delphi [-]
zquery1.sql.clear;
zquery1.sql.text:='select max(id_folio) from compras';
zquery1.active:=true;

para saber cual es el ultimo registro añadido, me dice que id_folio no existe.

Estoy usando zeos e id_folio es autoincrement.

si cambio id_folio por otro campo me sigue diciendo que no existe id_folio.

No lo entiendo la verdad.

[Casimiro Notevi]

Empezado por anubis

si cambio id_folio por otro campo me sigue diciendo que no existe id_folio.

O sea,

Código SQL [-]
select max(fecha) from tabla

te dice: Error, id_folio no existe ???

[anubis]

sip

le

Código SQL [-]
pongo max(id_proveedor) from compras

tambien me dice lo mismo que el id_folio no existe.

Si lo hago desde el flamerobin no tengo ningun problema con id_folio que, de hecho, me devuelve el ultimo.

ya probe a poner un form nuevo para probar y me da lo mismo.

[Casimiro Notevi]

Está claro que estás ejecutando otro sql, revisa todo porque ahí hay un "cacao" de cuidado

[anubis]

Creo que ya se porque me dice que no existe.

Puede ser porque tengo en la misma tabla claves foraneas y al ponerle solo eso me bota el error?

si es asi, como se puede hacer esta linea

Código Delphi [-]
zquery1.sql.text:='select id_folio from compras';

porque me obliga a meter el resto de campos.

Me explico,

si pongo

Código SQL [-]
select * from compras

no hay problema

si pongo solo

Código SQL [-]
select id_folio from compras

me dice que me falta otro campo, se lo añado,
y asi sucesivamente hasta que he puesto todos, que equivalen a

Código SQL [-]
 select * from compras

[anubis]

Buenas,

perdonen ustedes.

No me funcionaba porque tenia en otros forms referencia a esos campos en las propiedades del campo db

[Casimiro Notevi]

Empezado por anubis

No me funcionaba porque tenia en otros forms referencia a esos campos en las propiedades del campo db

Empezado por Casimiro Notevi

Está claro que estás ejecutando otro sql

[anubis]

Parece que nunca aprendo
una disculpa.