Using and Modifying Copied Code › Nesting the USE Parameter › Demonstration

Demonstration

Objective

This is a partial example that produces the same report as that shown earlier for the reports generated from the WITH VALUES and DEFAULT clauses.

Procedure

• A USE parameter in the job stream copies the stored code.
• USE * parameter and a WITH VALUES clause assign values to the symbolic parameters.
• An END clause signals the end of the code affected by the USE parameter.

The Job Stream

USE RPT624
/*

The Stored Code

 col. 2
 ▼
USE *                  $Start of code sequence affected by changes
WITH VALUES (mmddyy,mmddyy,mmddyy,'MONTHLY REPORTS')
 IN 80
 REC ACCOUNT  1   5    'ACCOUNT'
   .
   .
   .
 END                     $End of code incorporating changes

Note: The code would specify actual dates in the format shown.