Table of Contents

DMKMNI History

References

Update History

CMS File Input : DMKMNI ASSEMBLE
Date : 12/9/1978 4:56:00 AM
VM Context : MAINT(394)
File Name : DMKMNI.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:47 AM
Created : 1/16/2021 7:31:47 AM

Update Order

  1. R08888DK 601 AVAILABLE PAGE COUNT INCORRECT AFTER MONITOR START STOP
  2. R09957DK - CORRECT IOBLOK CONFLICT IN MSS SUPPORT
  3. R09588DK 611 ABENDPRG001 DMKMNI MON TO SPOOL DASTAP MAX DEV INVALID
  4. R09843DK 611 FIX FOR MON BUFFER PROB
  5. R09647DK 611 FIELD DMKPRGMI ZEROED OUT MONITOR CALL RESULTS IN BRANCH
  6. R10215DK 611 UV00432 DMKMON CAUSES UNDOCUMENTED ABEND DUE TO BAD BRANCH ON REG6
  7. R11128DK 611 UV00596 ABENDPRG001 AFTER MONITOR CALL
  8. R12005DK 618 UV02969 AFTER MONITOR CLOSE DEVICE LIST FOR DASTAP RECORDS
  9. R12214DK 618 UV03393 INSURE MAIN PROCESSOR IN MN097 HEADR REC
  10. R13063DK 620 UV04056 ABENDPRG005 WITH VM12005 INSTALLED WHEN MAX NBR DEV ON
  11. R12941DK 622 UV04884 SYNC ERROR RECOV FOR INTERVENTION REQUIRED COND.

R08888DK

Date Monday Feb 26, 1979 04:22:00 PM
Loaded from MAINT(294)
       R08888DK: ./ R 746000 $ 746500                                                    00001000
       R08888DK:          DROP  R7,R10                                          @VA08888 00002000
       R08888DK: ./ I 767000 $ 767100 50                                                 00003000
       R08888DK:          TM    MONEX,CLCMD    SHUTDOWN OR MONITOR STOP?        @VA08888 00004000
       R08888DK:          BO    GOTODSP        YES, LEAVE PAGE COUNT ALONE      @VA08888 00005000
       R08888DK:          TM    MONFLAG3,SPOOLED ARE WE SPOOLED?                @VA08888 00006000
       R08888DK:          BNO   GOTODSP        I SAID LEAVE IT ALONE            @VA08888 00007000
       R08888DK:          N     R2,XPAGNUM     GET PAGE NUMBER                  @VA08888 00008000
       R08888DK:          SRL   R2,8           DIVIDED BY 256                   @VA08888 00009000
       R08888DK:          A     R2,ACORETBL    POINT TO CORETABLE ENTRY         @VA08888 00010000
       R08888DK:          USING CORTABLE,R2                                     @VA08888 00011000
       R08888DK:          L     R0,CORLCNT     IF LOCKCOUNT NONZERO LEAVE AND.. @VA08888 00012000
       R08888DK:          LTR   R0,R0          DONT INCREMENT AVAILABLE..       @VA08888 00013000
       R08888DK:          BP    GOTODSP        PAGE COUNT THIS TIME             @VA08888 00014000
       R08888DK:          L     R14,=A(DMKDSPNP) GET AVAILABLE PAGE COUNT       @VA08888 00015000
       R08888DK:          L     R15,0(R14)     LOAD IT IN                       @VA08888 00016000
       R08888DK:          LA    R15,1(R15)     BUMP IT UP                       @VA08888 00017000
       R08888DK:          ST    R15,0(R14)     AND STORE IT                     @VA08888 00018000
       R08888DK:          DROP  R2,R9                                           @VA08888 00019000
 BEGIN APPLY >>> ./ R 746000 $ 746500                                                    00001000
   END APPLY >>> ./ R 746000 $ 746500                                                    00001000
 BEGIN APPLY >>> ./ I 767000 $ 767100 50                                                 00003000
   END APPLY >>> ./ I 767000 $ 767100 50                                                 00003000
Update Succeeded
Update Execution Time 16 milliseconds.

R09957DK

Date Thursday Jul 12, 1979 09:52: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 16 milliseconds.

R09588DK

Date Saturday Mar 29, 1980 05:07:00 AM
Loaded from MAINT(294)
       R09588DK: ./   I  373000  $  373100  100                                          00001000
       R09588DK:          TM    MONFLAG3,SPOOLED ARE WE SPOOLING                @VA09588 00002000
       R09588DK:          BZ    NOTSPOOL       NO, USING MAX 291 DEVICES        @VA09588 00003000
       R09588DK:          LA    R1,MN600MXS    GET SPOOLED MAX DEVICES 289      @VA09588 00004000
       R09588DK: NOTSPOOL EQU   *                                               @VA09588 00005000
 BEGIN APPLY >>> ./   I  373000  $  373100  100                                          00001000
   END APPLY >>> ./   I  373000  $  373100  100                                          00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R09843DK

Date Saturday Mar 29, 1980 03:29:00 AM
Loaded from MAINT(294)
       R09843DK: ./ * FORCE REASSEMBLY FOR APAR VM09843
 BEGIN APPLY >>> ./ * FORCE REASSEMBLY FOR APAR VM09843
     Comment >>> ./ * FORCE REASSEMBLY FOR APAR VM09843
   END APPLY >>> ./ * FORCE REASSEMBLY FOR APAR VM09843
Update Succeeded
Update Execution Time 8 milliseconds.

R09647DK

Date Saturday Mar 29, 1980 11:13:00 AM
Loaded from MAINT(294)
       R09647DK: ./ R 752000 $ 752000 100                                                00001000
       R09647DK:          STCTL C8,C8,0(R1)    STORE CR8                        @VA09647 00002000
       R09647DK:          CLC   0(4,R1),ZEROES IS CR8 ZERO?                     @VA09647 00003000
       R09647DK:          BE    FINCLEAN       YES - CONTINUE                   @VA09647 00004000
       R09647DK:          LCTL  C8,C8,ZEROES   ZERO CR8                         @VA09647 00005000
       R09647DK:          ST    R3,0(,R1)      NO MORE                          @VA09647 00006000
       R09647DK:          LA    R0,NOENABLN    SET MSG LENGTH                   @VA09647 00007000
       R09647DK:          LA    R1,NOENAB      POINT TO MSG                     @VA09647 00008000
       R09647DK:          CALL  DMKQCNWT,PARM=NORET                             @VA09647 00009000
       R09647DK: FINCLEAN EQU   *                                               @VA09647 00010000
       R09647DK: ./ I 1222000 $ 1222300 300                                              00011000
       R09647DK: NOENAB   DC    C'CANNOT ENABLE - MONITOR IN SHUTDOWN - REENTER ENABLE'  00012000
       R09647DK: NOENABLN EQU   *-NOENAB                                        @VA09647 00013000
 BEGIN APPLY >>> ./ R 752000 $ 752000 100                                                00001000
   END APPLY >>> ./ R 752000 $ 752000 100                                                00001000
 BEGIN APPLY >>> ./ I 1222000 $ 1222300 300                                              00011000
   END APPLY >>> ./ I 1222000 $ 1222300 300                                              00011000
Update Succeeded
Update Execution Time 16 milliseconds.

R10215DK

Date Thursday Apr 03, 1980 02:20:00 AM
Loaded from MAINT(294)
       R10215DK: ./ I 227000 $ 227300 300                                                00001000
       R10215DK:          LTR   R1,R1          TEST BUFFER SPACE                @VA10215 00002000
       R10215DK:          BZ    NOMORE         NO SPACE-LEAVE                   @VA10215 00003000
       R10215DK: ./ I 396000 $ 396300 300                                                00004000
       R10215DK:          LTR   R1,R1                                           @VA10215 00005000
       R10215DK:          BZ    TSTPERF                                         @VA10215 00006000
       R10215DK: ./ I 553000 $ 553300 300                                                00007000
       R10215DK:          LTR   R1,R1                                           @VA10215 00008000
       R10215DK:          BZR   R7                                              @VA10215 00009000
 BEGIN APPLY >>> ./ I 227000 $ 227300 300                                                00001000
   END APPLY >>> ./ I 227000 $ 227300 300                                                00001000
 BEGIN APPLY >>> ./ I 396000 $ 396300 300                                                00004000
   END APPLY >>> ./ I 396000 $ 396300 300                                                00004000
 BEGIN APPLY >>> ./ I 553000 $ 553300 300                                                00007000
   END APPLY >>> ./ I 553000 $ 553300 300                                                00007000
Update Succeeded
Update Execution Time 16 milliseconds.

R11128DK

Date Monday Apr 07, 1980 03:26:00 AM
Loaded from MAINT(294)
       R11128DK: ./ I 750000 $ 750200 200                                                00001000
       R11128DK:          ST    R3,CPCREG8     ZERO PSA VALUE                   @VA11128 00002000
       R11128DK:          L     R2,PREFIXB     GET OTHER PSA                    @VA11128 00003000
       R11128DK:          ST    R3,CPCREG8(R2) ZERO IT AS WELL                  @VA11128 00004000
 BEGIN APPLY >>> ./ I 750000 $ 750200 200                                                00001000
   END APPLY >>> ./ I 750000 $ 750200 200                                                00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R12005DK

Date Monday Dec 08, 1980 12:01:00 PM
Loaded from MAINT(294)
       R12005DK: ./ R 396600 $                                                           00001000
       R12005DK:          BZ    SECPASS        NO BUFF--REBUILD DEV TABLE       @VA12005 00002000
 BEGIN APPLY >>> ./ R 396600 $                                                           00001000
   END APPLY >>> ./ R 396600 $                                                           00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R12214DK

Date Tuesday Jan 13, 1981 01:13:00 AM
Loaded from MAINT(294)
       R12214DK: ./ I 231000 $ 231100 100                                                00001000
       R12214DK:          SWITCH                                                @VA12214 00007000
 BEGIN APPLY >>> ./ I 231000 $ 231100 100                                                00001000
   END APPLY >>> ./ I 231000 $ 231100 100                                                00001000
Update Succeeded
Update Execution Time 16 milliseconds.

R13063DK

Date Tuesday Apr 07, 1981 03:30:00 AM
Loaded from MAINT(294)
       R13063DK: ./ I 353000 $ 353400 400                                                00001000
       R13063DK:          LTR   R15,R15        DO WE HAVE A BUFFER?             @VA13063 00002000
       R13063DK:          BZ    GOLOOP         NO-DON'T TRY TO LOAD IT          @VA13063 00003000
       R13063DK: ./ R 362000 $ 362000                                                    00004000
       R13063DK: GOLOOP   BCT   R0,EXAMDVI     BEWARE OF MAX NO. OF DEVICES     @VA13063 00005000
       R13063DK: ./ R 396300 398000 $ 396300 300                                         00006000
       R13063DK:          LR    R15,R1         GIVE R15 THE CURRENT POINTER     @VA13063 00007000
       R13063DK:          LH    R0,MONDVNUM    GET THE NUMBER OF DEVICES        @VA13063 00008000
       R13063DK:          LTR   R1,R1          DO WE HAVE A BUFFER?             @VA13063 00009000
       R13063DK:          BZ    SECPASS        NO - GO WITHOUT IT               @VA13063 00010000
       R13063DK:          USING MN600HDR,R1                                     @VA13063 00011000
 BEGIN APPLY >>> ./ I 353000 $ 353400 400                                                00001000
   END APPLY >>> ./ I 353000 $ 353400 400                                                00001000
 BEGIN APPLY >>> ./ R 362000 $ 362000                                                    00004000
   END APPLY >>> ./ R 362000 $ 362000                                                    00004000
 BEGIN APPLY >>> ./ R 396300 398000 $ 396300 300                                         00006000
   END APPLY >>> ./ R 396300 398000 $ 396300 300                                         00006000
Update Succeeded
Update Execution Time 16 milliseconds.

R12941DK

Date Tuesday Jul 07, 1981 01:34:00 PM
Loaded from MAINT(294)
       R12941DK: ./ *
 BEGIN APPLY >>> ./ *
     Comment >>> ./ *
   END APPLY >>> ./ *
Update Succeeded
Update Execution Time 16 milliseconds.