Table of Contents

DMKCKP History

References

Update History

CMS File Input : DMKCKP ASSEMBLE
Date : 12/13/1978 4:55:00 PM
VM Context : MAINT(394)
File Name : DMKCKP.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM

Update Order

  1. R09273DK 601 3800 VSPXBLOK REORGANIZED FOR PERFORMANCE
  2. R09017DK 601 DMKCKP WAIT STATE CODE X'17'
  3. R09296DK 601 REASSEMBLE FOR V09296
  4. R09957DK 604 CORRECT IOBLOK CONFLICT IN MSS SUPPORT
  5. R10076DK 604 CP DUMP SERVICES SUPPORT
  6. R09276DK 606 UNNEEDED CKPT START IF HUNG DEVICE AFTER WARM START DATA SAVED
  7. R09139DK 610 CP DMKCKP DOES NOT CHECK SEQUENCE NUMBER OF LOG MESSAGE
  8. R10546DK 610 FIX ABENDPGT005 IN WARMSTART WITH DEDICATED 3800
  9. R12228DK 617 UV03026 SPOOL FILE IS INCOMPATIBLE BETWEEN R060 AND VM/SP
  10. R11232DK 618 UV02264 ABENDPGT002 ABENDPGT003 CHAIN PROBLEMS WITH SPLINKS
  11. R13748DK 623 UV04992 MSDMKWRM904W IF RECORD ON BUFFER BOUNDARY
  12. HRC002DK V01 POWEROFF AT SHUTDOWN
  13. HRC028DK V01 MAKE STARTUP MESSAGE MORE READABLE
  14. HRC032DK V01 ASK FOR CKPT RESTART IF WARM FAILS
  15. HRC106DK H40 SYSOWN support for 3375 & 3380 dasd
  16. HRC075DK V01 Alternate nucleus support
  17. HRC076DK V01 SHUTDOWN REIPL support

R09273DK

Date Friday Jan 19, 1979 09:15:00 AM
Loaded from MAINT(294)
       R09273DK: ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK                       DMK00010
 BEGIN APPLY >>> ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK                       DMK00010
     Comment >>> ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK                       DMK00010
   END APPLY >>> ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK                       DMK00010
Update Succeeded
Update Execution Time 16 milliseconds.

R09017DK

Date Monday Feb 26, 1979 01:35:00 PM
Loaded from MAINT(294)
       R09017DK: ./ R 210000 $ 210100                                                    00001000
       R09017DK:          MVC   PRNPSW(8),WAIT17 SET PROGRAM NEW PSW            @VA09017 00002000
       R09017DK: ./ R 349000 $ 349100                                                    00003000
       R09017DK:          LPSW  WAIT17         WAIT - ERROR READING CKP PAGE 2  @VA09017 00004000
       R09017DK: ./ R 518000  519000 $ 518100 1000                                       00005000
       R09017DK: WAIT17   DC    X'000A0000'    ERROR LOADING CKP PAGE 2         @VA09017 00006000
       R09017DK:          DC    X'00000017'    DISABLE WAIT STATE (CODE 17)     @VA09017 00007000
 BEGIN APPLY >>> ./ R 210000 $ 210100                                                    00001000
   END APPLY >>> ./ R 210000 $ 210100                                                    00001000
 BEGIN APPLY >>> ./ R 349000 $ 349100                                                    00003000
   END APPLY >>> ./ R 349000 $ 349100                                                    00003000
 BEGIN APPLY >>> ./ R 518000  519000 $ 518100 1000                                       00005000
   END APPLY >>> ./ R 518000  519000 $ 518100 1000                                       00005000
Update Succeeded
Update Execution Time 23 milliseconds.

R09296DK

Date Wednesday Mar 07, 1979 05:31:00 PM
Loaded from MAINT(294)
       R09296DK: ./ * REASSEMBLE FOR V09296                                              00001000
 BEGIN APPLY >>> ./ * REASSEMBLE FOR V09296                                              00001000
     Comment >>> ./ * REASSEMBLE FOR V09296                                              00001000
   END APPLY >>> ./ * REASSEMBLE FOR V09296                                              00001000
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.

R10076DK

Date Monday Jul 02, 1979 11:07:00 AM
Loaded from MAINT(294)
       R10076DK: ./ R 01212000 01214000 $ 1212000 100                     04/12/79 08:02:43
       R10076DK:          SPACE                                                          01212100
       R10076DK: * ROUTINE TO MOVE ENTRIES ON 'INCOMPLETE DUMP' CHAIN TO DELETE          01212200
       R10076DK: CHK04    DS    0H                                              @V67CAH7 01212300
       R10076DK:          ICM   R3,B'1111',DMKRSPDP     POINTER TO DUMPS IN PRC @V67CAH7 01212400
       R10076DK:          BZ    CHK041                  NO DUMPS..SKIP LOGIC    @V67CAH7 01212500
       R10076DK: * NOW ADD DUMPS IN PROCESS TO DELETE CHAIN                              01212600
       R10076DK: GETNEXT  DS    0H                                              @V67CAH7 01212700
       R10076DK:          LR    R14,R3                  SAVE LAST POINTER       @V67CAH7 01212800
       R10076DK:          ICM   R3,B'1111',SFBPNT-SFBLOK(R14)  FORWARD POINTER  @V67CAH7 01212900
       R10076DK:          BNZ   GETNEXT                 MORE SFBLOKS...BRANCH   @V67CAH7 01213000
       R10076DK: * R14 NOW HAS LAST SFBLOK POINTER ON DUMP CHAIN                         01213100
       R10076DK:          L     R3,DMKRSPDL             ADDRESS OF DELETE       @V67CAH7 01213200
       R10076DK: *                                CHAINS FIRST SFBLOK POINTER            01213300
       R10076DK:          ST    R3,SFBPNT-SFBLOK(,R14)  PUT FULL DUMP CHAIN IN  @V67CAH7 01213400
       R10076DK: *                                      FRONT OF DELETE CHAIN            01213500
       R10076DK: * THE DUMP CHAIN NOW HAS IT'S DUMP SFBLOKS FOLLOWED BY                  01213600
       R10076DK: *    THE DELETE CHAIN'S SFBLOK                                          01213700
       R10076DK: *  ***  NOW ATTACH FULL CHAIN TO DELETE ANCHOR                          01213800
       R10076DK:          L     R14,DMKRSPDP            GET POINTER TO DUMP     @V67CAH7 01213900
       R10076DK: *                                      CHAINS FIRST SFBLOK              01214000
       R10076DK:          ST    R14,DMKRSPDL            MOVE TO DELETE ANCHOR   @V67CAH7 01214100
       R10076DK: * NOW BOTH DUMP AND DELETE SFBLOKS ARE ON DELETE CHAIN                  01214200
       R10076DK: CHK041   DS    0H                                              @V67CAH7 01214300
       R10076DK:          MVC   DLMREC+16(2),DMKRSPID   SAVE ID COUNTER IN      @V67CAH7 01214400
       R10076DK: *                                      DELIMITER RECORD                 01214500
       R10076DK: ./ I 01618000          $ 1618300 300                     04/12/79 08:02:43
       R10076DK:          DS    CL4            CL4'DUMP'                        @V67CAH7 01618100
       R10076DK: DMKRSPDP DS    1F             DUMP IN PROGRESS CHAIN           @V67CAH7 01618200
 BEGIN APPLY >>> ./ R 01212000 01214000 $ 1212000 100                     04/12/79 08:02:43
   END APPLY >>> ./ R 01212000 01214000 $ 1212000 100                     04/12/79 08:02:43
 BEGIN APPLY >>> ./ I 01618000          $ 1618300 300                     04/12/79 08:02:43
   END APPLY >>> ./ I 01618000          $ 1618300 300                     04/12/79 08:02:43
Update Succeeded
Update Execution Time 16 milliseconds.

R09276DK

Date Wednesday Oct 31, 1979 10:15:00 AM
Loaded from MAINT(294)
       R09276DK: ./ R 234000 235000 $ 234200 200                                         00001000
       R09276DK:          BE    SHUTSYS        YES - GO DO IT                   @VA09276 00002000
       R09276DK:          MVC   CPID(4),=C'WRM ' INDICATE AUTOMATIC WARM START  @VA09276 00003000
       R09276DK:          MVC   IPLPSW(8),WAIT16 LOAD RESTART PSW - WARM START  @VA09276 00004000
       R09276DK: *                             DATA SAVED                                00005000
       R09276DK:          B     WARM           GO WARM START                    @VA09276 00006000
       R09276DK: ./ I 517000 $ 517500 100                                                00007000
       R09276DK: WAIT16   DC    X'000A0000'    WARM START DATA SAVED-RESTART    @VA09276 00008000
       R09276DK:          DC    X'00000016'    DISABLE WAIT STATE ( CODE 16 )   @VA09276 00009000
 BEGIN APPLY >>> ./ R 234000 235000 $ 234200 200                                         00001000
   END APPLY >>> ./ R 234000 235000 $ 234200 200                                         00001000
 BEGIN APPLY >>> ./ I 517000 $ 517500 100                                                00007000
   END APPLY >>> ./ I 517000 $ 517500 100                                                00007000
Update Succeeded
Update Execution Time 23 milliseconds.

R09139DK

Date Monday Mar 03, 1980 12:11:00 PM
Loaded from MAINT(294)
       R09139DK: ./ I 1063000 $ 1063100 100                                              00001000
       R09139DK:          LH    R2,6(R5)       PICK UP SEQ NUMBER               @VA09139 00002000
       R09139DK:          CH    R2,SEQNO       GET SAVED SEQUENCE NUMBER        @VA09139 00003000
       R09139DK:          BNE   LOGEND         NO - BAD LOG MSG CHAIN           @VA09139 00004000
       R09139DK:          LA    R2,1(,R2)      BUMP SEQ NUMBER                  @VA09139 00005000
       R09139DK:          STH   R2,SEQNO       AND SAVE FOR NEXT TIME THROUGH   @VA09139 00006000
       R09139DK: ./ I 1067000 $ 1067500                                                  00007000
       R09139DK: SEQNO    DC    H'1'           INITIALIZE SEQ NUMBER TO ONE     @VA09139 00008000
 BEGIN APPLY >>> ./ I 1063000 $ 1063100 100                                              00001000
   END APPLY >>> ./ I 1063000 $ 1063100 100                                              00001000
 BEGIN APPLY >>> ./ I 1067000 $ 1067500                                                  00007000
   END APPLY >>> ./ I 1067000 $ 1067500                                                  00007000
Update Succeeded
Update Execution Time 16 milliseconds.

R10546DK

Date Thursday Mar 06, 1980 02:06:00 AM
Loaded from MAINT(294)
       R10546DK: ./  I 01377000  $  01377100  100                                        00001000
       R10546DK:          TM    RDEVSTAT,RDEVDED DEDICATED 3800?                @VA10546 00002000
       R10546DK:          BO    NXTDEV         YES,GO ON TO NEXT DEVICE         @VA10546 00003000
 BEGIN APPLY >>> ./  I 01377000  $  01377100  100                                        00001000
   END APPLY >>> ./  I 01377000  $  01377100  100                                        00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R12228DK

Date Friday Nov 21, 1980 02:26:00 PM
Loaded from MAINT(294)
       R12228DK: ./ I 00229000          $ 229500 500                   10/22/80 09:54:46
       R12228DK:          MVI   BUFFVER,VERR6  MAKE IT TO BE RELEASE 6 VERSION  @VA12228 00229500
       R12228DK: ./ R 01079000 01080000 $ 1079000 1000                 10/22/80 09:54:46
       R12228DK:          CLC   INDEX,=AL2(4096-8-SPSFBSZ*8) WILL FIRST SFBLOK  @VA12228 01079000
       R12228DK: *                             FIT (EXPANDED FOR VM/SP)         @VA12228 01080000
       R12228DK: ./ R 01091000          $ 1091000 1000                 10/22/80 09:54:46
       R12228DK:          MVI   SIZE+1,SPSFBSZ*8 SIZE OF ONE SFBLOK (VM/SP)     @VA12228 01091000
       R12228DK: ./ R 01229000          $ 1229000 1000                 10/22/80 09:54:46
       R12228DK: CHK05    CLC   INDEX,=AL2(4096-8-SPRCSZ*8) WILL FIRST VM/SP    @VA12228 01229000
       R12228DK: ./ R 01235000          $ 1235000 1000                 10/22/80 09:54:46
       R12228DK:          MVI   SIZE+1,SPRCSZ*8  SIZE OF ONE VM/SP RECBLOK      @VA12228 01235000
       R12228DK: ./ R 01258000          $ 1258000 200                  10/22/80 09:54:46
       R12228DK:          MVC   ALLOCBUF(8),RECPNT  MOVE RECBLOK HEADER TO BUFFE@VA12228 01258000
       R12228DK:          MVC   ALLOCBUF+8(8),ZEROES     ZERO FLAG BYTE         @VA12228 01258200
       R12228DK:          MVC   ALLOCBUF+16(16),RECMAP   MOVE RECBLOK MAP BITS  @VA12228 01258400
       R12228DK:          MVC   ALLOCBUF+32(8),FFS  SET UNUSED PAGES ALLOCATED  @VA12228 01258600
       R12228DK: ./ I 01373000          $ 1373500 500                  10/22/80 09:54:46
       R12228DK:          MVC   SFBUFORM,=C'STANDARD' DEFAULT FORM              @VA12228 01373500
       R12228DK: ./ I 01449000          $ 1449500 500                  10/22/80 09:54:46
       R12228DK:          DROP  R3                                              @VA12228 01449500
       R12228DK: ./ I 01581000          $ 1581100 100                  10/22/80 09:54:46
       R12228DK:          CLI   SIZE+1,SPSFBSZ*8    WRITING SFBLOK FOR VM/SP?   @VA12228 01581100
       R12228DK:          BNE   NOTSPSFB            SKIP IF NOT                 @VA12228 01581200
       R12228DK:          USING SFBLOK,R1                                       @VA12228 01581300
       R12228DK:          MVC   SFBUFORM,=C'STANDARD'    STANDARD FORM NUMBER   @VA12228 01581400
       R12228DK:          MVC   SFBOFORM,=C'STANDARD'    FOR USER AND OPER      @VA12228 01581500
       R12228DK:          DROP  R1                                              @VA12228 01581600
       R12228DK: NOTSPSFB DS    0H                                              @VA12228 01581700
       R12228DK: ./ R 01706000          $ 1706000 200                  10/22/80 09:54:46
       R12228DK: BUFFVER  DS    X              VERSION OF WARM START DATA       @VA12228 01706000
       R12228DK: VERNULL  EQU   X'FF'          NULL VERSION NUMBER              @VA12228 01706200
       R12228DK: VERR6    EQU   X'01'          RELEASE 6 VERSION OF WARM START  @VA12228 01706400
       R12228DK: VERSP    EQU   X'02'          VM/SP VERSION OF WARM START      @VA12228 01706600
       R12228DK:          DS    7X                                              @VA12228 01706800
       R12228DK: ./ I 01720000          $ 1720100 100                  10/22/80 09:54:46
       R12228DK: SFBLOK   DSECT ,              CONTINUATION OF SFBLOK           @VA12228 01720100
       R12228DK:          ORG   ,              WITH VM/SP SFBLOK DEFINITIONS    @VA12228 01720200
       R12228DK: SFBUFORM DS    D              USER FORM                        @VA12228 01720300
       R12228DK: SFBOFORM DS    D              OPERATOR FORM                    @VA12228 01720400
       R12228DK: SPSFBSZ  EQU   (*-SFBLOK+7)/8 VM/SP SFBLOK IS 2 DWRDS LONGER   @VA12228 01720500
       R12228DK: SPRCSZ   EQU   8              VM/SP RECBLOK IS 8 DOUBLEWORDS   @VA12228 01720600
 BEGIN APPLY >>> ./ I 00229000          $ 229500 500                   10/22/80 09:54:46
   END APPLY >>> ./ I 00229000          $ 229500 500                   10/22/80 09:54:46
 BEGIN APPLY >>> ./ R 01079000 01080000 $ 1079000 1000                 10/22/80 09:54:46
   END APPLY >>> ./ R 01079000 01080000 $ 1079000 1000                 10/22/80 09:54:46
 BEGIN APPLY >>> ./ R 01091000          $ 1091000 1000                 10/22/80 09:54:46
   END APPLY >>> ./ R 01091000          $ 1091000 1000                 10/22/80 09:54:46
 BEGIN APPLY >>> ./ R 01229000          $ 1229000 1000                 10/22/80 09:54:46
   END APPLY >>> ./ R 01229000          $ 1229000 1000                 10/22/80 09:54:46
 BEGIN APPLY >>> ./ R 01235000          $ 1235000 1000                 10/22/80 09:54:46
   END APPLY >>> ./ R 01235000          $ 1235000 1000                 10/22/80 09:54:46
 BEGIN APPLY >>> ./ R 01258000          $ 1258000 200                  10/22/80 09:54:46
   END APPLY >>> ./ R 01258000          $ 1258000 200                  10/22/80 09:54:46
 BEGIN APPLY >>> ./ I 01373000          $ 1373500 500                  10/22/80 09:54:46
   END APPLY >>> ./ I 01373000          $ 1373500 500                  10/22/80 09:54:46
 BEGIN APPLY >>> ./ I 01449000          $ 1449500 500                  10/22/80 09:54:46
   END APPLY >>> ./ I 01449000          $ 1449500 500                  10/22/80 09:54:46
 BEGIN APPLY >>> ./ I 01581000          $ 1581100 100                  10/22/80 09:54:46
   END APPLY >>> ./ I 01581000          $ 1581100 100                  10/22/80 09:54:46
 BEGIN APPLY >>> ./ R 01706000          $ 1706000 200                  10/22/80 09:54:46
   END APPLY >>> ./ R 01706000          $ 1706000 200                  10/22/80 09:54:46
 BEGIN APPLY >>> ./ I 01720000          $ 1720100 100                  10/22/80 09:54:46
   END APPLY >>> ./ I 01720000          $ 1720100 100                  10/22/80 09:54:46
Update Succeeded
Update Execution Time 31 milliseconds.

R11232DK

Date Monday Dec 08, 1980 12:01:00 PM
Loaded from MAINT(294)
       R11232DK: ./ I 919000 $ 919100 500                                                00001000
       R11232DK:          CLI   VDEVTYPE,TYP3210 SPOOLED CONSOLE DEVICE         @VA11232 00002000
       R11232DK:          BE    CONFILE        YES                              @VA11232 00003000
       R11232DK: ./ D 920000 921000 $                                                    00004000
       R11232DK: ./ D 932000 934000 $                                                    00005000
 BEGIN APPLY >>> ./ I 919000 $ 919100 500                                                00001000
   END APPLY >>> ./ I 919000 $ 919100 500                                                00001000
 BEGIN APPLY >>> ./ D 920000 921000 $                                                    00004000
   END APPLY >>> ./ D 920000 921000 $                                                    00004000
 BEGIN APPLY >>> ./ D 932000 934000 $                                                    00005000
   END APPLY >>> ./ D 932000 934000 $                                                    00005000
Update Succeeded
Update Execution Time 16 milliseconds.

R13748DK

Date Friday Aug 07, 1981 07:20:00 AM
Loaded from MAINT(294)
       R13748DK: ./ R 1464000 $ 1464100                                                  00001000
       R13748DK:          BNH   MOVREC         NO - MOVE IN RECORD              @VA13748 00002000
 BEGIN APPLY >>> ./ R 1464000 $ 1464100                                                  00001000
   END APPLY >>> ./ R 1464000 $ 1464100                                                  00001000
Update Succeeded
Update Execution Time 16 milliseconds.

HRC002DK

Date Friday Jan 11, 2013 08:30:00 PM
Loaded from MAINT(094)
       HRC002DK: ./ I 00265000          $ 265100 100                   02/08/06 16:12:11
       HRC002DK:          TM    CPSTAT4,CPPWROFF                                HRC002DK 00265100
       HRC002DK:          BZ    WAITNOW                                         HRC002DK 00265200
       HRC002DK:          NI    CPSTAT4,255-CPPWROFF                            HRC002DK 00265300
       HRC002DK:          MVC   PRNPSW(8),WAIT8                                 HRC002DK 00265400
       HRC002DK:          LM    R2,R3,POWEROFF                                  HRC002DK 00265500
       HRC002DK:          DC    X'8323001F'                                     HRC002DK 00265600
       HRC002DK: WAITNOW  EQU   *                                               HRC002DK 00265700
       HRC002DK: ./ I 00266000          $ 266300 300                   02/08/06 16:12:11
       HRC002DK: POWEROFF DS    0D                                              HRC002DK 00266300
       HRC002DK:          DC    C'POWEROFF'                                     HRC002DK 00266600
 BEGIN APPLY >>> ./ I 00265000          $ 265100 100                   02/08/06 16:12:11
   END APPLY >>> ./ I 00265000          $ 265100 100                   02/08/06 16:12:11
 BEGIN APPLY >>> ./ I 00266000          $ 266300 300                   02/08/06 16:12:11
   END APPLY >>> ./ I 00266000          $ 266300 300                   02/08/06 16:12:11
Update Succeeded
Update Execution Time 23 milliseconds.

HRC028DK

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
       HRC028DK: ./ R 00285000          $ 285490 490                   02/23/06 08:26:54
       HRC028DK: MSG960   DC    C'DMKCKP960I System'                            HRC028DK 00285000
       HRC028DK: ./ R 00288000          $ 288490 490                   02/23/06 08:26:54
       HRC028DK: CDATA    DC    C'data saved'                                   HRC028DK 00288000
       HRC028DK: ./ R 00291000 00292000 $ 291590 590                   02/23/06 08:26:54
       HRC028DK: MSG961   DC    C'DMKCKP961W System '                           HRC028DK 00291000
       HRC028DK: CSHUT    DC    C'Shutdown Complete'                            HRC028DK 00292000
       HRC028DK: ./ R 00446000 00447000 $ 446590 590                   02/23/06 08:26:54
       HRC028DK: MSGNUM2  DC    C'0W System Recovery failure; '                 HRC028DK 00446000
       HRC028DK: MSGDATA  DC    CL24'Program Check'                             HRC028DK 00447000
       HRC028DK: ./ R 00450000          $ 450490 490                   02/23/06 08:26:54
       HRC028DK: CINVAL   DC    C'Invalid '                                     HRC028DK 00450000
       HRC028DK: ./ R 00453000          $ 453490 490                   02/23/06 08:26:54
       HRC028DK: CAREA    DC    C'area full'                                    HRC028DK 00453000
 BEGIN APPLY >>> ./ R 00285000          $ 285490 490                   02/23/06 08:26:54
   END APPLY >>> ./ R 00285000          $ 285490 490                   02/23/06 08:26:54
 BEGIN APPLY >>> ./ R 00288000          $ 288490 490                   02/23/06 08:26:54
   END APPLY >>> ./ R 00288000          $ 288490 490                   02/23/06 08:26:54
 BEGIN APPLY >>> ./ R 00291000 00292000 $ 291590 590                   02/23/06 08:26:54
   END APPLY >>> ./ R 00291000 00292000 $ 291590 590                   02/23/06 08:26:54
 BEGIN APPLY >>> ./ R 00446000 00447000 $ 446590 590                   02/23/06 08:26:54
   END APPLY >>> ./ R 00446000 00447000 $ 446590 590                   02/23/06 08:26:54
 BEGIN APPLY >>> ./ R 00450000          $ 450490 490                   02/23/06 08:26:54
   END APPLY >>> ./ R 00450000          $ 450490 490                   02/23/06 08:26:54
 BEGIN APPLY >>> ./ R 00453000          $ 453490 490                   02/23/06 08:26:54
   END APPLY >>> ./ R 00453000          $ 453490 490                   02/23/06 08:26:54
Update Succeeded
Update Execution Time 55 milliseconds.

HRC032DK

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
       HRC032DK: ./ R 00602000 00603000 $ 602990 990                   02/19/06 15:47:08
       HRC032DK:          SPACE 2                                               HRC032DK 00602000
       HRC032DK: ./ R 00624000 00625000 $ 624590 590                   02/19/06 15:47:08
       HRC032DK: *        CLC   CPID(4),CWARM  SYSTEM RESTARTING ?              HRC032DK 00624000
       HRC032DK: *        BNE   TERMHIO        NO - SKIP ENABLED ADDRESSES      HRC032DK 00625000
       HRC032DK: ./ R 00834000 00835000 $ 834590 590                   02/19/06 15:47:08
       HRC032DK: *        CLC   CPID(4),CWARM  SYSTEM RESTARTING ??             HRC032DK 00834000
       HRC032DK: *        BNE   TERMCLOS       NO -- DO NOT RECORD              HRC032DK 00835000
 BEGIN APPLY >>> ./ R 00602000 00603000 $ 602990 990                   02/19/06 15:47:08
   END APPLY >>> ./ R 00602000 00603000 $ 602990 990                   02/19/06 15:47:08
 BEGIN APPLY >>> ./ R 00624000 00625000 $ 624590 590                   02/19/06 15:47:08
   END APPLY >>> ./ R 00624000 00625000 $ 624590 590                   02/19/06 15:47:08
 BEGIN APPLY >>> ./ R 00834000 00835000 $ 834590 590                   02/19/06 15:47:08
   END APPLY >>> ./ R 00834000 00835000 $ 834590 590                   02/19/06 15:47:08
Update Succeeded
Update Execution Time 31 milliseconds.

HRC106DK

Date Tuesday Feb 16, 2016 04:16:00 PM
Loaded from MAINT(094)
       HRC106DK: ./ I 00799000          $ 00799100 100
       HRC106DK:          MVI   PAGECYL,96     Pages/cyl for 3375               HRC106DK
       HRC106DK:          CLI   TYPE,TYP3375   Sysres a 3375                    HRC106DK
       HRC106DK:          BE    SETSIZE        Yes -                            HRC106DK
       HRC106DK:          MVI   PAGECYL,150    Pages/cyl for 3380               HRC106DK
       HRC106DK:          CLI   TYPE,TYP3380   Sysres a 3380                    HRC106DK
       HRC106DK:          BE    SETSIZE        Yes -                            HRC106DK
       HRC106DK: ./ R 01258400 01258600 $ 01258500 100
       HRC106DK:          MVC   ALLOCBUF+16(L'RECMAP),RECMAP Move RECBLOK map   HRC106DK
       HRC106DK: ./ I 01271000          $ 01271100 50
       HRC106DK:          CLI   RDEVTYPE,TYP3380 3380 device ?                  HRC106DK
       HRC106DK:          BNE   TST3375        No - check for 3375              HRC106DK
       HRC106DK:          LA    R14,2654       Max cylinder for 3380 (K)        HRC106DK
       HRC106DK:          TM    RDEVMDL,RDEVMD83 Triple density 3380?           HRC106DK
       HRC106DK:          BO    CYLCMP         Check max cyl                    HRC106DK
       HRC106DK:          LA    R14,1769       Max cylinder for 3380 (E)        HRC106DK
       HRC106DK:          TM    RDEVMDL,RDEVMD82 Double density 3380?           HRC106DK
       HRC106DK:          BO    CYLCMP         Check max cyl                    HRC106DK
       HRC106DK:          LA    R14,884        Max cylinder for 3380 (A/D/J)    HRC106DK
       HRC106DK:          B     CYLCMP         Check max cyl                    HRC106DK
       HRC106DK: TST3375  LA    R14,958        Max cylinder for 3375            HRC106DK
       HRC106DK:          CLI   RDEVTYPE,TYP3375 3375 device ?                  HRC106DK
       HRC106DK:          BE    CYLCMP         Check max cyl                    HRC106DK
       HRC106DK: ./ I 01546000          $ 01546100 100
       HRC106DK:          CLI   TYPE,TYP3375   3375 ?                           HRC106DK
       HRC106DK:          BE    HD3375         Yes --                           HRC106DK
       HRC106DK:          CLI   TYPE,TYP3380   3380 ?                           HRC106DK
       HRC106DK:          BE    HD3380         Yes --                           HRC106DK
       HRC106DK: ./ I 01555000          $ 01555100 100
       HRC106DK: HD3375   D     R2,=F'8'       Divide by 8 Pages per track      HRC106DK
       HRC106DK:          B     STOREHD        And store head                   HRC106DK
       HRC106DK:          SPACE 1                                               HRC106DK
       HRC106DK: HD3380   D     R2,=F'10'      Divide by 10 Pages per track     HRC106DK
       HRC106DK:          B     STOREHD        And store head                   HRC106DK
       HRC106DK:          SPACE 1                                               HRC106DK
 BEGIN APPLY >>> ./ I 00799000          $ 00799100 100
   END APPLY >>> ./ I 00799000          $ 00799100 100
 BEGIN APPLY >>> ./ R 01258400 01258600 $ 01258500 100
   END APPLY >>> ./ R 01258400 01258600 $ 01258500 100
 BEGIN APPLY >>> ./ I 01271000          $ 01271100 50
   END APPLY >>> ./ I 01271000          $ 01271100 50
 BEGIN APPLY >>> ./ I 01546000          $ 01546100 100
   END APPLY >>> ./ I 01546000          $ 01546100 100
 BEGIN APPLY >>> ./ I 01555000          $ 01555100 100
   END APPLY >>> ./ I 01555000          $ 01555100 100
Update Succeeded
Update Execution Time 39 milliseconds.

HRC075DK

Date Sunday Feb 25, 2018 10:21:00 AM
Loaded from MAINT(094)
       HRC075DK: ./ R 00353000 00353000 $ 00353000 500
       HRC075DK: SAVERD   EQU   *                                               HRC075DK
       HRC075DK:          L     R10,SYSRES          Get addr of the IPL devive  HRC075DK
       HRC075DK: ./ R 00557000 00558000 $ 00557000 1000
       HRC075DK:          L     R1,DMKSYSWM         -> WRM area cyls info       HRC075DK
       HRC075DK:          MVC   TYPE(1),7(R1)       Save device type of WRM     HRC075DK
       HRC075DK: ./ R 01487000 01487000 $ 01487000 500
       HRC075DK:          L     R2,DMKSYSWM         -> WRM area cyls info       HRC075DK
       HRC075DK:          LH    R2,4(,R2)           Get CUU of WRM area volume  HRC075DK
       HRC075DK: ./ R 01495000 01495000 $ 01495000 500
       HRC075DK: IOINT    EQU   *                                               HRC075DK
       HRC075DK:          CH    R2,INTTIO           RIGHT DEVICE ?              HRC075DK
 BEGIN APPLY >>> ./ R 00353000 00353000 $ 00353000 500
   END APPLY >>> ./ R 00353000 00353000 $ 00353000 500
 BEGIN APPLY >>> ./ R 00557000 00558000 $ 00557000 1000
   END APPLY >>> ./ R 00557000 00558000 $ 00557000 1000
 BEGIN APPLY >>> ./ R 01487000 01487000 $ 01487000 500
   END APPLY >>> ./ R 01487000 01487000 $ 01487000 500
 BEGIN APPLY >>> ./ R 01495000 01495000 $ 01495000 500
   END APPLY >>> ./ R 01495000 01495000 $ 01495000 500
Update Succeeded
Update Execution Time 31 milliseconds.

HRC076DK

Date Sunday Feb 25, 2018 10:19:00 AM
Loaded from MAINT(094)
       HRC076DK: ./ I 00265000          $ 00265010 10
       HRC076DK:          TM    CPSTAT4,CPREIPL     Was SHUTDOWN REIPL in prog? HRC076DK
       HRC076DK:          BO    REIPL               Yes                         HRC076DK
       HRC076DK: ./ I 00274000          $ 00274100 30
       HRC076DK: *                                                              HRC076DK
       HRC076DK: REIPL    EQU   *                   Here for SHUTDOWN REIPL     HRC076DK
       HRC076DK:          NI    CPSTAT4,255-CPREIPL Turn off REIPL flag         HRC076DK
       HRC076DK:          MVC   CPID,=C'WARM'       Indicate warm start         HRC076DK
       HRC076DK:          XC    CSW,CSW             Clear prior CSW             HRC076DK
       HRC076DK:          LA    R2,WAIT8            -> shutdown complete PSW    HRC076DK
       HRC076DK:          LA    R1,READIPL          -> IPL CCW string           HRC076DK
       HRC076DK:          ST    R1,CAW              Set its address in the CAW  HRC076DK
       HRC076DK:          LH    R1,SYSIPLDV         Get the IPL device address  HRC076DK
       HRC076DK:          STH   R1,INTTIO           Place as i/o interrupt code HRC076DK
       HRC076DK:          SIO   0(R1)               Issue the read ipl CCW      HRC076DK
       HRC076DK:          BC    4,LOADCK            CSW stored; check status    HRC076DK
       HRC076DK:          BC    7,IPLLOAD           Error on SIO, load wait PSW HRC076DK
       HRC076DK:          TIO   0(R1)               Loop for i/o completion     HRC076DK
       HRC076DK:          BC    7,*-4               Keep trying                 HRC076DK
       HRC076DK: *                                                              HRC076DK
       HRC076DK: LOADCK   EQU   *                                               HRC076DK
       HRC076DK:          CLI   CSW+4,X'0C'         CE+DE from i/o operation?   HRC076DK
       HRC076DK:          BNE   IPLLOAD             No, error. Load WAIT8 PSW   HRC076DK
       HRC076DK:          LA    R2,IPLPSW           Good read; -> IPL PSW       HRC076DK
       HRC076DK: *                                                              HRC076DK
       HRC076DK: IPLLOAD  EQU   *                                               HRC076DK
       HRC076DK:          LPSW  0(R2)               Load WAIT8 PSW or IPL PSW   HRC076DK
       HRC076DK: *                                                              HRC076DK
       HRC076DK: READIPL  CCW   X'02',X'000000',X'60',24 READ IPL               HRC076DK
       HRC076DK:          CCW   X'08',X'000008',0,0      TIC to IPL record CCWs HRC076DK
 BEGIN APPLY >>> ./ I 00265000          $ 00265010 10
   END APPLY >>> ./ I 00265000          $ 00265010 10
 BEGIN APPLY >>> ./ I 00274000          $ 00274100 30
   END APPLY >>> ./ I 00274000          $ 00274100 30
Update Succeeded
Update Execution Time 23 milliseconds.