Previous Topic: REXX EXEC #2Next Topic: Modifying the JOB Processing Subroutine


Modifying the INITIAL PROCESSING Subroutine

Modify the Initial Processing Subroutine so that CA JCLCheck sets the count on the number of cartridges, DD statements, and error messages to zero before processing any of the JCL.

  1. Set the initial value of a counter for cart (cartridges) to zero for subsequent subroutines that use the cart_count variable.
  2. Set the initial value of a counter for dd (DD statements) to zero for subsequent subroutines that use the dd_count variable.
  3. Set the initial value of a counter for error ((E)rror messages) to zero for subsequent subroutines that use the error_count variable.
          /********************************************************************/
          /*  Initial Processing Subroutine                                  */
          /********************************************************************/
          INITIAL_PROCESSING:  
           cart_count = 0
           dd_count = 0
           error_count = 0
          Return