Como obtener valor de Campo Autoincremento...

[vic_ia]

hola...

gracias toñico e Igarcia...

toniño, si la forma que comentas es factible el problema como tu mencionas es que se tendran mas de una aplicacion guadando mensajes "al mismo" tiempo...

Igracias, no no trabajo con SQL 2000 sino con Firebird 1.5 y las expresiones que me da no me las reconoce...

sigo tratando de buscarle solucion..

saludos...

[[Héctor Randolph]]

Hola vic_ia !

Veo un problema en lo siguiente, por medio del identificador MENSAJES.ID no puedes obtener el contenido del campo ID; recuerda que dentro de un procedimiento de Firebird solamente cuentas con la sentencia SELECT para obtener los datos contenidos en un campo.

Para corregir tu código te recomiendo lo siguiente:

Código SQL [-]
CREATE PROCEDURE NEW_PROCEDURE (PMENSAJE VARCHAR(100) CHARACTER SET ISO8859_1)
RETURNS (NUEVO_ID INTEGER)
AS
begin
  INSERT INTO MENSAJES(MENSAJE) VALUES (:PMENSAJE);
  NUEVO_ID = GEN_ID([Nombre_generador],0);/*Obtienes el valor actual del generador sin incrementarlo*/
  suspend;
end

Por otra parte si lo que deseas es obtener el valor del generador directamente desde Delphi te recomiendo que leas este hilo:

http://www.clubdelphi.com/foros/show...2152#post82152

Un saludo!

[vic_ia]

hola HECTOR RANDOLPH...

muchas gracias

ya habia hecho una chapuza para obtener el id, pero la verdad con tu indicación anduvo perfecto... nuevamente muchisimas gracias...

saludos...