zOs/JCL/DB2SHRUL

//A540769U JOB (CAS25071,0000,,0000),'UNLOAD',
//         MSGCLASS=T,TIME=1440,
//         NOTIFY=A540769
//*MAIN CLASS=BS1
//***************************************************
//*   UNLOAD RZ2 --> RZ1 MIT SHR21.DIV.P021.*
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,
//   PARM=(DBOF,'A540769U.UNLOAD'),REGION=0M
//*
//STEPLIB  DD DISP=SHR,
//            DSN=DB2@.RZ2.P0.DSNLOAD
//ABNLIGNR DD DUMMY
//DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSIN DD *
    TEMPLATE  UNLD    DSN(SHR21.DIV.P021.A540769.&DB..&TS..UNL)
                      DATACLAS (NULL30) MGMTCLAS(COM#A015)
                      SPACE (10,250) CYL
    TEMPLATE  PUNCHD  DSN(SHR21.DIV.P021.A540769.&DB..&TS..PUN)
                      DATACLAS (NULL30) MGMTCLAS(COM#A015)
                      SPACE (1,1) CYL
    UNLOAD    TABLESPACE NZ06A1P.A242A
              FROM TABLE OA1P.TNZ242A1  SAMPLE 1.0
        PUNCHDDN   PUNCHD
        UNLDDN     UNLD
        SHRLEVEL CHANGE