zOs/JCL/CSMADRD3

//A540769W JOB (CP00,KE50),'DB2 REO',                                   00010000
//         MSGCLASS=T,TIME=1440,                                        00020000
//         NOTIFY=&SYSUID,REGION=0M,SCHENV=DB2                          00030000
//*MAIN CLASS=LOG                                                       00040000
//**-------------------------------------------------------**           00041000
//** ZURUECKLADEN IM ZIEL-RZ                               **           00042000
//**-------------------------------------------------------**           00043000
//RESTORE   EXEC PGM=CSMUTIL,PARM='CSM,ADRDSSU'                         00044000
//SYSUT1    DD DSN=A540769.SN01067.DUMP,                                00045000
//          SUBSYS=(CSM,'SYSTEM=RQ2'),                                  00045100
//          DISP=OLD                                                    00046000
//RMTUT1    DD DSN=&&DUMP,A540769.SN01067.DUMPRMT,                      00047000
//          SPACE=(CYL,(4000,1000)),                                    00047100
//          SUBSYS=(CSM,'SYSTEM=RR2'),BLKSIZE=32760,                    00048000
//          DISP=(NEW,CATLG),RECFM=U                                    00049000
//SYSIN DD *                                                            00049100
  RESTORE DATASET(INCLUDE(**)) -                                        00049200
  INDDNAME(RMTUT1) CATALOG REPLACE                                      00049300
//                                                                      00049400
//**-------------------------------------------------------**           00050000
//** ABSPEICHERN IM AKTUELLEN-RZ                           **           00060000
//**-------------------------------------------------------**           00070000
//?UMP      EXEC PGM=ADRDSSU                                            00080000
//SYSPRINT  DD SYSOUT=*                                                 00090000
//SYSIN     DD *                                                        00100000
  DUMP DATASET(INCLUDE( DSN.RDBOF.SN010676.SN01A1P.A202A.AR00000 )) -   00110000
       ALLD(*) COM    -                                                 00120000
       CAN DYNAL WAIT(2,2) OUTDD(OUTDUMP)                               00130000
//OUTDUMP   DD DSN=A540769.SN01067.DUMP,                                00140000
//          SPACE=(CYL,(4000,1000)),                                    00150000
//          DISP=(,CATLG),DSNTYPE=LARGE                                 00160000
//                                                                      00170000