ibm:vm370-lib:cms:dmsrdc.assemble_hst
Table of Contents
DMSRDC History
References
- Fixes Applied : 2
- Latest Source Date : Tuesday, December 12, 1978
- Last Fix ID : [R14498DS]
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
- R09236DS 602 DMSRDC WILL GIVE MSDMSRDC069E FOR DISK NOT ACCESSED
- 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