DCL A CHAR,
COMPLETION BUILTIN;
DISPLAY('MESSAGE TO OPERATOR')
REPLY(A) EVENT(E);
COMPLETION(E)='1'B;
The ERROR condition is raised.
Modify the program so that the event variable used as the target in the assignment or as the argument of the COMPLETION pseudovariable is not the same event variable associated with the DISPLAY statement. Or include a WAIT statement to prevent this statement from running until the active event is complete.
IBM0HO