• Abstract / Synopsis of DMKRPA
• Latest Source of DMKRPA
• Fixes Applied : 3
• Latest Source Date : Thursday, December 7, 1978
• Last Fix ID : [R13364DK]

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

1. R08925DK 610 DIAGNOSE14,SUBCODE0,CC3,ERROR CODE14,PAGE LOCKED,V=R USER
2. R12172DK 619 UV03694 MSDMKCFG174E USER LOCKS IPL PAGE BEFORE IPL COMMAND
3. R13364DK 625 UV05742 ENSURE DMKSYM IS WRITTEN TO THE BACKING DEVICE

Date Friday Mar 14, 1980 03:14:00 AM
Loaded from MAINT(294)

       R08925DK: ./ I 276150 $ 276200 50                                                 00001000
       R08925DK: *        CONDITION CODE 1 WILL BE RETURNED TO:                          00002000
       R08925DK: *              DMKHVD FOR DIAGNOSE 30                                   00003000
       R08925DK: *              AND TO DMKDRD FOR DIAGNOSE 14,34,AND 38                  00004000
       R08925DK: *        IF THE PAGE IS LOCKED FOR I/O.                                 00005000
       R08925DK: ./ I 284150 $ 284155 20                                                 00006000
       R08925DK:          C     R11,AVMREAL    IS IT THE V=R USER ??            @VA08925 00007000
       R08925DK:          BE    CKRECMP        YES, CONTINUE THE OLD WAY        @VA08925 00008000
       R08925DK: ./ D 284450 284650 $                                                    00009000
 BEGIN APPLY >>> ./ I 276150 $ 276200 50                                                 00001000
   END APPLY >>> ./ I 276150 $ 276200 50                                                 00001000
 BEGIN APPLY >>> ./ I 284150 $ 284155 20                                                 00006000
   END APPLY >>> ./ I 284150 $ 284155 20                                                 00006000
 BEGIN APPLY >>> ./ D 284450 284650 $                                                    00009000
   END APPLY >>> ./ D 284450 284650 $                                                    00009000
Update Succeeded
Update Execution Time 8 milliseconds.

Date Thursday Feb 12, 1981 02:12:00 AM
Loaded from MAINT(294)

       R12172DK: ./ I 284350 $ 284375 25                                                 00001000
       R12172DK:          CLI   VMINST+3,DIAG38 DIAGNOSE X'38' ?                @VA12172 00002000
       R12172DK:          BE    CKRSTAT        YES,NOW CHECK STATUS             @VA12172 00003000
       R12172DK:          CLI   VMINST+3,DIAG30 DIAGNOSE X'30' ?                @VA12172 00004000
       R12172DK:          BE    CKRSTAT        YES,NOW CHECK STATUS             @VA12172 00005000
       R12172DK:          CLI   VMINST+3,DIAG34 DIAGNOSE X'34' ?                @VA12172 00006000
       R12172DK:          BE    CKRSTAT        YES,NOW CHECK STATUS             @VA12172 00007000
       R12172DK:          CLI   VMINST+3,DIAG14 DIAGNOSE X'14' ?                @VA12172 00008000
       R12172DK:          BNE   CKRECMP        NOT DIAGNOSE X'14'               @VA12172 00009000
       R12172DK: *                             NEITHER,CONTINUE CHECKING                 00010000
       R12172DK:          TM    CORFLAG,CORCFLCK LOCKED BY CONSOLE ?            @VA12172 00011000
       R12172DK:          BZ    CKRSTAT        YES,NOW CHECK STATUS             @VA12172 00012000
       R12172DK:          CLC   CORLCNT,F1     IS CORE LOCK COUNT EXACTLY ONE ? @VA12172 00013000
       R12172DK:          BE    CKRECMP        YES,CONTINUE LOCKED BY CONSOLE   @VA12172 00014000
       R12172DK: CKRSTAT  DS    0H                                              @VA12172 00015000
       R12172DK: ./ I 307000 $ 307050 100                                                00016000
       R12172DK:          SPACE                                                          00017000
       R12172DK: DIAG14   EQU   X'14'          DIAGNOSE FOR DMKDRD              @VA12172 00018000
       R12172DK: DIAG30   EQU   X'30'          DIAGNOSE FOR DMKHVD              @VA12172 00019000
       R12172DK: DIAG34   EQU   X'34'          DIAGNOSE FOR DMKDRD              @VA12172 00020000
       R12172DK: DIAG38   EQU   X'38'          DIAGNOSE FOR DMKDRD              @VA12172 00021000
 BEGIN APPLY >>> ./ I 284350 $ 284375 25                                                 00001000
   END APPLY >>> ./ I 284350 $ 284375 25                                                 00001000
 BEGIN APPLY >>> ./ I 307000 $ 307050 100                                                00016000
   END APPLY >>> ./ I 307000 $ 307050 100                                                00016000
Update Succeeded
Update Execution Time 8 milliseconds.

Date Monday Nov 23, 1981 08:13:00 AM
Loaded from MAINT(294)

       R13364DK: ./ I 00116500          $ 116700 200                   07/01/81 13:47:05
       R13364DK:          EXTRN DMKSYM                                          @VA13364 00116500
       R13364DK: ./ R 00300800 00301000 $ 300800 100                   07/01/81 13:47:05
       R13364DK:          BZ    RECMPOFF       GOT DMKVMI GO TURN OFF RECMP     @VA04806 00300800
       R13364DK:          L     R15,=A(DMKSYM) GET ADDR OF SYMBOL TABLE         @VA13364 00300600
       R13364DK:          CR    R15,R1         FOR DMKSYM - R1 HAS VIR ADDRESS  @VA13364 00300700
       R13364DK:          BZ    RECMPOFF       GOT DMKSYM GO TURN OFF RECMP     @VA04806 00300800
       R13364DK:          BR    R3             NOT SYM OR VMI, RETURN TO CALLER @VA13364
       R13364DK: RECMPOFF DS    0H                                              @VA13364
       R13364DK:          NI    SWPFLAG,X'FF'-SWPRECMP                          @V4M0167 00300910
       R13364DK:          BR    R3             AND RETURN TO CALLER                      00301000
 BEGIN APPLY >>> ./ I 00116500          $ 116700 200                   07/01/81 13:47:05
   END APPLY >>> ./ I 00116500          $ 116700 200                   07/01/81 13:47:05
 BEGIN APPLY >>> ./ R 00300800 00301000 $ 300800 100                   07/01/81 13:47:05
   END APPLY >>> ./ R 00300800 00301000 $ 300800 100                   07/01/81 13:47:05
Update Succeeded
Update Execution Time 16 milliseconds.