Sample JCL for PRSTRN10, PRSTRNFP, and PRSTRND2


The following figure provides an example of JCL for PRSTRNFP:

//JOBNAME  JOB  ...............
//STEP1    EXEC PGM=PRSTRNFP,REGION=192K,                
//              PARM='07105,0800,07105,1600,*,090000'    
//STEPLIB  DD   DSN=IMF.LOAD,DISP=SHR                    
//RESUTIL  DD   DSN=IRUF.MONTHS,DISP=SHR,                
//              DCB=(RECFM=VBS,LRECL=30970,BLKSIZE=30974)
//TRNLIST  DD   SYSOUT=A,DCB=BLKSIZE=133                 
//TRNLIST2 DD   SYSOUT=A,DCB=BLKSIZE=133                 
//TEMPFILE DD   UNIT=SYSDA,SPACE=(CYL,(20,4)),           
//              DCB=(RECFM=FB,LRECL=275,BLKSIZE=6050)    
//TRNSELEC DD   *                                        
TRN 03 00030                                             
TRN 08 00030                                             
TRN 11 00050                                             
TRN 10 00010 POTENTIAL HIGH DEDB CONTENTION              
/*                                                       
//SORTLIB  DD   DSN=SYS1.SORTLIB,DISP=SHR                
//SYSOUT   DD   SYSOUT=A                                 
//SORTWK01 DD   UNIT=SYSDA,SPACE=(CYL,(20))              
//SORTWK02 DD   UNIT=SYSDA,SPACE=(CYL,(20))              
//SORTWK03 DD   UNIT=SYSDA,SPACE=(CYL,(20))              
//

Note

The TEMPFILE DCB must be specified as follows:

PRSTRN10: DCB=RECFM=FB,LRECL=320,BLKSIZE=6400)
PRSTRNFP: DCB=RECFM=FB,LRECL=275,BLKSIZE=6050)
PRSTRND2: DCB=RECFM=FB,LRECL=280,BLKSIZE=6160)

 

Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*