zOs/JCL/WGRTEST

//A540769C  JOB (CP00,KE50)                                             00010001
//*  wgrTest Parameter:
//*    1. Parameter: PvsIdents
//*    2. Parameter: RRNs, werden mit PvsIdents gepaart
//*    3. Parameter: Versandarten (Default = AU CH ER LW VI)
//*    4. Parameter: MailClasses  (Default A B1 B2 LS)
//*                      1 - n, default                 Default
//*    jeder Parameter: Liste von Space-separierten Wörtern
//S1       EXEC PGM=IKJEFT01,DYNAMNBR=200,TIME=99                       00020001
//SYSTSIN    DD *
   %WGRTEST W@01                                              ,-
            01                                                ,-
                     LW VI                                    ,-
            A  B1 B2 LS
//DDIN       DD DISP=SHR,DSN=POSY.RZ1.T0.AKT.TESTFA05.DATA(WGRAAA)
//*DDOUT      DD DISP=SHR,DSN=POSY.RZ1.T0.AKT.TESTFA05.DATA(WGROOO)
//*DDOU2      DD DISP=SHR,DSN=POSY.RZ1.T0.AKT.TESTFA05.DATA(WGROO2)
//DDOUT      DD DSN=PVT.AT.POS.WALTER0,
//             DISP=(NEW,CATLG,DELETE),
//             DCB=(RECFM=VBA,LRECL=32756),
//             SPACE=(9076,(205,895),RLSE),
//             UNIT=DISK,VOL=SER=PVPXXX
//DDOU2      DD DSN=PVT.AT.POS.WALTER2,
//             DISP=(NEW,CATLG,DELETE),
//             DCB=(RECFM=VBA,LRECL=32756),
//             SPACE=(9076,(205,895),RLSE),
//             UNIT=DISK,VOL=SER=PVPXXX
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSTERM  DD DUMMY
//SYSPROC  DD DISP=SHR,DSN=A540769.WK.REXX
//*SYSPROC  DD DISP=SHR,DSN=ORG.RZ1.B0106.KRDO4.EXEC