Recato53, puedes intentar hacer lo siguiente:
Defines 1 variable buleana de nivel 88 por ejemplo GLB-FLAG, en el evento Click tel Table, preguntas con un IF antes si la variable está a SI entonces abres el Form:
Código COBOL:
01 GLB-FLAG PIC X VALUE "S".
88 GLB-FLAG-SI VALUE "S".
88 GLB-FLAG-NO VALUE "N".
...
IF GLB-FLAG-SI
SET GLB-FLAG-NO TO TRUE
INVOKE POW-SELF "CallForm" ...
INVOKE POW-SELF "ThruEvents"
SET GLB-FLAG-SI TO TRUE
END-IF