zOs/REXX.O13/PVSRTRA1
***** parm file pvt7600 *****
***** RZ1 it ('prod') : PVT7600T *****
***** Rückmeldung Einschreibenummern an BU *****
mask = 'PVSO.RZ1.P0.**.TRACK2' * maske zum Suchen der Trackfiles
renameLLQ= TRACK3 * auf diesen llq werden die
* gemeldeten Trackfiles umbenannt
prefix = PVSP.RZ1.P0.PVSTRACK * Präfix für lokale BU-Datasets
* jede Zuweisung an defineBU
* definiert eine BU
* die ersten drei Wörter des
* Wertes müssen
* buId, func, node
* der Rest sind Attribute für CD
* (entweder intern bekannte
* oder für OPARM?=...=...)
*
* unterstützte Funktionen
* cd = send mit connect direct
* wr = file nur schreiben
* nn = file nicht schreiben
* WGR Test
defineBU = "U0034 cd TEST" +
"dsn=T1DAT.DOCSYS.FTSCS.PVSTRACK(+1)" +
"mgmtClas=MCGDG dataClas=DCVFILE" +
"lrecl=32756 maxDelay=00:10:00"
* WGR Acceptance läuft
* vorläufig im RZ1
defineBU = "A0034 wr ACC" +
"dsn=P1DAT.DOCSYS.FTSCS.PVSTRACK(+1)" +
"mgmtClas=MCGDG dataClas=DCVFILE" +
"lrecl=32756 maxDelay=00:10:00"