TITLE '***** IDCTSDU0 - DUMPMSS STATIC TEXT *****' @Z40LB40 00020003 * /* START OF SPECIFICATIONS **** @Z40LB40 00040003 *02* PROCESSOR = ASSEMBLER @Z40LB40 00060003 **** END OF SPECIFICATIONS ***/ @Z40LB40 00080003 ************************************************************ @Z40LB40 00100003 * MODULE NAME - IDCTSDU0 * @Z40LB40 00120003 * * @Z40LB40 00140003 * DESCRIPTIVE NAME - STATIC TEXT MODULE FOR THE DUMPMSS * @Z40LB40 00160003 * FUNCTION * @Z40LB40 00180003 * * @Z40LB40 00200003 * COPYRIGHT - NONE * @Z40LB40 00220003 * * @Z40LB40 00240003 * STATUS - CHANGE LEVEL = 0 * @Z40LB40 00260003 * * @Z40LB40 00280003 * FUNCTION - CONTAINS NO EXECUTABLE CODE, ONLY STATIC * @Z40LB40 00300003 * TEXT ENTRIES FOR THE FUNCTION DUMPMSS. * @Z40LB40 00320003 * THIS MODULE IS LOADED BY IDCTP05 WHEN A * @Z40LB40 00340003 * STATIC TEXT REQUEST IS MADE. * @Z40LB40 00360003 * * @Z40LB40 00380003 * NOTES - NONE * @Z40LB40 00400003 * * @Z40LB40 00420003 * DEPENDENCIES - NONE * @Z40LB40 00440003 * RESTRICTIONS - NONE * @Z40LB40 00460003 * REGISTER CONVENTIONS - NA * @Z40LB40 00480003 * PATCH AREA - NA * @Z40LB40 00500003 * * @Z40LB40 00520003 * MODULE TYPE - TABLES * @Z40LB40 00540003 * * @Z40LB40 00560003 * PROCESSOR - ASSEMBLER * @Z40LB40 00580003 * MODULE SIZE - 5300 BYTES * @Z40LB40 00600003 * ATTRIBUTES - READ ONLY * @Z40LB40 00620003 * * @Z40LB40 00640003 * ENTRY POINT - NA * @Z40LB40 00660003 * * @Z40LB40 00680003 * EXIT NORMAL - NA * @Z40LB40 00700003 * * @Z40LB40 00720003 * EXIT ERROR - NA * @Z40LB40 00740003 * * @Z40LB40 00760003 * EXTERNAL REFERENCES - NA * @Z40LB40 00780003 * * @Z40LB40 00800003 * TABLES - NA * @Z40LB40 00820003 * * @Z40LB40 00840003 * MACROS - NA * @Z40LB40 00860003 * * @Z40LB40 00880003 * CHANGE ACTIVITY - * @Z40LB40 00900003 * @ZD00038 - DCRR MSSR2-38 * @ZD00038 00914003 * @ZD00050 - DCRR MSSR2-50 * @ZD00050 00916003 * * @Z40LB40 00920003 ************************************************************ @Z40LB40 00940003 EJECT @Z40LB40 00960003 ************************************************************ @Z40LB40 00980003 * THIS MODULE IS THE FIRST MODULE OF STATIC TEXT FOR * @Z40LB40 01000003 * DUMPMSS FSR. * @Z40LB40 01020003 ************************************************************ @Z40LB40 01040003 * @Z40LB40 01060003 IDCTSDU0 CSECT @Z40LB40 01080003 * @Z40LB40 01100003 INDEX DC Y((INDEXEND-INDEX1)/2) COUNT OF ENTRIES @Z40LB40 01120003 INDEX1 DC Y(TXT1-INDEX) @Z40LB40 01140003 INDEX2 DC Y(TXT2-INDEX) @Z40LB40 01160003 INDEX3 DC Y(TXT3-INDEX) @Z40LB40 01180003 INDEX4 DC Y(TXT4-INDEX) @Z40LB40 01200003 INDEX5 DC Y(TXT5-INDEX) @Z40LB40 01220003 INDEX6 DC Y(TXT6-INDEX) @Z40LB40 01240003 INDEX7 DC Y(TXT7-INDEX) @Z40LB40 01260003 INDEX8 DC Y(TXT8-INDEX) @Z40LB40 01280003 INDEX9 DC Y(TXT9-INDEX) @Z40LB40 01300003 INDEX10 DC Y(TXT10-INDEX) @Z40LB40 01320003 INDEX11 DC Y(TXT11-INDEX) @Z40LB40 01340003 INDEX12 DC Y(TXT12-INDEX) @Z40LB40 01360003 INDEX13 DC Y(TXT13-INDEX) @Z40LB40 01380003 INDEX14 DC Y(TXT14-INDEX) @Z40LB40 01400003 INDEX15 DC Y(TXT15-INDEX) @Z40LB40 01420003 INDEX16 DC Y(TXT16-INDEX) @Z40LB40 01440003 INDEX17 DC Y(TXT17-INDEX) @Z40LB40 01460003 INDEX18 DC Y(TXT18-INDEX) @ZD00050 01480003 INDEX19 DC Y(TXT19-INDEX) @ZD00050 01500003 INDEX20 DC Y(TXT20-INDEX) @Z40LB40 01520003 INDEX21 DC Y(TXT21-INDEX) @Z40LB40 01540003 INDEX22 DC Y(TXT22-INDEX) @Z40LB40 01560003 INDEX23 DC Y(TXT23-INDEX) @ZD00050 01580003 INDEX24 DC Y(TXT24-INDEX) @Z40LB40 01600003 INDEX25 DC Y(TXT25-INDEX) @ZD00050 01620003 INDEX26 DC Y(TXT26-INDEX) @ZD00050 01640003 INDEX27 DC Y(TXT27-INDEX) @Z40LB40 01660003 INDEX28 DC Y(TXT28-INDEX) @ZA27590 01680000 INDEX29 DC H'-1' @Z40LB40 01700003 INDEX30 DC Y(TXT30-INDEX) @Z40LB40 01720003 INDEX31 DC Y(TXT31-INDEX) @Z40LB40 01740003 INDEX32 DC Y(TXT32-INDEX) @Z40LB40 01760003 INDEX33 DC Y(TXT33-INDEX) @Z40LB40 01780003 INDEX34 DC Y(TXT34-INDEX) @Z40LB40 01800003 INDEX35 DC H'-1' @ZD00050 01820003 INDEX36 DC Y(TXT36-INDEX) @Z40LB40 01840003 INDEX37 DC Y(TXT37-INDEX) @Z40LB40 01860003 INDEX38 DC Y(TXT38-INDEX) @Z40LB40 01880003 INDEX39 DC Y(TXT39-INDEX) @Z40LB40 01900003 INDEX40 DC Y(TXT40-INDEX) @Z40LB40 01920003 INDEX41 DC Y(TXT41-INDEX) @Z40LB40 01940003 INDEX42 DC Y(TXT42-INDEX) @Z40LB40 01960003 INDEX43 DC Y(TXT43-INDEX) @Z40LB40 01980003 INDEX44 DC Y(TXT44-INDEX) @Z40LB40 02000003 INDEX45 DC Y(TXT45-INDEX) @Z40LB40 02020003 INDEX46 DC Y(TXT46-INDEX) @Z40LB40 02040003 INDEX47 DC Y(TXT47-INDEX) @Z40LB40 02060003 INDEX48 DC Y(TXT48-INDEX) @Z40LB40 02080003 INDEXEND DS 0H @Z40LB40 02100003 EJECT @Z40LB40 02120003 ************************************************************ @Z40LB40 02140003 * IDC21100I UNABLE TO DUMP MSC MAIN STORAGE * @Z40LB40 02160003 ************************************************************ @Z40LB40 02180003 SPACE 3 @Z40LB40 02200003 TXT1 DC Y(TXT1B-TXT1A) ENTRY LENGTH @Z40LB40 02220003 DC X'8000' MESSAGE FLAG @Z40LB40 02240003 SPACE 1 @Z40LB40 02260003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 02280003 TXT1A DC X'4000' SPACE CONTROL FLAG @Z40LB40 02300003 DC H'1' SPACING FACTOR @Z40LB40 02320003 DC C'R ' SPACING TYPE @Z40LB40 02340003 SPACE 1 @Z40LB40 02360003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 02380003 DC X'8400' STATIC TEXT FLAG @Z40LB40 02400003 DC Y(STE11B-STE11A) TEXT LENGTH @Z40LB40 02420003 DC Y(STE11A-TXT1A) TEXT OFFSET @Z40LB40 02440003 DC H'1' PRINT COLUMN @Z40LB40 02460003 DC Y(STE11B-STE11A) PRINT FIELD LENGTH @Z40LB40 02480003 DC H'0' CONVERSION FLAGS @Z40LB40 02500003 SPACE 1 @Z40LB40 02520003 * STATIC TEXT ENTRIES @Z40LB40 02540003 STE11A DC C'IDC21100I UNABLE TO DUMP MSC MAIN STORAGE' @Z40LB40 02560003 STE11B EQU * @Z40LB40 02580003 TXT1B EQU * @Z40LB40 02600003 EJECT @Z40LB40 02620003 ************************************************************** @Z40LB40 02640003 * IDC21101I LOWSECTOR X'LL' IS GREATER THAN HIGHSECTOR X'HH' * @Z40LB40 02660003 ************************************************************** @Z40LB40 02680003 SPACE 3 @Z40LB40 02700003 TXT2 DC Y(TXT2B-TXT2A) ENTRY LENGTH @Z40LB40 02720003 DC X'8000' MESSAGE FLAG @Z40LB40 02740003 SPACE 1 @Z40LB40 02760003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 02780003 TXT2A DC X'4000' SPACE CONTROL FLAG @Z40LB40 02800003 DC H'1' SPACING FACTOR @Z40LB40 02820003 DC C'R ' SPACING TYPE @Z40LB40 02840003 SPACE 1 @Z40LB40 02860003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 02880003 DC X'0400' STATIC TEXT FLAG @Z40LB40 02900003 DC Y(STE21B-STE21A) TEXT LENGTH @Z40LB40 02920003 DC Y(STE21A-TXT2A) TEXT OFFSET @Z40LB40 02940003 DC H'1' PRINT COLUMN @Z40LB40 02960003 DC Y(STE21B-STE21A) PRINT FIELD LENGTH @Z40LB40 02980003 DC H'0' CONVERSION FLAGS @Z40LB40 03000003 SPACE 1 @Z40LB40 03020003 * INSERT DATA SUB-STRUCTURE @Z40LB40 03040003 DC X'2000' INSERT DATA FLAG @Z40LB40 03060003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 03080003 DC H'0' RESERVED @Z40LB40 03100003 DC H'21' PRINT COLUMN @Z40LB40 03120003 DC H'2' OUTPUT LENGTH @Z40LB40 03140003 DC X'4000' CONVERSION FLAGS @Z40LB40 03160003 SPACE 1 @Z40LB40 03180003 * INSERT DATA SUB-STRUCTURE @Z40LB40 03200003 DC X'A000' INSERT DATA FLAG @Z40LB40 03220003 DC H'2' INSERT REFERENCE NUMBER @Z40LB40 03240003 DC H'0' RESERVED @Z40LB40 03260003 DC H'54' PRINT COLUMN @Z40LB40 03280003 DC H'2' OUTPUT LENGTH @Z40LB40 03300003 DC X'4000' CONVERSION FLAGS @Z40LB40 03320003 SPACE 1 @Z40LB40 03340003 * STATIC TEXT ENTRIES @Z40LB40 03360003 STE21A DC C'IDC21101I LOWSECTOR XXXXX IS GREATER' @Z40LB40 03380003 DC C' THAN HIGHSECTOR XXXXX' @Z40LB40 03400003 STE21B EQU * @Z40LB40 03420003 TXT2B EQU * @Z40LB40 03440003 EJECT @Z40LB40 03460003 ************************************************************ @Z40LB40 03480003 * IDC21102I UNABLE TO DUMP MSC EXTENDED STORAGE * @Z40LB40 03500003 ************************************************************ @Z40LB40 03520003 SPACE 3 @Z40LB40 03540003 TXT3 DC Y(TXT3B-TXT3A) ENTRY LENGTH @Z40LB40 03560003 DC X'8000' MESSAGE FLAG @Z40LB40 03580003 SPACE 1 @Z40LB40 03600003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 03620003 TXT3A DC X'4000' SPACE CONTROL FLAG @Z40LB40 03640003 DC H'1' SPACING FACTOR @Z40LB40 03660003 DC C'R ' SPACING TYPE @Z40LB40 03680003 SPACE 1 @Z40LB40 03700003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 03720003 DC X'8400' STATIC TEXT FLAG @Z40LB40 03740003 DC Y(STE31B-STE31A) TEXT LENGTH @Z40LB40 03760003 DC Y(STE31A-TXT3A) TEXT OFFSET @Z40LB40 03780003 DC H'1' PRINT COLUMN @Z40LB40 03800003 DC Y(STE31B-STE31A) PRINT FIELD LENGTH @Z40LB40 03820003 DC H'0' CONVERSION FLAGS @Z40LB40 03840003 SPACE 1 @Z40LB40 03860003 * STATIC TEXT ENTRIES @Z40LB40 03880003 STE31A DC C'IDC21102I UNABLE TO DUMP MSC EXTENDED' @Z40LB40 03900003 DC C' STORAGE' @Z40LB40 03920003 STE31B EQU * @Z40LB40 03940003 TXT3B EQU * @Z40LB40 03960003 EJECT @Z40LB40 03980003 ************************************************************ @Z40LB40 04000003 * IDC21103I INVALID SSID X'SSSS' * @Z40LB40 04020003 ************************************************************ @Z40LB40 04040003 SPACE 3 @Z40LB40 04060003 TXT4 DC Y(TXT4B-TXT4A) ENTRY LENGTH @Z40LB40 04080003 DC X'8000' MESSAGE FLAG @Z40LB40 04100003 SPACE 1 @Z40LB40 04120003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 04140003 TXT4A DC X'4000' SPACE CONTROL FLAG @Z40LB40 04160003 DC H'1' SPACING FACTOR @Z40LB40 04180003 DC C'R ' SPACING TYPE @Z40LB40 04200003 SPACE 1 @Z40LB40 04220003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 04240003 DC X'0400' STATIC TEXT FLAG @Z40LB40 04260003 DC Y(STE41B-STE41A) TEXT LENGTH @Z40LB40 04280003 DC Y(STE41A-TXT4A) TEXT OFFSET @Z40LB40 04300003 DC H'1' PRINT COLUMN @Z40LB40 04320003 DC Y(STE41B-STE41A) PRINT FIELD LENGTH @Z40LB40 04340003 DC H'0' CONVERSION FLAGS @Z40LB40 04360003 SPACE 1 @Z40LB40 04380003 * INSERT DATA SUB-STRUCTURE @Z40LB40 04400003 DC X'A000' INSERT DATA FLAG @Z40LB40 04420003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 04440003 DC H'0' RESERVED @Z40LB40 04460003 DC H'24' PRINT COLUMN @Z40LB40 04480003 DC H'4' OUTPUT LENGTH @Z40LB40 04500003 DC X'4000' CONVERSION FLAGS @Z40LB40 04520003 SPACE 1 @Z40LB40 04540003 * STATIC TEXT ENTRIES @Z40LB40 04560003 STE41A DC C'IDC21103I INVALID SSID XXXXXXX' @Z40LB40 04580003 STE41B EQU * @Z40LB40 04600003 TXT4B EQU * @Z40LB40 04620003 EJECT @Z40LB40 04640003 ************************************************************ @Z40LB40 04660003 * IDC21104I UNABLE TO DUMP SA X'SSSS' MAIN STORAGE * @Z40LB40 04680003 ************************************************************ @Z40LB40 04700003 SPACE 3 @Z40LB40 04720003 TXT5 DC Y(TXT5B-TXT5A) ENTRY LENGTH @Z40LB40 04740003 DC X'8000' MESSAGE FLAG @Z40LB40 04760003 SPACE 1 @Z40LB40 04780003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 04800003 TXT5A DC X'4000' SPACE CONTROL FLAG @Z40LB40 04820003 DC H'1' SPACING FACTOR @Z40LB40 04840003 DC C'R ' SPACING TYPE @Z40LB40 04860003 SPACE 1 @Z40LB40 04880003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 04900003 DC X'0400' STATIC TEXT FLAG @Z40LB40 04920003 DC Y(STE51B-STE51A) TEXT LENGTH @Z40LB40 04940003 DC Y(STE51A-TXT5A) TEXT OFFSET @Z40LB40 04960003 DC H'1' PRINT COLUMN @Z40LB40 04980003 DC Y(STE51B-STE51A) PRINT FIELD LENGTH @Z40LB40 05000003 DC H'0' CONVERSION FLAGS @Z40LB40 05020003 SPACE 1 @Z40LB40 05040003 * INSERT DATA SUB-STRUCTURE @Z40LB40 05060003 DC X'A000' INSERT DATA FLAG @Z40LB40 05080003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 05100003 DC H'0' RESERVED @Z40LB40 05120003 DC H'29' PRINT COLUMN @Z40LB40 05140003 DC H'4' OUTPUT LENGTH @Z40LB40 05160003 DC X'4000' CONVERSION FLAGS @Z40LB40 05180003 SPACE 1 @Z40LB40 05200003 * STATIC TEXT ENTRIES @Z40LB40 05220003 STE51A DC C'IDC21104I UNABLE TO DUMP SA XXXXXXX' @Z40LB40 05240003 DC C' MAIN STORAGE' @Z40LB40 05260003 STE51B EQU * @Z40LB40 05280003 TXT5B EQU * @Z40LB40 05300003 EJECT @Z40LB40 05320003 ************************************************************ @Z40LB40 05340003 * IDC21105I UNABLE TO DUMP SA X'SSSS' EXTENDED STORAGE * @Z40LB40 05360003 ************************************************************ @Z40LB40 05380003 SPACE 3 @Z40LB40 05400003 TXT6 DC Y(TXT6B-TXT6A) ENTRY LENGTH @Z40LB40 05420003 DC X'8000' MESSAGE FLAG @Z40LB40 05440003 SPACE 1 @Z40LB40 05460003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 05480003 TXT6A DC X'4000' SPACE CONTROL FLAG @Z40LB40 05500003 DC H'1' SPACING FACTOR @Z40LB40 05520003 DC C'R ' SPACING TYPE @Z40LB40 05540003 SPACE 1 @Z40LB40 05560003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 05580003 DC X'0400' STATIC TEXT FLAG @Z40LB40 05600003 DC Y(STE61B-STE61A) TEXT LENGTH @Z40LB40 05620003 DC Y(STE61A-TXT6A) TEXT OFFSET @Z40LB40 05640003 DC H'1' PRINT COLUMN @Z40LB40 05660003 DC Y(STE61B-STE61A) PRINT FIELD LENGTH @Z40LB40 05680003 DC H'0' CONVERSION FLAGS @Z40LB40 05700003 SPACE 1 @Z40LB40 05720003 * INSERT DATA SUB-STRUCTURE @Z40LB40 05740003 DC X'A000' INSERT DATA FLAG @Z40LB40 05760003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 05780003 DC H'0' RESERVED @Z40LB40 05800003 DC H'29' PRINT COLUMN @Z40LB40 05820003 DC H'4' OUTPUT LENGTH @Z40LB40 05840003 DC X'4000' CONVERSION FLAGS @Z40LB40 05860003 SPACE 1 @Z40LB40 05880003 * STATIC TEXT ENTRIES @Z40LB40 05900003 STE61A DC C'IDC21105I UNABLE TO DUMP SA XXXXXXX' @Z40LB40 05920003 DC C' EXTENDED STORAGE' @Z40LB40 05940003 STE61B EQU * @Z40LB40 05960003 TXT6B EQU * @Z40LB40 05980003 EJECT @Z40LB40 06000003 ************************************************************ @Z40LB40 06020003 * IDC21106I INVALID MSC TABLES RECORD ADDRESS X'CCHHRR' * @Z40LB40 06040003 ************************************************************ @Z40LB40 06060003 SPACE 3 @Z40LB40 06080003 TXT7 DC Y(TXT7B-TXT7A) ENTRY LENGTH @Z40LB40 06100003 DC X'8000' MESSAGE FLAG @Z40LB40 06120003 SPACE 1 @Z40LB40 06140003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 06160003 TXT7A DC X'4000' SPACE CONTROL FLAG @Z40LB40 06180003 DC H'1' SPACING FACTOR @Z40LB40 06200003 DC C'R ' SPACING TYPE @Z40LB40 06220003 SPACE 1 @Z40LB40 06240003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 06260003 DC X'0400' STATIC TEXT FLAG @Z40LB40 06280003 DC Y(STE71B-STE71A) TEXT LENGTH @Z40LB40 06300003 DC Y(STE71A-TXT7A) TEXT OFFSET @Z40LB40 06320003 DC H'1' PRINT COLUMN @Z40LB40 06340003 DC Y(STE71B-STE71A) PRINT FIELD LENGTH @Z40LB40 06360003 DC H'0' CONVERSION FLAGS @Z40LB40 06380003 SPACE 1 @Z40LB40 06400003 * INSERT DATA SUB-STRUCTURE @Z40LB40 06420003 DC X'A000' INSERT DATA FLAG @Z40LB40 06440003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 06460003 DC H'0' RESERVED @Z40LB40 06480003 DC H'45' PRINT COLUMN @Z40LB40 06500003 DC H'6' OUTPUT LENGTH @Z40LB40 06520003 DC X'4000' CONVERSION FLAGS @Z40LB40 06540003 SPACE 1 @Z40LB40 06560003 * STATIC TEXT ENTRIES @Z40LB40 06580003 STE71A DC C'IDC21106I INVALID MSC TABLES RECORD' @Z40LB40 06600003 DC C' ADDRESS XXXXXXXXX' @Z40LB40 06620003 STE71B EQU * @Z40LB40 06640003 TXT7B EQU * @Z40LB40 06660003 EJECT @Z40LB40 06680003 ************************************************************ @Z40LB40 06700003 * IDC21107I UNABLE TO COMPLETE MSC TABLES DUMP FROM * @Z40LB40 06720003 * RECORD X'CCHHRR' * @Z40LB40 06740003 ************************************************************ @Z40LB40 06760003 SPACE 3 @Z40LB40 06780003 TXT8 DC Y(TXT8B-TXT8A) ENTRY LENGTH @Z40LB40 06800003 DC X'8000' MESSAGE FLAG @Z40LB40 06820003 SPACE 1 @Z40LB40 06840003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 06860003 TXT8A DC X'4000' SPACE CONTROL FLAG @Z40LB40 06880003 DC H'1' SPACING FACTOR @Z40LB40 06900003 DC C'R ' SPACING TYPE @Z40LB40 06920003 SPACE 1 @Z40LB40 06940003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 06960003 DC X'0400' STATIC TEXT FLAG @Z40LB40 06980003 DC Y(STE81B-STE81A) TEXT LENGTH @Z40LB40 07000003 DC Y(STE81A-TXT8A) TEXT OFFSET @Z40LB40 07020003 DC H'1' PRINT COLUMN @Z40LB40 07040003 DC Y(STE81B-STE81A) PRINT FIELD LENGTH @Z40LB40 07060003 DC H'0' CONVERSION FLAGS @Z40LB40 07080003 SPACE 1 @Z40LB40 07100003 * INSERT DATA SUB-STRUCTURE @Z40LB40 07120003 DC X'A000' INSERT DATA FLAG @Z40LB40 07140003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 07160003 DC H'0' RESERVED @Z40LB40 07180003 DC H'58' PRINT COLUMN @Z40LB40 07200003 DC H'6' OUTPUT LENGTH @Z40LB40 07220003 DC X'4000' CONVERSION FLAGS @Z40LB40 07240003 SPACE 1 @Z40LB40 07260003 * STATIC TEXT ENTRIES @Z40LB40 07280003 STE81A DC C'IDC21107I UNABLE TO COMPLETE MSC TABLES DUMP' @Z40LB40 07300003 DC C' FROM RECORD XXXXXXXXX' @Z40LB40 07320003 STE81B EQU * @Z40LB40 07340003 TXT8B EQU * @Z40LB40 07360003 EJECT @Z40LB40 07380003 ************************************************************ @Z40LB40 07400003 * IDC21108I MSC TABLES LOWCHR X'CCHHRR' IS GREATER THAN * @Z40LB40 07420003 * HIGHCHR X'CCHHRR' * @Z40LB40 07440003 ************************************************************ @Z40LB40 07460003 SPACE 3 @Z40LB40 07480003 TXT9 DC Y(TXT9B-TXT9A) ENTRY LENGTH @Z40LB40 07500003 DC X'8000' MESSAGE FLAG @Z40LB40 07520003 SPACE 1 @Z40LB40 07540003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 07560003 TXT9A DC X'4000' SPACE CONTROL FLAG @Z40LB40 07580003 DC H'1' SPACING FACTOR @Z40LB40 07600003 DC C'R ' SPACING TYPE @Z40LB40 07620003 SPACE 1 @Z40LB40 07640003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 07660003 DC X'0400' STATIC TEXT FLAG @Z40LB40 07680003 DC Y(STE91B-STE91A) TEXT LENGTH @Z40LB40 07700003 DC Y(STE91A-TXT9A) TEXT OFFSET @Z40LB40 07720003 DC H'1' PRINT COLUMN @Z40LB40 07740003 DC Y(STE91B-STE91A) PRINT FIELD LENGTH @Z40LB40 07760003 DC H'0' CONVERSION FLAGS @Z40LB40 07780003 SPACE 1 @Z40LB40 07800003 * INSERT DATA SUB-STRUCTURE @Z40LB40 07820003 DC X'2000' INSERT DATA FLAG @Z40LB40 07840003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 07860003 DC H'0' RESERVED @Z40LB40 07880003 DC H'29' PRINT COLUMN @Z40LB40 07900003 DC H'6' OUTPUT LENGTH @Z40LB40 07920003 DC X'4000' CONVERSION FLAGS @Z40LB40 07940003 SPACE 1 @Z40LB40 07960003 * INSERT DATA SUB-STRUCTURE @Z40LB40 07980003 DC X'A000' INSERT DATA FLAG @Z40LB40 08000003 DC H'2' INSERT REFERENCE NUMBER @Z40LB40 08020003 DC H'0' RESERVED @Z40LB40 08040003 DC H'63' PRINT COLUMN @Z40LB40 08060003 DC H'6' OUTPUT LENGTH @Z40LB40 08080003 DC X'4000' CONVERSION FLAGS @Z40LB40 08100003 SPACE 1 @Z40LB40 08120003 * STATIC TEXT ENTRIES @Z40LB40 08140003 STE91A DC C'IDC21108I MSC TABLES LOWCHR XXXXXXXXX IS' @Z40LB40 08160003 DC C' GREATER THAN HIGHCHR XXXXXXXXX' @Z40LB40 08180003 STE91B EQU * @Z40LB40 08200003 TXT9B EQU * @Z40LB40 08220003 EJECT @Z40LB40 08240003 ************************************************************ @Z40LB40 08260003 * PRIMARY MSC DUMP SUB-TITLE LINE * @ZA27590 08280000 ************************************************************ @Z40LB40 08300003 SPACE 3 @Z40LB40 08320003 TXT10 DC Y(TXT10B-TXT10A) ENTRY LENGTH @Z40LB40 08340003 DC X'0000' NULL FLAG @Z40LB40 08360003 SPACE 1 @Z40LB40 08380003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 08400003 TXT10A DC X'8400' STATIC TEXT FLAG @Z40LB40 08420003 DC Y(STE101B-STE101A) TEXT LENGTH @Z40LB40 08440003 DC Y(STE101A-TXT10A) TEXT OFFSET @Z40LB40 08460003 DC H'1' PRINT COLUMN @Z40LB40 08480003 DC Y(STE101B-STE101A) PRINT FIELD LENGTH @Z40LB40 08500003 DC H'0' CONVERSION FLAGS @Z40LB40 08520003 SPACE 1 @Z40LB40 08540003 * STATIC TEXT ENTRIES @Z40LB40 08560003 STE101A DC C'0' @Z40LB40 08580003 DC C'3850 MSS DUMP - PRIMARY MASS STORAGE CONTROL' @ZA27590 08600000 STE101B EQU * @Z40LB40 08620003 TXT10B EQU * @Z40LB40 08640003 EJECT @Z40LB40 08660003 ************************************************************ @Z40LB40 08680003 * SA DUMP SUB-TITLE LINE * @Z40LB40 08700003 ************************************************************ @Z40LB40 08720003 SPACE 3 @Z40LB40 08740003 TXT11 DC Y(TXT11B-TXT11A) ENTRY LENGTH @Z40LB40 08760003 DC X'0000' NULL FLAG @Z40LB40 08780003 SPACE 1 @Z40LB40 08800003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 08820003 TXT11A DC X'0400' STATIC TEXT FLAG @Z40LB40 08840003 DC Y(STE111B-STE111A) TEXT LENGTH @Z40LB40 08860003 DC Y(STE111A-TXT11A) TEXT OFFSET @Z40LB40 08880003 DC H'1' PRINT COLUMN @Z40LB40 08900003 DC Y(STE111B-STE111A) PRINT FIELD LENGTH @Z40LB40 08920003 DC H'0' CONVERSION FLAGS @Z40LB40 08940003 SPACE 1 @Z40LB40 08960003 * INSERT DATA SUB-STRUCTURE @Z40LB40 08980003 DC X'A000' INSERT DATA FLAG @Z40LB40 09000003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 09020003 DC H'0' RESERVED @Z40LB40 09040003 DC H'34' PRINT COLUMN @Z40LB40 09060003 DC H'4' OUTPUT LENGTH @Z40LB40 09080003 DC X'4000' CONVERSION FLAGS @Z40LB40 09100003 SPACE 1 @Z40LB40 09120003 * STATIC TEXT ENTRIES @Z40LB40 09140003 STE111A DC C'0' @Z40LB40 09160003 DC C'3850 MSS DUMP - STAGING ADAPTER XXXXXXX' @Z40LB40 09180003 STE111B EQU * @Z40LB40 09200003 TXT11B EQU * @Z40LB40 09220003 EJECT @Z40LB40 09240003 ************************************************************ @Z40LB40 09260003 * TABLES DUMP SUB-TITLE LINE * @Z40LB40 09280003 ************************************************************ @Z40LB40 09300003 SPACE 3 @Z40LB40 09320003 TXT12 DC Y(TXT12B-TXT12A) ENTRY LENGTH @Z40LB40 09340003 DC X'0000' NULL FLAG @Z40LB40 09360003 SPACE 1 @Z40LB40 09380003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 09400003 TXT12A DC X'8400' STATIC TEXT FLAG @Z40LB40 09420003 DC Y(STE121B-STE121A) TEXT LENGTH @Z40LB40 09440003 DC Y(STE121A-TXT12A) TEXT OFFSET @Z40LB40 09460003 DC H'1' PRINT COLUMN @Z40LB40 09480003 DC Y(STE121B-STE121A) PRINT FIELD LENGTH @Z40LB40 09500003 DC H'0' CONVERSION FLAGS @Z40LB40 09520003 SPACE 1 @Z40LB40 09540003 * STATIC TEXT ENTRIES @Z40LB40 09560003 STE121A DC C'0' @Z40LB40 09580003 DC C'3850 MSS DUMP - MASS STORAGE CONTROL TABLES' @Z40LB40 09600003 STE121B EQU * @Z40LB40 09620003 TXT12B EQU * @Z40LB40 09640003 EJECT @Z40LB40 09660003 ************************************************************ @Z40LB40 09680003 * ZERO BOUNDARY WORDS HEADLINES * @Z40LB40 09700003 ************************************************************ @Z40LB40 09720003 SPACE 3 @Z40LB40 09740003 TXT13 DC Y(TXT13D-TXT13A) ENTRY LENGTH @Z40LB40 09760003 DC X'4000' HEADER FLAG @Z40LB40 09780003 DC H'2' HEADLINE COUNT @Z40LB40 09800003 DC H'4' PAGE LINES @Z40LB40 09820003 SPACE 1 @Z40LB40 09840003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 09860003 TXT13A DC X'4000' SPACE CONTROL FLAG @Z40LB40 09880003 DC H'1' SPACING FACTOR @Z40LB40 09900003 DC C'E ' SPACING TYPE @Z40LB40 09920003 SPACE 1 @Z40LB40 09940003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 09960003 DC X'0400' STATIC TEXT FLAG @Z40LB40 09980003 DC Y(STE131B-STE131A) TEXT LENGTH @Z40LB40 10000003 DC Y(STE131A-TXT13A) TEXT OFFSET @Z40LB40 10020003 DC H'1' PRINT COLUMN @Z40LB40 10040003 DC Y(STE131B-STE131A) PRINT FIELD LENGTH @Z40LB40 10060003 DC H'0' CONVERSION FLAGS @Z40LB40 10080003 SPACE 1 @Z40LB40 10100003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 10120003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 10140003 DC H'1' SPACING FACTOR @Z40LB40 10160003 DC C'R ' SPACING TYPE @Z40LB40 10180003 SPACE 1 @Z40LB40 10200003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 10220003 DC X'8400' STATIC TEXT FLAG @Z40LB40 10240003 DC Y(STE131D-STE131C) TEXT LENGTH @Z40LB40 10260003 DC Y(STE131C-TXT13A) TEXT OFFSET @Z40LB40 10280003 DC H'1' PRINT COLUMN @Z40LB40 10300003 DC Y(STE131D-STE131C) PRINT FIELD LENGTH @Z40LB40 10320003 DC H'0' CONVERSION FLAGS @Z40LB40 10340003 SPACE 1 @Z40LB40 10360003 * STATIC TEXT ENTRIES @Z40LB40 10380003 STE131A DC C'ZERO BOUNDARY WORDS' @Z40LB40 10400003 STE131B EQU * @Z40LB40 10420003 STE131C DC C'X 0X00 1X00 2X00 3X00 ' @Z40LB40 10440003 DC C'4X00 5X00 6X00 7X00 X ' @Z40LB40 10460003 STE131D EQU * @Z40LB40 10480003 TXT13D EQU * @Z40LB40 10500003 EJECT @Z40LB40 10520003 ************************************************************ @Z40LB40 10540003 * JOBLIST STATUS BLOCKS HEADLINE * @Z40LB40 10560003 ************************************************************ @Z40LB40 10580003 SPACE 3 @Z40LB40 10600003 TXT14 DC Y(TXT14B-TXT14A) ENTRY LENGTH @Z40LB40 10620003 DC X'4000' HEADER FLAG @Z40LB40 10640003 DC H'1' HEADLINE COUNT @Z40LB40 10660003 DC H'3' PAGE LINES @Z40LB40 10680003 SPACE 1 @Z40LB40 10700003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 10720003 TXT14A DC X'4000' SPACE CONTROL FLAG @Z40LB40 10740003 DC H'1' SPACING FACTOR @Z40LB40 10760003 DC C'E ' SPACING TYPE @Z40LB40 10780003 SPACE 1 @Z40LB40 10800003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 10820003 DC X'8400' STATIC TEXT FLAG @Z40LB40 10840003 DC Y(STE141B-STE141A) TEXT LENGTH @Z40LB40 10860003 DC Y(STE141A-TXT14A) TEXT OFFSET @Z40LB40 10880003 DC H'1' PRINT COLUMN @Z40LB40 10900003 DC Y(STE141B-STE141A) PRINT FIELD LENGTH @Z40LB40 10920003 DC H'0' CONVERSION FLAGS @Z40LB40 10940003 SPACE 1 @Z40LB40 10960003 * STATIC TEXT ENTRIES @Z40LB40 10980003 STE141A DC C'JOBLIST STATUS BLOCKS' @Z40LB40 11000003 STE141B EQU * @Z40LB40 11020003 TXT14B EQU * @Z40LB40 11040003 EJECT @Z40LB40 11060003 ************************************************************ @Z40LB40 11080003 * JOBLIST HEADLINE * @Z40LB40 11100003 ************************************************************ @Z40LB40 11120003 SPACE 3 @Z40LB40 11140003 TXT15 DC Y(TXT15B-TXT15A) ENTRY LENGTH @Z40LB40 11160003 DC X'4000' HEADER FLAG @Z40LB40 11180003 DC H'1' HEADLINE COUNT @Z40LB40 11200003 DC H'3' PAGE LINES @Z40LB40 11220003 SPACE 1 @Z40LB40 11240003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 11260003 TXT15A DC X'4000' SPACE CONTROL FLAG @Z40LB40 11280003 DC H'2' SPACING FACTOR @Z40LB40 11300003 DC C'R ' SPACING TYPE @Z40LB40 11320003 SPACE 1 @Z40LB40 11340003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 11360003 DC X'8400' STATIC TEXT FLAG @Z40LB40 11380003 DC Y(STE151B-STE151A) TEXT LENGTH @Z40LB40 11400003 DC Y(STE151A-TXT15A) TEXT OFFSET @Z40LB40 11420003 DC H'1' PRINT COLUMN @Z40LB40 11440003 DC Y(STE151B-STE151A) PRINT FIELD LENGTH @Z40LB40 11460003 DC H'0' CONVERSION FLAGS @Z40LB40 11480003 SPACE 1 @Z40LB40 11500003 * STATIC TEXT ENTRIES @Z40LB40 11520003 STE151A DC C'JOBLIST' @Z40LB40 11540003 STE151B EQU * @Z40LB40 11560003 TXT15B EQU * @Z40LB40 11580003 EJECT @Z40LB40 11600003 ************************************************************ @Z40LB40 11620003 * I/O BUFFER CONTROL WORDS HEADLINES * @Z40LB40 11640003 ************************************************************ @Z40LB40 11660003 SPACE 3 @Z40LB40 11680003 TXT16 DC Y(TXT16D-TXT16A) ENTRY LENGTH @Z40LB40 11700003 DC X'4000' HEADER FLAG @Z40LB40 11720003 DC H'2' HEADLINE COUNT @Z40LB40 11740003 DC H'4' PAGE LINES @Z40LB40 11760003 SPACE 1 @Z40LB40 11780003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 11800003 TXT16A DC X'4000' SPACE CONTROL FLAG @Z40LB40 11820003 DC H'1' SPACING FACTOR @Z40LB40 11840003 DC C'E ' SPACING TYPE @Z40LB40 11860003 SPACE 1 @Z40LB40 11880003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 11900003 DC X'0400' STATIC TEXT FLAG @Z40LB40 11920003 DC Y(STE161B-STE161A) TEXT LENGTH @Z40LB40 11940003 DC Y(STE161A-TXT16A) TEXT OFFSET @Z40LB40 11960003 DC H'1' PRINT COLUMN @Z40LB40 11980003 DC Y(STE161B-STE161A) PRINT FIELD LENGTH @Z40LB40 12000003 DC H'0' CONVERSION FLAGS @Z40LB40 12020003 SPACE 1 @Z40LB40 12040003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 12060003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 12080003 DC H'1' SPACING FACTOR @Z40LB40 12100003 DC C'R ' SPACING TYPE @Z40LB40 12120003 SPACE 1 @Z40LB40 12140003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 12160003 DC X'8400' STATIC TEXT FLAG @Z40LB40 12180003 DC Y(STE161D-STE161C) TEXT LENGTH @Z40LB40 12200003 DC Y(STE161C-TXT16A) TEXT OFFSET @Z40LB40 12220003 DC H'1' PRINT COLUMN @Z40LB40 12240003 DC Y(STE161D-STE161C) PRINT FIELD LENGTH @Z40LB40 12260003 DC H'0' CONVERSION FLAGS @Z40LB40 12280003 SPACE 1 @Z40LB40 12300003 * STATIC TEXT ENTRIES @Z40LB40 12320003 STE161A DC C'I/O BUFFER CONTROL WORDS' @Z40LB40 12340003 STE161B EQU * @Z40LB40 12360003 STE161C DC C' 5800 5900 5A00 5B00 5C00' @Z40LB40 12380003 DC C' 5E00' @Z40LB40 12400003 STE161D EQU * @Z40LB40 12420003 TXT16D EQU * @Z40LB40 12440003 EJECT @Z40LB40 12460003 ************************************************************ @Z40LB40 12480003 * I/O BUFFER HEADLINE * @Z40LB40 12500003 ************************************************************ @Z40LB40 12520003 SPACE 3 @Z40LB40 12540003 TXT17 DC Y(TXT17B-TXT17A) ENTRY LENGTH @Z40LB40 12560003 DC X'4000' HEADER FLAG @Z40LB40 12580003 DC H'1' HEADLINE COUNT @Z40LB40 12600003 DC H'3' PAGE LINES @Z40LB40 12620003 SPACE 1 @Z40LB40 12640003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 12660003 TXT17A DC X'4000' SPACE CONTROL FLAG @Z40LB40 12680003 DC H'2' SPACING FACTOR @Z40LB40 12700003 DC C'R ' SPACING TYPE @Z40LB40 12720003 SPACE 1 @Z40LB40 12740003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 12760003 DC X'8400' STATIC TEXT FLAG @Z40LB40 12780003 DC Y(STE171B-STE171A) TEXT LENGTH @Z40LB40 12800003 DC Y(STE171A-TXT17A) TEXT OFFSET @Z40LB40 12820003 DC H'1' PRINT COLUMN @Z40LB40 12840003 DC Y(STE171B-STE171A) PRINT FIELD LENGTH @Z40LB40 12860003 DC H'0' CONVERSION FLAGS @Z40LB40 12880003 SPACE 1 @Z40LB40 12900003 * STATIC TEXT ENTRIES @Z40LB40 12920003 STE171A DC C'I/O BUFFER' @Z40LB40 12940003 STE171B EQU * @Z40LB40 12960003 TXT17B EQU * @Z40LB40 12980003 EJECT @ZD00050 12981003 ************************************************************ @ZD00050 12982003 * IDC21109I ONE OR MORE REQUESTED EXTENDED SECTORS ARE NOT * @ZD00050 12983003 * AVAILABLE * @ZD00050 12984003 ************************************************************ @ZD00050 12984203 SPACE 3 @ZD00050 12985003 TXT18 DC Y(TXT18B-TXT18A) ENTRY LENGTH @ZD00050 12986003 DC X'8000' MESSAGE FLAG @ZD00050 12987003 SPACE 1 @ZD00050 12988003 * SPACING CONTROL SUB-STRUCTURE @ZD00050 12989003 TXT18A DC X'4000' SPACE CONTROL FLAG @ZD00050 12990003 DC H'1' SPACING FACTOR @ZD00050 12991003 DC C'R ' SPACING TYPE @ZD00050 12992003 SPACE 1 @ZD00050 12993003 * STATIC TEXT SUB-STRUCTURE @ZD00050 12994003 DC X'8400' STATIC TEXT FLAG @ZD00050 12995003 DC Y(STE181B-STE181A) TEXT LENGTH @ZD00050 12996003 DC Y(STE181A-TXT18A) TEXT OFFSET @ZD00050 12997003 DC H'1' PRINT COLUMN @ZD00050 12998003 DC Y(STE181B-STE181A) PRINT FIELD LENGTH @ZD00050 12999003 DC H'0' CONVERSION FLAGS @ZD00050 12999203 SPACE 1 @ZD00050 12999403 * STATIC TEXT ENTRIES @ZD00050 12999603 STE181A DC C'IDC21109I ONE OR MORE REQUESTED EXTENDED ' @ZD00050 12999803 DC C'SECTORS ARE NOT AVAILABLE' @ZD00050 13000003 STE181B EQU * @ZD00050 13000603 TXT18B EQU * @ZD00050 13000903 EJECT @ZD00050 13001103 ************************************************************ @ZD00050 13001303 * BACKUP ADDRESS REGISTER HEADLINE * @ZD00050 13001503 ************************************************************ @ZD00050 13001703 SPACE 3 @ZD00050 13001803 TXT19 DC Y(TXT19B-TXT19A) ENTRY LENGTH @ZD00050 13002803 DC X'4000' HEADER FLAG @ZD00050 13003003 DC H'1' HEADLINE COUNT @ZD00050 13003203 DC H'3' PAGE LINES @ZD00050 13003403 SPACE 1 @ZD00050 13003603 * SPACING CONTROL SUB-STRUCTURE @ZD00050 13003703 TXT19A DC X'4000' SPACING CONTROL FLAG @ZD00050 13004703 DC H'2' SPACING FACTOR @ZD00050 13004903 DC C'R ' SPACING TYPE @ZD00050 13005103 SPACE 1 @ZD00050 13005303 * STATIC TEXT SUB-STRUCTURE @ZD00050 13005503 DC X'8400' STATIC TEXT FLAG @ZD00050 13005603 DC Y(STE191B-STE191A) TEXT LENGTH @ZD00050 13006603 DC Y(STE191A-TXT19A) TEXT OFFSET @ZD00050 13006803 DC H'1' PRINT COLUMN @ZD00050 13007003 DC Y(STE191B-STE191A) PRINT FIELD LENGTH @ZD00050 13007203 DC H'0' CONVERSION FLAGS @ZD00050 13007403 SPACE 1 @ZD00050 13007503 * STATIC TEXT ENTRIES @ZD00050 13008503 STE191A DC C'BACKUP ADDRESS REGISTER' @ZD00050 13008703 STE191B EQU * @ZD00050 13008903 TXT19B EQU * @ZD00050 13009103 EJECT @Z40LB40 13009503 ************************************************************ @Z40LB40 13020003 * QUEUE CONTROL BLOCK HEADLINE * @Z40LB40 13040003 ************************************************************ @Z40LB40 13060003 SPACE 3 @Z40LB40 13080003 TXT20 DC Y(TXT20B-TXT20A) ENTRY LENGTH @Z40LB40 13100003 DC X'4000' HEADER FLAG @Z40LB40 13120003 DC H'1' HEADLINE COUNT @Z40LB40 13140003 DC H'3' PAGE LINES @Z40LB40 13160003 SPACE 1 @Z40LB40 13180003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 13200003 TXT20A DC X'4000' SPACE CONTROL FLAG @Z40LB40 13220003 DC H'2' SPACING FACTOR @Z40LB40 13240003 DC C'R ' SPACING TYPE @Z40LB40 13260003 SPACE 1 @Z40LB40 13280003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 13300003 DC X'8400' STATIC TEXT FLAG @Z40LB40 13320003 DC Y(STE201B-STE201A) TEXT LENGTH @Z40LB40 13340003 DC Y(STE201A-TXT20A) TEXT OFFSET @Z40LB40 13360003 DC H'1' PRINT COLUMN @Z40LB40 13380003 DC Y(STE201B-STE201A) PRINT FIELD LENGTH @Z40LB40 13400003 DC H'0' CONVERSION FLAGS @Z40LB40 13420003 SPACE 1 @Z40LB40 13440003 * STATIC TEXT ENTRIES @Z40LB40 13460003 STE201A DC C'QUEUE CONTROL BLOCK' @Z40LB40 13480003 STE201B EQU * @Z40LB40 13500003 TXT20B EQU * @Z40LB40 13520003 EJECT @Z40LB40 13540003 ************************************************************ @Z40LB40 13560003 * LINK POINTERS HEADLINE * @Z40LB40 13580003 ************************************************************ @Z40LB40 13600003 SPACE 3 @Z40LB40 13620003 TXT21 DC Y(TXT21B-TXT21A) ENTRY LENGTH @Z40LB40 13640003 DC X'4000' HEADER FLAG @Z40LB40 13660003 DC H'1' HEADLINE COUNT @Z40LB40 13680003 DC H'3' PAGE LINES @Z40LB40 13700003 SPACE 1 @Z40LB40 13720003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 13740003 TXT21A DC X'4000' SPACE CONTROL FLAG @Z40LB40 13760003 DC H'2' SPACING FACTOR @Z40LB40 13780003 DC C'R ' SPACING TYPE @Z40LB40 13800003 SPACE 1 @Z40LB40 13820003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 13840003 DC X'8400' STATIC TEXT FLAG @Z40LB40 13860003 DC Y(STE211B-STE211A) TEXT LENGTH @Z40LB40 13880003 DC Y(STE211A-TXT21A) TEXT OFFSET @Z40LB40 13900003 DC H'1' PRINT COLUMN @Z40LB40 13920003 DC Y(STE211B-STE211A) PRINT FIELD LENGTH @Z40LB40 13940003 DC H'0' CONVERSION FLAGS @Z40LB40 13960003 SPACE 1 @Z40LB40 13980003 * STATIC TEXT ENTRIES @Z40LB40 14000003 STE211A DC C'LINK POINTERS' @Z40LB40 14020003 STE211B EQU * @Z40LB40 14040003 TXT21B EQU * @Z40LB40 14060003 EJECT @Z40LB40 14080003 ************************************************************ @Z40LB40 14100003 * DEPENDENCY COUNTS HEADLINE * @Z40LB40 14120003 ************************************************************ @Z40LB40 14140003 SPACE 3 @Z40LB40 14160003 TXT22 DC Y(TXT22B-TXT22A) ENTRY LENGTH @Z40LB40 14180003 DC X'4000' HEADER FLAG @Z40LB40 14200003 DC H'1' HEADLINE COUNT @Z40LB40 14220003 DC H'3' PAGE LINES @Z40LB40 14240003 SPACE 1 @Z40LB40 14260003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 14280003 TXT22A DC X'4000' SPACE CONTROL FLAG @Z40LB40 14300003 DC H'2' SPACING FACTOR @Z40LB40 14320003 DC C'R ' SPACING TYPE @Z40LB40 14340003 SPACE 1 @Z40LB40 14360003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 14380003 DC X'8400' STATIC TEXT FLAG @Z40LB40 14400003 DC Y(STE221B-STE221A) TEXT LENGTH @Z40LB40 14420003 DC Y(STE221A-TXT22A) TEXT OFFSET @Z40LB40 14440003 DC H'1' PRINT COLUMN @Z40LB40 14460003 DC Y(STE221B-STE221A) PRINT FIELD LENGTH @Z40LB40 14480003 DC H'0' CONVERSION FLAGS @Z40LB40 14500003 SPACE 1 @Z40LB40 14520003 * STATIC TEXT ENTRIES @Z40LB40 14540003 STE221A DC C'DEPENDENCY COUNTS' @Z40LB40 14560003 STE221B EQU * @Z40LB40 14580003 TXT22B EQU * @Z40LB40 14600003 EJECT @ZD00050 14601003 ************************************************************ @ZD00050 14602003 * ENGINEERING CHANGE LEVEL HEADLINE * @ZD00050 14603003 ************************************************************ @ZD00050 14604003 SPACE 3 @ZD00050 14605003 TXT23 DC Y(TXT23B-TXT23A) ENTRY LENGTH @ZD00050 14606003 DC X'4000' HEADER FLAG @ZD00050 14607003 DC H'1' HEADLINE COUNT @ZD00050 14608003 DC H'3' PAGE LINES @ZD00050 14609003 SPACE 1 @ZD00050 14610003 * SPACING CONTROL SUB-STRUCTURE @ZD00050 14611003 TXT23A DC X'4000' SPACE CONTROL FLAG @ZD00050 14612003 DC H'2' SPACING FACTOR @ZD00050 14613003 DC C'R ' SPACING TYPE @ZD00050 14614003 SPACE 1 @ZD00050 14615003 * STATIC TEXT SUB-STRUCTURE @ZD00050 14616003 DC X'8400' STATIC TEXT FLAG @ZD00050 14617003 DC Y(STE231B-STE231A) TEXT LENGTH @ZD00050 14618003 DC Y(STE231A-TXT23A) TEXT OFFSET @ZD00050 14619003 DC H'1' PRINT COLUMN @ZD00050 14619203 DC Y(STE231B-STE231A) PRINT FIELD LENGTH @ZD00050 14619403 DC H'0' CONVERSION FLAGS @ZD00050 14619603 SPACE 1 @ZD00050 14619803 * STATIC TEXT ENTRIES @ZD00050 14619903 STE231A DC C'ENGINEERING CHANGE LEVEL' @ZD00050 14620903 STE231B EQU * @ZD00050 14621103 TXT23B EQU * @ZD00050 14621303 EJECT @Z40LB40 14621903 ************************************************************ @Z40LB40 15480003 * SA TO MSC MESSAGE QUEUE HEADLINE * @Z40LB40 15500003 ************************************************************ @Z40LB40 15520003 SPACE 3 @Z40LB40 15540003 TXT24 DC Y(TXT24B-TXT24A) ENTRY LENGTH @Z40LB40 15560003 DC X'4000' HEADER FLAG @Z40LB40 15580003 DC H'1' HEADLINE COUNT @Z40LB40 15600003 DC H'3' PAGE LINES @Z40LB40 15620003 SPACE 1 @Z40LB40 15640003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 15660003 TXT24A DC X'4000' SPACE CONTROL FLAG @Z40LB40 15680003 DC H'1' SPACING FACTOR @Z40LB40 15700003 DC C'E ' SPACING TYPE @Z40LB40 15720003 SPACE 1 @Z40LB40 15740003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 15760003 DC X'8400' STATIC TEXT FLAG @Z40LB40 15780003 DC Y(STE241B-STE241A) TEXT LENGTH @Z40LB40 15800003 DC Y(STE241A-TXT24A) TEXT OFFSET @Z40LB40 15820003 DC H'1' PRINT COLUMN @Z40LB40 15840003 DC Y(STE241B-STE241A) PRINT FIELD LENGTH @Z40LB40 15860003 DC H'0' CONVERSION FLAGS @Z40LB40 15880003 SPACE 1 @Z40LB40 15900003 * STATIC TEXT ENTRIES @Z40LB40 15920003 STE241A DC C'SA TO MSC MESSAGE QUEUE' @Z40LB40 15940003 STE241B EQU * @Z40LB40 15960003 TXT24B EQU * @Z40LB40 15980003 EJECT @ZD00050 15981003 ************************************************************ @ZD00050 15982003 * QCB FIFO QUEUES HEADLINE * @ZD00050 15983003 ************************************************************ @ZD00050 15984003 SPACE 3 @ZD00050 15985003 TXT25 DC Y(TXT25B-TXT25A) ENTRY LENGTH @ZD00050 15986003 DC X'4000' HEADER FLAG @ZD00050 15987003 DC H'1' HEADLINE COUNT @ZD00050 15988003 DC H'3' PAGE LINES @ZD00050 15989003 SPACE 1 @ZD00050 15990003 * SPACING CONTROL SUB-STRUCTURE @ZD00050 15991003 TXT25A DC X'4000' SPACE CONTROL FLAG @ZD00050 15992003 DC H'2' SPACING FACTOR @ZD00050 15993003 DC C'R ' SPACING TYPE @ZD00050 15994003 SPACE 1 @ZD00050 15995003 * STATIC TEXT SUB-STRUCTURE @ZD00050 15996003 DC X'8400' STATIC TEXT FLAG @ZD00050 15997003 DC Y(STE251B-STE251A) TEXT LENGTH @ZD00050 15998003 DC Y(STE251A-TXT25A) TEXT OFFSET @ZD00050 15999003 DC H'1' PRINT COLUMN @ZD00050 15999203 DC Y(STE251B-STE251A) PRINT FIELD LENGTH @ZD00050 15999403 DC H'0' CONVERSION FLAGS @ZD00050 15999603 SPACE 1 @ZD00050 15999803 * STATIC TEXT ENTRIES @ZD00050 15999903 STE251A DC C'QUEUE CONTROL BLOCK FIFO QUEUES' @ZD00050 16000903 STE251B EQU * @ZD00050 16001103 TXT25B EQU * @ZD00050 16001303 EJECT @ZD00050 16001503 ************************************************************ @ZD00050 16001703 * TABLES UNIT CONTROL BLOCKS HEADLINE * @ZD00050 16001803 ************************************************************ @ZD00050 16002803 SPACE 3 @ZD00050 16003003 TXT26 DC Y(TXT26B-TXT26A) ENTRY LENGTH @ZD00050 16003203 DC X'4000' HEADER FLAG @ZD00050 16003403 DC H'1' HEADLINE COUNT @ZD00050 16003603 DC H'3' PAGE LINES @ZD00050 16003703 SPACE 1 @ZD00050 16004703 * SPACING CONTROL SUB-STRUCTURE @ZD00050 16004903 TXT26A DC X'4000' SPACE CONTROL FLAG @ZD00050 16005103 DC H'2' SPACING FACTOR @ZD00050 16005303 DC C'R ' SPACING TYPE @ZD00050 16005503 SPACE 1 @ZD00050 16005603 * STATIC TEXT SUB-STRUCTURE @ZD00050 16006603 DC X'8400' STATIC TEXT FLAG @ZD00050 16006803 DC Y(STE261B-STE261A) TEXT LENGTH @ZD00050 16007003 DC Y(STE261A-TXT26A) TEXT OFFSET @ZD00050 16007203 DC H'1' PRINT COLUMN @ZD00050 16007403 DC Y(STE261B-STE261A) PRINT FIELD LENGTH @ZD00050 16007503 DC H'0' CONVERSION FLAGS @ZD00050 16008503 SPACE 1 @ZD00050 16008703 * STATIC TEXT ENTRIES @ZD00050 16008903 STE261A DC C'PRIMARY, SECONDARY, AND AUXILIARY TABLES ' @ZD00050 16009103 DC C'UNIT CONTROL BLOCKS' @ZD00050 16009203 STE261B EQU * @ZD00050 16009303 TXT26B EQU * @ZD00050 16009403 EJECT @Z40LB40 16009503 ************************************************************ @Z40LB40 17100003 * SCHEDULE QUEUE BLOCK HEADLINE * @ZD00038 17120003 ************************************************************ @Z40LB40 17140003 SPACE 3 @Z40LB40 17160003 TXT27 DC Y(TXT27B-TXT27A) ENTRY LENGTH @Z40LB40 17180003 DC X'4000' HEADER FLAG @Z40LB40 17200003 DC H'1' HEADLINE COUNT @Z40LB40 17220003 DC H'3' PAGE LINES @Z40LB40 17240003 SPACE 1 @Z40LB40 17260003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 17280003 TXT27A DC X'4000' SPACE CONTROL FLAG @Z40LB40 17300003 DC H'2' SPACING FACTOR @Z40LB40 17320003 DC C'R ' SPACING TYPE @Z40LB40 17340003 SPACE 1 @Z40LB40 17360003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 17380003 DC X'8400' STATIC TEXT FLAG @Z40LB40 17400003 DC Y(STE271B-STE271A) TEXT LENGTH @Z40LB40 17420003 DC Y(STE271A-TXT27A) TEXT OFFSET @Z40LB40 17440003 DC H'1' PRINT COLUMN @Z40LB40 17460003 DC Y(STE271B-STE271A) PRINT FIELD LENGTH @Z40LB40 17480003 DC H'0' CONVERSION FLAGS @Z40LB40 17500003 SPACE 1 @Z40LB40 17520003 * STATIC TEXT ENTRIES @Z40LB40 17540003 STE271A DC C'SCHEDULE QUEUE BLOCK' @ZD00038 17560003 STE271B EQU * @Z40LB40 17580003 TXT27B EQU * @Z40LB40 17600003 EJECT @Z40LB40 17620003 ************************************************************ @ZA27590 17630000 * ALTERNATE MSC DUMP SUB-TITLE LINE * @ZA27590 17632000 ************************************************************ @ZA27590 17634000 SPACE 3 @ZA27590 17636000 TXT28 DC Y(TXT28B-TXT28A) ENTRY LENGTH @ZA27590 17638000 DC X'0000' NULL FLAG @ZA27590 17638400 SPACE 1 @ZA27590 17638800 * STATIC TEXT SUB-STRUCTURE @ZA27590 17639200 TXT28A DC X'8400' STATIC TEXT FLAG @ZA27590 17639600 DC Y(STE281B-STE281A) TEXT LENGTH @ZA27590 17639700 DC Y(STE281A-TXT28A) TEXT OFFSET @ZA27590 17639800 DC H'1' PRINT COLUMN @ZA27590 17639900 DC Y(STE281B-STE281A) PRINT FIELD LENGTH @ZA27590 17646600 DC H'0' CONVERSION FLAGS @ZA27590 17648600 SPACE 1 @ZA27590 17650600 * STATIC TEXT ENTRIES @ZA27590 17652600 STE281A DC C'0' @ZA27590 17653000 DC C'3850 MSS DUMP - ALTERNATE MASS STORAGE ' @ZA27590 17653100 DC C'CONTROL' @ZA27590 17653200 STE281B EQU * @ZA27590 17653300 TXT28B EQU * @ZA27590 17659900 EJECT @ZA27590 17661900 ************************************************************ @Z40LB40 17666600 * UNIT CONTROL BLOCK HEADLINE * @Z40LB40 17673300 ************************************************************ @Z40LB40 17680003 SPACE 3 @Z40LB40 17700003 TXT30 DC Y(TXT30B-TXT30A) ENTRY LENGTH @Z40LB40 17720003 DC X'4000' HEADER FLAG @Z40LB40 17740003 DC H'1' HEADLINE COUNT @Z40LB40 17760003 DC H'3' PAGE LINES @Z40LB40 17780003 SPACE 1 @Z40LB40 17800003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 17820003 TXT30A DC X'4000' SPACE CONTROL FLAG @Z40LB40 17840003 DC H'2' SPACING FACTOR @Z40LB40 17860003 DC C'R ' SPACING TYPE @Z40LB40 17880003 SPACE 1 @Z40LB40 17900003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 17920003 DC X'8400' STATIC TEXT FLAG @Z40LB40 17940003 DC Y(STE301B-STE301A) TEXT LENGTH @Z40LB40 17960003 DC Y(STE301A-TXT30A) TEXT OFFSET @Z40LB40 17980003 DC H'1' PRINT COLUMN @Z40LB40 18000003 DC Y(STE301B-STE301A) PRINT FIELD LENGTH @Z40LB40 18020003 DC H'0' CONVERSION FLAGS @Z40LB40 18040003 SPACE 1 @Z40LB40 18060003 * STATIC TEXT ENTRIES @Z40LB40 18080003 STE301A DC C'UNIT CONTROL BLOCK' @Z40LB40 18100003 STE301B EQU * @Z40LB40 18120003 TXT30B EQU * @Z40LB40 18140003 EJECT @Z40LB40 18160003 ************************************************************ @Z40LB40 18180003 * ERROR RECOVERY INFORMATION HEADLINE * @Z40LB40 18200003 ************************************************************ @Z40LB40 18220003 SPACE 3 @Z40LB40 18240003 TXT31 DC Y(TXT31B-TXT31A) ENTRY LENGTH @Z40LB40 18260003 DC X'4000' HEADER FLAG @Z40LB40 18280003 DC H'1' HEADLINE COUNT @Z40LB40 18300003 DC H'3' PAGE LINES @Z40LB40 18320003 SPACE 1 @Z40LB40 18340003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 18360003 TXT31A DC X'4000' SPACE CONTROL FLAG @Z40LB40 18380003 DC H'2' SPACING FACTOR @Z40LB40 18400003 DC C'R ' SPACING TYPE @Z40LB40 18420003 SPACE 1 @Z40LB40 18440003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 18460003 DC X'8400' STATIC TEXT FLAG @Z40LB40 18480003 DC Y(STE311B-STE311A) TEXT LENGTH @Z40LB40 18500003 DC Y(STE311A-TXT31A) TEXT OFFSET @Z40LB40 18520003 DC H'1' PRINT COLUMN @Z40LB40 18540003 DC Y(STE311B-STE311A) PRINT FIELD LENGTH @Z40LB40 18560003 DC H'0' CONVERSION FLAGS @Z40LB40 18580003 SPACE 1 @Z40LB40 18600003 * STATIC TEXT ENTRIES @Z40LB40 18620003 STE311A DC C'ERROR RECOVERY INFORMATION' @Z40LB40 18640003 STE311B EQU * @Z40LB40 18660003 TXT31B EQU * @Z40LB40 18680003 EJECT @Z40LB40 18700003 ************************************************************ @Z40LB40 18720003 * LOWER INTERFACE SENSE BUFFER HEADLINE * @Z40LB40 18740003 ************************************************************ @Z40LB40 18760003 SPACE 3 @Z40LB40 18780003 TXT32 DC Y(TXT32B-TXT32A) ENTRY LENGTH @Z40LB40 18800003 DC X'4000' HEADER FLAG @Z40LB40 18820003 DC H'1' HEADLINE COUNT @Z40LB40 18840003 DC H'3' PAGE LINES @Z40LB40 18860003 SPACE 1 @Z40LB40 18880003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 18900003 TXT32A DC X'4000' SPACE CONTROL FLAG @Z40LB40 18920003 DC H'2' SPACING FACTOR @Z40LB40 18940003 DC C'R ' SPACING TYPE @Z40LB40 18960003 SPACE 1 @Z40LB40 18980003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 19000003 DC X'8400' STATIC TEXT FLAG @Z40LB40 19020003 DC Y(STE321B-STE321A) TEXT LENGTH @Z40LB40 19040003 DC Y(STE321A-TXT32A) TEXT OFFSET @Z40LB40 19060003 DC H'1' PRINT COLUMN @Z40LB40 19080003 DC Y(STE321B-STE321A) PRINT FIELD LENGTH @Z40LB40 19100003 DC H'0' CONVERSION FLAGS @Z40LB40 19120003 SPACE 1 @Z40LB40 19140003 * STATIC TEXT ENTRIES @Z40LB40 19160003 STE321A DC C'LOWER INTERFACE SENSE BUFFER' @Z40LB40 19180003 STE321B EQU * @Z40LB40 19200003 TXT32B EQU * @Z40LB40 19220003 EJECT @Z40LB40 19240003 ************************************************************ @Z40LB40 19260003 * MOUNT EQUALIZATION STATISTICS HEADLINE * @Z40LB40 19280003 ************************************************************ @Z40LB40 19300003 SPACE 3 @Z40LB40 19320003 TXT33 DC Y(TXT33B-TXT33A) ENTRY LENGTH @Z40LB40 19340003 DC X'4000' HEADER FLAG @Z40LB40 19360003 DC H'1' HEADLINE COUNT @Z40LB40 19380003 DC H'3' PAGE LINES @Z40LB40 19400003 SPACE 1 @Z40LB40 19420003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 19440003 TXT33A DC X'4000' SPACE CONTROL FLAG @Z40LB40 19460003 DC H'2' SPACING FACTOR @Z40LB40 19480003 DC C'R ' SPACING TYPE @Z40LB40 19500003 SPACE 1 @Z40LB40 19520003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 19540003 DC X'8400' STATIC TEXT FLAG @Z40LB40 19560003 DC Y(STE331B-STE331A) TEXT LENGTH @Z40LB40 19580003 DC Y(STE331A-TXT33A) TEXT OFFSET @Z40LB40 19600003 DC H'1' PRINT COLUMN @Z40LB40 19620003 DC Y(STE331B-STE331A) PRINT FIELD LENGTH @Z40LB40 19640003 DC H'0' CONVERSION FLAGS @Z40LB40 19660003 SPACE 1 @Z40LB40 19680003 * STATIC TEXT ENTRIES @Z40LB40 19700003 STE331A DC C'MOUNT EQUALIZATION STATISTICS' @Z40LB40 19720003 STE331B EQU * @Z40LB40 19740003 TXT33B EQU * @Z40LB40 19760003 EJECT @Z40LB40 19780003 ************************************************************ @Z40LB40 19800003 * MSC TABLES STARTING RECORD ADDRESSES HEADLINES * @Z40LB40 19820003 ************************************************************ @Z40LB40 19840003 SPACE 3 @Z40LB40 19860003 TXT34 DC Y(TXT34D-TXT34A) ENTRY LENGTH @Z40LB40 19880003 DC X'4000' HEADER FLAG @Z40LB40 19900003 DC H'2' HEADLINE COUNT @Z40LB40 19920003 DC H'4' PAGE LINES @Z40LB40 19940003 SPACE 1 @Z40LB40 19960003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 19980003 TXT34A DC X'4000' SPACE CONTROL FLAG @Z40LB40 20000003 DC H'2' SPACING FACTOR @Z40LB40 20020003 DC C'R ' SPACING TYPE @Z40LB40 20040003 SPACE 1 @Z40LB40 20060003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 20080003 DC X'0400' STATIC TEXT FLAG @Z40LB40 20100003 DC Y(STE341B-STE341A) TEXT LENGTH @Z40LB40 20120003 DC Y(STE341A-TXT34A) TEXT OFFSET @Z40LB40 20140003 DC H'1' PRINT COLUMN @Z40LB40 20160003 DC Y(STE341B-STE341A) PRINT FIELD LENGTH @Z40LB40 20180003 DC H'0' CONVERSION FLAGS @Z40LB40 20200003 SPACE 1 @Z40LB40 20220003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 20240003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 20260003 DC H'1' SPACING FACTOR @Z40LB40 20280003 DC C'R ' SPACING TYPE @Z40LB40 20300003 SPACE 1 @Z40LB40 20320003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 20340003 DC X'8400' STATIC TEXT FLAG @Z40LB40 20360003 DC Y(STE341D-STE341C) TEXT LENGTH @Z40LB40 20380003 DC Y(STE341C-TXT34A) TEXT OFFSET @Z40LB40 20400003 DC H'1' PRINT COLUMN @Z40LB40 20420003 DC Y(STE341D-STE341C) PRINT FIELD LENGTH @Z40LB40 20440003 DC H'0' CONVERSION FLAGS @Z40LB40 20460003 SPACE 1 @Z40LB40 20480003 * STATIC TEXT ENTRIES @Z40LB40 20500003 STE341A DC C'MSC TABLES STARTING RECORD ADDRESSES' @Z40LB40 20520003 STE341B EQU * @Z40LB40 20540003 STE341C DC C'ID CCHHRR' @Z40LB40 20560003 STE341D EQU * @Z40LB40 20580003 TXT34D EQU * @Z40LB40 20600003 EJECT @Z40LB40 21160003 ************************************************************ @Z40LB40 21180003 * RECOVERY SAVE AREA HEADLINE * @Z40LB40 21200003 ************************************************************ @Z40LB40 21220003 SPACE 3 @Z40LB40 21240003 TXT36 DC Y(TXT36B-TXT36A) ENTRY LENGTH @Z40LB40 21260003 DC X'4000' HEADER FLAG @Z40LB40 21280003 DC H'1' HEADLINE COUNT @Z40LB40 21300003 DC H'3' PAGE LINES @Z40LB40 21320003 SPACE 1 @Z40LB40 21340003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 21360003 TXT36A DC X'4000' SPACE CONTROL FLAG @Z40LB40 21380003 DC H'2' SPACING FACTOR @Z40LB40 21400003 DC C'R ' SPACING TYPE @Z40LB40 21420003 SPACE 1 @Z40LB40 21440003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 21460003 DC X'8400' STATIC TEXT FLAG @Z40LB40 21480003 DC Y(STE361B-STE361A) TEXT LENGTH @Z40LB40 21500003 DC Y(STE361A-TXT36A) TEXT OFFSET @Z40LB40 21520003 DC H'1' PRINT COLUMN @Z40LB40 21540003 DC Y(STE361B-STE361A) PRINT FIELD LENGTH @Z40LB40 21560003 DC H'0' CONVERSION FLAGS @Z40LB40 21580003 SPACE 1 @Z40LB40 21600003 * STATIC TEXT ENTRIES @Z40LB40 21620003 STE361A DC C'RECOVERY SAVE AREA' @Z40LB40 21640003 STE361B EQU * @Z40LB40 21660003 TXT36B EQU * @Z40LB40 21680003 EJECT @Z40LB40 21700003 ************************************************************ @Z40LB40 21720003 * MAIN STORAGE SECTOR HEADLINE * @Z40LB40 21740003 ************************************************************ @Z40LB40 21760003 SPACE 3 @Z40LB40 21780003 TXT37 DC Y(TXT37B-TXT37A) ENTRY LENGTH @Z40LB40 21800003 DC X'4000' HEADER FLAG @Z40LB40 21820003 DC H'1' HEADLINE COUNT @Z40LB40 21840003 DC H'3' PAGE LINES @Z40LB40 21860003 SPACE 1 @Z40LB40 21880003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 21900003 TXT37A DC X'4000' SPACE CONTROL FLAG @Z40LB40 21920003 DC H'2' SPACING FACTOR @Z40LB40 21940003 DC C'R ' SPACING TYPE @Z40LB40 21960003 SPACE 1 @Z40LB40 21980003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 22000003 DC X'8400' STATIC TEXT FLAG @Z40LB40 22020003 DC Y(STE371B-STE371A) TEXT LENGTH @Z40LB40 22040003 DC Y(STE371A-TXT37A) TEXT OFFSET @Z40LB40 22060003 DC H'1' PRINT COLUMN @Z40LB40 22080003 DC Y(STE371B-STE371A) PRINT FIELD LENGTH @Z40LB40 22100003 DC H'0' CONVERSION FLAGS @Z40LB40 22120003 SPACE 1 @Z40LB40 22140003 * STATIC TEXT ENTRIES @Z40LB40 22160003 STE371A DC C'MAIN STORAGE SECTOR' @Z40LB40 22180003 STE371B EQU * @Z40LB40 22200003 TXT37B EQU * @Z40LB40 22220003 EJECT @Z40LB40 22240003 ************************************************************ @Z40LB40 22260003 * EXTENDED STORAGE SECTOR HEADLINE * @Z40LB40 22280003 ************************************************************ @Z40LB40 22300003 SPACE 3 @Z40LB40 22320003 TXT38 DC Y(TXT38B-TXT38A) ENTRY LENGTH @Z40LB40 22340003 DC X'4000' HEADER FLAG @Z40LB40 22360003 DC H'1' HEADLINE COUNT @Z40LB40 22380003 DC H'3' PAGE LINES @Z40LB40 22400003 SPACE 1 @Z40LB40 22420003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 22440003 TXT38A DC X'4000' SPACE CONTROL FLAG @Z40LB40 22460003 DC H'2' SPACING FACTOR @Z40LB40 22480003 DC C'R ' SPACING TYPE @Z40LB40 22500003 SPACE 1 @Z40LB40 22520003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 22540003 DC X'8400' STATIC TEXT FLAG @Z40LB40 22560003 DC Y(STE381B-STE381A) TEXT LENGTH @Z40LB40 22580003 DC Y(STE381A-TXT38A) TEXT OFFSET @Z40LB40 22600003 DC H'1' PRINT COLUMN @Z40LB40 22620003 DC Y(STE381B-STE381A) PRINT FIELD LENGTH @Z40LB40 22640003 DC H'0' CONVERSION FLAGS @Z40LB40 22660003 SPACE 1 @Z40LB40 22680003 * STATIC TEXT ENTRIES @Z40LB40 22700003 STE381A DC C'EXTENDED STORAGE SECTOR' @Z40LB40 22720003 STE381B EQU * @Z40LB40 22740003 TXT38B EQU * @Z40LB40 22760003 EJECT @Z40LB40 22780003 ************************************************************ @Z40LB40 22800003 * VAD - VIRTUAL ADDRESS DIRECTORY HEADLINES * @Z40LB40 22820003 ************************************************************ @Z40LB40 22840003 SPACE 3 @Z40LB40 22860003 TXT39 DC Y(TXT39J-TXT39A) ENTRY LENGTH @Z40LB40 22880003 DC X'4000' HEADER FLAG @Z40LB40 22900003 DC H'5' HEADLINE COUNT @Z40LB40 22920003 DC H'8' PAGE LINES @ZD00050 22940003 SPACE 1 @Z40LB40 22960003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 22980003 TXT39A DC X'4000' SPACE CONTROL FLAG @Z40LB40 23000003 DC H'2' SPACING FACTOR @ZD00050 23020003 DC C'R ' SPACING TYPE @ZD00050 23040003 SPACE 1 @Z40LB40 23060003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 23080003 DC X'0400' STATIC TEXT FLAG @Z40LB40 23100003 DC Y(STE391B-STE391A) TEXT LENGTH @Z40LB40 23120003 DC Y(STE391A-TXT39A) TEXT OFFSET @Z40LB40 23140003 DC H'1' PRINT COLUMN @Z40LB40 23160003 DC Y(STE391B-STE391A) PRINT FIELD LENGTH @Z40LB40 23180003 DC H'0' CONVERSION FLAGS @Z40LB40 23200003 SPACE 1 @Z40LB40 23220003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 23240003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 23260003 DC H'2' SPACING FACTOR @Z40LB40 23280003 DC C'R ' SPACING TYPE @Z40LB40 23300003 SPACE 1 @Z40LB40 23320003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 23340003 DC X'0400' STATIC TEXT FLAG @Z40LB40 23360003 DC Y(STE391D-STE391C) TEXT LENGTH @Z40LB40 23380003 DC Y(STE391C-TXT39A) TEXT OFFSET @Z40LB40 23400003 DC H'1' PRINT COLUMN @Z40LB40 23420003 DC Y(STE391D-STE391C) PRINT FIELD LENGTH @Z40LB40 23440003 DC H'0' CONVERSION FLAGS @Z40LB40 23460003 SPACE 1 @Z40LB40 23480003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 23500003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 23520003 DC H'1' SPACING FACTOR @Z40LB40 23540003 DC C'R ' SPACING TYPE @Z40LB40 23560003 SPACE 1 @Z40LB40 23580003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 23600003 DC X'0400' STATIC TEXT FLAG @Z40LB40 23620003 DC Y(STE391F-STE391E) TEXT LENGTH @Z40LB40 23640003 DC Y(STE391E-TXT39A) TEXT OFFSET @Z40LB40 23660003 DC H'1' PRINT COLUMN @Z40LB40 23680003 DC Y(STE391F-STE391E) PRINT FIELD LENGTH @Z40LB40 23700003 DC H'0' CONVERSION FLAGS @Z40LB40 23720003 SPACE 1 @Z40LB40 23740003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 23760003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 23780003 DC H'1' SPACING FACTOR @Z40LB40 23800003 DC C'R ' SPACING TYPE @Z40LB40 23820003 SPACE 1 @Z40LB40 23840003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 23860003 DC X'0400' STATIC TEXT FLAG @Z40LB40 23880003 DC Y(STE391H-STE391G) TEXT LENGTH @Z40LB40 23900003 DC Y(STE391G-TXT39A) TEXT OFFSET @Z40LB40 23920003 DC H'1' PRINT COLUMN @Z40LB40 23940003 DC Y(STE391H-STE391G) PRINT FIELD LENGTH @Z40LB40 23960003 DC H'0' CONVERSION FLAGS @Z40LB40 23980003 SPACE 1 @Z40LB40 24000003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 24020003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 24040003 DC H'1' SPACING FACTOR @Z40LB40 24060003 DC C'R ' SPACING TYPE @Z40LB40 24080003 SPACE 1 @Z40LB40 24100003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 24120003 DC X'8400' STATIC TEXT FLAG @Z40LB40 24140003 DC Y(STE391J-STE391I) TEXT LENGTH @Z40LB40 24160003 DC Y(STE391I-TXT39A) TEXT OFFSET @Z40LB40 24180003 DC H'1' PRINT COLUMN @Z40LB40 24200003 DC Y(STE391J-STE391I) PRINT FIELD LENGTH @Z40LB40 24220003 DC H'0' CONVERSION FLAGS @Z40LB40 24240003 SPACE 1 @Z40LB40 24260003 * STATIC TEXT ENTRIES @Z40LB40 24280003 STE391A DC C'VAD - VIRTUAL ADDRESS DIRECTORY' @Z40LB40 24300003 STE391B EQU * @Z40LB40 24320003 STE391C DC C' ----CHANNEL A---- ----CHANNEL B---' @Z40LB40 24340003 DC C'- ----CHANNEL C---- ----CHANNEL D----' @Z40LB40 24360003 STE391D EQU * @Z40LB40 24380003 STE391E DC C' V V R L R L P F V V R L R L P F' @Z40LB40 24400003 DC C' V V R L R L P F V V R L R L P F' @Z40LB40 24420003 STE391F EQU * @Z40LB40 24440003 STE391G DC C' F V U N P U O L F V U N P U O L' @Z40LB40 24460003 DC C' F V U N P U O L F V U N P U O L' @Z40LB40 24480003 STE391H EQU * @Z40LB40 24500003 STE391I DC C'VUA M A A K N A H G M A A K N A H G' @Z40LB40 24520003 DC C' M A A K N A H G M A A K N A H G' @Z40LB40 24540003 STE391J EQU * @Z40LB40 24560003 TXT39J EQU * @Z40LB40 24580003 EJECT @Z40LB40 24600003 ************************************************************ @Z40LB40 24620003 * VVIT - VIRTUAL VOLUME INFORMATION TABLE HEADLINES * @Z40LB40 24640003 ************************************************************ @Z40LB40 24660003 SPACE 3 @Z40LB40 24680003 TXT40 DC Y(TXT40T-TXT40A) ENTRY LENGTH @Z40LB40 24700003 DC X'4000' HEADER FLAG @Z40LB40 24720003 DC H'10' HEADLINE COUNT @Z40LB40 24740003 DC H'13' PAGE LINES @Z40LB40 24760003 SPACE 1 @Z40LB40 24780003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 24800003 TXT40A DC X'4000' SPACE CONTROL FLAG @Z40LB40 24820003 DC H'1' SPACING FACTOR @Z40LB40 24840003 DC C'E ' SPACING TYPE @Z40LB40 24860003 SPACE 1 @Z40LB40 24880003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 24900003 DC X'0400' STATIC TEXT FLAG @Z40LB40 24920003 DC Y(STE401B-STE401A) TEXT LENGTH @Z40LB40 24940003 DC Y(STE401A-TXT40A) TEXT OFFSET @Z40LB40 24960003 DC H'1' PRINT COLUMN @Z40LB40 24980003 DC Y(STE401B-STE401A) PRINT FIELD LENGTH @Z40LB40 25000003 DC H'0' CONVERSION FLAGS @Z40LB40 25020003 SPACE 1 @Z40LB40 25040003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 25060003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 25080003 DC H'2' SPACING FACTOR @Z40LB40 25100003 DC C'R ' SPACING TYPE @Z40LB40 25120003 SPACE 1 @Z40LB40 25140003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 25160003 DC X'0400' STATIC TEXT FLAG @Z40LB40 25180003 DC Y(STE401D-STE401C) TEXT LENGTH @Z40LB40 25200003 DC Y(STE401C-TXT40A) TEXT OFFSET @Z40LB40 25220003 DC H'1' PRINT COLUMN @Z40LB40 25240003 DC Y(STE401D-STE401C) PRINT FIELD LENGTH @Z40LB40 25260003 DC H'0' CONVERSION FLAGS @Z40LB40 25280003 SPACE 1 @Z40LB40 25300003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 25320003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 25340003 DC H'1' SPACING FACTOR @Z40LB40 25360003 DC C'R ' SPACING TYPE @Z40LB40 25380003 SPACE 1 @Z40LB40 25400003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 25420003 DC X'0400' STATIC TEXT FLAG @Z40LB40 25440003 DC Y(STE401F-STE401E) TEXT LENGTH @Z40LB40 25460003 DC Y(STE401E-TXT40A) TEXT OFFSET @Z40LB40 25480003 DC H'1' PRINT COLUMN @Z40LB40 25500003 DC Y(STE401F-STE401E) PRINT FIELD LENGTH @Z40LB40 25520003 DC H'0' CONVERSION FLAGS @Z40LB40 25540003 SPACE 1 @Z40LB40 25560003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 25580003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 25600003 DC H'1' SPACING FACTOR @Z40LB40 25620003 DC C'R ' SPACING TYPE @Z40LB40 25640003 SPACE 1 @Z40LB40 25660003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 25680003 DC X'0400' STATIC TEXT FLAG @Z40LB40 25700003 DC Y(STE401H-STE401G) TEXT LENGTH @Z40LB40 25720003 DC Y(STE401G-TXT40A) TEXT OFFSET @Z40LB40 25740003 DC H'1' PRINT COLUMN @Z40LB40 25760003 DC Y(STE401H-STE401G) PRINT FIELD LENGTH @Z40LB40 25780003 DC H'0' CONVERSION FLAGS @Z40LB40 25800003 SPACE 1 @Z40LB40 25820003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 25840003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 25860003 DC H'1' SPACING FACTOR @Z40LB40 25880003 DC C'R ' SPACING TYPE @Z40LB40 25900003 SPACE 1 @Z40LB40 25920003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 25940003 DC X'0400' STATIC TEXT FLAG @Z40LB40 25960003 DC Y(STE401J-STE401I) TEXT LENGTH @Z40LB40 25980003 DC Y(STE401I-TXT40A) TEXT OFFSET @Z40LB40 26000003 DC H'1' PRINT COLUMN @Z40LB40 26020003 DC Y(STE401J-STE401I) PRINT FIELD LENGTH @Z40LB40 26040003 DC H'0' CONVERSION FLAGS @Z40LB40 26060003 SPACE 1 @Z40LB40 26080003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 26100003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 26120003 DC H'1' SPACING FACTOR @Z40LB40 26140003 DC C'R ' SPACING TYPE @Z40LB40 26160003 SPACE 1 @Z40LB40 26180003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 26200003 DC X'0400' STATIC TEXT FLAG @Z40LB40 26220003 DC Y(STE401L-STE401K) TEXT LENGTH @Z40LB40 26240003 DC Y(STE401K-TXT40A) TEXT OFFSET @Z40LB40 26260003 DC H'1' PRINT COLUMN @Z40LB40 26280003 DC Y(STE401L-STE401K) PRINT FIELD LENGTH @Z40LB40 26300003 DC H'0' CONVERSION FLAGS @Z40LB40 26320003 SPACE 1 @Z40LB40 26340003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 26360003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 26380003 DC H'1' SPACING FACTOR @Z40LB40 26400003 DC C'R ' SPACING TYPE @Z40LB40 26420003 SPACE 1 @Z40LB40 26440003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 26460003 DC X'0400' STATIC TEXT FLAG @Z40LB40 26480003 DC Y(STE401N-STE401M) TEXT LENGTH @Z40LB40 26500003 DC Y(STE401M-TXT40A) TEXT OFFSET @Z40LB40 26520003 DC H'1' PRINT COLUMN @Z40LB40 26540003 DC Y(STE401N-STE401M) PRINT FIELD LENGTH @Z40LB40 26560003 DC H'0' CONVERSION FLAGS @Z40LB40 26580003 SPACE 1 @Z40LB40 26600003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 26620003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 26640003 DC H'1' SPACING FACTOR @Z40LB40 26660003 DC C'R ' SPACING TYPE @Z40LB40 26680003 SPACE 1 @Z40LB40 26700003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 26720003 DC X'0400' STATIC TEXT FLAG @Z40LB40 26740003 DC Y(STE401P-STE401O) TEXT LENGTH @Z40LB40 26760003 DC Y(STE401O-TXT40A) TEXT OFFSET @Z40LB40 26780003 DC H'1' PRINT COLUMN @Z40LB40 26800003 DC Y(STE401P-STE401O) PRINT FIELD LENGTH @Z40LB40 26820003 DC H'0' CONVERSION FLAGS @Z40LB40 26840003 SPACE 1 @Z40LB40 26860003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 26880003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 26900003 DC H'1' SPACING FACTOR @Z40LB40 26920003 DC C'R ' SPACING TYPE @Z40LB40 26940003 SPACE 1 @Z40LB40 26960003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 26980003 DC X'0400' STATIC TEXT FLAG @Z40LB40 27000003 DC Y(STE401R-STE401Q) TEXT LENGTH @Z40LB40 27020003 DC Y(STE401Q-TXT40A) TEXT OFFSET @Z40LB40 27040003 DC H'1' PRINT COLUMN @Z40LB40 27060003 DC Y(STE401R-STE401Q) PRINT FIELD LENGTH @Z40LB40 27080003 DC H'0' CONVERSION FLAGS @Z40LB40 27100003 SPACE 1 @Z40LB40 27120003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 27140003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 27160003 DC H'2' SPACING FACTOR @Z40LB40 27180003 DC C'R ' SPACING TYPE @Z40LB40 27200003 SPACE 1 @Z40LB40 27220003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 27240003 DC X'8400' STATIC TEXT FLAG @Z40LB40 27260003 DC Y(STE401T-STE401S) TEXT LENGTH @Z40LB40 27280003 DC Y(STE401S-TXT40A) TEXT OFFSET @Z40LB40 27300003 DC H'1' PRINT COLUMN @Z40LB40 27320003 DC Y(STE401T-STE401S) PRINT FIELD LENGTH @Z40LB40 27340003 DC H'0' CONVERSION FLAGS @Z40LB40 27360003 SPACE 1 @Z40LB40 27380003 * STATIC TEXT ENTRIES @Z40LB40 27400003 STE401A DC C'VVIT - VIRTUAL VOLUME INFORMATION TABLE' @Z40LB40 27420003 STE401B EQU * @Z40LB40 27440003 STE401C DC C'BYTE 0 BIT 0 DEVICE END DUE A B' @ZD00050 27460003 DC C'YTE 1 BIT 0 CONTINGENT CONNECTION' @Z40LB40 27480003 STE401D EQU * @Z40LB40 27500003 STE401E DC C' 1 DEVICE END DUE B ' @Z40LB40 27520003 DC C' 1 VIRTUAL VOLUME BUSY' @Z40LB40 27540003 STE401F EQU * @Z40LB40 27560003 STE401G DC C' 2 DEVICE END DUE C ' @Z40LB40 27580003 DC C' 2,3 00-D 01-C 10-B 11-A' @Z40LB40 27600003 STE401H EQU * @Z40LB40 27620003 STE401I DC C' 3 DEVICE END DUE D' @Z40LB40 27640003 STE401J EQU * @Z40LB40 27660003 STE401K DC C' 4 NOT BUSY MESSAGE TO MSC ' @Z40LB40 27680003 DC C' 4 VIRTUAL VOLUME RESERVED' @Z40LB40 27700003 STE401L EQU * @Z40LB40 27720003 STE401M DC C' 5 FIRST RESERVE ' @Z40LB40 27740003 DC C' 5 PACK CHANGE OWED B' @Z40LB40 27760003 STE401N EQU * @Z40LB40 27780003 STE401O DC C' 6 VIRTUAL VOLUME WRITE INHIBI' @Z40LB40 27800003 DC C'T 6 PACK CHANGE OWED C' @Z40LB40 27820003 STE401P EQU * @Z40LB40 27840003 STE401Q DC C' 7 VIRTUAL VOLUME SHARED ' @Z40LB40 27860003 DC C' 7 PACK CHANGE OWED D' @Z40LB40 27880003 STE401R EQU * @Z40LB40 27900003 STE401S DC C'VVA BYTE 0 BYTE 1 VVA BYTE 0 BYTE' @Z40LB40 27920003 DC C' 1 VVA BYTE 0 BYTE 1' @Z40LB40 27940003 STE401T EQU * @Z40LB40 27960003 TXT40T EQU * @Z40LB40 27980003 EJECT @Z40LB40 28000003 ************************************************************ @Z40LB40 28020003 * DCB - DEVICE CONTROL BLOCKS HEADLINES * @Z40LB40 28040003 ************************************************************ @Z40LB40 28060003 SPACE 3 @Z40LB40 28080003 TXT41 DC Y(TXT41J-TXT41A) ENTRY LENGTH @Z40LB40 28100003 DC X'4000' HEADER FLAG @Z40LB40 28120003 DC H'5' HEADLINE COUNT @Z40LB40 28140003 DC H'8' PAGE LINES @Z40LB40 28160003 SPACE 1 @Z40LB40 28180003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 28200003 TXT41A DC X'4000' SPACE CONTROL FLAG @Z40LB40 28220003 DC H'2' SPACING FACTOR @Z40LB40 28240003 DC C'R ' SPACING TYPE @Z40LB40 28260003 SPACE 1 @Z40LB40 28280003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 28300003 DC X'0400' STATIC TEXT FLAG @Z40LB40 28320003 DC Y(STE411B-STE411A) TEXT LENGTH @Z40LB40 28340003 DC Y(STE411A-TXT41A) TEXT OFFSET @Z40LB40 28360003 DC H'1' PRINT COLUMN @Z40LB40 28380003 DC Y(STE411B-STE411A) PRINT FIELD LENGTH @Z40LB40 28400003 DC H'0' CONVERSION FLAGS @Z40LB40 28420003 SPACE 1 @Z40LB40 28440003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 28460003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 28480003 DC H'2' SPACING FACTOR @Z40LB40 28500003 DC C'R ' SPACING TYPE @Z40LB40 28520003 SPACE 1 @Z40LB40 28540003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 28560003 DC X'0400' STATIC TEXT FLAG @Z40LB40 28580003 DC Y(STE411D-STE411C) TEXT LENGTH @Z40LB40 28600003 DC Y(STE411C-TXT41A) TEXT OFFSET @Z40LB40 28620003 DC H'1' PRINT COLUMN @Z40LB40 28640003 DC Y(STE411D-STE411C) PRINT FIELD LENGTH @Z40LB40 28660003 DC H'0' CONVERSION FLAGS @Z40LB40 28680003 SPACE 1 @Z40LB40 28700003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 28720003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 28740003 DC H'1' SPACING FACTOR @Z40LB40 28760003 DC C'R ' SPACING TYPE @Z40LB40 28780003 SPACE 1 @Z40LB40 28800003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 28820003 DC X'0400' STATIC TEXT FLAG @Z40LB40 28840003 DC Y(STE411F-STE411E) TEXT LENGTH @Z40LB40 28860003 DC Y(STE411E-TXT41A) TEXT OFFSET @Z40LB40 28880003 DC H'1' PRINT COLUMN @Z40LB40 28900003 DC Y(STE411F-STE411E) PRINT FIELD LENGTH @Z40LB40 28920003 DC H'0' CONVERSION FLAGS @Z40LB40 28940003 SPACE 1 @Z40LB40 28960003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 28980003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 29000003 DC H'1' SPACING FACTOR @Z40LB40 29020003 DC C'R ' SPACING TYPE @Z40LB40 29040003 SPACE 1 @Z40LB40 29060003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 29080003 DC X'0400' STATIC TEXT FLAG @Z40LB40 29100003 DC Y(STE411H-STE411G) TEXT LENGTH @Z40LB40 29120003 DC Y(STE411G-TXT41A) TEXT OFFSET @Z40LB40 29140003 DC H'1' PRINT COLUMN @Z40LB40 29160003 DC Y(STE411H-STE411G) PRINT FIELD LENGTH @Z40LB40 29180003 DC H'0' CONVERSION FLAGS @Z40LB40 29200003 SPACE 1 @Z40LB40 29220003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 29240003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 29260003 DC H'1' SPACING FACTOR @Z40LB40 29280003 DC C'R ' SPACING TYPE @Z40LB40 29300003 SPACE 1 @Z40LB40 29320003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 29340003 DC X'8400' STATIC TEXT FLAG @Z40LB40 29360003 DC Y(STE411J-STE411I) TEXT LENGTH @Z40LB40 29380003 DC Y(STE411I-TXT41A) TEXT OFFSET @Z40LB40 29400003 DC H'1' PRINT COLUMN @Z40LB40 29420003 DC Y(STE411J-STE411I) PRINT FIELD LENGTH @Z40LB40 29440003 DC H'0' CONVERSION FLAGS @Z40LB40 29460003 SPACE 1 @Z40LB40 29480003 * STATIC TEXT ENTRIES @Z40LB40 29500003 STE411A DC C'DCB - DEVICE CONTROL BLOCKS' @Z40LB40 29520003 STE411B EQU * @Z40LB40 29540003 STE411C DC C' ----------CONTROLLERS 0,1---------- ' @Z40LB40 29560003 DC C' ----------CONTROLLERS 2,3----------' @Z40LB40 29580003 STE411D EQU * @Z40LB40 29600003 STE411E DC C' C C 3 C U A ' @Z40LB40 29620003 DC C' C C 3 C U A' @Z40LB40 29640003 STE411F EQU * @Z40LB40 29660003 STE411G DC C' F Y H OF BYTES D D S T S ' @Z40LB40 29680003 DC C' F Y H OF BYTES D D S T S' @Z40LB40 29700003 STE411H EQU * @Z40LB40 29720003 STE411I DC C'RUA M L D 6 READ C C U P E ' @Z40LB40 29740003 DC C' M L D 6 READ C C U P E' @Z40LB40 29760003 STE411J EQU * @Z40LB40 29780003 TXT41J EQU * @Z40LB40 29800003 EJECT @Z40LB40 29820003 ************************************************************ @Z40LB40 29840003 * AUT - ADDRESS USING TABLE HEADLINES * @Z40LB40 29860003 ************************************************************ @Z40LB40 29880003 SPACE 3 @Z40LB40 29900003 TXT42 DC Y(TXT42D-TXT42A) ENTRY LENGTH @Z40LB40 29920003 DC X'4000' HEADER FLAG @Z40LB40 29940003 DC H'2' HEADLINE COUNT @Z40LB40 29960003 DC H'5' PAGE LINES @Z40LB40 29980003 SPACE 1 @Z40LB40 30000003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 30020003 TXT42A DC X'4000' SPACE CONTROL FLAG @Z40LB40 30040003 DC H'2' SPACING FACTOR @Z40LB40 30060003 DC C'R ' SPACING TYPE @Z40LB40 30080003 SPACE 1 @Z40LB40 30100003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 30120003 DC X'0400' STATIC TEXT FLAG @Z40LB40 30140003 DC Y(STE421B-STE421A) TEXT LENGTH @Z40LB40 30160003 DC Y(STE421A-TXT42A) TEXT OFFSET @Z40LB40 30180003 DC H'1' PRINT COLUMN @Z40LB40 30200003 DC Y(STE421B-STE421A) PRINT FIELD LENGTH @Z40LB40 30220003 DC H'0' CONVERSION FLAGS @Z40LB40 30240003 SPACE 1 @Z40LB40 30260003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 30280003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 30300003 DC H'2' SPACING FACTOR @Z40LB40 30320003 DC C'R ' SPACING TYPE @Z40LB40 30340003 SPACE 1 @Z40LB40 30360003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 30380003 DC X'8400' STATIC TEXT FLAG @Z40LB40 30400003 DC Y(STE421D-STE421C) TEXT LENGTH @Z40LB40 30420003 DC Y(STE421C-TXT42A) TEXT OFFSET @Z40LB40 30440003 DC H'1' PRINT COLUMN @Z40LB40 30460003 DC Y(STE421D-STE421C) PRINT FIELD LENGTH @Z40LB40 30480003 DC H'0' CONVERSION FLAGS @Z40LB40 30500003 SPACE 1 @Z40LB40 30520003 * STATIC TEXT ENTRIES @Z40LB40 30540003 STE421A DC C'AUT - ADDRESS USING TABLE' @Z40LB40 30560003 STE421B EQU * @Z40LB40 30580003 STE421C DC C'RUA CHAN VUA RUA CHAN VUA' @Z40LB40 30600003 STE421D EQU * @Z40LB40 30620003 TXT42D EQU * @Z40LB40 30640003 EJECT @Z40LB40 30660003 ************************************************************ @Z40LB40 30680003 * LTR - LOGICAL TO REAL TABLE HEADLINES * @Z40LB40 30700003 ************************************************************ @Z40LB40 30720003 SPACE 3 @Z40LB40 30740003 TXT43 DC Y(TXT43D-TXT43A) ENTRY LENGTH @Z40LB40 30760003 DC X'4000' HEADER FLAG @Z40LB40 30780003 DC H'2' HEADLINE COUNT @Z40LB40 30800003 DC H'5' PAGE LINES @Z40LB40 30820003 SPACE 1 @Z40LB40 30840003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 30860003 TXT43A DC X'4000' SPACE CONTROL FLAG @Z40LB40 30880003 DC H'2' SPACING FACTOR @Z40LB40 30900003 DC C'R ' SPACING TYPE @Z40LB40 30920003 SPACE 1 @Z40LB40 30940003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 30960003 DC X'0400' STATIC TEXT FLAG @Z40LB40 30980003 DC Y(STE431B-STE431A) TEXT LENGTH @Z40LB40 31000003 DC Y(STE431A-TXT43A) TEXT OFFSET @Z40LB40 31020003 DC H'1' PRINT COLUMN @Z40LB40 31040003 DC Y(STE431B-STE431A) PRINT FIELD LENGTH @Z40LB40 31060003 DC H'0' CONVERSION FLAGS @Z40LB40 31080003 SPACE 1 @Z40LB40 31100003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 31120003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 31140003 DC H'2' SPACING FACTOR @Z40LB40 31160003 DC C'R ' SPACING TYPE @Z40LB40 31180003 SPACE 1 @Z40LB40 31200003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 31220003 DC X'8400' STATIC TEXT FLAG @Z40LB40 31240003 DC Y(STE431D-STE431C) TEXT LENGTH @Z40LB40 31260003 DC Y(STE431C-TXT43A) TEXT OFFSET @Z40LB40 31280003 DC H'1' PRINT COLUMN @Z40LB40 31300003 DC Y(STE431D-STE431C) PRINT FIELD LENGTH @Z40LB40 31320003 DC H'0' CONVERSION FLAGS @Z40LB40 31340003 SPACE 1 @Z40LB40 31360003 * STATIC TEXT ENTRIES @Z40LB40 31380003 STE431A DC C'LTR - LOGICAL TO REAL TABLE' @Z40LB40 31400003 STE431B EQU * @Z40LB40 31420003 STE431C DC C'LUA 3330-II FLAGS CONT RUA' @Z40LB40 31440003 STE431D EQU * @Z40LB40 31460003 TXT43D EQU * @Z40LB40 31480003 EJECT @Z40LB40 31500003 ************************************************************ @Z40LB40 31520003 * SA SENSE DATA HEADLINE * @Z40LB40 31540003 ************************************************************ @Z40LB40 31560003 SPACE 3 @Z40LB40 31580003 TXT44 DC Y(TXT44B-TXT44A) ENTRY LENGTH @Z40LB40 31600003 DC X'4000' HEADER FLAG @Z40LB40 31620003 DC H'1' HEADLINE COUNT @Z40LB40 31640003 DC H'3' PAGE LINES @Z40LB40 31660003 SPACE 1 @Z40LB40 31680003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 31700003 TXT44A DC X'4000' SPACE CONTROL FLAG @Z40LB40 31720003 DC H'2' SPACING FACTOR @Z40LB40 31740003 DC C'R ' SPACING TYPE @Z40LB40 31760003 SPACE 1 @Z40LB40 31780003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 31800003 DC X'8400' STATIC TEXT FLAG @Z40LB40 31820003 DC Y(STE441B-STE441A) TEXT LENGTH @Z40LB40 31840003 DC Y(STE441A-TXT44A) TEXT OFFSET @Z40LB40 31860003 DC H'1' PRINT COLUMN @Z40LB40 31880003 DC Y(STE441B-STE441A) PRINT FIELD LENGTH @Z40LB40 31900003 DC H'0' CONVERSION FLAGS @Z40LB40 31920003 SPACE 1 @Z40LB40 31940003 * STATIC TEXT ENTRIES @Z40LB40 31960003 STE441A DC C'SA SENSE DATA' @Z40LB40 31980003 STE441B EQU * @Z40LB40 32000003 TXT44B EQU * @Z40LB40 32020003 EJECT @Z40LB40 32040003 ************************************************************ @Z40LB40 32060003 * SA STATUS INFORMATION HEADLINE * @Z40LB40 32080003 ************************************************************ @Z40LB40 32100003 SPACE 3 @Z40LB40 32120003 TXT45 DC Y(TXT45B-TXT45A) ENTRY LENGTH @Z40LB40 32140003 DC X'4000' HEADER FLAG @Z40LB40 32160003 DC H'1' HEADLINE COUNT @Z40LB40 32180003 DC H'3' PAGE LINES @Z40LB40 32200003 SPACE 1 @Z40LB40 32220003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 32240003 TXT45A DC X'4000' SPACE CONTROL FLAG @Z40LB40 32260003 DC H'2' SPACING FACTOR @Z40LB40 32280003 DC C'R ' SPACING TYPE @Z40LB40 32300003 SPACE 1 @Z40LB40 32320003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 32340003 DC X'8400' STATIC TEXT FLAG @Z40LB40 32360003 DC Y(STE451B-STE451A) TEXT LENGTH @Z40LB40 32380003 DC Y(STE451A-TXT45A) TEXT OFFSET @Z40LB40 32400003 DC H'1' PRINT COLUMN @Z40LB40 32420003 DC Y(STE451B-STE451A) PRINT FIELD LENGTH @Z40LB40 32440003 DC H'0' CONVERSION FLAGS @Z40LB40 32460003 SPACE 1 @Z40LB40 32480003 * STATIC TEXT ENTRIES @Z40LB40 32500003 STE451A DC C'SA STATUS INFORMATION' @Z40LB40 32520003 STE451B EQU * @Z40LB40 32540003 TXT45B EQU * @Z40LB40 32560003 EJECT @Z40LB40 32580003 ************************************************************ @Z40LB40 32600003 * PST - PAGE STATUS TABLE HEADLINES * @Z40LB40 32620003 ************************************************************ @Z40LB40 32640003 SPACE 3 @Z40LB40 32660003 TXT46 DC Y(TXT46J-TXT46A) ENTRY LENGTH @Z40LB40 32680003 DC X'4000' HEADER FLAG @Z40LB40 32700003 DC H'5' HEADLINE COUNT @Z40LB40 32720003 DC H'7' PAGE LINES @Z40LB40 32740003 SPACE 1 @Z40LB40 32760003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 32780003 TXT46A DC X'4000' SPACE CONTROL FLAG @Z40LB40 32800003 DC H'1' SPACING FACTOR @Z40LB40 32820003 DC C'E ' SPACING TYPE @Z40LB40 32840003 SPACE 1 @Z40LB40 32860003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 32880003 DC X'0400' STATIC TEXT FLAG @Z40LB40 32900003 DC Y(STE461B-STE461A) TEXT LENGTH @Z40LB40 32920003 DC Y(STE461A-TXT46A) TEXT OFFSET @Z40LB40 32940003 DC H'1' PRINT COLUMN @Z40LB40 32960003 DC Y(STE461B-STE461A) PRINT FIELD LENGTH @Z40LB40 32980003 DC H'0' CONVERSION FLAGS @Z40LB40 33000003 SPACE 1 @Z40LB40 33020003 * INSERT DATA SUB-STRUCTURE @Z40LB40 33040003 DC X'2000' INSERT DATA FLAG @Z40LB40 33060003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 33080003 DC H'0' RESERVED @Z40LB40 33100003 DC H'46' PRINT COLUMN @Z40LB40 33120003 DC H'1' OUTPUT LENGTH @Z40LB40 33140003 DC X'10E0' CONVERSION FLAGS @Z40LB40 33160003 SPACE 1 @Z40LB40 33180003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 33200003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 33220003 DC H'2' SPACING FACTOR @Z40LB40 33240003 DC C'R ' SPACING TYPE @Z40LB40 33260003 SPACE 1 @Z40LB40 33280003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 33300003 DC X'0400' STATIC TEXT FLAG @Z40LB40 33320003 DC Y(STE461D-STE461C) TEXT LENGTH @Z40LB40 33340003 DC Y(STE461C-TXT46A) TEXT OFFSET @Z40LB40 33360003 DC H'1' PRINT COLUMN @Z40LB40 33380003 DC Y(STE461D-STE461C) PRINT FIELD LENGTH @Z40LB40 33400003 DC H'0' CONVERSION FLAGS @Z40LB40 33420003 SPACE 1 @Z40LB40 33440003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 33460003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 33480003 DC H'1' SPACING FACTOR @Z40LB40 33500003 DC C'R ' SPACING TYPE @Z40LB40 33520003 SPACE 1 @Z40LB40 33540003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 33560003 DC X'0400' STATIC TEXT FLAG @Z40LB40 33580003 DC Y(STE461F-STE461E) TEXT LENGTH @Z40LB40 33600003 DC Y(STE461E-TXT46A) TEXT OFFSET @Z40LB40 33620003 DC H'1' PRINT COLUMN @Z40LB40 33640003 DC Y(STE461F-STE461E) PRINT FIELD LENGTH @Z40LB40 33660003 DC H'0' CONVERSION FLAGS @Z40LB40 33680003 SPACE 1 @Z40LB40 33700003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 33720003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 33740003 DC H'1' SPACING FACTOR @Z40LB40 33760003 DC C'R ' SPACING TYPE @Z40LB40 33780003 SPACE 1 @Z40LB40 33800003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 33820003 DC X'0400' STATIC TEXT FLAG @Z40LB40 33840003 DC Y(STE461H-STE461G) TEXT LENGTH @Z40LB40 33860003 DC Y(STE461G-TXT46A) TEXT OFFSET @Z40LB40 33880003 DC H'1' PRINT COLUMN @Z40LB40 33900003 DC Y(STE461H-STE461G) PRINT FIELD LENGTH @Z40LB40 33920003 DC H'0' CONVERSION FLAGS @Z40LB40 33940003 SPACE 1 @Z40LB40 33960003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 33980003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 34000003 DC H'1' SPACING FACTOR @Z40LB40 34020003 DC C'R ' SPACING TYPE @Z40LB40 34040003 SPACE 1 @Z40LB40 34060003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 34080003 DC X'8400' STATIC TEXT FLAG @Z40LB40 34100003 DC Y(STE461J-STE461I) TEXT LENGTH @Z40LB40 34120003 DC Y(STE461I-TXT46A) TEXT OFFSET @Z40LB40 34140003 DC H'1' PRINT COLUMN @Z40LB40 34160003 DC Y(STE461J-STE461I) PRINT FIELD LENGTH @Z40LB40 34180003 DC H'0' CONVERSION FLAGS @Z40LB40 34200003 SPACE 1 @Z40LB40 34220003 * STATIC TEXT ENTRIES @Z40LB40 34240003 STE461A DC C'PST - PAGE STATUS TABLE, STAGING DRIVE G' @Z40LB40 34260003 DC C'ROUP X' @Z40LB40 34280003 STE461B EQU * @Z40LB40 34300003 STE461C DC C' --LUA0-- --LUA1-- --LUA2-- --LUA3--' @Z40LB40 34320003 DC C' --LUA4-- --LUA5-- --LUA6-- --LUA7--' @Z40LB40 34340003 STE461D EQU * @Z40LB40 34360003 STE461E DC C' V V V V V V V V ' @Z40LB40 34380003 DC C' V V V V V V V V' @Z40LB40 34400003 STE461F EQU * @Z40LB40 34420003 STE461G DC C' V P C C V P C C V P C C V P C C ' @Z40LB40 34440003 DC C' V P C C V P C C V P C C V P C C' @Z40LB40 34460003 STE461H EQU * @Z40LB40 34480003 STE461I DC C'PAGE A N V W A N V W A N V W A N V W ' @Z40LB40 34500003 DC C' A N V W A N V W A N V W A N V W' @Z40LB40 34520003 STE461J EQU * @Z40LB40 34540003 TXT46J EQU * @Z40LB40 34560003 EJECT @Z40LB40 34580003 ************************************************************ @Z40LB40 34600003 * LRU - LEAST RECENTLY USED CLOCK VALUES HEADLINES * @Z40LB40 34620003 ************************************************************ @Z40LB40 34640003 SPACE 3 @Z40LB40 34660003 TXT47 DC Y(TXT47D-TXT47A) ENTRY LENGTH @Z40LB40 34680003 DC X'4000' HEADER FLAG @Z40LB40 34700003 DC H'2' HEADLINE COUNT @Z40LB40 34720003 DC H'4' PAGE LINES @Z40LB40 34740003 SPACE 1 @Z40LB40 34760003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 34780003 TXT47A DC X'4000' SPACE CONTROL FLAG @Z40LB40 34800003 DC H'1' SPACING FACTOR @Z40LB40 34820003 DC C'E ' SPACING TYPE @Z40LB40 34840003 SPACE 1 @Z40LB40 34860003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 34880003 DC X'0400' STATIC TEXT FLAG @Z40LB40 34900003 DC Y(STE471B-STE471A) TEXT LENGTH @Z40LB40 34920003 DC Y(STE471A-TXT47A) TEXT OFFSET @Z40LB40 34940003 DC H'1' PRINT COLUMN @Z40LB40 34960003 DC Y(STE471B-STE471A) PRINT FIELD LENGTH @Z40LB40 34980003 DC H'0' CONVERSION FLAGS @Z40LB40 35000003 SPACE 1 @Z40LB40 35020003 * INSERT DATA SUB-STRUCTURE @Z40LB40 35040003 DC X'2000' INSERT DATA FLAG @Z40LB40 35060003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 35080003 DC H'0' RESERVED @Z40LB40 35100003 DC H'61' PRINT COLUMN @Z40LB40 35120003 DC H'1' OUTPUT LENGTH @Z40LB40 35140003 DC X'10E0' CONVERSION FLAGS @Z40LB40 35160003 SPACE 1 @Z40LB40 35180003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 35200003 DC X'4000' SPACE CONTROL FLAG @Z40LB40 35220003 DC H'2' SPACING FACTOR @Z40LB40 35240003 DC C'R ' SPACING TYPE @Z40LB40 35260003 SPACE 1 @Z40LB40 35280003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 35300003 DC X'8400' STATIC TEXT FLAG @Z40LB40 35320003 DC Y(STE471D-STE471C) TEXT LENGTH @Z40LB40 35340003 DC Y(STE471C-TXT47A) TEXT OFFSET @Z40LB40 35360003 DC H'1' PRINT COLUMN @Z40LB40 35380003 DC Y(STE471D-STE471C) PRINT FIELD LENGTH @Z40LB40 35400003 DC H'0' CONVERSION FLAGS @Z40LB40 35420003 SPACE 1 @Z40LB40 35440003 * STATIC TEXT ENTRIES @Z40LB40 35460003 STE471A DC C'LRU - LEAST RECENTLY USED CLOCK VALUES, ' @Z40LB40 35480003 DC C'STAGING DRIVE GROUP X' @Z40LB40 35500003 STE471B EQU * @Z40LB40 35520003 STE471C DC C'PAGE LUA0 LUA1 LUA2 LUA3 LUA4 LUA5 LUA6 ' @Z40LB40 35540003 DC C'LUA7' @Z40LB40 35560003 STE471D EQU * @Z40LB40 35580003 TXT47D EQU * @Z40LB40 35600003 EJECT @Z40LB40 35620003 ************************************************************ @Z40LB40 35640003 * RECORD-CCHHRR PREFIX-XXXXXXXX XXXXXXXX HEADLINE * @Z40LB40 35660003 ************************************************************ @Z40LB40 35680003 SPACE 3 @Z40LB40 35700003 TXT48 DC Y(TXT48B-TXT48A) ENTRY LENGTH @Z40LB40 35720003 DC X'4000' HEADER FLAG @Z40LB40 35740003 DC H'1' HEADLINE COUNT @Z40LB40 35760003 DC H'3' PAGE LINES @Z40LB40 35780003 SPACE 1 @Z40LB40 35800003 * SPACING CONTROL SUB-STRUCTURE @Z40LB40 35820003 TXT48A DC X'4000' SPACE CONTROL FLAG @Z40LB40 35840003 DC H'2' SPACING FACTOR @Z40LB40 35860003 DC C'R ' SPACING TYPE @Z40LB40 35880003 SPACE 1 @Z40LB40 35900003 * STATIC TEXT SUB-STRUCTURE @Z40LB40 35920003 DC X'0400' STATIC TEXT FLAG @Z40LB40 35940003 DC Y(STE481B-STE481A) TEXT LENGTH @Z40LB40 35960003 DC Y(STE481A-TXT48A) TEXT OFFSET @Z40LB40 35980003 DC H'1' PRINT COLUMN @Z40LB40 36000003 DC Y(STE481B-STE481A) PRINT FIELD LENGTH @Z40LB40 36020003 DC H'0' CONVERSION FLAGS @Z40LB40 36040003 SPACE 1 @Z40LB40 36060003 * INSERT DATA SUB-STRUCTURE @Z40LB40 36080003 DC X'2000' INSERT DATA FLAG @Z40LB40 36100003 DC H'1' INSERT REFERENCE NUMBER @Z40LB40 36120003 DC H'0' RESERVED @Z40LB40 36140003 DC H'8' PRINT COLUMN @Z40LB40 36160003 DC H'6' OUTPUT LENGTH @Z40LB40 36180003 DC X'8000' CONVERSION FLAGS @Z40LB40 36200003 SPACE 1 @Z40LB40 36220003 * INSERT DATA SUB-STRUCTURE @Z40LB40 36240003 DC X'2000' INSERT DATA FLAG @Z40LB40 36260003 DC H'2' INSERT REFERENCE NUMBER @Z40LB40 36280003 DC H'0' RESERVED @Z40LB40 36300003 DC H'23' PRINT COLUMN @Z40LB40 36320003 DC H'8' OUTPUT LENGTH @Z40LB40 36340003 DC X'8000' CONVERSION FLAGS @Z40LB40 36360003 SPACE 1 @Z40LB40 36380003 * INSERT DATA SUB-STRUCTURE @Z40LB40 36400003 DC X'A000' INSERT DATA FLAG @Z40LB40 36420003 DC H'3' INSERT REFERENCE NUMBER @Z40LB40 36440003 DC H'0' RESERVED @Z40LB40 36460003 DC H'32' PRINT COLUMN @Z40LB40 36480003 DC H'8' OUTPUT LENGTH @Z40LB40 36500003 DC X'8000' CONVERSION FLAGS @Z40LB40 36520003 SPACE 1 @Z40LB40 36540003 * STATIC TEXT ENTRIES @Z40LB40 36560003 STE481A DC C'RECORD-CCHHRR PREFIX-XXXXXXXX XXXXXXXX' @Z40LB40 36580003 STE481B EQU * @Z40LB40 36600003 TXT48B EQU * @Z40LB40 36620003 END , @Z40LB40 36640003