
552 Using IBM Application Development Tools for z/OS and OS/390
//EXTRA DD DISP=OLD,DSN=DAVIN6.SPLIT.EXTRA
//SYSIN DD *
$$FILEM DSC INPUT=RECORDS,
$$FILEM OUTPUT=EXTRA,
$$FILEM PROC=*
DDNAME = ‘REC’ || FLD(1,2)
IF NCO(FLD(1,2),1,2,3) THEN DO
WRITE(DDNAME)
EXIT ‘DROP’
END
/+
/*
Language Environment runtime options report
Example A-4 depicts the complete output of our system’s Language Environment (LE)
runtime options. The report is produced when the RPTOPTS(ON) parameter is included at
program execution.
Example: A-4 Language Environment runtime options report
Options Report for Enclave TRADERD 10/16/02 4:38:55 PM
Language Environment V02 R10.00
LAST WH ...