zOs/SKELS/REPAUNLO

//***** unload tb $tb in $ts
//S01    EXEC PGM=DSNUTILB,PARM=($dbSub,'${jobName}.UNLOAD')
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT  DD SYSOUT=*
//SYSOUT   DD SYSOUT=*
//SYSTEMPL  DD DISP=SHR,DSN=${dbSub}.DBAA.LISTDEF(TEMPL)
//SYSIN DD *
TEMPLATE TREC DSN('${pref}.&DB..&SN..P&PA..UNL')
              DATACLAS (ENN0X) MGMTCLAS(COM#A045)
TEMPLATE TPUN DSN('${pref}.&DB..&SN..P&PA..PUN')
              DATACLAS (ENN0X) MGMTCLAS(COM#A045)
LISTDEF LL INCLUDE TABLESPACE $ts PARTLEVEL
UNLOAD TABLESPACE $ts PART $partNo$partLast
  PUNCHDDN TPUN UNLDDN TREC
  SHRLEVEL REFERENCE