The module text to output file utility (CREPORT 052) lets you output module source code to a disk file. The CREPORT and KEY parameters used to output module CREPORT 011 to file are shown below:
CREPORT=052 KEY MOD-NAME-067 'CREPORT 011'
How to Run CREPORT 052
CREPORT 052 must be run alone. To run CREPORT 052, add the following specification to the JCL:
//SYS020 DD DSN=user.textfile,DISP=(NEW,CATLG), // DCB=(RECFM=FB,LRECL=80,BLKSIZE=320), // UNIT=disk,VOL=SER=nnnnnn
|
user.textfile |
data set name of the output file |
|
disk |
symbolic device name of disk |
|
nnnnnn |
volume serial number of disk |
// TLBL SYS020,'user.text' ASSGN SYS020,TAPE,VOL=nnnnnn
|
user.text |
file-id of tape file |
|
nnnnnn |
tape volume serial number |
// DLBL SYS020,'user.text' // EXTENT SYS020,nnnnnn ASSGN SYS020,DISK,VOL=nnnnnn,SHR
|
user.text |
file-id of disk file |
|
nnnnnn |
volume serial number of the disk file |
FILEDEF SYS020 DISK nonprint file a (RECFM FB LRECL 80 BLKSIZE 320
|
nonprint file a |
filename, filetype, and filemode of the nonprint/nonpunch output file |
|
Copyright © 2013 CA.
All rights reserved.
|
|