You might face an issue where the TAPE data set is deleted, but the VOLUME SERIAL allocated to that data set still showing the same data set in any of the TAPE utilities you have (Like TMS – TAPE MANAGEMENT SYSTEM). Now you know the TAPE data set is having the same Data set that got deleted (And you are not able to find in 3.4).In this scenario, you can make use of below JCL to recover the dataset to a different data set.

Deleted TAPE DSN: HLQ1.HLQ2.DELTED.TAPE

Recovered TAPE DSN: HLQ1.HLQ2.COPIED.TAPE

JCL:

//STEP01  EXEC PGM=SORT
//SORTIN   DD DSN=HLQ1.HLQ2.DELTED.TAPE,DISP=OLD,
//            UNIT=TAPE,VOL=SER=123456
//SORTOUT  DD DSN=HLQ1.HLQ2.COPIED.TAPE,
//            DISP=(,CATLG,CATLG),UNIT=TAPE,
//            DCB=(RECFM=FB,LRECL=80,BLKSIZE=0)
//SYSOUT   DD SYSOUT=*
//SYSIN    DD *
  SORT FIELDS=COPY

——————————————————————————————————–

In United States, If you would like to Earn Free Stocks, Credit card Points and Bank account Bonuses, Please visit My Finance Blog

——————————————————————————————————–

You may also like to look at:

Working on Mainframes – Is Change to a different technology necessary

Important SQL CODES and ABEND CODES

SORT JOIN – TO JOIN TWO FILES BASED ON A KEY

KNOW YOUR MAINFRAME

REXX – INITIAL SETUP

HOW TO SUBMIT A BATCH JOB FROM THE CICS PROGRAM

CICS – EXEC interface block – EIBRESP Values

CICS – EXEC interface block Fields

Flow of control between COBOL programs, run units, and CICS

CICS INTERVIEW QUESTIONS

CICS TIPS

COBOL – COPY and INCLUDE statements

COBOL – PERFORMANCE IMPROVEMENT

COBOL – SIGN STORED IN COMP, COMP-3 AND DISPLAY FORMATS

SHORTEST COBOL PROGRAM

RESTART LOGIC IN COBOL DB2 Program

GOBACK – EXIT PROGRAM – STOP RUN

Continuation lines in COBOL

Computational items – COMP, COMP 1 , COMP 2, COMP 3

COBOL program format

cobol indicator area column-7 and area a and area b

COBOL INTERVIEW QUESTIONS

COBOL TIPS

COBOL COMPILER OPTIONS

The IDENTIFICATION DIVISION