ibm:vm370-lib:cp:dmkats.assemble_hst
Table of Contents
DMKATS History
References
- Fixes Applied : 7
- Latest Source Date : Thursday, December 14, 1978
- Last Fix ID : [HRC106DK]
Update History
CMS File Input : DMKATS ASSEMBLE
Date : 12/14/1978 8:54:00 AM
VM Context : MAINT(394)
File Name : DMKATS.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM
Update Order
- R10074DK 604 CHANNEL SET SWITCHING AND MULTIPLE SRF SUPPORT
- R12771DK 621 UV04394 ABENDFRE008 FRETTING VMABLOK TWICE
- R12533DK 622 UV04614 ABENDATS001 WHEN STORE COMMAND CHANGES SHR'D PAGE
- R13426DK 622 UV04654 ADSTOP INTO SHARED SYSTEM - ABENDATS006
- R13356DK 623 UV04697 TTSEGCNT NOT BEING DECREMENTED CAUSING MIGRATION
- HRC066DK H40 Fix FRE013 failure with AP page tables
- HRC106DK H40 SYSOWN support for 3375 & 3380 dasd
R10074DK
Date Thursday Jul 05, 1979 04:08:00 PM
Loaded from MAINT(294)
R10074DK: ./ R 380000 $ 380100 DMK00010
R10074DK: TM APSTAT1,PROCIPL RUNNING ON MAIN (IPL) PROC? @V60B7AA DMK00020
R10074DK: ./ R 403000 $ 403100 DMK00030
R10074DK: TM APSTAT1,PROCIPL RUNNING ON MAIN (IPL) PROC? @V60B7AA DMK00040
R10074DK: ./ R 417000 $ 417100 DMK00050
R10074DK: TM APSTAT1,PROCIPL RUNNING ON MAIN (IPL) PROC? @V60B7AA DMK00060
R10074DK: ./ R 449000 $ 449100 DMK00070
R10074DK: TM APSTAT1,PROCIPL IS THIS THE MAIN (IPL) PROC? @V60B7AA DMK00080
R10074DK: ./ R 457000 $ 457100 DMK00090
R10074DK: TM APSTAT1,PROCIPL IS THIS THE MAIN (IPL) PROC? @V60B7AA DMK00100
R10074DK: ./ R 638000 $ 638100 DMK00110
R10074DK: TM APSTAT1,PROCIPL RUNNING ON THE MAIN (IPL) PROC? @V60B7AA DMK00120
BEGIN APPLY >>> ./ R 380000 $ 380100 DMK00010
END APPLY >>> ./ R 380000 $ 380100 DMK00010
BEGIN APPLY >>> ./ R 403000 $ 403100 DMK00030
END APPLY >>> ./ R 403000 $ 403100 DMK00030
BEGIN APPLY >>> ./ R 417000 $ 417100 DMK00050
END APPLY >>> ./ R 417000 $ 417100 DMK00050
BEGIN APPLY >>> ./ R 449000 $ 449100 DMK00070
END APPLY >>> ./ R 449000 $ 449100 DMK00070
BEGIN APPLY >>> ./ R 457000 $ 457100 DMK00090
END APPLY >>> ./ R 457000 $ 457100 DMK00090
BEGIN APPLY >>> ./ R 638000 $ 638100 DMK00110
END APPLY >>> ./ R 638000 $ 638100 DMK00110
Update Succeeded
Update Execution Time 23 milliseconds.
R12771DK
Date Wednesday Jun 03, 1981 05:06:00 AM
Loaded from MAINT(294)
R12771DK: ./ R 159000 164000 $ 159500 500 00001000
R12771DK: LA R0,CPEXSIZE GET SIZE OF CPEXBLOK @VA12771 00002000
R12771DK: CALL DMKFREE GET A CPEXBLOK @VA12771 00003000
R12771DK: USING CPEXBLOK,R1 @VA12771 00004000
R12771DK: LM R2,R3,SAVEWRK2 SAVE THE SHARED SYS NAME @VA12771 00005000
R12771DK: STM R0,R15,CPEXREGS SAVE ALL THE REGISTERS @VA12771 00006000
R12771DK: LA R15,ERR181 GET ADDRESS OF MESSAGE ROUTINE @VA12771 00007000
R12771DK: ST R15,CPEXADD STORE RETURN ADDRESS @VA12771 00008000
R12771DK: CALL DMKSTKCP STACK THE CPEXBLOK @VA12771 00009000
R12771DK: DROP R1 @VA12771 00010000
R12771DK: ./ I 170000 $ 170050 50 00012000
R12771DK: ERR181 DS 0H @VA12771 00013000
R12771DK: USING EMSGBLOK,R1 @VA12771 00014000
R12771DK: LA R0,EMSGSIZE GET SIZE OF AREA FOR MESSAGE @VA12771 00015000
R12771DK: CALL DMKFREE GET ADDRESS OF AREA FOR MESSAGE @VA12771 00016000
R12771DK: XC EMSGAREA,EMSGAREA CLEAR MESSAGE AREA @VA12771 00017000
R12771DK: STM R2,R3,EMSGNAME MOVE IN SHARED SYS NAME @VA12771 00018000
R12771DK: DROP R1 @VA12771 00019000
R12771DK: LA R0,L'SHRNAME LENGTH OF THE NAME FOR MESSAGE @VA12771 00020000
R12771DK: ICM R0,B'1110',=C'ATS' MODULE IDENT. @VA12771 00021000
R12771DK: LA R2,EMSG181 LOAD ERROR CODE @VA12771 00022000
R12771DK: ICM R2,B'1000',=X'80' FLAGS TO RETURN TO CALLER @VA12771 00023000
R12771DK: CALL DMKERMSG CALL THE MESSAGE WRITTER @VA12771 00024000
R12771DK: LA R0,EMSGSIZE SIZE OF EMSGBLOK IN DW'S @VA12771 00025000
R12771DK: CALL DMKFRET FRET THE EMSGBLOK @VA12771 00026000
R12771DK: GOTO DMKDSPCH GO TO THE DISPATCHER @VA12771 00027000
BEGIN APPLY >>> ./ R 159000 164000 $ 159500 500 00001000
END APPLY >>> ./ R 159000 164000 $ 159500 500 00001000
BEGIN APPLY >>> ./ I 170000 $ 170050 50 00012000
END APPLY >>> ./ I 170000 $ 170050 50 00012000
Update Succeeded
Update Execution Time 8 milliseconds.
R12533DK
Date Wednesday Jun 24, 1981 06:08:00 AM
Loaded from MAINT(294)
R12533DK: ./ R 26000 $ 26500 00001000
R12533DK: * GPR 2 = VITURAL PAGE ADDRESS @VA12533 00002000
R12533DK: ./ I 155000 $ 155500 00003000
R12533DK: LR R1,R2 SET R1 FOR TRANS @VA12533 00004000
R12533DK: TRANS 2,1,OPT=(BRING,DEFER) @VA12533 00005000
BEGIN APPLY >>> ./ R 26000 $ 26500 00001000
END APPLY >>> ./ R 26000 $ 26500 00001000
BEGIN APPLY >>> ./ I 155000 $ 155500 00003000
END APPLY >>> ./ I 155000 $ 155500 00003000
Update Succeeded
Update Execution Time 16 milliseconds.
R13426DK
Date Wednesday Jun 24, 1981 06:12:00 AM
Loaded from MAINT(294)
R13426DK: ./ R 0515000 $ 515000 300 00001000
R13426DK: LH R1,PAGCORE USE CORTABLE ENTRY FOR TEST @VA13426 00002000
R13426DK: N R1,REFMASK FORCE OFF REFERENCE BIT @VA13426 00003000
R13426DK: CH R1,INVLPTE FRAME BEEN ASSIGNED @VA13426 00004000
R13426DK: ./ R 0860000 $ 860000 500 00005000
R13426DK: REFMASK DC X'0000FFFE' MASK TO FORCE REFERENCE BIT OFF @VA13426 00006000
R13426DK: INVLPTE DC X'0008' INVALID PTE BIT MASK @VA13426 00007000
BEGIN APPLY >>> ./ R 0515000 $ 515000 300 00001000
END APPLY >>> ./ R 0515000 $ 515000 300 00001000
BEGIN APPLY >>> ./ R 0860000 $ 860000 500 00005000
END APPLY >>> ./ R 0860000 $ 860000 500 00005000
Update Succeeded
Update Execution Time 16 milliseconds.
R13356DK
Date Friday Aug 07, 1981 06:30:00 AM
Loaded from MAINT(294)
R13356DK: ./ I 00790000 $ 790100 100 00001000
R13356DK: L R15,PREFIXA PREFIX VALUE TO ADDRESS PSA @VA13356 00002000
R13356DK: * AT ABSOLUTE 0 00003000
R13356DK: L R0,TTSEGCNT-PSA(,R15) NUM OF PG/SWP TBLS IN SYS @VA13356 00004000
R13356DK: BCTR R0,R0 DECREMENT PAG/SWP TABLE COUNT @VA13356 00005000
R13356DK: ST R0,TTSEGCNT-PSA(,R15) STORE IT BACK IN THE PSA @VA13356 00006000
BEGIN APPLY >>> ./ I 00790000 $ 790100 100 00001000
END APPLY >>> ./ I 00790000 $ 790100 100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
HRC066DK
Date Tuesday Mar 08, 2016 06:42:00 PM
Loaded from MAINT(094)
HRC066DK: ./ I 00591000 $ 00591100 100
HRC066DK: L R15,=A(DMKSYSAP) -> DMKSYS AP setting HRC066DK
HRC066DK: CLI 0(R15),C'Y' Is AP enabled? HRC066DK
HRC066DK: BNE *+6 No HRC066DK
HRC066DK: AR R0,R0 Double table size for APHRC066DK
HRC066DK: ./ I 00787000 $ 00787100 100
HRC066DK: L R15,=A(DMKSYSAP) -> DMKSYS AP setting HRC066DK
HRC066DK: CLI 0(R15),C'Y' Is AP enabled? HRC066DK
HRC066DK: BNE *+6 No HRC066DK
HRC066DK: AR R0,R0 Double table size for APHRC066DK
BEGIN APPLY >>> ./ I 00591000 $ 00591100 100
END APPLY >>> ./ I 00591000 $ 00591100 100
BEGIN APPLY >>> ./ I 00787000 $ 00787100 100
END APPLY >>> ./ I 00787000 $ 00787100 100
Update Succeeded
Update Execution Time 16 milliseconds.
HRC106DK
Date Tuesday Feb 16, 2016 04:15:00 PM
Loaded from MAINT(094)
HRC106DK: ./ I 00263000 $ 00263100 100
HRC106DK: LA R0,PAGE3375 Maximum pages/cyl on 3375 HRC106DK
HRC106DK: TM RDEVTYPE,TYP3375 Is this a 3375 HRC106DK
HRC106DK: BO SAVMAXPG Yes ----- HRC106DK
HRC106DK: LA R0,PAGE3380 Maximum pages/cyl on 3380 HRC106DK
HRC106DK: TM RDEVTYPE,TYP3380 Is this a 3380 HRC106DK
HRC106DK: BO SAVMAXPG Yes ----- HRC106DK
HRC106DK: ./ I 00885000 $ 00885100 100
HRC106DK: PAGE3375 EQU 96 Number of pages per cylinder HRC106DK
HRC106DK: * (3375) HRC106DK
HRC106DK: PAGE3380 EQU 150 Number of pages per cylinder HRC106DK
HRC106DK: * (3380) HRC106DK
BEGIN APPLY >>> ./ I 00263000 $ 00263100 100
END APPLY >>> ./ I 00263000 $ 00263100 100
BEGIN APPLY >>> ./ I 00885000 $ 00885100 100
END APPLY >>> ./ I 00885000 $ 00885100 100
Update Succeeded
Update Execution Time 23 milliseconds.
ibm/vm370-lib/cp/dmkats.assemble_hst.txt · Last modified: 2023/08/06 13:36 by Site Administrator