SIS Core ZADT1T Changes

08/11/98 RP:  T1 array increased to 35 to accommodate DBD changes.
08/15/98 RP:  T1 Occurrences changed from 35 to 60 to accommodate
              expanded DBD translation values.  

              Modules Affected are:
              ACBUPL ACBUPW ACEDTW ZADT1T ABA010

              Modules to be recompiled are:
              ASD020 ASD040 ASD050 ASD052 ASD055
              ASD060 ASD095 BSD080 HSD045 MSD105
              MSD110 RSD061 RSD065 RSD070 SSD090
              SSD092 ABA010 ABD015 MBA440 RBA256
              RBA259 SBA420 SBA453 SBA460 SBA510
              SBA520 SBA580 SBA610 SBA640              

              Modules to be reassembled are:
              ZADT1T
------------------------------------------------------------------------------
&MLEN    SETC  '64'
         AIF   (&LEN GT &MLEN).ENTERR
         AIF   ('&NAME' EQ '').NAMERR
&NAME    CSECT

Note:  The "&MLEN" line needs to specify a number that is at least as large as the "RECORDS=" below but should not exceed 64.
------------------------------------------------------------------------------
.MEXIT   ANOP
         MEXIT
         MEND
*
*  THIS IS THE ONLINE VALUE/RANGE EDIT TABLE. THE RECORDS= PARAMETER
*  MUST BE SET TO A VALUE GREATER THAN OR EQUAL TO THE NUMBER OF T1
*  RECORDS CREATED BY XBA020. CONSULT THE XBA020 REPORT FOR THE SYSTEM
*  TO DETERMINE HOW MANY T1 RECORDS WERE CREATED.
*
ZADT1T   ZADTXT RECORDS=60
         END
*

Note:  The "RECORDS=" clause above was changed.
------------------------------------------------------------------------------
SIS Core In-House Changes
Last Modified: Tuesday, 28-Nov-2000 14:35:08 CST