zOs/TX/ININEU

$arg aEnv
$@ say 'start wsh dsn.tx.case(INI) qz91a1S qz92a1T'
srcdbSys   = DP4G
srcdb      = QZ91A1S
srccreator = QZ91CRS
trgdbSys   = DP4G
trgdb      = QZ92A1T
trgcreator = QZ92CRT
$@ if ${?pds} then $@:[
       ddl = $pds(${mpr}DDL)
    $]
gen        = DSN.TX.GENF
schenv     = DB2
$@ if $aEnv <> '' then $@:[
     env     = $aEnv
     dbSys   = ${${env}dbSys}
     db      = ${${env}db}
     creator = ${${env}creator}
     cr      = ${${env}creator}
     $]