• Abstract / Synopsis of DMSITE
• Latest Source of DMSITE
• Fixes Applied : 5
• Latest Source Date : Tuesday, December 12, 1978
• Last Fix ID : [R13219DS]

CMS File Input : DMSITE ASSEMBLE
Date : 12/12/1978 8:28:00 AM
VM Context : MAINT(393)
File Name : DMSITE.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:31 AM
Created : 1/16/2021 7:31:31 AM

1. R09133DS 602 STIMER ISSUED IN TIMER EXIT IGNORED BY DMSITE
2. R09485DS 609 WAIT NOT RELEASED AFTER POSTING ECB
3. R10987DS 615 UV01630 CMSBATCH IGNORES VMCF EXTERNAL INTERRUPTS
4. R12917DS 620 UV03978 STOP DMSITE FROM USING GETMAIN AND FREEMAIN
5. R13219DS 621 UV04332 DMSITE BLIP FAILS FOR STIMER WITHIN STIMER

Date Friday Apr 20, 1979 04:19:00 AM
Loaded from MAINT(193)

       R09133DS: ./ R 113200 $ 113200
       R09133DS:          MVC   GRS(64),EXSAVE      SAVE GP REGS                @VA09133
       R09133DS: ./ R 121750 $ 121750
       R09133DS:          MVC   EXSAVE(64),GRS      RESTORE GP REGS             @VA09133
       R09133DS: ./ I 124000 $ 124010 10
       R09133DS:          TM    TIMER,HIORBYT      TIMER GREATER THAN ZERO      @VA09133
       R09133DS:          BZ    LM015              YES, DO NOT SET TIMER        @VA09133
 BEGIN APPLY >>> ./ R 113200 $ 113200
   END APPLY >>> ./ R 113200 $ 113200
 BEGIN APPLY >>> ./ R 121750 $ 121750
   END APPLY >>> ./ R 121750 $ 121750
 BEGIN APPLY >>> ./ I 124000 $ 124010 10
   END APPLY >>> ./ I 124000 $ 124010 10
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Jan 22, 1980 01:21:00 AM
Loaded from MAINT(193)

       R09485DS: ./ I 118000 $ 118100 100
       R09485DS:          SR    R13,R13        PREPARE TEST FOR STIMER...       @VA09485
       R09485DS:          L     R13,STIMEXIT   WITHIN STIMER                    @VA09485
       R09485DS:          LTR   R13,R13        IS THERE ONE?                    @VA09485
       R09485DS:          BNP   ST10           NO - SO CONTINUE                 @VA09485
       R09485DS:          MVC   TIMINIT,TIMER  BETTER PREPARE IN CASE OF WAIT   @VA09485
       R09485DS: ST10     EQU   *                                               @VA09485
       R09485DS: ./ D 124010 124020
       R09485DS: ./ I 125000 $ 125100 100
       R09485DS:          TM    TIMER,X'80'         TIMER GREATER THAN ZERO?    @VA09485
       R09485DS:          BZ    LM010               YES, DO NOT SET TIMER       @VA09485
       R09485DS: ./ I 126000 $ 126100 100
       R09485DS: LM010    EQU   *                                               @VA09485
       R09485DS: ./ R 137000 $ 137000
       R09485DS:          BNZ   LM015               NO - GET OUT CLEAN          @VA09485
 BEGIN APPLY >>> ./ I 118000 $ 118100 100
   END APPLY >>> ./ I 118000 $ 118100 100
 BEGIN APPLY >>> ./ D 124010 124020
   END APPLY >>> ./ D 124010 124020
 BEGIN APPLY >>> ./ I 125000 $ 125100 100
   END APPLY >>> ./ I 125000 $ 125100 100
 BEGIN APPLY >>> ./ I 126000 $ 126100 100
   END APPLY >>> ./ I 126000 $ 126100 100
 BEGIN APPLY >>> ./ R 137000 $ 137000
   END APPLY >>> ./ R 137000 $ 137000
Update Succeeded
Update Execution Time 16 milliseconds.

Date Thursday Jul 31, 1980 07:09:00 AM
Loaded from MAINT(193)

       R10987DS: ./ D 190000 191000 $
       R10987DS: ./ I 196000 $ 196050 50
       R10987DS:          TM    BATFLAGS,BATRUN        IS  BATCH RUNNING?       @VA10987
       R10987DS:          BNO   EXINTCK                NO, BRANCH               @VA10987
       R10987DS:          CLC   EXTOPSW+2(2),=X'4001'  VMCF EXTERNAL INTERRUPT? @VA10987
       R10987DS:          BNE   NOTWAIT                IF NOT BATCH IGNORES IT  @VA10987
       R10987DS:          CLM   R15,14,EXTPSW+5        EXTERNAL INT HANDLING?   @VA10987
       R10987DS:          BE    NOTWAIT                NOT ALLOWED, RETURN      @VA10987
       R10987DS: EXINTCK  EQU   *                                               @VA10987
 BEGIN APPLY >>> ./ D 190000 191000 $
   END APPLY >>> ./ D 190000 191000 $
 BEGIN APPLY >>> ./ I 196000 $ 196050 50
   END APPLY >>> ./ I 196000 $ 196050 50
Update Succeeded
Update Execution Time 16 milliseconds.

Date Friday Apr 10, 1981 04:10:00 AM
Loaded from MAINT(193)

       R12917DS: ./ R 00111500          $ 111500 500                   03/05/81 22:12:23
       R12917DS:          DMSFREE DWORDS=23,TYPCALL=BALR   GET USER AREA        @VA12917
       R12917DS: ./ R 00122500          $ 122500 100                   03/05/81 22:12:23
       R12917DS:          DMSFRET DWORDS=23,LOC=(1),TYPCALL=BALR                @VA12917
 BEGIN APPLY >>> ./ R 00111500          $ 111500 500                   03/05/81 22:12:23
   END APPLY >>> ./ R 00111500          $ 111500 500                   03/05/81 22:12:23
 BEGIN APPLY >>> ./ R 00122500          $ 122500 100                   03/05/81 22:12:23
   END APPLY >>> ./ R 00122500          $ 122500 100                   03/05/81 22:12:23
Update Succeeded
Update Execution Time 16 milliseconds.

Date Wednesday Jun 10, 1981 05:06:00 AM
Loaded from MAINT(193)

       R13219DS: ./ D 00133650 00137000                                04/08/81 21:48:42
       R13219DS: ./ I 00178000          $ 178200 200                   04/08/81 21:48:42
       R13219DS:          L     R7,STIMEXIT           GET STIMER ADDR           @VA13219 00133650
       R13219DS:          LA    R7,0(R7)                                        @VA13219 00135000
       R13219DS:          LTR   R7,R7          IS THERE ONE?                    @VA13219 00136000
       R13219DS:          BNZ   LM015              YES - GET OUT CLEAN          @VA13219 00137000
 BEGIN APPLY >>> ./ D 00133650 00137000                                04/08/81 21:48:42
   END APPLY >>> ./ D 00133650 00137000                                04/08/81 21:48:42
 BEGIN APPLY >>> ./ I 00178000          $ 178200 200                   04/08/81 21:48:42
   END APPLY >>> ./ I 00178000          $ 178200 200                   04/08/81 21:48:42
Update Succeeded
Update Execution Time 8 milliseconds.