zOs/SKELS/DBXCREN
//*** dbx rename import: automap sql only ******************************
//* change $change strategy $rStry
//* changeRem $changeRem
//${stp}RAUT EXEC PGM=PTLDRIVM,REGION=0M,
// PARM='SUFFIX=00,EP=RML${dol}CMAI'
//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
//MSGFILE DD SYSOUT=*
//*BNLIGNR DD DUMMY SUPPRESS ABENDAID DUMPS
//CNTLFILE DD DUMMY
//DDLIN DD DISP=SHR,DSN=$ddlin
//DDLINTRG DD DUMMY
//PARMFILE DD *
STRATEGY $rStry -- new strategy
CREATOR DBX -- new strategy
SHAREOPT U
STRTSSID $subsys -- ssid für Strategy
STRTDESC $change $changeRem
REPLACE
EXPOPT A -- A=explode source keep Target, X=drop unmap
TRGSSID $subsys -- target
RULECRTR $cacr -- change rule set
RULENAME ALL
MASKCRTR $cacr -- auto map mask
MASKNAME ALLLALLL
// IF ${stp}RAUT.RUN AND ${stp}RAUT.RC = 0 THEN
//*** ca: analyze mapStrategy $rStry *********************************
//${stp}RANA EXEC PGM=PTLDRIVM,REGION=0M,PARM='SUFFIX=00,EP=RML@MAIN'
//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
//MSGFILE DD SYSOUT=*
//REPFILE DD SYSOUT=*
//ABNLIGNR DD DUMMY SUPPRESS ABENDAID DUMPS
//* strategy
//DDLFILE DD DISP=SHR,DSN=$ddlout
//PARMFILE DD *
STRTSSID $subsys
CREATOR DBX
STRATEGY $rStry
AUXIMP N
MQTIMP
REFMQT N
SEQIMP
RTNIMP
RTNIIO N
SQLID S100447
DDLONLY
NOAUTHS
HEADER
TRAILER
REPINDDL
PREFIX DSN.DBA
MODEL4 @DEFAULT
MODEL4C S100447