Precaución con eventos Firebird
 

Hola, en prueba de capturar los eventos generados en firebird Utilice FDEventAlerter para registrar los eventos, pero la gran sorpresa en que no registro todos los eventos generados en firebird 2.5 delphi version 10.1 update 2 Berlin solo captura 90% o menos de los eventos realizados en forma masiva.

Efectue otra prueba con los componentes devart UniAlerter y este si registro todos los eventos

Código Delphi [-]
procedure TForm1.UniAlerter1Event(Sender: TDAAlerter; const EventName,
  Message: string);
begin
  inc(NOMENSAJES);   // contar el numero de mensajes recibidos
  ClientDataSet1.Append ;
  ClientDataSet1.FieldByName('TEXTO').AsString := DateTimeToStr(now);
  ClientDataSet1.Post;
end;

// poblar tabla

Código SQL [-]
create or alter procedure AAPRUEBATABLAPROCEDURE
as
declare variable W_I integer = 0;
begin

  WHILE ( W_I < 50 ) DO BEGIN
    in autonomous transaction do  BEGIN
    INSERT INTO AAPRUEBATABLA ( COMENTARIO) VALUES(:W_I);
    END
    W_I = W_I + 1;
  END 
   suspend;
end

// generar evento

Código SQL [-]
CREATE OR ALTER trigger aapruebatabla_ai0 for aapruebatabla
active after insert position 0
AS
begin
 POST_EVENT 'PRUEBA';
end

Nunca he tenido problemas con eso :rolleyes:

Eventos Perdidos
 

Hola Casimiro, gracias por compartir tu experiencia.
Efectivamente la captura de eventos en delphi usando firedac normalmente no da problemas siempre y cuando cuando hay un tiempo entre la generación de cada evento en firebird y capturado en delphi; pero si requieres capturar una serie de eventos consecutivos que se suceden por la inserción masiva de registros la cosa cambia

Si realmente hay un problema, quizá debas decírselo al equipo de desarrollo. Estarán encantados de saberlo (y no es coña).

Mensaje a equipo de desarrollo
 

Gracias Nuño, pero antes de enviar un mensaje al equipo de desarrollo seria interesante que otra fuente validara si la información es correcta

Gracias por tu interes