zOs/JCL/YWB11UNL
//YWB11UNL JOB (CP00,KE50),
// 'CATALOG',MSGCLASS=T,TIME=1440,
// NOTIFY=&SYSUID,REGION=0M
//*MAIN CLASS=DBOF
//*
//***************************************************
//* unload Job für TWB224A1, TWB225A1, TWB226A1, TWB228A1
//* TWB232A1, TWB233A1, TWB234A1
//* vor dem start echtes Datum (nicht PTA-Datum|) einsetzen:
//*
//* c D070402 Dxxxxxx all
//*
//***************************************************
//STEP1 EXEC PGM=DSNUTILB,TIME=1440,
// PARM=(DBOF,'YWB11UNL.UNLOA')
//*DSSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//UTPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//*SYSTEMPL DD DSN=DBOF.DBAA.LISTDEF(TEMPL),DISP=SHR
//SYSIN DD *
TEMPLATE TSRERR DSN('R2.DSN.&SSID..&DB..&SN..D070402.UNLO')
DATACLAS (NULL30) MGMTCLAS(COM#A092)
SPACE (10,1250) CYL
TEMPLATE TSPURR DSN('R2.DSN.&SSID..&DB..&SN..D070402.UNPU')
DATACLAS (NULL12) MGMTCLAS(COM#A092)
SPACE (10,250) CYL
LISTDEF LL INCLUDE TABLESPACE WB11A1P.A224A
INCLUDE TABLESPACE WB11A1P.A225A
INCLUDE TABLESPACE WB11A1P.A226A
INCLUDE TABLESPACE WB11A1P.A228A
INCLUDE TABLESPACE WB11A1P.A232A
INCLUDE TABLESPACE WB11A1P.A233A
INCLUDE TABLESPACE WB11A1P.A234A
UNLOAD LIST LL
-- TABLESPACE CZ10A1T.A399A
PUNCHDDN TSPURR UNLDDN TSRERR
SHRLEVEL REFERENCE
//*--------------------------------------------------------------------
//SYSXX DD *
TWB224A1 OA1P T WB11A1P A224A
TWB225A1 OA1P T WB11A1P A225A
TWB226A1 OA1P T WB11A1P A226A
TWB228A1 OA1P T WB11A1P A228A
TWB232A1 OA1P T WB11A1P A232A
TWB233A1 OA1P T WB11A1P A233A
TWB234A1 OA1P T WB11A1P A234A