Sunday, September 8, 2019

JCL unload the data into PS file form VSAM using RR number

//IBMUSERA JOB NOTIFY=&SYSUID
//*UNLOAD THE DATA INTO PS FROM VSAM USING RRN*****
//S1 EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
  REPRO IDS(IBMUSER.RATNESH.RRDS)-
        ODS(IBMUSER.RATNESH.PS)-
        FROMNUMBER(1)-
        TONUMBER(4)
/*

No comments:

Post a Comment