DMKCCH History
- - References
  - Update History
    - Update Order
    - R09029DK
    - R08976DK
    - R09068DK
    - R09957DK
    - R10136DK
    - R10804DK
    - R10800DK
    - R10837DK
    - R12941DK
    - R13439DK

DMKCCH History

References

Abstract / Synopsis of DMKCCH
Latest Source of DMKCCH
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.

Table of Contents

DMKCCH History

References

Update History

Update Order

R09029DK

R08976DK

R09068DK

R09957DK

R10136DK

R10804DK

R10800DK

R10837DK

R12941DK

R13439DK