Previous Topic: Processing VerbsNext Topic: Executing $CCFB103 from Another Program


Example

The following example shows a $CCFB103 execution.

//OPEN JOB,ACCT, PGMR,CLASS=X
//STEP EXEC PGM=$CCFB103,PARM=COND
-USER PAPERSYS
-RNME H. Schmidt
-RPH# 9100
-RMGR R. Deal
-APPL PAYROLL
-RDPT PAYROLL
-CORD H. Schmidt
-CPH# 9100
-DESC Modify report 10 to include subtotals for each cost
-DESC center.
 -TYPE MODIFICATION
-COM ** REPORT 10 MODIFICATION REQUEST **
-OPEN
-DESC Modify Report 14 to show the current employee address.
 -COM ** REPORT 14 MODIFICATION REQUEST **
-OPEN
-DESC correct report 23 to hold 7 digits in the total fields
-DESC instead of truncating the number.
 -TYPE PROBLEM
-COM ** REPORT 23 TRUNCATION ERROR **
-OPEN

The SYSOUT default for the report is:

DEST=LOCAL,COPIES=1,CLASS=A

(or as specified on the SYSOUT parameter in Option 12.0).

You can change the SYSOUT by including the ddname CCFPRINT in the JCL and defining the SYSOUT. For example:

//LOGOUT JOB,ACCT,PGMR,CLASS=X
//STEP EXEC PGM=$CCFB103,PARM=COND
//CCFPRINT DD SYSOUT=A,COPIES=3
      .
 control statements
      .
      .