AS/400 - Trigger AS400 ayuda!!!

Me dirijo a este foro con la esperanza que alguien sepa como puedo capturar el nombre del programa o aplicación la cual esta tratando de modificar la información de la base de datos para pasarselo a mi programa trigger.

De atemano gracias. por ayuda.

Juan /

Abajo te detallo los campos que integran el buffer del trigger, en ninguno de ellos esta el nombre del pgm que lo dispara.

slds
Daniel

Buffer del Trigger
--------------------------------------------------------

1 10 Carácter Nombre del archivo

11 10 Carácter Nombre de la biblioteca

21 10 Carácter Nombre del miembro

31 1 Carácter Evento Trigger (1=Insertar, 2=Suprimir, 3=Actualizar)

32 1 Carácter Ocurrencia Trigger (1=Antes, 2=Después)

33 1 Carácter Nivel de Compromiso (0=*NONE, 1=*CHG, 2=*CS, 3=*All

34 3 Carácter Reservado

37 4 Binario ID del código de grupo de caracteres

41 8 Carácter Reservado

49 4 Binario Desplazamiento de la imagen previa del registro

53 4 Binario Longitud de la imagen previa del registro

57 4 Binario Desplazamiento del mapa de campos nulos previo

61 4 Binario Longitud del mapa de campos nulos previo

65 4 Binario Desplazamiento de la imagen posterior del registro

69 4 Binario Longitud de la imagen posterior del registro

73 4 Binario Desplazamiento del mapa de campos nulos posterior

77 4 Binario Longitud del mapa de campos nulos posterior

81 16 Carácter Reservado