CA JCLCheck REXX Programming Interface › REXX EXEC #1 › Modifying the INITIAL PROCESSING Subroutine

Modifying the INITIAL PROCESSING Subroutine

CA JCLCheck executes the Initial Processing Subroutine once per execution. This code allows the Standards Administrator to set initial values for any user-defined variables to be used in the EXEC.

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