Example 1:

Set the error processing mode to allow the dialog function to process return codes of 12 or higher.

ISPEXEC CONTROL ERRORS RETURN

or

Set the program variable BUFFER to contain:

CONTROL ERRORS RETURN

Set program variable BUFLEN to the length of the variable BUFFER. Enter the command:

CALL ISPEXEC (BUFLEN, BUFFER);
 

or alternately

CALL ISPLINK ('CONTROL ','ERRORS  ','RETURN  ');