* /* START OF SPECIFICATIONS **** @Y30SSJH 00020037 * 00030037 *01* MODULE-NAME = IDCTSDE0 00040037 *01* MODULE-TYPE = MODULE 00042037 *02* PROCESSOR = ASSEMBLER 00044037 * 00046037 **** END OF SPECIFICATIONS ** @Y30SSJH*/ 00048037 TITLE '***** IDCTSDE0 - DEFINE STATIC TEXT *****' 00048437 ********************************************************************** 00050002 * * 00100002 * MODULE NAME - IDCTSDE0 - STATIC TEXT MODULE FOR DEFINE * 00102002 * * 00104002 * DESCRIPTIVE NAME - STATIC TEXT MODULE FOR THE FUNCTION DEFINE * 00106002 * * 00108002 * COPYRIGHT - NONE * 00108402 * * 00109602 * RELEASE 2, LEVEL 0 * 00112337 * * 00114337 * FUNCTION - CONTAINS NO EXECUTIBLE CODE, ONLY STATIC TEXT ENTRIES * 00115137 * FOR THE FUNCTION DEFINE. * 00117837 * THIS MODULE IS LOADED BY IDCTP05 WHEN A STATIC TEXT * 00120537 * REQUEST IS MADE. * 00123202 * * 00133202 * NOTES - NONE * 00135202 * * 00135602 * DEPENDENCIES - NONE * 00161802 * RESTRICTIONS - NONE * 00171802 * REGISTER CONVENTIONS - NA * 00181802 * PATCH AREA - NA * 00183802 * * 00222802 * MODULE TYPE - TABLES * 00231702 * * 00240402 * PROCESSOR - ASSEMBLER * 00266602 * MODULE SIZE - 2000 BYTES * 00292837 * ATTRIBUTES - READ ONLY * 00319002 * * 00345202 * ENTRY POINT - NA * 00347202 * * 00355202 * EXIT NORMAL - NA * 00357202 * * 00365202 * EXIT ERROR - NA * 00365602 * * 00367202 * EXTERNAL REFERENCES - NA * 00367602 * * 00369202 * TABLES - NA * 00369602 * * 00371202 * MACROS - NA * 00371302 * * 00397602 ********************************************************************** 00423802 ********************************************************************* 00450002 * * 00500002 * THIS MODULE IS THE FIRST MODULE OF STATIC TEXT REQUIRED BY THE * 00510002 * DEFINE FUNCTION SUB-ROUTINES. * 00520002 * * 00530002 ********************************************************************* 00550002 * * 00600002 IDCTSDE0 CSECT 00610002 * 00620002 * THIS SECTION CONTAINS THE INDICES TO REACH AN ENTRY. * 00630002 * 00640002 INDEX DC H'25' COUNT OF ENTRIES. @OZ06147 00642037 INDEX1 DC Y(TXT1-INDEX) INCONSISTENT LISTS. 00644002 INDEX2 DC Y(TXT2-INDEX) INVALID RANGE LIST. 00646002 INDEX3 DC Y(TXT3-INDEX) VSAM DEFINE STRUCTURE MISSING. 00648002 INDEX4 DC Y(TXT4-INDEX) ENTYPE INCONSISTEN WITH OBJECT. 00648402 INDEX5 DC Y(TXT5-INDEX) PASSWORD SUPPRESSION IN MODEL. 00648802 INDEX6 DC Y(TXT6-INDEX) WRONG SPACE ALLOC 00648902 INDEX7 DC Y(TXT7-INDEX) VOLUME LIST OMITTED 00649002 INDEX8 DC Y(TXT8-INDEX) RECORD SIZE MISSING 00649102 INDEX9 DC Y(TXT9-INDEX) DATA ALLOC 00661802 INDEX10 DC Y(TXT10-INDEX) INDEX ALLOC 00671802 INDEX11 DC Y(TXT11-INDEX) CATALOG ALLOC 00673802 INDEX12 DC Y(TXT12-INDEX) SPACE ALLOC 00674202 INDEX13 DC Y(TXT13-INDEX) GENERATED NAMES 00674302 INDEX14 DC Y(TXT14-INDEX) DNAME NOT SPECIFIED. 00676302 INDEX15 DC Y(TXT15-INDEX) KEYRANGES ARE INVALID. 00680302 INDEX16 DC Y(TXT16-INDEX) AVE RCDSIZE > MAX RCDSIZE. 00682302 INDEX17 DC Y(TXT17-INDEX) KEYS PARAMETER REQUIRED FOR KSDS 00682702 INDEX18 DC Y(TXT18-INDEX) AVG ^= MAX (RRDS) @Y30SSJH 00682837 INDEX19 DC Y(TXT19-INDEX) REUSE INVALID @Y30SSJH 00682937 INDEX20 DC Y(TXT20-INDEX) REUSE CONFLICT @Y30SSJH 00683037 INDEX21 DC Y(TXT21-INDEX) RECOVERY VOLUME @Y30SSJH 00687237 INDEX22 DC Y(TXT22-INDEX) MAX RCDSIZE > 32,761 @Y30SSJH 00689237 INDEX23 DC Y(TXT23-INDEX) SPANNED INVALID - RRDS @Y30SSJH 00691237 INDEX24 DC Y(TXT24-INDEX) GDG NAME TOO LONG @Y30SSJH 00691337 INDEX25 DC Y(TXT25-INDEX) NON-ASCENDING KEYRANGE @OZ06147 00691437 EJECT 00691637 ********************************************************************* 00695837 * * 00700002 * THIS SECTION CONTAINS THE ENTRIES. * 00710002 * * 00720002 ********************************************************************* 00750002 * * 00800002 * FILE SEQUENCE LIST IS INCONSISTENT WITH VOLUME LIST. * 00850002 * * 00900002 TXT1 DC Y(TXT1B-TXT1A) ENTRY LENGTH. 00950002 DC X'8000' MESSAGE FLAG. 01000002 * SPACING CONTROL SUB-STRUCTURE. 01050002 TXT1A DC X'4000' SPACE SUB-STRUCTURE FLAG. 01100002 DC H'2' SPACING FACTOR. 01150002 DC C'R ' SPACING TYPE. 01200002 * STATIC TEXT SUB-STRUCTURE. 01250002 DC X'8400' STATIC & EOF FLAG. 01300002 DC Y(STE11B-STE11A) STATIC TEXT LENGTH. 01350002 DC Y(STE11A-TXT1A) STATIC TEXT OFFSET. 01400002 DC H'1' PRINT COLUMN. 01450002 DC Y(STE11B-STE11A) PRINT FIELD LENGTH. 01500002 DC H'0' CONVERSION FLAGS. (CHAR) 01550002 * STATIC TEXT ENTRY. 01600002 STE11A DC C'IDC3503I FILE SEQUENCE LIST IS INCONSISTENT WITH VOLUME*01650002 LIST' 01660002 STE11B EQU * 01700002 TXT1B EQU * 01750002 EJECT 01800002 * * 01850002 * THE RANGE LIST CANNOT BE CONSTRUCTED. 01900002 * * 01950002 TXT2 DC Y(TXT2B-TXT2A) ENTRY LENGTH. 02000002 DC X'8000' MESSAGE FLAG. 02050002 * SPACING CONTROL SUB-STRUCTURE. 02100002 TXT2A DC X'4000' SPACE SUB-STRUCTURE FLAG. 02150002 DC H'2' SPACING FACTOR. 02200002 DC C'R ' SPACING TYPE. 02250002 * STATIC TEXT SUB-STRUCTURE. 02300002 DC X'8400' STATIC & EOF FLAG. 02350002 DC Y(STE21B-STE21A) STATIC TEXT LENGTH. 02400002 DC Y(STE21A-TXT2A) STATIC TEXT OFFSET. 02450002 DC H'1' PRINT COLUMN. 02500002 DC Y(STE21B-STE21A) PRINT FIELD LENGTH. 02550002 DC H'0' CONVERSION FLAGS. (CHAR) 02600002 * STATIC TEXT ENTRY. 02650002 STE21A DC C'IDC3504I THE RANGE LIST CANNOT BE CONSTRUCTED' 02700002 STE21B EQU * 02750002 TXT2B EQU * 02800002 EJECT 02850002 * * 02900002 * A VALID VSAM DEFINE STRUCTURE WAS NOT PROVIDED. 02950002 * * 03000002 TXT3 DC Y(TXT3B-TXT3A) ENTRY LENGTH. 03050002 DC X'8000' MESSAGE FLAG. 03100002 * SPACING CONTROL SUB-STRUCTURE. 03150002 TXT3A DC X'4000' SPACE SUB-STRUCTURE FLAG. 03200002 DC H'2' SPACING FACTOR. 03250002 DC C'R ' SPACING TYPE. 03300002 * STATIC TEXT SUB-STRUCTURE. 03350002 DC X'8400' STATIC & EOF FLAG. 03400002 DC Y(STE31B-STE31A) STATIC TEXT LENGTH. 03450002 DC Y(STE31A-TXT3A) STATIC TEXT OFFSET. 03500002 DC H'1' PRINT COLUMN. 03550002 DC Y(STE31B-STE31A) PRINT FIELD LENGTH. 03600002 DC H'0' CONVERSION FLAGS. (CHAR) 03650002 * STATIC TEXT ENTRY. 03700002 STE31A DC C'IDC3500I A VALID VSAM DEFINE STRUCTURE WAS NOT PROVIDED*03750002 ' 03760002 STE31B EQU * 03800002 TXT3B EQU * 03850002 EJECT 03900002 * * 03950002 * MODEL ENTYPE IS NOT CONSISTENT WITH THE OBJECT BEING DEFINED. 04000002 * * 04050002 TXT4 DC Y(TXT4B-TXT4A) ENTRY LENGTH. 04100002 DC X'8000' MESSAGE FLAG. 04150002 * SPACING CONTROL SUB-STRUCTURE. 04200002 TXT4A DC X'4000' SPACE SUB-STRUCTURE FLAG. 04250002 DC H'2' SPACING FACTOR. 04300002 DC C'R ' SPACING TYPE. 04350002 * STATIC TEXT SUB-STRUCTURE. 04400002 DC X'8400' STATIC & EOF FLAG. 04450002 DC Y(STE41B-STE41A) STATIC TEXT LENGTH. 04500002 DC Y(STE41A-TXT4A) STATIC TEXT OFFSET. 04550002 DC H'1' PRINT COLUMN. 04600002 DC Y(STE41B-STE41A) PRINT FIELD LENGTH. 04650002 DC H'0' CONVERSION FLAGS. (CHAR) 04700002 * STATIC TEXT ENTRY. 04750002 STE41A DC C'IDC3501I MODEL ENTYPE IS NOT CONSISTENT WITH THE OBJECT*04800002 BEING DEFINED' 04810002 STE41B EQU * 04850002 TXT4B EQU * 04900002 EJECT 04950002 * * 05000002 * PASSWORD SUPPRESSION IN MODEL OBJECT. 05050002 * * 05100002 TXT5 DC Y(TXT5B-TXT5A) ENTRY LENGTH. 05150002 DC X'8000' MESSAGE FLAG. 05200002 * SPACING CONTROL SUB-STRUCTURE. 05250002 TXT5A DC X'4000' SPACE SUB-STRUCTURE FLAG. 05300002 DC H'2' SPACING FACTOR. 05350002 DC C'R ' SPACING TYPE. 05400002 * STATIC TEXT SUB-STRUCTURE. 05450002 DC X'8400' STATIC & EOF FLAG. 05500002 DC Y(STE51B-STE51A) STATIC TEXT LENGTH. 05550002 DC Y(STE51A-TXT5A) STATIC TEXT OFFSET. 05600002 DC H'1' PRINT COLUMN. 05650002 DC Y(STE51B-STE51A) PRINT FIELD LENGTH. 05700002 DC H'0' CONVERSION FLAGS. (CHAR) 05750002 * STATIC TEXT ENTRY. 05800002 STE51A DC C'IDC1502I PASSWORD SUPPRESSION IN MODEL OBJECT' 05850002 STE51B EQU * 05900002 TXT5B EQU * 05950002 EJECT 05960002 * 06010002 * INCORRECT SPECIFICATION OF SPACE ALLOCATION. 06060002 * 06110002 TXT6 DC Y(TXT6B-TXT6A) ENTRY LENGTH. 06160002 DC X'8000' MESSAGE FLAG. 06210002 * SPACING CONTROL SUB-STRUCTURE. 06260002 TXT6A DC X'4000' SPACE CONTROL FLAG. 06310002 DC H'2' SPACING FACTOR. 06360002 DC C'R ' SPACING TYPE. 06410002 * STATIC TEXT SUB-STRUCTURE. 06460002 DC X'8400' STATIC TEXT FLAG. 06510002 DC Y(STE61B-STE61A) ENTRY LENGTH. 06560002 DC Y(STE61A-TXT6A) ENTRY OFFSET. 06610002 DC H'1' PRINT COLUMN. 06660002 DC Y(STE61B-STE61A) PRINT FIELD LENGTH. 06710002 DC H'0' CONVERSION FLAGS. (CHAR) 06760002 * STATIC TEXT ENTRIES. 06810002 STE61A DC C'IDC3505I INCORRECT SPECIFICATION OF SPACE ALLOCATION' 06860002 STE61B EQU * 06910002 TXT6B EQU * 06960002 EJECT 07010002 * 07060002 * A REQUIRED VOLUME LIST HAS BEEN OMITTED. 07110002 * 07160002 TXT7 DC Y(TXT7B-TXT7A) ENTRY LENGTH. 07210002 DC X'8000' MESSAGE FLAG. 07260002 * SPACING CONTROL SUB-STRUCTURE. 07310002 TXT7A DC X'4000' SPACING CONTROL FLAG. 07360002 DC H'2' SPACING FACTOR. 07410002 DC C'R ' SPACING TYPE. 07460002 * STATIC TEXT SUB-STRUCTURE. 07510002 DC X'8400' STATIC TEXT FLAG. 07560002 DC Y(STE71B-STE71A) ENTRY LENGTH. 07610002 DC Y(STE71A-TXT7A) ENTRY OFFSET. 07660002 DC H'1' PRINT COLUMN. 07710002 DC Y(STE71B-STE71A) PRINT FIELD LENGTH. 07760002 DC H'0' CONVERSION FLAGS. (CHAR) 07810002 * STATIC TEXT ENTRIES. 07860002 STE71A DC C'IDC3506I A REQUIRED VOLUME LIST HAS BEEN OMITTED' 07910002 STE71B EQU * 07960002 TXT7B EQU * 08010002 EJECT 08060002 * 08110002 * THE RECORDSIZE PARAMETER IS REQUIRED BUT NOT SPECIFIED. 08160002 * 08210002 TXT8 DC Y(TXT8B-TXT8A) ENTRY LENGTH. 08260002 DC X'8000' MESSAGE FLAG. 08310002 * SPACING CONTROL SUB-STRUCTURE. 08360002 TXT8A DC X'4000' SPACE CONTROL FLAG. 08410002 DC H'2' SPACING FACTOR. 08460002 DC C'R ' SPACING TYPE. 08510002 * STATIC TEXT SUB-STRUCTURE. 08560002 DC X'8400' STATIC TEXT FLAG. 08610002 DC Y(STE81B-STE81A) ENTRY LENGTH. 08660002 DC Y(STE81A-TXT8A) ENTRY OFFSET. 08710002 DC H'1' PRINT COLUMN. 08760002 DC Y(STE81B-STE81A) PRINT FIELD LENGTH. 08810002 DC H'0' CONVERSION FLAGS. (CHAR) 08860002 * STATIC TEXT ENTRIES. 08910002 STE81A DC C'IDC3507I THE RECORDSIZE PARAMETER IS REQUIRED BUT NOT SP*08960002 ECIFIED' 09010002 STE81B EQU * 09060002 TXT8B EQU * 09110002 EJECT 09160002 * 09210002 * DATA ALLOCATION STATUS MESSAGE. 09260002 * 09310002 TXT9 DC Y(TXT9B-TXT9A) ENTRY LENGTH 09360002 DC X'8000' message flag. 09410002 * SPACING CONTROL SUB-STRUCTURE. 09460002 TXT9A DC X'4000' SPACE CONTROL FLAG. 09510002 DC H'2' SPACING FACTOR. 09560002 DC C'R ' SPACING TYPE. 09610002 * REDO SUB-STRUCTURE. 09660002 DC X'0800' REDO FLAG. 09710002 DC H'1' REFERENCE NUMBER. 09760002 DC H'3' STRUCTURE COUNT. 09810002 DC H'8' INPUT OFFSET. 09860002 * STATIC TEXT SUB-STRUCTURE. 09910002 DC X'0400' STATIC FLAG. 09960002 DC Y(STE91B-STE91A) ENTRY LENGTH. 10010002 DC Y(STE91A-TXT9A) ENTRY OFFSET. 10060002 DC H'1' PRINT COLUMN. 10110002 DC Y(STE91B-STE91A) PRINT FIELD LENGTH. 10160002 DC H'0' CONVERSION FLAGS. 10210002 * BLOCK DATA SUB-STRUCTURE. 10260002 DC X'1000' BLOCK DATA FLAG. 10310002 DC H'6' INPUT DATA LENGTH. 10360002 DC H'2' INPUT DATA OFFSET. 10410002 DC H'44' PRINT COLUMN. 10460002 DC H'6' PRINT FIELD LENGTH. 10510002 DC H'0' CONVERSION FLAGS. (CHAR) 10560002 * BLOCK DATA SUB-STRUCTURE. 10610002 DC X'9000' BLOCK & EOF FLAGS. 10660002 DC H'1' INPUT DATA LENGTH. 10710002 DC H'0' INPUT DATA OFFSET. 10760002 DC H'54' PRINT COLUMN. 10810002 DC H'3' PRINT FIELD LENGTH. 10860002 DC X'1060' CONVERSION FLAGS. (BD,AL,SS) 10910002 * STATIC TEXT ENTRIES. 10960002 STE91A DC C'IDC0508I DATA ALLOCATION STATUS FOR VOLUME IS' 11010002 STE91B EQU * 11060002 TXT9B EQU * 11110002 EJECT 11160002 * 11210002 * INDEX ALLOCATION STATUS MESSAGE. 11260002 * 11310002 TXT10 DC Y(TXT10B-TXT10A) ENTRY LENGTH. 11360002 DC X'8000' MESSAGE FLAG. 11410002 * SPACING CONTROL SUB-STRUCTURE. 11460002 TXT10A DC X'4000' SPACE CONTROL FLAG. 11510002 DC H'2' SPACING FACTOR. 11560002 DC C'R ' SPACING TYPE. 11610002 * REDO SUB-STRUCTURE. 11660002 DC X'0800' REDO FLAG. 11710002 DC H'1' REFERENCE NUMBER. 11760002 DC H'3' STRUCTURE COUNT. 11810002 DC H'8' INPUT OFFSET. 11860002 * STATIC TEXT SUB-STRUCTURE. 11910002 DC X'0400' STATIC FLAG. 11960002 DC Y(STE101B-STE101A) ENTRY LENGTH. 12010002 DC Y(STE101A-TXT10A) ENTRY OFFSET. 12060002 DC H'1' PRINT COLUMN. 12110002 DC Y(STE101B-STE101A) PRINT FIELD LENGTH. 12160002 DC H'0' CONVERSION FLAGS. 12210002 * BLOCK DATA SUB-STRUCTURE. 12260002 DC X'1000' BLOCK DATA FLAG. 12310002 DC H'6' INPUT DATA LENGTH. 12360002 DC H'2' INPUT DATA OFFSET. 12410002 DC H'45' PRINT COLUMN. 12460002 DC H'6' PRINT FIELD LENGTH. 12510002 DC H'0' CONVERSION FLAGS. (CHAR) 12560002 * BLOCK DATA SUB-STRUCTURE. 12610002 DC X'9000' BLOCK & EOF FLAGS. 12660002 DC H'1' INPUT DATA LENGTH. 12710002 DC H'0' INPUT DATA OFFSET. 12760002 DC H'55' PRINT COLUMN. 12810002 DC H'3' PRINT FIELD LENGTH. 12860002 DC X'1060' CONVERSION FLAGS. (BD,AL,SS) 12910002 * STATIC TEXT ENTRIES. 12960002 STE101A DC C'IDC0509I INDEX ALLOCATION STATUS FOR VOLUME IS' 13010002 STE101B EQU * 13060002 TXT10B EQU * 13110002 EJECT 13160002 * 13210002 * CATALOG ALLOCATION STATUS MESSAGE. 13260002 * 13310002 TXT11 DC Y(TXT11B-TXT11A) ENTRY LENGTH. 13360002 DC X'8000' MESSAGE FLAG. 13410002 * SPACING CONTROL SUB-STRUCTURE. 13460002 TXT11A DC X'4000' SPACE CONTROL FLAG. 13510002 DC H'2' SPACING FACTOR. 13560002 DC C'R ' SPACING TYPE. 13610002 * REDO SUB-STRUCTURE. 13660002 DC X'0800' REDO FLAG. 13710002 DC H'1' REFERENCE NUMBER. 13760002 DC H'3' STRUCTURE COUNT. 13810002 DC H'8' INPUT OFFSET. 13860002 * STATIC TEXT SUB-STRUCTURE. 13910002 DC X'0400' STATIC FLAG. 13960002 DC Y(STE111B-STE111A) ENTRY LENGTH. 14010002 DC Y(STE111A-TXT11A) ENTRY OFFSET. 14060002 DC H'1' PRINT COLUMN. 14110002 DC Y(STE111B-STE111A) PRINT FIELD LENGTH. 14160002 DC H'0' CONVERSION FLAGS. 14210002 * BLOCK DATA SUB-STRUCTURE. 14260002 DC X'1000' BLOCK DATA FLAG. 14310002 DC H'6' INPUT DATA LENGTH. 14360002 DC H'2' INPUT DATA OFFSET. 14410002 DC H'47' PRINT COLUMN. 14460002 DC H'6' PRINT FIELD LENGTH. 14510002 DC H'0' CONVERSION FLAGS. (CHAR) 14560002 * BLOCK DATA SUB-STRUCTURE. 14610002 DC X'9000' BLOCK & EOF FLAGS. 14660002 DC H'1' INPUT DATA LENGTH. 14710002 DC H'0' INPUT DATA OFFSET. 14760002 DC H'57' PRINT COLUMN. 14810002 DC H'3' PRINT FIELD LENGTH. 14860002 DC X'1060' CONVERSION FLAGS. (BD,AL,SS) 14910002 * STATIC TEXT ENTRIES. 14960002 STE111A DC C'IDC0510I CATALOG ALLOCATION STATUS FOR VOLUME IS' 15010002 STE111B EQU * 15060002 TXT11B EQU * 15110002 EJECT 15160002 * 15210002 * SPACE ALLOCATION STATUS MESSAGE. 15260002 * 15310002 TXT12 DC Y(TXT12B-TXT12A) ENTRY LENGTH. 15360002 DC X'8000' MESSAGE FLAG. 15410002 * SPACING CONTROL SUB-STRUCTURE. 15460002 TXT12A DC X'4000' SPACE CONTROL FLAG. 15510002 DC H'2' SPACING FACTOR. 15560002 DC C'R ' SPACING TYPE. 15610002 * REDO SUB-STRUCTURE. 15660002 DC X'0800' REDO FLAG. 15710002 DC H'1' REFERENCE NUMBER. 15760002 DC H'3' STRUCTURE COUNT. 15810002 DC H'8' INPUT OFFSET. 15860002 * STATIC TEXT SUB-STRUCTURE. 15910002 DC X'0400' STATIC FLAG. 15960002 DC Y(STE121B-STE121A) ENTRY LENGTH. 16010002 DC Y(STE121A-TXT12A) ENTRY OFFSET. 16060002 DC H'1' PRINT COLUMN. 16110002 DC Y(STE121B-STE121A) PRINT FIELD LENGTH. 16160002 DC H'0' CONVERSION FLAGS. 16210002 * BLOCK DATA SUB-STRUCTURE. 16260002 DC X'1000' BLOCK DATA FLAG. 16310002 DC H'6' INPUT DATA LENGTH. 16360002 DC H'2' INPUT DATA OFFSET. 16410002 DC H'45' PRINT COLUMN. 16460002 DC H'6' PRINT FIELD LENGTH. 16510002 DC H'0' CONVERSION FLAGS. (CHAR) 16560002 * BLOCK DATA SUB-STRUCTURE. 16610002 DC X'9000' BLOCK & EOF FLAGS. 16660002 DC H'1' INPUT DATA LENGTH. 16710002 DC H'0' INPUT DATA OFFSET. 16760002 DC H'55' PRINT COLUMN. 16810002 DC H'3' PRINT FIELD LENGTH. 16860002 DC X'1060' CONVERSION FLAGS. (BD,AL,SS) 16910002 * STATIC TEXT ENTRIES. 16960002 STE121A DC C'IDC0511I SPACE ALLOCATION STATUS FOR VOLUME IS' 17010002 STE121B EQU * 17060002 TXT12B EQU * 17110002 EJECT 17160002 * 17210002 * GENERATED NAME MESSAGE. 17260002 * 17310002 TXT13 DC Y(TXT13B-TXT13A) ENTRY LENGTH. 17360002 DC X'8000' MESSAGE FLAG. 17410002 * SPACING CONTROL SUB-STRUCTURE. 17460002 TXT13A DC X'4000' SPACE CONTROL FLAG. 17510002 DC H'2' SPACING FACTOR. 17560002 DC C'R ' SPACING TYPE. 17610002 * REDO SUB-STRUCTURE. 17660002 DC X'0800' REDO FLAG. 17710002 DC H'1' REFERENCE NUMBER. 17760002 DC H'3' STRUCTURE COUNT. 17810002 DC H'45' INPUT OFFSET. 17860002 * STATIC TEXT SUB-STRUCTURE. 17910002 DC X'0400' STATIC FLAG. 17960002 DC Y(STE131B-STE131A) ENTRY LENGTH. 18010002 DC Y(STE131A-TXT13A) ENTRY OFFSET. 18060002 DC H'1' PRINT COLUMN. 18110002 DC Y(STE131B-STE131A) PRINT FIELD LENGTH. 18160002 DC H'0' CONVERSION FLAGS. 18210002 * BLOCK DATA SUB-STRUCTURE. 18260002 DC X'1000' BLOCK DATA FLAG. 18310002 DC H'1' INPUT DATA LENGTH. 18360002 DC H'0' INPUT DATA OFFSET. 18410002 DC H'26' PRINT COLUMN. 18460002 DC H'1' PRINT FIELD LENGTH. 18510002 DC H'0' CONVERSION FLAGS. (CHAR) 18560002 * BLOCK DATA SUB-STRUCTURE. 18610002 DC X'9000' BLOCK & EOF FLAGS. 18660002 DC H'44' INPUT DATA LENGTH. 18710002 DC H'1' INPUT DATA OFFSET. 18760002 DC H'29' PRINT COLUMN. 18810002 DC H'44' PRINT FIELD LENGTH. 18860002 DC X'0000' CONVERSION FLAGS. (CHAR) 18910002 * STATIC TEXT ENTRIES. 18960002 STE131A DC C'IDC0512I NAME GENERATED-( )' 19010002 STE131B EQU * 19060002 TXT13B EQU * 19110002 EJECT 19160002 * 19210002 * DNAME NOT SPECIFIED WITH UNIQUE ATTRIBUTE OR ALLOCATION FAILED 19260002 * 19310002 TXT14 DC Y(TXT14B-TXT14A) ENTRY LENGTH. 19360002 DC X'8000' MESSAGE FLAG. 19410002 * SPACING CONTROL SUB-STRUCTURE. 19460002 TXT14A DC X'4000' SPACING FLAG. 19510002 DC H'2' SPACING FACTOR. 19560002 DC C'R ' SPACING TYPE. 19610002 * STATIC TEXT SUB-STRUCTURE. 19660002 DC X'8400' STATIC FLAG. 19710002 DC Y(STE141B-STE141A) TEXT LENGTH. 19760002 DC Y(STE141A-TXT14A) TEXT OFFSET. 19810002 DC H'1' PRINT COLUMN. 19860002 DC Y(STE141B-STE141A) PRINT FIELD LENGTH. 19910002 DC H'0' CONVERSION FLAGS. (CHAR) 19960002 * STATIC TEXT ENTRIES. 20010002 STE141A DC C'IDC3513I DYNAMIC ALLOCATION FAILED OR FILE' @VS07859 20060002 DC C' NOT CODED WHEN REQUIRED' @VS07859 20070002 STE141B EQU * 20110002 TXT14B EQU * 20160002 EJECT 20260002 * 20310002 * KEYRANGES ARE INVALID. 20360002 * 20410002 TXT15 DC Y(TXT15B-TXT15A) ENTRY LENGTH. 20460002 DC X'8000' MESSAGE FLAG. 20510002 * SPACING CONTROL SUB-STRUCTURE. 20560002 TXT15A DC X'4000' SPACING FLAG. 20610002 DC H'2' SPACING FACTOR. 20660002 DC C'R ' SPACING TYPE. 20710002 * STATIC TEXT SUB-STRUCTURE. 20760002 DC X'8400' STATIC FLAG. 20810002 DC Y(STE151B-STE151A) TEXT LENGTH. 20860002 DC Y(STE151A-TXT15A) TEXT OFFSET. 20910002 DC H'1' PRINT COLUMN. 20960002 DC Y(STE151B-STE151A) PRINT FIELD LENGTH. 21010002 DC H'0' CONVERSION FLAGS. (CHAR) 21060002 * STATIC TEXT ENTRIES. 21110002 STE151A DC C'IDC3514I KEYRANGES ARE INVALID' 21160002 STE151B EQU * 21210002 TXT15B EQU * 21260002 EJECT 21360002 * 21410002 * AVERAGE RECORDSIZE EXCEEDS MAXIMUM RECORDSIZE. 21460002 * 21510002 TXT16 DC Y(TXT16B-TXT16A) ENTRY LENGTH. 21560002 DC X'8000' MESSAGE FLAG. 21610002 * SPACING CONTROL SUB-STRUCTURE. 21660002 TXT16A DC X'4000' SPACING FLAG. 21710002 DC H'2' SPACING FACTOR. 21760002 DC C'R ' SPACING TYPE. 21810002 * STATIC TEXT SUB-STRUCTURE. 21860002 DC X'8400' STATIC FLAG. 21910002 DC Y(STE161B-STE161A) TEXT LENGTH. 21960002 DC Y(STE161A-TXT16A) TEXT OFFSET. 22010002 DC H'1' PRINT COLUMN. 22060002 DC Y(STE161B-STE161A) PRINT FIELD LENGTH. 22110002 DC H'0' CONVERSION FLAGS. (CHAR) 22160002 * STATIC TEXT ENTRIES. 22210002 STE161A DC C'IDC3515I AVERAGE RECORD SIZE EXCEEDS MAXIMUM RECORD ' 22260002 DC C'SIZE' 22262002 STE161B EQU * 22310002 TXT16B EQU * 22360002 EJECT 22362002 * 22364002 * KEYS PARAMETER REQUIRED FOR KEY SEQUENCED DATA SET. 22370002 * 22380002 TXT17 DC Y(TXT17B-TXT17A) ENTRY LENGTH. 22390002 DC X'8000' MESSAGE FLAG. 22400002 * SPACING CONTROL SUB-STRUCTURE. 22402002 TXT17A DC X'4000' SPACING FLAG. 22404002 DC H'2' SPACING FACTOR. 22406002 DC C'R ' SPACING TYPE. 22408002 * STATIC TEXT SUB-STRUCTURE. 22408402 DC X'8400' STATIC FLAG. 22408802 DC Y(STE171B-STE171A) TEXT LENGTH. 22409202 DC Y(STE171A-TXT17A) TEXT OFFSET. 22409602 DC H'1' PRINT COLUMN. 22409702 DC Y(STE171B-STE171A) PRINT FIELD LENGTH. 22409802 DC H'0' CONVERSION FLAGS. (CHAR) 22409902 * STATIC TEXT ENTRIES. 22459902 STE171A DC C'IDC3516I KEYS PARAMETER REQUIRED FOR KEY SEQUENCED ' 22469902 DC C'DATA SET' 22479902 STE171B EQU * 22489902 TXT17B EQU * 22499902 EJECT 22549937 * @Y30SSJH 22599937 * AVERAGE AND MAXIMUM RECORDSIZE UNEQUAL FOR RRDS @Y30SSJH 22649937 * @Y30SSJH 22699937 TXT18 DC Y(TXT18B-TXT18A) ENTRY LENGTH. @Y30SSJH 22749937 DC X'8000' MESSAGE FLAG. @Y30SSJH 22799937 * SPACING CONTROL SUB-STRUCTURE. @Y30SSJH 22849937 TXT18A DC X'4000' SPACING FLAG. @Y30SSJH 22899937 DC H'2' SPACING FACTOR. @Y30SSJH 22949937 DC C'R ' SPACING TYPE. @Y30SSJH 22999937 * STATIC TEXT SUB-STRUCTURE. @Y30SSJH 23049937 DC X'8400' STATIC FLAG. @Y30SSJH 23099937 DC Y(STE181B-STE181A) TEXT LENGTH. @Y30SSJH 23149937 DC Y(STE181A-TXT18A) TEXT OFFSET. @Y30SSJH 23199937 DC H'1' PRINT COLUMN. @Y30SSJH 23249937 DC Y(STE181B-STE181A) PRINT FIELD LENGTH. @Y30SSJH 23299937 DC H'0' CONVERSION FLAGS(CHAR) @Y30SSJH 23349937 * STATIC TEXT ENTRIES. @Y30SSJH 23399937 STE181A DC C'IDC3517I AVG AND MAX RECORDSIZE NOT EQUAL FOR RELATIVE R*23449937 ECORD DATA SET' @Y30SSJH 23499937 STE181B EQU * @Y30SSJH 23549937 TXT18B EQU * @Y30SSJH 23599937 EJECT @Y30SSJH 23649937 * @Y30SSJH 23699937 * REUSE PARAMETER INVALID WITH UNIQUE OR KEYRANGE @Y30SSJH 23749937 * @Y30SSJH 23799937 TXT19 DC Y(TXT19B-TXT19A) ENTRY LENGTH. @Y30SSJH 23849937 DC X'8000' MESSAGE FLAG. @Y30SSJH 23899937 * SPACING CONTROL SUB-STRUCTURE. @Y30SSJH 23949937 TXT19A DC X'4000' SPACING FLAG. @Y30SSJH 23999937 DC H'2' SPACING FACTOR. @Y30SSJH 24049937 DC C'R ' SPACING TYPE. @Y30SSJH 24099937 * STATIC TEXT SUB-STRUCTURE. @Y30SSJH 24149937 DC X'8400' STATIC FLAG. @Y30SSJH 24199937 DC Y(STE191B-STE191A) TEXT LENGTH. @Y30SSJH 24249937 DC Y(STE191A-TXT19A) TEXT OFFSET. @Y30SSJH 24299937 DC H'1' PRINT COLUMN. @Y30SSJH 24349937 DC Y(STE191B-STE191A) PRINT FIELD LENGTH. @Y30SSJH 24399937 DC H'0' CONVERSION FLAGS(CHAR) @Y30SSJH 24449937 * STATIC TEXT ENTRIES. @Y30SSJH 24499937 STE191A DC C'IDC3518I REUSE PARAMETER INVALID WITH UNIQUE OR KEYRANGE*24549937 S' @Y30SSJH 24599937 STE191B EQU * @Y30SSJH 24649937 TXT19B EQU * @Y30SSJH 24699937 EJECT @Y30SSJH 24749937 * @Y30SSJH 24799937 * REUSE ATTRIBUTE CONFLICT @Y30SSJH 24849937 * @Y30SSJH 24899937 TXT20 DC Y(TXT20B-TXT20A) ENTRY LENGTH. @Y30SSJH 24949937 DC X'8000' MESSAGE FLAG. @Y30SSJH 24999937 * SPACING CONTROL SUB-STRUCTURE. @Y30SSJH 25049937 TXT20A DC X'4000' SPACING FLAG. @Y30SSJH 25099937 DC H'2' SPACING FACTOR. @Y30SSJH 25149937 DC C'R ' SPACING TYPE. @Y30SSJH 25199937 * STATIC TEXT SUB-STRUCTURE. @Y30SSJH 25249937 DC X'8400' STATIC FLAG. @Y30SSJH 25299937 DC Y(STE201B-STE201A) TEXT LENGTH. @Y30SSJH 25349937 DC Y(STE201A-TXT20A) TEXT OFFSET. @Y30SSJH 25399937 DC H'1' PRINT COLUMN. @Y30SSJH 25449937 DC Y(STE201B-STE201A) PRINT FIELD LENGTH. @Y30SSJH 25499937 DC H'0' CONVERSION FLAGS(CHAR) @Y30SSJH 25549937 * STATIC TEXT ENTRIES. @Y30SSJH 25599937 STE201A DC C'IDC3519I REUSE ATTRIBUTE CONFLICT BETWEEN DATA AND INDEX*25649937 ' @Y30SSJH 25699937 STE201B EQU * @Y30SSJH 25749937 TXT20B EQU * @Y30SSJH 25799937 EJECT @Y30SSJH 25849937 * @Y30SSJH 25899937 * RECOVERY VOLUME MESSAGE @Y30SSJH 25949937 * @Y30SSJH 25999937 TXT21 DC Y(TXT21B-TXT21A) ENTRY LENGTH. @Y30SSJH 26049937 DC X'8000' MESSAGE FLAG. @Y30SSJH 26099937 * SPACING CONTROL SUB-STRUCTURE. @Y30SSJH 26149937 TXT21A DC X'4000' SPACE CONTROL FLAG. @Y30SSJH 26199937 DC H'2' SPACING FACTOR. @Y30SSJH 26249937 DC C'R ' SPACING TYPE. @Y30SSJH 26299937 * STATIC TEXT SUB-STRUCTURE. @Y30SSJH 26349937 DC X'0400' STATIC FLAG. @Y30SSJH 26399937 DC Y(STE211B-STE211A) ENTRY LENGTH. @Y30SSJH 26449937 DC Y(STE211A-TXT21A) ENTRY OFFSET. @Y30SSJH 26499937 DC H'1' PRINT COLUMN. @Y30SSJH 26549937 DC Y(STE211B-STE211A) PRINT FIELD LENGTH. @Y30SSJH 26599937 DC H'0' CONVERSION FLAGS. @Y30SSJH 26649937 * BLOCK DATA SUB-STRUCTURE. @Y30SSJH 26699937 DC X'9000' BLOCK & EOF FLAGS. @Y30SSJH 26749937 DC H'6' INPUT DATA LENGTH. @Y30SSJH 26799937 DC H'0' INPUT DATA OFFSET. @Y30SSJH 26849937 DC H'37' PRINT COLUMN. @Y30SSJH 26899937 DC H'6' PRINT FIELD LENGTH. @Y30SSJH 26949937 DC X'0000' CONVERSION FLAGS. (CHAR) 26999937 * STATIC TEXT ENTRIES. @Y30SSJH 27049937 STE211A DC C'IDC0520I CATALOG RECOVERY VOLUME IS' @Y30SSJH 27099937 STE211B EQU * @Y30SSJH 27149937 TXT21B EQU * @Y30SSJH 27199937 EJECT @Y30SSJH 27249937 * @Y30SSJH 27299937 * MAXIMUM RECORDSIZE > 32,761 BUT SPANNED NOT SPECIFIED @Y30SSJH 27349937 * @Y30SSJH 27399937 TXT22 DC Y(TXT22B-TXT22A) ENTRY LENGTH. @Y30SSJH 27449937 DC X'8000' MESSAGE FLAG. @Y30SSJH 27499937 * SPACING CONTROL SUB-STRUCTURE. @Y30SSJH 27549937 TXT22A DC X'4000' SPACING FLAG. @Y30SSJH 27599937 DC H'2' SPACING FACTOR. @Y30SSJH 27649937 DC C'R ' SPACING TYPE. @Y30SSJH 27699937 * STATIC TEXT SUB-STRUCTURE. @Y30SSJH 27749937 DC X'8400' STATIC FLAG. @Y30SSJH 27799937 DC Y(STE221B-STE221A) TEXT LENGTH. @Y30SSJH 27849937 DC Y(STE221A-TXT22A) TEXT OFFSET. @Y30SSJH 27899937 DC H'1' PRINT COLUMN. @Y30SSJH 27949937 DC Y(STE221B-STE221A) PRINT FIELD LENGTH. @Y30SSJH 27999937 DC H'0' CONVERSION FLAGS(CHAR) @Y30SSJH 28049937 * STATIC TEXT ENTRIES. @Y30SSJH 28099937 STE221A DC C'IDC3522I SPANNED ATTRIBUTE REQUIRED FOR RECORDSIZE GREAT*28149937 ER THAN 32,761' @Y30SSJH 28199937 STE221B EQU * @Y30SSJH 28249937 TXT22B EQU * @Y30SSJH 28299937 EJECT @Y30SSJH 28349937 * @Y30SSJH 28399937 * SPANNED INVALID FOR RELATIVE RECORD DATA SET @Y30SSJH 28449937 * @Y30SSJH 28499937 TXT23 DC Y(TXT23B-TXT23A) ENTRY LENGTH. @Y30SSJH 28549937 DC X'8000' MESSAGE FLAG. @Y30SSJH 28599937 * SPACING CONTROL SUB-STRUCTURE. @Y30SSJH 28649937 TXT23A DC X'4000' SPACING FLAG. @Y30SSJH 28699937 DC H'2' SPACING FACTOR. @Y30SSJH 28749937 DC C'R ' SPACING TYPE. @Y30SSJH 28799937 * STATIC TEXT SUB-STRUCTURE. @Y30SSJH 28849937 DC X'8400' STATIC FLAG. @Y30SSJH 28899937 DC Y(STE231B-STE231A) TEXT LENGTH. @Y30SSJH 28949937 DC Y(STE231A-TXT23A) TEXT OFFSET. @Y30SSJH 28999937 DC H'1' PRINT COLUMN. @Y30SSJH 29049937 DC Y(STE231B-STE231A) PRINT FIELD LENGTH. @Y30SSJH 29099937 DC H'0' CONVERSION FLAGS(CHAR) @Y30SSJH 29149937 * STATIC TEXT ENTRIES. @Y30SSJH 29199937 STE231A DC C'IDC3521I SPANNED ATTRIBUTE INVALID FOR A RELATIVE RECORD*29249937 DATA SET' @Y30SSJH 29299937 STE231B EQU * @Y30SSJH 29349937 TXT23B EQU * @Y30SSJH 29399937 EJECT @Y30SSJH 29409937 * @Y30SSJH 29419937 * GDG NAME EXCEEDS LENGTH LIMIT 29429937 * @Y30SSJH 29439937 TXT24 DC Y(TXT24B-TXT24A) ENTRY LENGTH. @Y30SSJH 29441937 DC X'8000' MESSAGE FLAG. @Y30SSJH 29443937 * SPACING CONTROL SUB-STRUCTURE. @Y30SSJH 29445937 TXT24A DC X'4000' SPACING FLAG. @Y30SSJH 29447937 DC H'2' SPACING FACTOR. @Y30SSJH 29448337 DC C'R ' SPACING TYPE. @Y30SSJH 29448737 * STATIC TEXT SUB-STRUCTURE. @Y30SSJH 29449137 DC X'8400' STATIC FLAG. @Y30SSJH 29449537 DC Y(STE241B-STE241A) TEXT LENGTH. @Y30SSJH 29449637 DC Y(STE241A-TXT24A) TEXT OFFSET. @Y30SSJH 29449737 DC H'1' PRINT COLUMN. @Y30SSJH 29449837 DC Y(STE241B-STE241A) PRINT FIELD LENGTH. @Y30SSJH 29499837 DC H'0' CONVERSION FLAGS(CHAR) @Y30SSJH 29509837 * STATIC TEXT ENTRIES. @Y30SSJH 29519837 STE241A DC C'IDC3523I GENERATION DATA GROUP NAMES CANNOT EXCEED 35 CH*29529837 ARACTERS' 29531837 STE241B EQU * @Y30SSJH 29541837 TXT24B EQU * @Y30SSJH 29543837 EJECT @OZ06147 29545837 * @OZ06147 29547837 * KEYRANGES NON-ASCENDING OR KEYRANGE KEYS TOO LONG @OZ06147 29548237 * @OZ06147 29548637 TXT25 DC Y(TXT25B-TXT25A) ENTRY LENGTH. @OZ06147 29549037 DC X'8000' MESSAGE FLAG. @OZ06147 29549437 * SPACING CONTROL SUB-STRUCTURE. @OZ06147 29549537 TXT25A DC X'4000' SPACING FLAG. @OZ06147 29549637 DC H'2' SPACING FACTOR. @OZ06147 29549737 DC C'R ' SPACING TYPE. @OZ06147 29599737 * STATIC TEXT SUB-STRUCTURE. @OZ06147 29609737 DC X'8400' STATIC FLAG. @OZ06147 29619737 DC Y(STE251B-STE251A) TEXT LENGTH. @OZ06147 29629737 DC Y(STE251A-TXT25A) TEXT OFFSET. @OZ06147 29639737 DC H'1' PRINT COLUMN. @OZ06147 29641737 DC Y(STE251B-STE251A) PRINT FIELD LENGTH. @OZ06147 29643737 DC H'0' CONVERSION FLAGS(CHAR) @OZ06147 29645737 * STATIC TEXT ENTRIES. @OZ06147 29647737 STE251A DC C'IDC3524I KEYRANGE VALUES EXCEED KEYLENGTH OR ARE NOT IN *29648137 ASCENDING ORDER' @OZ06147 29648237 STE251B EQU * @OZ06147 29648937 TXT25B EQU * @OZ06147 29649337 END 29649737