Ver Mensaje Individual
  #1  
Antiguo 10-05-2005
subzero subzero is offline
No confirmado
 
Registrado: ene 2004
Ubicación: Móntería - Córdoba - Colombia
Posts: 289
Reputación: 0
subzero Va por buen camino
Procedimientos y Triggers

Hola a todos en el foro:

Alguien me podía decir como se pueden crear procedimientos o triggers desde delphi en Interbase, las versiones que estoy utilizando son la 7 de delphi y la 6 de Interbase.

Cabe anotar que ya he tratado pero me presenta un problema con los TERM

Cita:
sql.Add('CREATE TRIGGER DISP_EVAL_INT_GRAF_CONS_' + AnsiUpperCase(Logica.registro_usuario.login_usuario) + ' FOR VAL_INTERNA_GRAFICO_ADMIN ACTIVE');
sql.Add('BEFORE INSERT POSITION 0');
sql.Add('AS BEGIN');
sql.Add('IF (NEW.CONSECUTIVO IS NULL) THEN');
sql.Add(' NEW.CONSECUTIVO = GEN_ID(EVAL_INT_GRAF_CONS_' + AnsiUpperCase(usuario) +', 1);');
sql.Add('END');
Responder Con Cita