++USERMOD(M023300) /* EDS1102 - UPDATE DATASET */.
++VER(Z038) FMID(EDS1102) PRE(UZ90083).
++MACUPD(DATASET).
./ CHANGE NAME=DATASET
.*       3330-1, 3340, 3350, 3380, or 3390                       MVS38J 01025037
.SWC     AIF   ('&VOL(2)' NE '3350' AND '&VOL(2)' NE '3380' AND        +01050037
               '&VOL(2)' NE '3390').E41                          MVS38J 01052038
.*       3330-1, 3340, 3350, 3380, or 3390                       MVS38J 03560037
.CONT1   AIF   ('&VOL(2)' NE '3350' AND '&VOL(2)' NE '3380' AND        +03806037
               '&VOL(2)' NE '3390').E25                          MVS38J 03807038
         AIF   ('&VOL(2)' EQ '3380').DS42 VALID                  MVS38J 15505037
         AIF   ('&VOL(2)' EQ '3390').DS42 VALID                  MVS38J 15510038
