//SAVCPTY      JOB ,'130400',CLASS=A,MSGCLASS=7,REGION=4096K
//*---------------------------------------------------------
//SVJ0005     EXEC PGM=ADRDSSU,
//             COND=(0,NE)
//STEPLIB  DD  DSN=SYS1.LINKLIB,DISP=SHR
//SYSPRINT DD  SYSOUT=*
//SYSUDUMP DD  DUMMY
//TAPE     DD  DSN=SAVELD.CPTY(+1),
//             DISP=(NEW,CATLG,UNCATLG),
//             UNIT=CTAPE,
//             DCB=(DSCB,TRTCH=COMP)
//SYSIN    DD  *
   DUMP OUTDDNAME (TAPE) SHARE CANCELERROR TOL(ENQF) -
        DATASET ( -
           INCLUDE( -
           CPTY.V7.*, -
           YOL.BATCH7.*, -
           YOL.CPY7.*, -
           YOL.FIC0759.YC.*, -
           YOL.FIC0760.YC.*, -
           YOL.FIC0761.YC.*, -
           YOL.FIC0762A.YC.*, -
           YOL.FIC0762B.YC.*, -
           YOL.FIC0763.YC.*, -
           YOL.FIC0764.YC.*, -
           YOL.FIC0768.YOL1.*, -
           YOL.FIC0769.YC.*, -
           YOL.JCL7.*, -
           YOL.MAP7.*, -
           YOL.TP7.*) -
           EXCLUDE( -
           CPTY.V7.XD00TR, -
           CPTY.V7.XM00TR) -
           )
//*----------------------------------------------------------