++USERMOD(M024205) /* EDM1102 - UPDATE SGIEC0DT */.
++VER(Z038) FMID(EDM1102) PRE(UZ33147 M023201).
++MACUPD(SGIEC0DT).
./ CHANGE NAME=SGIEC0DT
.DB      AIF   (&TYPE(11) NE 1).DC                               MVS38J 17615100
.DC      AIF   (&TYPE(12) NE 1).DD    3375                       MVS38J 17656210
         EJECT                                             3375  MVS38J 17656220
*--------------------------------------------------------- 3375  MVS38J 17656230
*  USER MOD TO SUPPORT 3375 DEVICES                        3375  MVS38J 17656240
*  SEE AMODGEN(SGIEC0DT) AND SYM6-1(IHADVCT)               3375  MVS38J 17656250
*--------------------------------------------------------- 3375  MVS38J 17656260
Z12&SYSNDX DS  0F     DVC                                  3375  MVS38J 17656270
   DC    AL2(960)     CYL   #CYLS/DEV INCLUDING ALTERNATES  +00  MVS38J 17656280
   DC    AL2(12)      TRK   #TRKS/CYL                       +02  MVS38J 17656290
   DC    AL2(36000)   TRKLN #BYTES/TRK WITH STANDARD R0     +04  MVS38J 17656300
   DC    AL2(224)     OVH1  MODULO: OVERHEAD VALUE 1        +06  MVS38J 17656310
   DC    AL1(0)       OVNK  OVERHEAD DECREMENT NON-KEYED    +08  MVS38J 17656320
   DC    AL1(16)      FLAGS FLAG (MODULO, NO TOL)           +09  MVS38J 17656330
   DC    AL2(191)     OVH2  MODULO: OVERHEAD VALUE 2        +0A  MVS38J 17656340
   DC    AL2(12)      ALT   #ALTERNATE TRACKS/DEV           +0C  MVS38J 17656350
*  RPS DATA    -------------------------------------------       MVS38J 17656360
   DC    AL2(832)     OVR0  R0 OVERHEAD                     +0E  MVS38J 17656370
   DC    AL1(196)     SECT  #SECTORS IN FULL TRACK          +10  MVS38J 17656380
   DC    AL1(187)     DSECT #DATA SECTORS                   +11  MVS38J 17656390
   DC    AL2(192)     BPSEC #BYTES/SECTOR                   +12  MVS38J 17656400
*  MODULO DATA -------------------------------------------       MVS38J 17656410
   DC    AL2(32)      MOD1  MODULO FACTOR                   +14  MVS38J 17656420
*  LOCAL MODS  -------------------------------------------       MVS38J 17656430
   DC    AL2(0)             SPARE/ALIGN                     +16  MVS38J 17656440
   DC    V(UTRKCALC)        IEC0SCR1 zap support            +18  MVS38J 17656450
*--------------------------------------------------------- 3375  MVS38J 17656460
