
  VAR
    fdv$application_event_table: [XREF, READ, STATIC] array
          [csc$f1 .. csc$sf16] of fdt$event_trigger;

?? PUSH (LISTEXT := ON) ??
*copyc fdt$event_trigger
*copyc cst$application_functions
?? POP ??
