zOs/SKELS/DBXCEXE

//*** ca: archive strategy & recoverDDL *******************************
//${stp}ARC1 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSPROC    DD DISP=SHR,DSN=$rexxLib
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTSPRT   DD SYSOUT=*
//START      DD DISP=(MOD,CATLG),MGMTCLAS=COM#A069,
//             DCB=(RECFM=FB,LRECL=80,DSORG=PS),
//             DSN=DSN.DBY${subsys}.${AUF7}.START
//SYSTSIN    DD *
 %ANAPOST ARC $subsys $libPre${subsys}.ANA($stry)    +
                   $rdlArc +
                   DSN.DBY${subsys}.${mbrNac}.##DT##.EXO
//       IF ${stp}ARC1.RUN  AND ${stp}ARC1.RC = 0 THEN
//*** ca: execute strategy *********************************************
//${stp}EXE  EXEC PGM=PTLDRIVM,REGION=4M,DYNAMNBR=200,
//             PARM='SUFFIX=00,EP=BPLBCTL'
//STEPLIB    DD DISP=SHR,DSN=$caload
//           DD DISP=SHR,DSN=$dsnload
//PTILIB     DD DISP=SHR,DSN=$caload
//           DD DISP=SHR,DSN=$dsnload
//PTIPARM    DD DISP=SHR,DSN=${capref}.CDBAPARM
//PTIXMSG    DD DISP=SHR,DSN=${capref}.CDBAXMSG
//SYSOUT     DD SYSOUT=*
//PTIIMSG    DD SYSOUT=*
//ABNLIGNR   DD DUMMY                 SUPPRESS ABENDAID DUMPS
//AUDIT      DD DISP=(NEW,CATLG,CATLG),MGMTCLAS=COM#A049,
//             DSN=DSN.DBY${subsys}.${mbrNac}.##DT##.EXO
//START      DD DISP=OLD,DSN=*.${stp}ARC1.START
//SYSPROC    DD DISP=SHR,DSN=$rexxLib
//UTPRINT    DD SYSOUT=*
//RNPRIN01   DD SYSOUT=*                new for runstats profile
//STPRIN01   DD SYSOUT=*
//SYSTEMPL   DD DISP=SHR,DSN=${subsys}.DBAA.LISTDEF(TEMPL)
//BPIIPT     DD DISP=SHR,DSN=$libPre${subsys}.ANA($mbrNac)  -- strategy
//BPIOPT   DD   *
.CONTROL BPID($libPre${subsys}.ANA-$mbrNac) +
 LOGID($subsys) UNIT(SYSDA)
.LIST SYSOUT(*) DDNAME(AUDIT)
.OPTION     ERRORS NOSQLERRORS RETRY(96)   BINDERRORS    +
     NODISCARDS WRAPLINE
.CONNECT $subsys
//       ENDIF
//*** ca: rename execution log ****************************************
//       IF ${stp}EXE.ABEND OR ${stp}EXE.RUN THEN
//${stp}ARC2 EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99
//SYSPROC    DD DISP=SHR,DSN=$rexxLib
//SYSPRINT   DD SYSOUT=*
//SYSUDUMP   DD SYSOUT=*
//SYSTSPRT   DD SYSOUT=*
//SYSTSIN    DD *
 %ANAPOST ARC $subsys DSN.DBY${subsys}.${mbrNac}.##DT##.EXO
//       ENDIF