zOs/SKELS/DBXST

//*** extrahiertes ddl ins $toRz senden ********************************
//COPYDDL  EXEC PGM=CSMAPPC,
//           PARM='START PGM(CSMAUTIL) PARM(''INDD(I)'')'
//SYSPRINT DD SYSOUT=*
//I        DD *
   COPY        ${libPre}.${what}DDL($mbrNac)    -
     TO  $toRz/${libPre}.${rz}DDL($mbrNac)
//COPYCAT  EXEC PGM=CSMAPPC,
//           PARM='START PGM(CSMAUTIL) PARM(''INDD(I)'')'
//SYSPRINT DD SYSOUT=*
//I        DD *
   COPY        ${libPre}.${what}CAT($mbrNac)    -
     TO  $toRz/${libPre}.${rz}CAT($mbrNac)