//APSWTRCF JOB 'ACCOUNT #','NAME',MSGLEVEL=(1,1) //**************************************************************** //* PSF TRACE FORMATTER INVOCATION JCL //**************************************************************** //STEP01 EXEC PGM=APSTRFMT,REGION=100K //* /* REGION = (3 * BLKSIZE) + 20K //* /* BLKSIZE = TRACEIN BLOCK SIZE //SYSUDUMP DD SYSOUT=* //TRACEIN DD UNIT=unit, <- UNIT MIGHT BE TAPE OR DASD. // DSN=tracein, <- SET TO PSF GENERATED TRACE //* DATA SET NAME. // DISP=SHR, // VOL=SER=volser <- SERIAL NUMBER OF //* VOLUME. //TRACEOUT DD UNIT=unit, <- UNIT MIGHT BE TAPE OR DASD. // DSN=traceout, <- SET TO DATA SET NAME WHERE //* FORMATTED RECORDS ARE //* PLACED. // DISP=disp, <- DISPOSITION OF TRACE OUT. // VOL=SER=volser <- SERIAL NUMVER OF VOLUME. //SYSPRINT DD SYSOUT=* //SYSIN DD * TYPE=SHORT /* //