Error al insertar registro

[[egostar]]

Quiero agregar algo que hice,

Agregue un disparador así

Código SQL [-]
CREATE TRIGGER NUEVA_LLAMADA FOR LLAMADAS
ACTIVE AFTER INSERT POSITION 0
AS
begin
  post_event 'nueva_llamada';
  /* Trigger text */
end

Nota: Tambien lo puse en POSITION 1, por probar nadamas

Agregue un IBEvents y agregue en su propiedad Events "nueva_llamada"

En el código hice lo siguiente

Código Delphi [-]
procedure TDataModule1.IBEvents1EventAlert(Sender: TObject; EventName: string;
  EventCount: Integer; var CancelAlerts: Boolean);
begin
  if EventName='nueva_llamada' then
     showmessage('Registro nuevo en la base de datos')
end;

Pero nunca se dispara ese evento.

Salud OS.