Master Mainframe Technologies - COBOL, JCL, DB2, VSAM, CICS & More
ABEND Codes SQLCODEs File Status Interview Prep Contact
🖥 JCL

JCL Tape Processing

Intermediate 🕑 12 min read 👁 0 views

12

Code Example


## JCL Tape Processing

Handle tape datasets with special parameters for tape-specific operations.

### UNIT Parameter
\`\`\`jcl
UNIT=TAPE
UNIT=3490
UNIT=(TAPE,2)           Request 2 drives
UNIT=(TAPE,,DEFER)      Defer mount
\`\`\`

### VOL Parameter
\`\`\`jcl
VOL=SER=volser
VOL=(PRIVATE,RETAIN,SER=vol1)
VOL=REF=*.stepname.ddname
\`\`\`

### LABEL Parameter
\`\`\`jcl
LABEL=(seq,type,PASSWORD,IN/OUT)
LABEL=(1,SL)            Standard label, file 1
LABEL=(2,SL)            Second file on tape
LABEL=(,NL)             No label
LABEL=(,BLP)            Bypass label processing
\`\`\`

### EXPDT/RETPD
\`\`\`jcl
EXPDT=2025365           Expire date (Julian)
RETPD=90                Retain 90 days
\`\`\`

### Multi-Volume
\`\`\`jcl
VOL=SER=(VOL001,VOL002,VOL003)
\`\`\`

### DCB for Tape
\`\`\`jcl
DCB=(RECFM=FB,LRECL=80,BLKSIZE=32760,
     DEN=4,TRTCH=COMP)
\`\`\`