Logging executed instructions

For each instruction executed, OCL writes messages in the data sets referred to by the SYSTSPRT DD card and by the OCLLOG DD card. These messages describe the instruction that have been executed by OCL. The data set referred to by the OCLLOG DD card must be allocated with LRECL 133 and RECFM FB and used with disposition MOD.

The logging function requires the OCLLOG DD card to be specified in the OCL procedure. For an example OCL procedure, see EQQYRPRC sample procedure.

Note: Instructions are logged only if the OCLLOG DD card is specified.

An example of the log records follows:

07/30 13:41:33 EQQCL00I Instruction : INIT VARTAB(&OADID)
07/30 13:41:34 EQQCL02I INIT    instruction executed : RC=0
07/30 13:41:34 EQQCL00I Instruction : SETUPD VAR1 = 'PIPPO'
07/30 13:41:34 EQQCL02I SETUPD  instruction executed : RC=0
07/30 13:41:34 EQQCL00I Instruction : COMPL APPL(TEST01)
07/30 13:41:35 EQQCL02E COMPL   instruction executed : RC=8
07/30 13:41:35 EQQCL00I Instruction : CHKAPPL APPL(TEST02)
07/30 13:41:35 EQQCL02W CHKAPPL instruction executed : RC=4
07/30 13:41:35 EQQCL00I Instruction : IF RESULT = 8 THEN NOP

An example of the messages written in the SYSTSPRT DD card follows:

EQQCL01I ==================================================================
EQQCL00I Processing: CHKAPPL APPL(TEST01) STATUS(S)
EQQCL0JI Searching for the occurrence TEST01 in CP
EQQCL0OI Occurrence found: APPL(TEST01) IA(9709080800) STATUS(S)
EQQCL0OI Occurrence found: APPL(TEST01) IA(9709080930) STATUS(S)
EQQCL0KI Total n. of matching occurrences: 2
EQQCL01I ==================================================================
EQQCL00I Processing: IF RESULT=0 THEN ADD APPL(TEST02)
EQQCL03I True condition: IF RESULT = 0
EQQCL01I ==================================================================
EQQCL00I Processing: ADD APPL(TEST02)
EQQCL0AI The occurrence was successfully added: APPL(TEST02) IA(9709091657