User Tools

Site Tools


ibm:vm370-lib:cms:dmsrdc.assemble_hst

DMSRDC History

References

Update History

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

Update Order

  1. R09236DS 602 DMSRDC WILL GIVE MSDMSRDC069E FOR DISK NOT ACCESSED
  2. R14498DS 625 UV05666 DMSRDC READCARD ONTO A READ/ONLY DISK

R09236DS

Date Tuesday Apr 03, 1979 03:30:00 AM
Loaded from MAINT(193)
       R09236DS: ./ I 246100 $ 246300 200
       R09236DS:          C     R15,=F'36'          WAS DISK NOT ACCESSED?      @VA09236
       R09236DS:          BE    DEVERR              GIVE MSG                    @VA09236
       R09236DS: ./ I 458000 $ 458150 150
       R09236DS: DEVERR   LA    R3,FILEMODE         POINT TO MODE LETTER        @VA09236
       R09236DS:          DMSERR TEXT='DISK ''..'' NOT ACCESSED',NUM=69,                X
       R09236DS:                LET=E,SUB=(CHARA,((R3),1)),TYPCALL=SVC          @VA09236
       R09236DS:          L     R15,=F'36'          GIVE RETCODE                @VA09236
       R09236DS:          B     RETURN1                                         @VA09236
 BEGIN APPLY >>> ./ I 246100 $ 246300 200
   END APPLY >>> ./ I 246100 $ 246300 200
 BEGIN APPLY >>> ./ I 458000 $ 458150 150
   END APPLY >>> ./ I 458000 $ 458150 150
Update Succeeded
Update Execution Time 16 milliseconds.

R14498DS

Date Friday Nov 06, 1981 09:13:00 AM
Loaded from MAINT(193)
       R14498DS: ./ I 00027000          $ 27500 500                    10/23/81 15:01:36
       R14498DS: *                                                              @VA14498
       R14498DS: ./ I 00030400          $ 30420 20                     10/23/81 15:01:36
       R14498DS: *        36 - DEVICE INVALID, NONEXISTENT OR UNSUPPORTED       @VA14498 00030420
       R14498DS: *             DISK NOT ACCESSED                                @VA14498 00030440
       R14498DS: *             DISK IS READ/ONLY                                @VA14498 00030460
       R14498DS: ./ I 00030600          $ 34600 4000                   10/23/81 15:01:36
       R14498DS: *                                                              @VA14498
       R14498DS: ./ R 00041100 00042000 $ 41100 600                    10/23/81 15:01:36
       R14498DS: *        DMSBRD,DMSFNS,DMSERS,DMSSTT,DMSCWR,DMSCIO,DMSCPF,     @VA14498 00041100
       R14498DS: *        DMSLAD                                                @VA14498 00041700
       R14498DS: *                                                              @VA14498 00042300
       R14498DS: ./ R 00057000          $ 57000 1000                   10/23/81 15:01:36
       R14498DS: * OPERATION:                                                   @VA14498 00057000
       R14498DS: ./ R 00067000 00068000 $ 67000 1000                   10/23/81 15:01:36
       R14498DS: *        FILENAME FIELD, READCARD WILL TAKE THE FILENAME,      @VA14498 00067000
       R14498DS: *        FILETYPE AND FILEMODE FROM THE READ CONTROL CARD AND  @VA14498 00068000
       R14498DS: ./ R 00084000          $ 84000 1000                   10/23/81 15:01:36
       R14498DS: *        IDENTIFICATION HAS BEEN ESTABLISHED, READCARD WILL    @VA14498 00084000
       R14498DS: ./ D 00254000 00256000                                10/23/81 15:01:36
       R14498DS: ./ I 00260100          $ 261000 900                   10/23/81 15:01:36
       R14498DS:          B     SKRWCK         SKIP R/W CHECK                   @VA14498 00261000
       R14498DS: ./ I 00262000          $ 262100 100                   10/23/81 15:01:36
       R14498DS:          LA    R1,FILE        CALL ADTLKW                      @VA14498 00262100
       R14498DS:          L     R15,VCADTLKW   TO CHECK IF R/W DISK             @VA14498 00262200
       R14498DS:          BALR  R14,R15             IF NOT ...                  @VA14498 00262300
       R14498DS:          BC    2,DEVERR2           GIVE ERROR MSG              @VA14498 00262400
       R14498DS: *                                                              @VA14498 00262500
       R14498DS: SKRWCK   EQU   *                                               @VA14498 00262600
       R14498DS: ./ I 00459000          $ 459100 100                   10/23/81 15:01:36
       R14498DS: DEVERR2  LA    R3,FILEMODE         POINT TO MODE LETTER        @VA14498 00459100
       R14498DS:          DMSERR TEXT='DISK ''..'' IS READ/ONLY',NUM=37,                X00459200
       R14498DS:                LET=E,SUB=(CHARA,((R3),1)),TYPCALL=SVC          @VA14498 00459300
       R14498DS:          L     R15,=F'36'          GIVE RETCODE                @VA14498 00459400
       R14498DS:          B     RETURN1                                         @VA14498 00459500
 BEGIN APPLY >>> ./ I 00027000          $ 27500 500                    10/23/81 15:01:36
   END APPLY >>> ./ I 00027000          $ 27500 500                    10/23/81 15:01:36
 BEGIN APPLY >>> ./ I 00030400          $ 30420 20                     10/23/81 15:01:36
   END APPLY >>> ./ I 00030400          $ 30420 20                     10/23/81 15:01:36
 BEGIN APPLY >>> ./ I 00030600          $ 34600 4000                   10/23/81 15:01:36
   END APPLY >>> ./ I 00030600          $ 34600 4000                   10/23/81 15:01:36
 BEGIN APPLY >>> ./ R 00041100 00042000 $ 41100 600                    10/23/81 15:01:36
   END APPLY >>> ./ R 00041100 00042000 $ 41100 600                    10/23/81 15:01:36
 BEGIN APPLY >>> ./ R 00057000          $ 57000 1000                   10/23/81 15:01:36
   END APPLY >>> ./ R 00057000          $ 57000 1000                   10/23/81 15:01:36
 BEGIN APPLY >>> ./ R 00067000 00068000 $ 67000 1000                   10/23/81 15:01:36
   END APPLY >>> ./ R 00067000 00068000 $ 67000 1000                   10/23/81 15:01:36
 BEGIN APPLY >>> ./ R 00084000          $ 84000 1000                   10/23/81 15:01:36
   END APPLY >>> ./ R 00084000          $ 84000 1000                   10/23/81 15:01:36
 BEGIN APPLY >>> ./ D 00254000 00256000                                10/23/81 15:01:36
   END APPLY >>> ./ D 00254000 00256000                                10/23/81 15:01:36
 BEGIN APPLY >>> ./ I 00260100          $ 261000 900                   10/23/81 15:01:36
   END APPLY >>> ./ I 00260100          $ 261000 900                   10/23/81 15:01:36
 BEGIN APPLY >>> ./ I 00262000          $ 262100 100                   10/23/81 15:01:36
   END APPLY >>> ./ I 00262000          $ 262100 100                   10/23/81 15:01:36
 BEGIN APPLY >>> ./ I 00459000          $ 459100 100                   10/23/81 15:01:36
   END APPLY >>> ./ I 00459000          $ 459100 100                   10/23/81 15:01:36
Update Succeeded
Update Execution Time 31 milliseconds.
ibm/vm370-lib/cms/dmsrdc.assemble_hst.txt ยท Last modified: 2023/08/06 13:35 by Site Administrator