Autonumerico nuevamente

[jzginez]

Hola amigos, nuevamente estoy intentando controlar mejor mis automunericos (campo ID), estoy usando delphi y firebird 1.5.
Ya no estoy usando los triggers puesto que no importa si guardo el registro o cancela la accion el generator de todas forma se incrementa, lo que ahora mejor creo una consulta donde optengo el maximo del campo id y lo incremento en uno.

Lo que quiero intentar es usar el procedimiento que ibexpert genera

Código SQL [-]
BEGIN
  ID = GEN_ID(GEN_TIPOALMACEN_ID, 1);
  SUSPEND;
END

ahora mi pregunta es si este procedimiento lo puedo llamar en delphi atravez de un IBStoreProc pero como hago para tomar el valor de ID y asignarlo al campo correspondiente

Gracias

[xander]

utiliza esta consulta desde tu aplicación:

Código SQL [-]
select GEN_ID(GEN_TIPOALMACEN_ID, 1)
from RDB$DATABASE

[jzginez]

Gracias Xander probare a primera hora tu sugerencia

[rastafarey]

Si quieres tener el valor que viene e incrmentar el genrador para que el store procedure sismplemente usas la instruccion sql sola y listo. Otra si siempre se debe incrementar el id y por eso no usas disparadores puedes seguir usando los disparadores sismplemente que la intruccion del gen_id la llamas antes de cuaquier validacion aunque le registro no se guarde el generador queda incrementado ya que estos son el unico especimen raro que se escapana del control trassacional.

Espero te sirva de ayuda. Mejor dicho espero haberme explicado ya ultimanente nadie entiende el idioma que hablo.