CNS TITLE 'SYSTEM RESOURCES MANAGER CONSTANTS MODULE' 00050002 IRARMCNS START 00100002 * A-000000-999999 @Y02133 00120002 */** START OF SPECIFICATION **************************************** */ 00150002 */* */ 00200002 */* MODULE NAME - IRARMCNS (COMPONENT - 5742-SC1CX) */ 00250002 */* */ 00300002 */* DESCRIPTIVE NAME - SYSTEM RESOURCES MANAGER CONSTANTS MODULE */ 00350002 */* */ 00400002 */* COPYRIGHT - NONE */ 00450002 */* */ 00500002 */* STATUS - OS/VS2 RELEASE 4, 06/16/76, LEVEL=2 */ 00520003 */* */ 00600002 */* FUNCTION - PROVIDES THE PRE-ASSEMBLED TABLES USED WITHIN THE */ 00650002 */* SYSTEM RESOURCES MANAGER FOR DYNAMIC (NON-REFRESHABLE) */ 00700002 */* DATA. CATEGORIZES THE ROUTINES INTERNAL TO THE SYSTEM */ 00750002 */* RESOURCES MANAGER COMPONENT. */ 00800002 */* */ 00850002 */* NOTES - THE RESOURCES MANAGER CONTROL TABLE IS FIRST IN THE */ 00900002 */* MODULE. THE CPU MANAGEMENT, I/O MANAGEMENT, STORAGE */ 00950002 */* MANAGEMENT, AND CONTROL ALGORITHM TABLES, AND THEN THE */ 01000002 */* RESOURCES MANAGER (SUB)ROUTINE ENTRY POINT DESCRIPTOR */ 01020002 */* TABLES ARE NEXT, IN THAT ORDER, SO THAT THEY MAY ALL */ 01050002 */* BE ADDRESSED WITH ONE REGISTER. */ 01100002 */* */ 01150002 */* DEPENDENCIES - SYSTEM RESOURCES MANAGER INITIALIZATION TO */ 01200002 */* PROVIDE ADDRESSES OF DYNAMICALLY CREATED TABLES. */ 01250002 */* */ 01300002 */* RESTRICTIONS - NONE */ 01350002 */* */ 01400002 */* REGISTER CONVENTIONS - REG 2 (RMCTPTR) IS USED TO ADDRESS */ 01450040 */* ALL THE TABLES, UP TO AND INCLUDING THE EPST, THAT */ 01500002 */* FOLLOW THE RMCT WITHIN THE IRARMCNS MODULE. */ 01550002 */* */ 01600002 */* MODULE TYPE - TABLE */ 01650002 */* */ 01700002 */* PROCESSOR - ASSEMBLER XF */ 01750002 */* */ 01800002 */* MODULE SIZE - 2K BYTES */ 01850002 */* */ 01900002 */* ATTRIBUTES - NUCLEUS RESIDENT */ 01950002 */* NON-EXECUTABLE */ 02000002 */* */ 02050002 */* ENTRY POINT - N/A */ 02100002 */* */ 02150002 */* INPUT - N/A */ 02200002 */* */ 02250002 */* OUTPUT - N/A */ 02300002 */* */ 02350002 */* EXIT - N/A */ 02400002 */* */ 02450002 */* EXTERNAL REFERENCES - SEE EXTERNAL SYBOL DICTIONARY FOR */ 02500002 */* ROUTINE NAMES OF THE FORM IRARMXXX. */ 02550002 */* */ 02600002 */* TABLES - LOCATES IRARLCT */ 02650002 */* IRAWMST */ 02700002 */* IRAWAMT */ 02750002 */* */ 02800002 */* MACROS - IRARMCT */ 02850002 */* IRACCT */ 02900002 */* IRAICT */ 02950002 */* IRAMCT */ 03000002 */* IRARMPT */ 03050002 */* IRARMCA */ 03100002 */* IRARMEX */ 03150002 */* IRARMSB */ 03200002 */* IRAEPDT */ 03250002 */* IRAEPAT */ 03300002 */* IRARMQH */ 03350002 */* IRAOUCB */ 03400002 */* IRAOUXB */ 03450002 */* IRARQSRV @Z40BPCH*/ 03470040 */* */ 03500002 */* CHANGE ACTIVITY =@ZM43084,@ZA11855 */ 03520003 */* */ 03600002 */* A000000-999999 Y02133*/ 03650002 */* */ 03700002 */** END OF SPECIFICATION ****************************************** */ 03750002 EJECT 03800002 IEZBITS 03900002 EJECT 03950002 IRARMCT DSECT=NO 04000002 EJECT 04050002 IRACCT DSECT=NO 04100002 EJECT 04150002 IRAICT DSECT=NO 04200002 EJECT 04250002 IRAMCT DSECT=NO 04300002 EJECT 04350002 IRARCT DSECT=NO @Z40BPCH 04360040 EJECT @Z40BPCH 04370040 IRARMPT DSECT=NO 04400002 EJECT 04450002 IRARMCA DSECT=NO 04500002 EJECT 04550002 IRARMEX DSECT=NO 04600002 EJECT 04650002 IRARMSB DSECT=NO 04700002 EJECT 04750002 IRAEPAT DSECT=NO 04760002 EJECT 04770002 IRAEPDT DSECT=NO 04800002 EJECT 04850002 IRAEPST DSECT=NO 04900002 EJECT 04950002 * 04952002 * SYSTEM RESOURCES MANAGER TIMER-DRIVEN ENTRY POINT 04954002 * SCHEDULING QUEUE HEADER 04956002 * 04958002 DS 0D 04960002 IRACTMQE EQU * 04962002 DS 0CL32 - QUEUE HEADER BLOCK 04964002 DC V(IRARMNOP) - DUMMY ROUTINE ENTRY ADDRESS 04966002 DC V(IRARMNOP) - DUMMY ROUTINE RETRY ADDRESS 04968002 DC X'00000000' - DUMMY ROUTINE INVOCATION ID 04970002 DC C'TMQE' - QUEUE IDENTIFICATION 04972002 DC A(IRACTMQE) - QUEUE FORWARD POINTER 04974002 DC A(EPATSCH) - QUEUE BCKWARD POINTER 04976002 DC X'FFFFFFFF' - QUEUE ENTRY ORDERING VALUE 04978002 DC F'0' - DUMMY INVOCATION INTERVAL 04980002 EJECT 04982002 IRARMQH DSECT=NO,QUE=WTQE 05000002 IRARMQH DSECT=NO,QUE=OTQE 05050002 IRARMQH DSECT=NO,QUE=INQE 05100002 IRAOUCB DSECT=NO,LABEL=IRAOUCB 05300002 EJECT 05350002 IHAOUXB DSECT=NO,LABEL=IRAOUXB 05400002 EJECT 05450002 * 05500040 * REQUEST SERVICE SYSEVENT(38) DATA AREA @Z40BPCH 05550040 * 05600040 IRARQSRV DSECT=NO @Z40BPCH 05650040 EJECT 05700040 * 06350002 * FIELDS ADJUSTED WHENEVER TIME OF DAY INCREMENT IS CHANGED 06400002 * 06450002 IRAFLTM DC A(FLTMSYS) 06500002 DC A(FLTMUSR) 06507002 DC A(FLTMSAV) @Z30WIMG 06510003 LA 15,0 06514002 USING RMCT,2 06521002 USING OUCB,4 06528002 USING OUXB,6 06535002 FLTMSYS DS 0H 06542002 DC S(RMCATQS) 06549002 DC S(CCVRBSTD) 06570002 DC S(ICVLUTBT) 06577002 DC S(RMCATOI) 06619002 DC AL2(0) 06654002 FLTMUSR DS 0H 06661002 DC S(OUCBTMA) 06668002 DC S(OUCBTMW) 06675002 DC S(OUCBTMS) 06682002 DC S(OUCBTMO) 06689002 DC S(OUCBTMP) 06703002 DC S(OUCBTCP) @Z40BPCH 06703540 DC S(OUCBTIO) @Z40BPCH 06704040 DC AL2(0) @Z30WIMG 06705003 FLTMSAV DS 0H @Z30WIMG 06706003 DC S(OUXBNQT) 06717002 DC S(OUXBITD) 06731002 DC S(OUXBSTD) 06738002 DC AL2(0) 06745002 DROP 2,4,6 06752002 EJECT @Z30WIMG 06755003 SPACE 1 06759002 * 06800002 * ROUTINES WHOSE INTERVAL IS ADJUSTED BY INITIALIZATION 06850002 * 06900002 IRAEPPR DC A(RMEPBCL1) 06950002 DC A(RMEPBEQ1) 07000002 DC A(RMEPBCAP) @Z40BPCH 07020040 DC A(RMEPBIL1) @Z40BPCH 07023040 DC A(RMEPBAP1) @Z40BPCH 07026040 DC A(RMEPBASM) @Z40BPCH 07029040 DC A(RMEPBMS6) @Z40BPCH 07032040 DC A(0) 07050002 SPACE 1 07100002 * 08400002 * RESOURCES MANAGER PREASSEMBLED SRB TABLE 08450002 * 08500002 DS 0D 08550002 IRASRBT EQU * 08600002 DC C'SRBP' 08650040 DC A(0) 08700002 DC V(IEAMASCB) 08710002 DC 2A(0) 08720002 DC V(IRARMCED) 08750002 DC V(IRARMSRE) 08800002 DC F'0' 08850002 DC 3F'0' 08900002 END 09350002