Examples

To cause a control break (skip to the top of a new page) when the first character of the report identifier changes, enter the following:

/IF SUBSTR(RID,1,1) ^= SUBSTR(PREV(RID),1,1)
/         PRINT PAGE
/END

To print the first special instruction line in column 3 after skipping two lines, enter the following:

/PRINT INST1 COL(3) SKIP(2)

To print job name, step name, procedure step name, ddname, and report identifier with meaningful headings, enter the following statements:

/PRINT JOB 'JOB,NAME'
/PRINT STEP 'STEP,NAME'
/PRINT PROCSTEP 'PROCEDURE,STEP NAME'
/PRINT DD 'DD,NAME'
/PRINT RID 'REPORT,IDENTIFIER'

To print a descriptive title preceding the field being printed, specify:

/PRINT 'CLASS='||CLASS

The same data can be printed using separate statements as follows:

/PRINT 'CLASS='
/PRINT CLASS COL