• Abstract / Synopsis of DMSLBT
• Latest Source of DMSLBT
• Fixes Applied : 6
• Latest Source Date : Tuesday, December 12, 1978
• Last Fix ID : [R13116DS]

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

1. R08982DS 601 MSDMSZAP104S ERROR 12 READING TXTLIB EREPLIB
2. R11614DS 614 UV01748 TXTLIB, ADD OR DELETE, GIVES INCORRECT MESSAGE
3. R11805DS 616 UV01966 MAP FOR LARGE NON-EDF LIBRARY DISPLAYS INCORRECT LOCATIONS
4. R12799DS 619 UV03902 USE OF RENAM INSTEAD OF RENAME CAUSES R(00253);.
5. R12858DS 620 UV04130 TXTLIB DEL INCORROUT IF ADDRESS MORE THAN 32767.
6. R13116DS 620 UV04042 ERROR MSG DOESN'T INDICATE ACTION THAT OCCURRED.

Date Tuesday Dec 19, 1978 12:11:00 PM
Loaded from MAINT(193)

       R08982DS: ./ R 944000 $ 943500 500
       R08982DS:          SR    R2,R2          CLEAR REG FOR H/W INSERTION      @VA08982
       R08982DS:          ICM   R2,M3,HITEM    GET FIRST DICT RECORD            @VA08982
       R08982DS:          SR    R5,R2          NUM OF ITEMS WRITTEN             @VA08982
       R08982DS: ./ R 1008000 $ 1007600 600
       R08982DS:          SR    R5,R5          CLEAR REG FOR H/W INSERTION      @VA08982
       R08982DS:          ICM   R5,M3,HITEM    GET FIRST DICT RECORD            @VA08982
       R08982DS: ./ I 1877000 $ 1877500
       R08982DS: M3       EQU   3              MASK FOR ICM                     @VA08982
 BEGIN APPLY >>> ./ R 944000 $ 943500 500
   END APPLY >>> ./ R 944000 $ 943500 500
 BEGIN APPLY >>> ./ R 1008000 $ 1007600 600
   END APPLY >>> ./ R 1008000 $ 1007600 600
 BEGIN APPLY >>> ./ I 1877000 $ 1877500
   END APPLY >>> ./ I 1877000 $ 1877500
Update Succeeded
Update Execution Time 23 milliseconds.

Date Friday Jun 27, 1980 06:20:00 AM
Loaded from MAINT(193)

       R11614DS: ./ R 984000  $ 984000
       R11614DS:          BO    RODISK              YES, INDICATE R/O MSG37     @VA11614
 BEGIN APPLY >>> ./ R 984000  $ 984000
   END APPLY >>> ./ R 984000  $ 984000
Update Succeeded
Update Execution Time 23 milliseconds.

Date Friday Sep 19, 1980 08:20:00 AM
Loaded from MAINT(193)

       R11805DS: ./ R 1443000 $ 1442400 400
       R11805DS:          SR    R5,R5          SET REG TO ZERO                  @VA11805
       R11805DS:          ICM   R5,3,ODICADDR  CONVERT ITEM TO DECIMAL          @VA11805
 BEGIN APPLY >>> ./ R 1443000 $ 1442400 400
   END APPLY >>> ./ R 1443000 $ 1442400 400
Update Succeeded
Update Execution Time 16 milliseconds.

Date Tuesday Mar 10, 1981 03:10:00 AM
Loaded from MAINT(193)

       R12799DS: ./ R 1212000 $ 1212000 500
       R12799DS:          MVC   WRLIB,ALTERSET           RENAME THE FILE        @VA12799
 BEGIN APPLY >>> ./ R 1212000 $ 1212000 500
   END APPLY >>> ./ R 1212000 $ 1212000 500
Update Succeeded
Update Execution Time 16 milliseconds.

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

       R12858DS: ./ R 01098000 $ 01098000 100
       R12858DS:          LH    R9,ODICADDR    CHECK PREVIOUS VS THIS OFFSET    @VA12858
       R12858DS:          NR    R9,R6            (CLEAR PROPAGATION)            @VA12858
       R12858DS:          CR    R7,R9            (CHECK)                        @VA12858
 BEGIN APPLY >>> ./ R 01098000 $ 01098000 100
   END APPLY >>> ./ R 01098000 $ 01098000 100
Update Succeeded
Update Execution Time 23 milliseconds.

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

       R13116DS: ./ R 00284000          $ 00284000 250
       R13116DS: *       ORIGINAL FILE. IF THE NEW FILE (TXTLIB CMSUT1) IS A    @VA13116
       R13116DS: *       NULL FILE AS A RESULT OF THE LAST MEMBER HAVING BEEN   @VA13116
       R13116DS: *       DELETED THEN IT WILL BE ERASED AND A WARNING MESSAGE   @VA13116
       R13116DS: *       WILL BE ISSUED TO THE USER.                            @VA13116
       R13116DS: ./ R 01851000          $ 01851000 1000
       R13116DS:          DC    C' TXTLIB'' NOT CREATED, OR ERASED IF EMPTY.'   @VA13116
 BEGIN APPLY >>> ./ R 00284000          $ 00284000 250
   END APPLY >>> ./ R 00284000          $ 00284000 250
 BEGIN APPLY >>> ./ R 01851000          $ 01851000 1000
   END APPLY >>> ./ R 01851000          $ 01851000 1000
Update Succeeded
Update Execution Time 23 milliseconds.