No se actualiza un trigger
 

Hola Foro

uso firebird 1.5 con windows seven, en una tabla de la base de datos tengo un generador y un trigger

Código SQL [-]
CREATE TRIGGER T_INVERSION FOR DESARROLLO BEFORE INSERT POSITION 0 AS
begin
    NEW.Jid = GEN_ID(Gen_inversionistas_id,1);
end

el problema que tengo es que en en el campo Jid de la tabla en algunos registro me deja el campo en blanco y el generador sigue incrementandose. Alguien me puede decir que puede estar pasando

Saludos y gracias

tulio

Hola tulio: En mi caso si no veo el código del generador y el código de la instrucción que hace el insert no se que puede pasar. ¿ Podrías ponerlo?.

Saludos.

PD. Tal vez alguien pueda informarte de una.-

Gracias Martin

el generador es :

Código SQL [-]
/*  Generator GEN_INVERSIONISTAS_ID  */
CREATE GENERATOR GEN_INVERSIONISTAS_ID;
SET GENERATOR GEN_INVERSIONISTAS_ID TO 421
---

Y en el programa

hago

Código Delphi [-]
tabla.insert;

cargo los dbedit con los valores necesarios

y luego hago

Código Delphi [-]
tabla.post
transaccion.commintretaing;

saludos

va el generator de nuevo porque lo puse con el tag de delphi

Código SQL [-]
CREATE GENERATOR GEN_INVERSIONISTAS_ID;
SET GENERATOR GEN_INVERSIONISTAS_ID TO 421

gracias

Ya lo he arreglado, recuerda, es así:



:)

Proba asi el trigger suponiendo que el valor Jid es el que se debe incrementar:

Código SQL [-]
CREATE TRIGGER T_INVERSION FOR DESARROLLO BEFORE INSERT POSITION 0 AS
begin
       If ((NEW.Jid is null) or (NEW.Jid = 0)) then
       NEW.Jid = GEN_ID(Gen_inversionistas_id,1);
end

Saludos

Edito: Juga con la condicion If porque no entendi bien si queres que se incremente cuando sean valores Null o no, en su caso (New.Jid is not null)

Gracias Martin

lo probe y anda ,tengo que probarlo ahora con cargas masivas

saludos

tulio