ibm:vm370-lib:cp:dmkcch.assemble_hst
Table of Contents
DMKCCH History
References
- Fixes Applied : 10
- Latest Source Date : Monday, January 22, 1979
- Last Fix ID : [R13439DK]
Update History
CMS File Input : DMKCCH ASSEMBLE
Date : 1/22/1979 8:43:00 AM
VM Context : MAINT(394)
File Name : DMKCCH.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM
Update Order
- R09029DK 601 RESTORE REG1 WITH REAL DEVICE ADDRESS FOR CALL TO DMKSCNRU
- R08976DK 601 ABENDFRE005 VDEVUC BIT NOT TURNED OFF
- R09068DK 602 CH CHECK REFLECTION WRONG ECSW
- R09957DK - CORRECT IOBLOK CONFLICT IN MSS SUPPORT
- R10136DK 611 TAKE CARE OF IOOPSW IN MCH WAIT 002
- R10804DK 611 UV00439 NEW DISPLACEMENTS FOR MCHAREA
- R10800DK 611 UV00693 REL LVL INCORRECT ON CCH HDR
- R10837DK 613 UV00757 MOVE OF SEREP FLAG MOVED CLOSER TO LPSW
- R12941DK 622 UV04884 SYNC ERROR RECOV FOR INTERVENTION REQUIRED COND.
- R13439DK 623 UV04751 PREVENT PRG006 ON IFCC DUE TO OVERLAY OF SAVEAREA
R09029DK
Date Monday Dec 18, 1978 11:21:00 AM
Loaded from MAINT(294)
R09029DK: ./ I 191000 $ 191500 00001000 R09029DK: LR R1,R3 GET REAL DEVICE ADD. FOR DMKSCN @VA09029 00002000 BEGIN APPLY >>> ./ I 191000 $ 191500 00001000 END APPLY >>> ./ I 191000 $ 191500 00001000 Update Succeeded Update Execution Time 8 milliseconds.
R08976DK
Date Wednesday Jan 24, 1979 12:18:00 PM
Loaded from MAINT(294)
R08976DK: ./ I 899000 $ 899500 500 00001000 R08976DK: NI VDEVFLAG,255-VDEVUC TURN OFF UC FLAG @VA08976 00002000 BEGIN APPLY >>> ./ I 899000 $ 899500 500 00001000 END APPLY >>> ./ I 899000 $ 899500 500 00001000 Update Succeeded Update Execution Time 16 milliseconds.
R09068DK
Date Monday Apr 02, 1979 03:30:00 AM
Loaded from MAINT(294)
R09068DK: ./ R 358000 $ 358100 00001000 R09068DK: MVC IOERECSW(4),ECSWLOG MOVE IN ECSW @VA09068 00002000 R09068DK: ./ R 780000 $ 780100 300 00003000 R09068DK: MVECSW EQU * @VA09068 00004000 R09068DK: MVC ECSWLOG-PSA(4,R2),IOERECSW ECSW TO USER @VA09068 00005000 BEGIN APPLY >>> ./ R 358000 $ 358100 00001000 END APPLY >>> ./ R 358000 $ 358100 00001000 BEGIN APPLY >>> ./ R 780000 $ 780100 300 00003000 END APPLY >>> ./ R 780000 $ 780100 300 00003000 Update Succeeded Update Execution Time 16 milliseconds.
R09957DK
Date Thursday Jul 12, 1979 09:51:00 AM
Loaded from MAINT(294)
R09957DK: ./ * FORCE RE-ASSEMBLY FOR APAR VM09957 BEGIN APPLY >>> ./ * FORCE RE-ASSEMBLY FOR APAR VM09957 Comment >>> ./ * FORCE RE-ASSEMBLY FOR APAR VM09957 END APPLY >>> ./ * FORCE RE-ASSEMBLY FOR APAR VM09957 Update Succeeded Update Execution Time 8 milliseconds.
R10136DK
Date Monday Apr 14, 1980 12:03:00 PM
Loaded from MAINT(294)
R10136DK: ./ D 00581000 00001000 BEGIN APPLY >>> ./ D 00581000 00001000 END APPLY >>> ./ D 00581000 00001000 Update Succeeded Update Execution Time 16 milliseconds.
R10804DK
Date Monday Apr 14, 1980 04:11:00 AM
Loaded from MAINT(294)
R10804DK: ./ * FORCE REASSEMBLY FOR APAR VM10804 BEGIN APPLY >>> ./ * FORCE REASSEMBLY FOR APAR VM10804 Comment >>> ./ * FORCE REASSEMBLY FOR APAR VM10804 END APPLY >>> ./ * FORCE REASSEMBLY FOR APAR VM10804 Update Succeeded Update Execution Time 8 milliseconds.
R10800DK
Date Monday Apr 14, 1980 03:28:00 AM
Loaded from MAINT(294)
R10800DK: ./ R 00929000 $ 929500 00001000 R10800DK: DC X'66' OPERATING SYSTEM AND RELEASE @VA10800 00002000 BEGIN APPLY >>> ./ R 00929000 $ 929500 00001000 END APPLY >>> ./ R 00929000 $ 929500 00001000 Update Succeeded Update Execution Time 8 milliseconds.
R10837DK
Date Thursday Jun 05, 1980 04:02:00 AM
Loaded from MAINT(294)
R10837DK: ./ I 167000 $ 167010 00001000 R10837DK: EXTRN DMKOPRWT @VA10837 00002000 R10837DK: ./ D 577500 00003000 R10837DK: ./ R 585000 586000 $ 585010 10 00004000 R10837DK: AIF (NOT &AP).CCHWFD @VA10837 00005000 R10837DK: SWTCH DS 0H SWITCH TO MAIN PROCESSOR @VA10837 00006000 R10837DK: TM APSTAT1,PROCIO MAIN PROCESSOR? @VA10837 00007000 R10837DK: BNO ATTTERM NO, BRANCH @VA10837 00008000 R10837DK: SIGNAL SSS STOP & STORE STATUS TO AP @VA10837 00009000 R10837DK: B CCHCONT @VA10837 00010000 R10837DK: ATTTERM DS 0H @VA10837 00011000 R10837DK: L R4,PREFIXA GET OWN PREFIX REG @VA10837 00012000 R10837DK: STM R0,R15,DUMPSAVE-PSA(R4) SAVE REGS FOR RESTART @VA10837 00013000 R10837DK: L R4,PREFIXB GET OTHER PREFIX REG @VA10837 00014000 R10837DK: MVC RSRTNPSW-PSA(,R4),RSRTMAIN RESTART NEW PSW @VA10837 00015000 R10837DK: SIGNAL SSS SIGNAL MAIN PROCESSOR TO STOP @VA10837 00016000 R10837DK: SIGNAL RESTART SIGNAL MAIN PROCESSOR TO RESTART @VA10837 00017000 R10837DK: SIGNAL STOP,CONTROL=AUTO SIGNAL SELF TO STOP @VA10837 00018000 R10837DK: MAINRSRT DS 0H RESTART ON MAIN PROCESSOR @VA10837 00019000 R10837DK: L R4,PREFIXA GET OWN PREFIX REGISTER @VA10837 00020000 R10837DK: LM R0,R15,DUMPSAVE-PSA(R4) RESTORE REGS @VA10837 00021000 R10837DK: CCHCONT DS 0H @VA10837 00022000 R10837DK: .CCHWFD ANOP 00023000 R10837DK: MVC SAVEWRK2(20),IOOPSW @VA10837 00024000 R10837DK: CALL DMKOPRWT,PARM=ALARM WRITE TO OPERATOR @VA10837 00025000 R10837DK: MVC IOOPSW(20),SAVEWRK2 NOW REINSTATE @VA10837 00026000 R10837DK: L R14,PREFIXA GET OWN PREFIX REG @VA10837 00027000 R10837DK: CLC CPID-PSA(4,R14),WARM WARM INDICATED IN ID @VA10837 00028000 R10837DK: BNE CCHCKP NO,DONT CHANGE ID @VA10837 00029000 R10837DK: MVC CPID-PSA(4,R14),CPCP MOVE ID FOR CHECKPOINT @VA10837 00030000 R10837DK: CCHCKP DS 0H @VA10837 00031000 R10837DK: MVI MCNPSW+3,X'0F' SET FOR SEREP @VA10837 00032000 R10837DK: LPSW WAITCCH ENTER DISABLE WAIT @VA10837 00033000 R10837DK: ./ R 902000 $ 902010 10 00034000 R10837DK: WAITCCH DS 0D @VA10837 00035000 R10837DK: DC X'0002',X'0000' @VA10837 00036000 R10837DK: DC X'00000002' @VA10837 00037000 R10837DK: WARM DC C'WARM' @VA10837 00038000 R10837DK: CPCP DC C'CPCP' @VA10837 00039000 R10837DK: AIF (NOT &AP).CCHWFD2 @VA10837 00040000 R10837DK: RSRTMAIN DS 0D @VA10837 00041000 R10837DK: DC X'00080000' @VA10837 00042000 R10837DK: DC A(MAINRSRT) @VA10837 00043000 R10837DK: .CCHWFD2 ANOP 00044000 BEGIN APPLY >>> ./ I 167000 $ 167010 00001000 END APPLY >>> ./ I 167000 $ 167010 00001000 BEGIN APPLY >>> ./ D 577500 00003000 END APPLY >>> ./ D 577500 00003000 BEGIN APPLY >>> ./ R 585000 586000 $ 585010 10 00004000 END APPLY >>> ./ R 585000 586000 $ 585010 10 00004000 BEGIN APPLY >>> ./ R 902000 $ 902010 10 00034000 END APPLY >>> ./ R 902000 $ 902010 10 00034000 Update Succeeded Update Execution Time 23 milliseconds.
R12941DK
Date Tuesday Jul 07, 1981 01:26:00 PM
Loaded from MAINT(294)
R12941DK: ./ * BEGIN APPLY >>> ./ * Comment >>> ./ * END APPLY >>> ./ * Update Succeeded Update Execution Time 8 milliseconds.
R13439DK
Date Friday Aug 14, 1981 08:05:00 AM
Loaded from MAINT(294)
R13439DK: ./ D 00583000 00584000 $ R13439DK: ./ I 00585190 $ 00585194 4 R13439DK: LA R1,CCMSG GET THE CHANNEL MESSAGE @VA13439 R13439DK: LA R0,CCMSGL GET LENGTH OF MESSAGE @VA13439 BEGIN APPLY >>> ./ D 00583000 00584000 $ END APPLY >>> ./ D 00583000 00584000 $ BEGIN APPLY >>> ./ I 00585190 $ 00585194 4 END APPLY >>> ./ I 00585190 $ 00585194 4 Update Succeeded Update Execution Time 16 milliseconds.
ibm/vm370-lib/cp/dmkcch.assemble_hst.txt ยท Last modified: 2023/08/06 13:36 by Site Administrator