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