zOs/JCL/PVSSAVE

//A540769V JOB (GOS42523,3010,,1088),NOTIFY=&SYSUID,MSGCLASS=T
//*
//        SET  DSNT=A540769.PVSSAVE.D05069
//*
//SAVE    EXEC PGM=ADRDSSU ,PARM='TYPRUN=NORUN'
//SYSPRINT DD  SYSOUT=*
//DDOUT01 DD   DISP=(NEW,CATLG,DELETE),
//             DSN=&DSNT,
//             MGMTCLAS=D002N000,
//             SPACE=(CYL,(300,200),RLSE),
//             UNIT=SYSDA
//SYSIN    DD  *
  DUMP -
    DYNALLOC -
    DATASET( -
      INCLUDE( -
          POSY.RZ2.P0.AKT.KARTE                      -
          PVSO.RZ2.P0.*.D05069.*.EINDAT%  -
          PVSO.RZ2.P0.*.D05069.*.INFRA    -
          PVSO.RZ2.P0.*.D05069.*.PARM     -
          PVSO.RZ2.P0.*.D05069.*.PVIERST  -
          PVSO.RZ2.P0.*.D05069.*.PVS2POSY -
             ) -
           ) -
    ALLDATA(*) -
    ALLEXCP -
    CANCELERROR -
    COMPRESS -
    OUTDDNAME(DDOUT01) -
    OPTIMIZE(4)