REXX for CA JCLCheck and JCLNeat › Subroutines for JCLNeat › EOJ Processing Subroutine for JCLNeat

EOJ Processing Subroutine for JCLNeat

This statement invokes the EOJ processing subroutine at the end of every JOB in the JCL stream. You can place any logic here you want. For example, you can keep a count of total jobs processed or the number of jobs with specific accounting information.

You can use the IF statement to interrogate all of the same variables as for the DD and EOS statements (that is, the last generation of JOB/EXEC/DD variables). Only one generation of each statement type is active at any one time.

Note: JCLNeat variable modification is unavailable from both the EOS Processing Subroutine for JCLNeat and EOJ Processing Subroutine for JCLNeat. JCLNeat variables are available for interrogation ONLY.

      /********************************************************************/
      /*  Job  End  processing Logic                                      */
      /********************************************************************/
A       END_JOB_PROCESSING:
B          SAY ' End Job processing here'
C       Return

A

Defines the name of this subroutine to the DO WHILE loop.

B

The SAY command generates a message on the SYSTSPRT report ddname indicating that END_JOB processing was invoked.

C

Causes control to return to the main DO WHILE loop.