• Abstract / Synopsis of DMKCPR
• Latest Source of DMKCPR
• Fixes Applied : 2
• Latest Source Date : Friday, August 7, 1981
• Last Fix ID : [HRC002DK]

CMS File Input : DMKCPR ASSEMBLE
Date : 8/7/1981 7:31:00 AM
VM Context : MAINT(394)
File Name : DMKCPR.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM

1. R12314DK 623 UV04462 TWO MACHINES SHUTDOWN TOGETHER - LOST SPOOL FILES.
2. HRC002DK V01 SHUTDOWN POWEROFF SUPPORT - ADD FLAG TO CPSTAT4

Date Friday Aug 07, 1981 07:31:00 AM
Loaded from MAINT(294)

       R12314DK: ./ I 154000 $ 154100 100                                                00001000
       R12314DK:          L     R6,PREFIXA     GET ABSOLUTE PSA                 @VA12314 00002000
       R12314DK:          TM    CPSTAT4-PSA(R6),CPSHUT IS SHUTDOWN IN PROGRESS? @VA12314 00003000
       R12314DK:          BO    EXIT           YES...IT'S TOO LATE FOR 2ND CMD  @VA12314 00004000
       R12314DK:          OI    CPSTAT4-PSA(R6),CPSHUT INDICATE SHUTDOWN IN     @VA12314 00005000
       R12314DK: *                                         PROGRESS                      00006000
       R12314DK: ./ I 345000 $ 345100 100                                                00007000
       R12314DK:          SPACE                                                          00008000
       R12314DK: EXIT     DS    0H                                              @VA12314 00009000
       R12314DK:          EXIT                 RETURN TO CALLER                 @VA12314 00010000
 BEGIN APPLY >>> ./ I 154000 $ 154100 100                                                00001000
   END APPLY >>> ./ I 154000 $ 154100 100                                                00001000
 BEGIN APPLY >>> ./ I 345000 $ 345100 100                                                00007000
   END APPLY >>> ./ I 345000 $ 345100 100                                                00007000
Update Succeeded
Update Execution Time 8 milliseconds.

Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)

       HRC002DK: ./ I 00146000          $ 146300 300                   02/25/06 10:13:15
       HRC002DK:          EXTRN DMKSCNFD      Word Scanner                      HRC002DK 00146300
       HRC002DK:          EXTRN DMKERMSG      ERROR MESSAGE ROUTINE             HRC002DK 00146600
       HRC002DK: ./ I 00154300          $ 154306 6                     02/25/06 10:13:15
       HRC002DK:          CALL  DMKSCNFD                                        HRC002DK 00154309
       HRC002DK:          BNZ   NOSHTPRM                                        HRC002DK 00154318
       HRC002DK:          LR    R2,R0                                           HRC002DK 00154327
       HRC002DK:          BCTR  R2,0                                            HRC002DK 00154336
       HRC002DK:          CL    R2,F3                                           HRC002DK 00154345
       HRC002DK:          BL    ERRMSG3                                         HRC002DK 00154354
       HRC002DK:          EX    R2,CMPREIPL                                     HRC002DK 00154363
       HRC002DK:          BNZ   CHKPOFF                                         HRC002DK
       HRC002DK:          OI    CPSTAT4-PSA(R6),CPREIPL                         HRC002DK 00154381
       HRC002DK:          B     NOSHTPRM                                        HRC002DK
       HRC002DK: CHKPOFF  EQU   *                                               HRC002DK
       HRC002DK:          EX    R2,CMPPOFF                                      HRC002DK 00154363
       HRC002DK:          BNZ   ERRMSG3                                         HRC002DK 00154372
       HRC002DK:          OI    CPSTAT4-PSA(R6),CPPWROFF                        HRC002DK 00154381
       HRC002DK: NOSHTPRM EQU   *                                               HRC002DK 00154390
       HRC002DK: ./ I 00345100          $ 345110 10                    02/25/06 10:13:15
       HRC002DK: ERRMSG3  DS    0H                                              HRC002DK 00345110
       HRC002DK:          LA    R2,3                                            HRC002DK 00345120
       HRC002DK:          B     ERRRET                                          HRC002DK 00345130
       HRC002DK: ERRRET   DS    0H                                              HRC002DK 00345140
       HRC002DK:          ICM   R0,B'1110',DMKCPR+3                             HRC002DK 00345150
       HRC002DK:          ICM   R2,B'1000',F0                                   HRC002DK 00345160
       HRC002DK:          CALL  DMKERMSG                                        HRC002DK 00345170
       HRC002DK: ./ I 00352000          $ 352300 300                   02/25/06 10:13:15
       HRC002DK: CMPPOFF  CLC   0(0,R1),=C'POWEROFF '                           HRC002DK 00352500
       HRC002DK: CMPREIPL CLC   0(0,R1),=C'REIPL    '                           HRC002DK 00352500
 BEGIN APPLY >>> ./ I 00146000          $ 146300 300                   02/25/06 10:13:15
   END APPLY >>> ./ I 00146000          $ 146300 300                   02/25/06 10:13:15
 BEGIN APPLY >>> ./ I 00154300          $ 154306 6                     02/25/06 10:13:15
   END APPLY >>> ./ I 00154300          $ 154306 6                     02/25/06 10:13:15
 BEGIN APPLY >>> ./ I 00345100          $ 345110 10                    02/25/06 10:13:15
   END APPLY >>> ./ I 00345100          $ 345110 10                    02/25/06 10:13:15
 BEGIN APPLY >>> ./ I 00352000          $ 352300 300                   02/25/06 10:13:15
   END APPLY >>> ./ I 00352000          $ 352300 300                   02/25/06 10:13:15
Update Succeeded
Update Execution Time 23 milliseconds.