DMKVDA History
References
-
-
Fixes Applied : 21
-
Last Fix ID : [HRC039DK]
Update History
CMS File Input : DMKVDA ASSEMBLE
Date : 12/14/1978 8:51:00 AM
VM Context : MAINT(394)
File Name : DMKVDA.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:48 AM
Created : 1/16/2021 7:31:48 AM
Update Order
R09301DK 601 TURN THE RDEVMOUNT FLAG ON AND OFF FOR 3330V ONLY
R09302DK 601 CLEAN UP APAR TO MEET CODING STANDARDS
R09319DK 601 REMOVE DMKSSS FROM LOADLIST WHEN NO MSS
R08560DK 602 SHARE BIT INCORRECT SET IN VCUBLOK FOR CONSOLES
R09957DK 604 CORRECT IOBLOK CONFLICT IN MSS SUPPORT
R09415DK 608 DMKVDA DOES NOT RESTORE REG3 BEFORE BRANCHING TO ERROR ROUTINE
R09758DK 609 INCORRECT FLAG DEFINITION
R09409DK 610 PERFORM UNNECESSARY SLR INSTRUCTIONS BEFORE LH INST
R10488DK 610 ATTACH RANGE AS 3330V DROPS FLAG VIRTPRES AFTER FIRST PASS
R11361DK 612 UV00897 GARBAGE OUTPUT ON MESSAGE FROM DMKVDA MSGONLY
R11370DK 612 UV00932 ABEND AFTER CALL GETRDEV FROM DMKVDA
R11349DK 613 UV01022 ATTACH COMMAND WITH WRONG VOLID GETS MSDMKVDA124.
R11421DK 614 UV01221 PTFERROR VM09415
R11659DK 615 UV01810 ATTACH OF SINGLE MSS DEVICE FAILS WITH I/O ERROR
R11344DK 618 UV01215 DESTAGE MODIFIED DATA TO MINIMIZE DATA LOSSES
R12315DK 620 UV03608 ATT CND FAILS WITH MSDMKVDA022E VADDR MISS OR INV.
R13510DK 622 UV04601 LOCK BLOK NOT RELEASED USER HUNG
R13651DK 623 UV04932 DMKVDA ERROR MESSAGE ROUTINE SPLIT INTO DMKVDERR
R11952DK 625 UV03674 ATTACH CMD TO A BUSY DASD GIVES INCORRECT MESSAGE
R13217DK 628 UV06065 AFTER VM09651 MSDMKDEF040E AND MSDMKLNK022E MISLEAD
HRC039DK H40 Fix various DASD attached to SYSTEM issues
R09301DK
Date Friday Feb 02, 1979 05:19:00 PM
Loaded from MAINT(294)
R09301DK: ./ I 00908000 $ 908100 100 00001000
R09301DK: TM RDEVFTR,VIRTUAL+SYSVIRT IS IT A 3330V ? @VA09301 00002000
R09301DK: BZ SKPON NO, DON'T TURN THE FLAG ON @VA09301 00003000
R09301DK: ./ R 00910000 910000 $ 910000 100 00004000
R09301DK: SKPON CALL DMKSCNVS SEARCH FOR DUPLICATE VOLID @VA09301 00005000
R09301DK: ./ I 00911000 $ 911100 100 00006000
R09301DK: TM RDEVFTR,VIRTUAL+SYSVIRT IS IT A 3330V ? @VA09301 00007000
R09301DK: BZ SKPOFF NO,DON'T TURN THE FLAG OFF @VA09301 00008000
R09301DK: ./ R 00913000 913000 $ 913100 100 00009000
R09301DK: SKPOFF BAL R7,DEVCHECK VERIFY DEVICE EXISTENCE @VA09301 00010000
BEGIN APPLY >>> ./ I 00908000 $ 908100 100 00001000
END APPLY >>> ./ I 00908000 $ 908100 100 00001000
BEGIN APPLY >>> ./ R 00910000 910000 $ 910000 100 00004000
END APPLY >>> ./ R 00910000 910000 $ 910000 100 00004000
BEGIN APPLY >>> ./ I 00911000 $ 911100 100 00006000
END APPLY >>> ./ I 00911000 $ 911100 100 00006000
BEGIN APPLY >>> ./ R 00913000 913000 $ 913100 100 00009000
END APPLY >>> ./ R 00913000 913000 $ 913100 100 00009000
Update Succeeded
Update Execution Time 23 milliseconds.
R09302DK
Date Friday Feb 02, 1979 05:19:00 PM
Loaded from MAINT(294)
R09302DK: ./ R 00394000 394000 $ 394000 100 00001000
R09302DK: TM MSSFLAG2-OSVSCOM(R1),MSGPROC PCI YET @VA09302 00002000
R09302DK: ./ R 00396000 396000 $ 396000 100 00003000
R09302DK: NI MSSFLAG2-OSVSCOM(R1),X'FF'-MSGPROC @VA09302 00004000
R09302DK: ./ D 01534000 00005000
BEGIN APPLY >>> ./ R 00394000 394000 $ 394000 100 00001000
END APPLY >>> ./ R 00394000 394000 $ 394000 100 00001000
BEGIN APPLY >>> ./ R 00396000 396000 $ 396000 100 00003000
END APPLY >>> ./ R 00396000 396000 $ 396000 100 00003000
BEGIN APPLY >>> ./ D 01534000 00005000
END APPLY >>> ./ D 01534000 00005000
Update Succeeded
Update Execution Time 23 milliseconds.
R09319DK
Date Monday Feb 05, 1979 02:48:00 PM
Loaded from MAINT(294)
R09319DK: ./ I 00357000 $ 00357010 10 00001000
R09319DK: TM PSAMSS,MSSPRES MSS PRESENT IN THIS SYSTEM? @VA09319 00002000
R09319DK: * VMI2040 00003000
R09319DK: BZ TSTDISA NO,DON'T TRY TO CALL DMKSSS @VA09319 00004000
R09319DK: * VMI2040 00005000
R09319DK: ./ I 00840000 $ 00840010 10 00006000
R09319DK: TM PSAMSS,MSSPRES MSS PRESENT IN THIS SYSTEM? @VA09319 00007000
R09319DK: * VMI2040 00008000
R09319DK: BZ ATTVOLD2 NO,DON'T TRY TO CAL DMKSSS @VA09319 00009000
R09319DK: * VMI2040 00010000
BEGIN APPLY >>> ./ I 00357000 $ 00357010 10 00001000
END APPLY >>> ./ I 00357000 $ 00357010 10 00001000
BEGIN APPLY >>> ./ I 00840000 $ 00840010 10 00006000
END APPLY >>> ./ I 00840000 $ 00840010 10 00006000
Update Succeeded
Update Execution Time 16 milliseconds.
R08560DK
Date Monday Apr 02, 1979 03:30:00 AM
Loaded from MAINT(294)
R08560DK: ./ I 459000 $ 459100 30 00001000
R08560DK: CLI RDEVTYPC,CLASGRAF IS IT A GRAF DEVICE ? @VA08560 00002000
R08560DK: BNE NOTGRAF NO,CHECK NEXT TYPE @VA08560 00003000
R08560DK: CLC RDEVNAME,TST3138 IS IT A 3138 CONSOLE ? @VA08560 00004000
R08560DK: BE GRAFCONS YES IT IS @VA08560 00005000
R08560DK: CLC RDEVNAME,TST3148 IS IT A 3148 CONSOLE ? @VA08560 00006000
R08560DK: BE GRAFCONS YES IT IS @VA08560 00007000
R08560DK: CLC RDEVNAME,TST3158 IS IT A 3158 CONSOLE ? @VA08560 00008000
R08560DK: BE GRAFCONS YES IT IS @VA08560 00009000
R08560DK: CLC RDEVNAME,TST3036 IS IT A 3036 CONSOLE ? @VA08560 00010000
R08560DK: BE GRAFCONS YES IT IS @VA08560 00011000
R08560DK: CLC RDEVNAME,TST3066 IS IT A 3066 CONSOLE ? @VA08560 00012000
R08560DK: BE GRAFCONS YES IT IS @VA08560 00013000
R08560DK: B GOODOPT CHECK DEVICE STATUS @VA08560 00014000
R08560DK: DS 0D @VA08560 00015000
R08560DK: TST3036 DC X'3036' @VA08560 00016000
R08560DK: TST3066 DC X'3066' @VA08560 00017000
R08560DK: TST3138 DC X'3138' @VA08560 00018000
R08560DK: TST3148 DC X'3148' @VA08560 00019000
R08560DK: TST3158 DC X'3158' @VA08560 00020000
R08560DK: SPACE 00021000
R08560DK: GRAFCONS EQU * @VA08560 00022000
R08560DK: OI UDEVSTAT,UDEV3158 INDICATE CONSOLE DEVICE @VA08560 00023000
R08560DK: B GOODOPT CHECK DEVICE STATUS @VA08560 00024000
R08560DK: SPACE 00025000
R08560DK: NOTGRAF EQU * @VA08560 00026000
BEGIN APPLY >>> ./ I 459000 $ 459100 30 00001000
END APPLY >>> ./ I 459000 $ 459100 30 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R09957DK
Date Thursday Jul 12, 1979 09:54: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.
R09415DK
Date Tuesday Jan 15, 1980 05:01:00 AM
Loaded from MAINT(294)
R09415DK: ./ I 509000 $ 509500
R09415DK: LR R3,R5 RESTORE VIRTUAL ADDRESS @VA09415 00001000
BEGIN APPLY >>> ./ I 509000 $ 509500
END APPLY >>> ./ I 509000 $ 509500
Update Succeeded
Update Execution Time 16 milliseconds.
R09758DK
Date Wednesday Jan 23, 1980 01:15:00 AM
Loaded from MAINT(294)
R09758DK: ./ R 540000 $ 540010 00001000
R09758DK: OI VDEVFLG2-VDEVBLOK(R8),VDEVVIRT SET FLAG @VA09758 00002000
BEGIN APPLY >>> ./ R 540000 $ 540010 00001000
END APPLY >>> ./ R 540000 $ 540010 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R09409DK
Date Monday Mar 03, 1980 12:11:00 PM
Loaded from MAINT(294)
R09409DK: ./ D 284000
R09409DK: ./ D 598000
R09409DK: ./ D 996000
R09409DK: ./ D 1243000
R09409DK: ./ D 1254000
BEGIN APPLY >>> ./ D 284000
END APPLY >>> ./ D 284000
BEGIN APPLY >>> ./ D 598000
END APPLY >>> ./ D 598000
BEGIN APPLY >>> ./ D 996000
END APPLY >>> ./ D 996000
BEGIN APPLY >>> ./ D 1243000
END APPLY >>> ./ D 1243000
BEGIN APPLY >>> ./ D 1254000
END APPLY >>> ./ D 1254000
Update Succeeded
Update Execution Time 16 milliseconds.
R10488DK
Date Thursday Mar 06, 1980 12:20:00 PM
Loaded from MAINT(294)
R10488DK: ./ I 322000 $ 322100 00001000
R10488DK: MVC SAVEWRK5(FLAGLEN),SAVEWRK9 SAVE FLAG SET IN @VA10488 00002000
R10488DK: * DMKVDC 00003000
R10488DK: ./ D 334000 335000 $ 00004000
BEGIN APPLY >>> ./ I 322000 $ 322100 00001000
END APPLY >>> ./ I 322000 $ 322100 00001000
BEGIN APPLY >>> ./ D 334000 335000 $ 00004000
END APPLY >>> ./ D 334000 335000 $ 00004000
Update Succeeded
Update Execution Time 16 milliseconds.
R11361DK
Date Monday May 05, 1980 04:21:00 AM
Loaded from MAINT(294)
R11361DK: ./ R 1421000 $ 1421100 00001000
R11361DK: B MSGSEND3 GO SEND MESSAGE @VA11361 00002000
BEGIN APPLY >>> ./ R 1421000 $ 1421100 00001000
END APPLY >>> ./ R 1421000 $ 1421100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R11370DK
Date Monday May 05, 1980 05:05:00 AM
Loaded from MAINT(294)
R11370DK: ./ I 1306000 $ 1306100 100 00001000
R11370DK: L R7,SAVEWRK5 RESTORE R7 @VA11370 00003000
R11370DK: LA R7,MSGAREA(,R7) ADDRESSABILITY TO MSG BUF @VA11370 00004000
BEGIN APPLY >>> ./ I 1306000 $ 1306100 100 00001000
END APPLY >>> ./ I 1306000 $ 1306100 100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R11349DK
Date Thursday Jun 05, 1980 04:28:00 AM
Loaded from MAINT(294)
R11349DK: ./ I 1333000 $ 1333250 250 00001000
R11349DK: CLC RDEVSER(6),CMDUSER IS VOLID CORRECT? @VA11349 00002000
R11349DK: BNE WRNGVOL YES, CONTINUE. @VA11349 00003000
BEGIN APPLY >>> ./ I 1333000 $ 1333250 250 00001000
END APPLY >>> ./ I 1333000 $ 1333250 250 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R11421DK
Date Tuesday Jul 08, 1980 05:13:00 AM
Loaded from MAINT(294)
R11421DK: ./ D 509500 $ 00001000
R11421DK: ./ I 512000 $ 512500 00002000
R11421DK: LR R3,R5 RESTORE VIRTUAL ADDRESS @VA11421 00003000
BEGIN APPLY >>> ./ D 509500 $ 00001000
END APPLY >>> ./ D 509500 $ 00001000
BEGIN APPLY >>> ./ I 512000 $ 512500 00002000
END APPLY >>> ./ I 512000 $ 512500 00002000
Update Succeeded
Update Execution Time 16 milliseconds.
R11659DK
Date Tuesday Jul 29, 1980 07:17:00 AM
Loaded from MAINT(294)
R11659DK: ./ I 287000 $ 287100 100
R11659DK: MVC SAVEWRK5(FLAGLEN),SAVEWRK9 SAVE FLAG SET IN DMKVDC
BEGIN APPLY >>> ./ I 287000 $ 287100 100
END APPLY >>> ./ I 287000 $ 287100 100
Update Succeeded
Update Execution Time 16 milliseconds.
R11344DK
Date Friday Jan 16, 1981 01:16:00 AM
Loaded from MAINT(294)
R11344DK: ./ I 00371000 $ 371100 100 09/17/80 09:35:16
R11344DK: TM RDEVFTR,VIRTUAL THIS AN MSS VIRTUAL VUA? @VA11344 00371100
R11344DK: BNO TSTDISA1 NO - THEN DON'T WORRY @VA11344 00371200
R11344DK: TM SAVEWRK5,VOLPRES VOL PRESENT IN COMMAND? @VA11344 00371300
R11344DK: BO TSTDISA1 YES - THEN DON'T RESET FLAG @VA11344 00371400
R11344DK: NI RDEVFLAG,X'FF'-RDEVVMNT ELSE RESET 'MTD-BY-CP' @VA11344 00371500
R11344DK: TSTDISA1 DS 0H @VA11344 00371600
BEGIN APPLY >>> ./ I 00371000 $ 371100 100 09/17/80 09:35:16
END APPLY >>> ./ I 00371000 $ 371100 100 09/17/80 09:35:16
Update Succeeded
Update Execution Time 16 milliseconds.
R12315DK
Date Tuesday Apr 07, 1981 03:30:00 AM
Loaded from MAINT(294)
R12315DK: ./ I 40000 $ 40500
R12315DK: * | | <3330V> <VOLID XXXXXX> |
BEGIN APPLY >>> ./ I 40000 $ 40500
END APPLY >>> ./ I 40000 $ 40500
Update Succeeded
Update Execution Time 16 milliseconds.
R13510DK
Date Wednesday Jun 24, 1981 06:05:00 AM
Loaded from MAINT(294)
R13510DK: ./ D 1333250 1333500 $
BEGIN APPLY >>> ./ D 1333250 1333500 $
END APPLY >>> ./ D 1333250 1333500 $
Update Succeeded
Update Execution Time 16 milliseconds.
R13651DK
Date Friday Aug 07, 1981 07:16:00 AM
Loaded from MAINT(294)
R13651DK: ./ R 00024000 00025000 $ 24000 1000 06/18/81 14:24:57
R13651DK: EXTRN DMKCVTBH @VA13651 00024000
R13651DK: EXTRN DMKSCNRU,DMKSCNVU @VA13651 00025000
R13651DK: ./ R 00028000 00029000 $ 28000 2000 06/18/81 14:24:57
R13651DK: EXTRN DMKVCHDC @VA13651 00028000
R13651DK: ./ I 00033000 $ 33500 500 06/18/81 14:24:57
R13651DK: EXTRN DMKVDERR ERROR MESSAGE ROUTINE @VA13651 00033500
R13651DK: ./ R 00068000 00071000 $ 68000 1000 06/18/81 14:24:57
R13651DK: * DMKSSSVA 00068000
R13651DK: * DMKSSSAS 00069000
R13651DK: * DMKSTKCP 00070000
R13651DK: ./ D 00073000 06/18/81 14:24:57
R13651DK: ./ I 00089000 $ 89500 500 06/18/81 14:24:57
R13651DK: * DMKVDERR - PUT OUR 'ATTACH' ERROR MESSAGES 00089500
R13651DK: ./ R 00094000 $ 94000 500 06/18/81 14:24:57
R13651DK: * DMKSYSOW - OWNED LIST START 00094000
R13651DK: * DMKSYSOC - COUNT OF OWNED LIST VOLUMES 00094500
R13651DK: ./ R 00216000 00245000 $ 216000 30000 06/18/81 14:24:57
R13651DK: * SEE DMKVDERR FOR ERROR MESSAGE TEXT. 00216000
R13651DK: ./ D 00344000 00345000 06/18/81 14:24:57
R13651DK: ./ I 00358000 $ 358500 500 06/18/81 14:24:57
R13651DK: LA R7,0(,R7) CLEAR HIGH ORDER BYTE @VA13651 00358500
R13651DK: ./ D 00389000 00390000 06/18/81 14:24:57
R13651DK: ./ I 00614000 $ 614500 500 06/18/81 14:24:57
R13651DK: LA R4,0(,R4) CLEAR HIGH ORDER BYTE @VA13651 00614500
R13651DK: ./ I 00731000 $ 731500 500 06/18/81 14:24:57
R13651DK: LA R1,0(,R1) CLEAR HIGH ORDER BYTE @VA13651 00731500
R13651DK: ./ I 00734000 $ 734500 500 06/18/81 14:24:57
R13651DK: LA R1,0(,R1) CLEAR HIGH ORDER BYTE @VA13651 00734500
R13651DK: ./ I 00748000 $ 748500 500 06/18/81 14:24:57
R13651DK: LA R1,0(,R1) CLEAR HIGH ORDER BYTE @VA13651 00748500
R13651DK: ./ I 00756000 $ 756500 500 06/18/81 14:24:57
R13651DK: LA R1,0(,R1) CLEAR HIGH ORDER BYTE @VA13651 00756500
R13651DK: ./ I 00766000 $ 766500 500 06/18/81 14:24:57
R13651DK: LA R1,0(,R1) CLEAR HIGH ORDER BYTE @VA13651 00766500
R13651DK: ./ I 00770000 $ 770500 500 06/18/81 14:24:57
R13651DK: LA R1,0(,R1) CLEAR HIGH ORDER BYTE @VA13651 00770500
R13651DK: ./ I 00783000 $ 783500 500 06/18/81 14:24:57
R13651DK: LA R1,0(,R1) CLEAR HIGH ORDER BYTE @VA13651 00783500
R13651DK: ./ D 00827000 00834000 06/18/81 14:24:57
R13651DK: ./ R 00859000 $ 859000 1000 06/18/81 14:24:57
R13651DK: BO ERR12 YES -- SEND OFFLINE MESSAGE @VA13651 00859000
R13651DK: ./ R 00861000 $ 861000 1000 06/18/81 14:24:57
R13651DK: BO ERR24 YES -- SEND DEDICATED MESSAGE @VA13651 00861000
R13651DK: ./ I 00936000 $ 936500 500 06/18/81 14:24:57
R13651DK: LA R4,0(,R4) CLEAR HIGH ORDER BYTE @VA13651 00936500
R13651DK: ./ I 00968000 $ 968500 500 06/18/81 14:24:57
R13651DK: LA R4,0(,R4) CLEAR HIGH ORDER BYTE @VA13651 00968500
R13651DK: ./ I 01123000 $ 1123200 200 06/18/81 14:24:57
R13651DK: SPACE 01123200
R13651DK: DEVOWND EQU * DEVICE ALREADY CP OWNED @VA13651 01123400
R13651DK: LA R2,RC20 SET UP ERROR INDEX @VA13651 01123600
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01123800
R13651DK: ./ I 01126000 $ 1126200 200 06/18/81 14:24:57
R13651DK: SPACE 01126200
R13651DK: NOTLOGD EQU * USERID NOT LOGGED ON @VA13651 01126400
R13651DK: LA R2,RC44 SET UP ERROR INDEX @VA13651 01126600
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01126800
R13651DK: ./ I 01128000 $ 1128020 20 06/18/81 14:24:57
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128020
R13651DK: SPACE 1 01128040
R13651DK: UNKNOWN EQU * DEV ADDR DOES NOT EXIST @VA13651 01128060
R13651DK: LA R2,RC80 SET UP ERROR INDEX @VA13651 01128080
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128100
R13651DK: SPACE 1 01128120
R13651DK: DEVSHRD EQU * DASD RADDR IN USE BY NNN USERS @VA13651 01128140
R13651DK: LA R2,RC84 SET UP ERROR INDEX @VA13651 01128160
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128180
R13651DK: SPACE 1 01128200
R13651DK: INVOPTS2 EQU * INVALID OPTION @VA13651 01128220
R13651DK: LA R2,RC88 SET UP ERROR INDEX @VA13651 01128240
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128260
R13651DK: SPACE 1 01128280
R13651DK: INVTYPE EQU * INVALID DEVICE TYPE @VA13651 01128300
R13651DK: LA R2,RC92 SET UP ERROR INDEX @VA13651 01128320
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128340
R13651DK: SPACE 1 01128360
R13651DK: VDA021A EQU * RADDR MISSING OR INVALID @VA13651 01128380
R13651DK: LA R2,RC96 SET UP ERROR INDEX @VA13651 01128400
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128420
R13651DK: SPACE 1 01128440
R13651DK: VDA022B EQU * VADDR MISSING OR INVALID @VA13651 01128460
R13651DK: LA R2,RC100 SET UP ERROR INDEX @VA13651 01128480
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128500
R13651DK: SPACE 1 01128520
R13651DK: DUPVOL EQU * VOLID ALREADY ATTACHED @VA13651 01128540
R13651DK: LR R8,R1 PICK UP ADDR OF DEV CONT VOLID @VA13651 01128560
R13651DK: MSG125E EQU * @VA13651 01128580
R13651DK: LA R2,RC104 SET UP ERROR INDEX @VA13651 01128600
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128620
R13651DK: SPACE 1 01128640
R13651DK: WRNGVOL EQU * @VA13651 01128660
R13651DK: LA R2,RC108 SET UP ERROR INDEX @VA13651 01128680
R13651DK: B ERROR ISSUE ERROR MESSAGE @VA13651 01128700
R13651DK: SPACE 1 01128720
R13651DK: MSG076 EQU * INVALID PARAMETERS @VA13651 01128740
R13651DK: LA R2,RC112 SET UP ERROR INDEX @VA13651 01128760
R13651DK: SPACE 1 01128780
R13651DK: ./ R 01130000 01132000 $ 1130000 3000 06/18/81 14:24:57
R13651DK: ST R2,SAVEWRK7 SAVE ERROR INDEX @VA13651 01130000
R13651DK: ./ R 01135000 01238000 $ 1135000 3000 06/18/81 14:24:57
R13651DK: ERRTABL EQU * JUMP TABLE FOR R2 ERROR INDEX @VA13651 01135000
R13651DK: B CHKRANGE INDEX = 8 @VA13651 01138000
R13651DK: B CHKRANGE INDEX = 12 @VA13651 01141000
R13651DK: B CHKRANGE INDEX = 16 @VA13651 01144000
R13651DK: B CHKRANGE INDEX = 20 @VA13651 01147000
R13651DK: B CHKRANGE INDEX = 24 @VA13651 01150000
R13651DK: B SENDEMSG INDEX = 28 @VA13651 01153000
R13651DK: B SENDEMSG INDEX = 32 @VA13651 01156000
R13651DK: B SENDEMSG INDEX = 36 @VA13651 01159000
R13651DK: B SENDEMSG INDEX = 40 @VA13651 01162000
R13651DK: B SENDEMSG INDEX = 44 @VA13651 01165000
R13651DK: B SENDEMSG INDEX = 48 @VA13651 01168000
R13651DK: B SENDEMSG INDEX = 52 @VA13651 01171000
R13651DK: B CHKRANGE INDEX = 56 @VA13651 01174000
R13651DK: B BAD05 INDEX = 60 @VA13651 01177000
R13651DK: B CHANDED INDEX = 64 @VA13651 01180000
R13651DK: B CHKRANGE INDEX = 68 @VA13651 01183000
R13651DK: B SENDEMSG INDEX = 72 @VA13651 01186000
R13651DK: B SENDEMSG INDEX = 76 @VA13651 01189000
R13651DK: B CHKRANGE INDEX = 80 @VA13651 01192000
R13651DK: B CHKRANGE INDEX = 84 @VA13651 01195000
R13651DK: B CHKRANGE INDEX = 88 @VA13651 01198000
R13651DK: B SENDEMSG INDEX = 92 @VA13651 01201000
R13651DK: B CHKRANGE INDEX = 96 @VA13651 01204000
R13651DK: B CHKRANGE INDEX = 100 @VA13651 01207000
R13651DK: B SENDEMSG INDEX = 104 @VA13651 01210000
R13651DK: B SENDEMSG INDEX = 108 @VA13651 01213000
R13651DK: B SENDEMSG INDEX = 112 @VA13651 01216000
R13651DK: ./ R 01247000 01286000 $ 1247000 40000 06/18/81 14:24:57
R13651DK: B CHKRANGE GO TEST FOR RANGE @VA13651 01247000
R13651DK: ./ R 01291000 01448000 $ 1291000 7000 06/18/81 14:24:57
R13651DK: .NOTDED3 ANOP **ANOP** 01291000
R13651DK: SPACE 1 01298000
R13651DK: CHKRANGE EQU * @VA13651 01305000
R13651DK: BAL R5,TSTRANGE TEST FOR RANGE BEING PROCESSED @VA13651 01312000
R13651DK: SENDEMSG EQU * CALL VDE ROUTINE TO ISSUE MSG @VA13651 01319000
R13651DK: LR R2,R0 SAVE PARM COUNT FOR VDERR MSG @VA13651 01326000
R13651DK: LR R7,R1 SAVE PARM ADDRESS FOR VDERR MSG @VA13651 01333000
R13651DK: BAL R5,SWPCALL ENSURE VMBLOK SWITCH BEFORE CALL @VA13651 01340000
R13651DK: LR R0,R2 RESTORE PARM COUNT FOR VDERR MSG @VA13651 01347000
R13651DK: LR R1,R7 RESTORE PARM ADDR FOR VDERR MSG @VA13651 01354000
R13651DK: L R2,SAVEWRK7 RELOAD ERROR INDEX FOR VDERR @VA13651 01361000
R13651DK: L R7,SAVEWRK5 LOAD ADDRESS OF WORKAREA @VA13651 01368000
R13651DK: LA R7,MSGAREA(,R7) GET ADDRESS OF MESSAGE AREA @VA13651 01375000
R13651DK: CALL DMKVDERR CALL ERROR MESSAGE ROUTINE @VA13651 01382000
R13651DK: B BRTABLE(R2) CONTINUE AT APPROPRIATE PLACE @VA13651 01389000
R13651DK: SPACE 1 01396000
R13651DK: BRTABLE EQU * @VA13651 01403000
R13651DK: B CLEANXT EXIT @VA13651 01410000
R13651DK: B PROCESS CONTINUE PROCESSING RANGE @VA13651 01417000
R13651DK: B MULTCONT CONTINUE PROCESSING MULTIPLES @VA13651 01424000
R13651DK: B RESPATT ISSUE RESPONSES @VA13651 01431000
R13651DK: ./ D 01459000 01480000 06/18/81 14:24:57
R13651DK: ./ I 01485000 $ 1485500 500 06/18/81 14:24:57
R13651DK: RC20 EQU 20 DEVICE ALREADY CP OWNED @VA13651 01485500
R13651DK: ./ I 01486000 $ 1486500 500 06/18/81 14:24:57
R13651DK: RC44 EQU 44 USERID NOT LOGGED ON @VA13651 01486500
R13651DK: ./ R 01490000 $ 1490000 100 06/18/81 14:24:57
R13651DK: RC80 EQU 80 DEVICE DOES NOT EXIST @VA13651 01490000
R13651DK: RC84 EQU 84 DEVICE ALREADY IN USE @VA13651 01490100
R13651DK: RC88 EQU 88 INVALID OPTION @VA13651 01490200
R13651DK: RC92 EQU 92 INVALID DEVICE TYPE @VA13651 01490300
R13651DK: RC96 EQU 96 RADDR MISSING OR INVALID @VA13651 01490400
R13651DK: RC100 EQU 100 VADDR MISSING OR INVALID @VA13651 01490500
R13651DK: RC104 EQU 104 DUPLICATE VOLUME @VA13651 01490600
R13651DK: RC108 EQU 108 VOLUMES DON'T MATCH @VA13651 01490700
R13651DK: RC112 EQU 112 INVALID PARAMETERS @VA13651 01490800
R13651DK: ./ D 01495000 01529000 06/18/81 14:24:57
R13651DK: ./ D 01531000 06/18/81 14:24:57
R13651DK: ./ D 01575000 01600000 06/18/81 14:24:57
R13651DK: ./ D 01604000 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 00024000 00025000 $ 24000 1000 06/18/81 14:24:57
END APPLY >>> ./ R 00024000 00025000 $ 24000 1000 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 00028000 00029000 $ 28000 2000 06/18/81 14:24:57
END APPLY >>> ./ R 00028000 00029000 $ 28000 2000 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00033000 $ 33500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00033000 $ 33500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 00068000 00071000 $ 68000 1000 06/18/81 14:24:57
END APPLY >>> ./ R 00068000 00071000 $ 68000 1000 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 00073000 06/18/81 14:24:57
END APPLY >>> ./ D 00073000 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00089000 $ 89500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00089000 $ 89500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 00094000 $ 94000 500 06/18/81 14:24:57
END APPLY >>> ./ R 00094000 $ 94000 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 00216000 00245000 $ 216000 30000 06/18/81 14:24:57
END APPLY >>> ./ R 00216000 00245000 $ 216000 30000 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 00344000 00345000 06/18/81 14:24:57
END APPLY >>> ./ D 00344000 00345000 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00358000 $ 358500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00358000 $ 358500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 00389000 00390000 06/18/81 14:24:57
END APPLY >>> ./ D 00389000 00390000 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00614000 $ 614500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00614000 $ 614500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00731000 $ 731500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00731000 $ 731500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00734000 $ 734500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00734000 $ 734500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00748000 $ 748500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00748000 $ 748500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00756000 $ 756500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00756000 $ 756500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00766000 $ 766500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00766000 $ 766500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00770000 $ 770500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00770000 $ 770500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00783000 $ 783500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00783000 $ 783500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 00827000 00834000 06/18/81 14:24:57
END APPLY >>> ./ D 00827000 00834000 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 00859000 $ 859000 1000 06/18/81 14:24:57
END APPLY >>> ./ R 00859000 $ 859000 1000 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 00861000 $ 861000 1000 06/18/81 14:24:57
END APPLY >>> ./ R 00861000 $ 861000 1000 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00936000 $ 936500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00936000 $ 936500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 00968000 $ 968500 500 06/18/81 14:24:57
END APPLY >>> ./ I 00968000 $ 968500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 01123000 $ 1123200 200 06/18/81 14:24:57
END APPLY >>> ./ I 01123000 $ 1123200 200 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 01126000 $ 1126200 200 06/18/81 14:24:57
END APPLY >>> ./ I 01126000 $ 1126200 200 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 01128000 $ 1128020 20 06/18/81 14:24:57
END APPLY >>> ./ I 01128000 $ 1128020 20 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 01130000 01132000 $ 1130000 3000 06/18/81 14:24:57
END APPLY >>> ./ R 01130000 01132000 $ 1130000 3000 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 01135000 01238000 $ 1135000 3000 06/18/81 14:24:57
END APPLY >>> ./ R 01135000 01238000 $ 1135000 3000 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 01247000 01286000 $ 1247000 40000 06/18/81 14:24:57
END APPLY >>> ./ R 01247000 01286000 $ 1247000 40000 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 01291000 01448000 $ 1291000 7000 06/18/81 14:24:57
END APPLY >>> ./ R 01291000 01448000 $ 1291000 7000 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 01459000 01480000 06/18/81 14:24:57
END APPLY >>> ./ D 01459000 01480000 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 01485000 $ 1485500 500 06/18/81 14:24:57
END APPLY >>> ./ I 01485000 $ 1485500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ I 01486000 $ 1486500 500 06/18/81 14:24:57
END APPLY >>> ./ I 01486000 $ 1486500 500 06/18/81 14:24:57
BEGIN APPLY >>> ./ R 01490000 $ 1490000 100 06/18/81 14:24:57
END APPLY >>> ./ R 01490000 $ 1490000 100 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 01495000 01529000 06/18/81 14:24:57
END APPLY >>> ./ D 01495000 01529000 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 01531000 06/18/81 14:24:57
END APPLY >>> ./ D 01531000 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 01575000 01600000 06/18/81 14:24:57
END APPLY >>> ./ D 01575000 01600000 06/18/81 14:24:57
BEGIN APPLY >>> ./ D 01604000 06/18/81 14:24:57
END APPLY >>> ./ D 01604000 06/18/81 14:24:57
Update Succeeded
Update Execution Time 86 milliseconds.
R11952DK
Date Thursday Oct 29, 1981 10:10:00 AM
Loaded from MAINT(294)
R11952DK: ./ I 1019000 $ 1019100 50 00001000
R11952DK: CH R2,=H'120' BUSY CONDITION @VA11952 00002000
R11952DK: BE ERROR @VA11952 00003000
R11952DK: ./ I 1216000 $ 1217000 00004000
R11952DK: B SENDEMSG INDEX = 120 @VA11952 00005000
BEGIN APPLY >>> ./ I 1019000 $ 1019100 50 00001000
END APPLY >>> ./ I 1019000 $ 1019100 50 00001000
BEGIN APPLY >>> ./ I 1216000 $ 1217000 00004000
END APPLY >>> ./ I 1216000 $ 1217000 00004000
Update Succeeded
Update Execution Time 16 milliseconds.
R13217DK
Date Monday Feb 15, 1982 09:29:00 AM
Loaded from MAINT(294)
R13217DK: ./ I 310000 $ 310300 300 00001000
R13217DK: CH R2,=H'124' EXCEEDED MAX DEVICES? @VA13217 00002000
R13217DK: BE ERR153 YES - ISSUE ERROR MSG @VA13217 00003000
R13217DK: ./ I 534000 $ 534300 300 00004000
R13217DK: CH R2,=H'124' MAX DEVICES EXCEEDED? @VA13217 00005000
R13217DK: BE ERR153 YES - ISSUE ERROR MSG @VA13217 00006000
R13217DK: ./ R 1128780 $ 1128790 30 00007000
R13217DK: B ERROR ISSUE ERROR MESSAGE @VA13217 00008000
R13217DK: SPACE 1 00009000
R13217DK: ERR153 EQU * MAXIMUM DEVICES EXCEEDED @VA13217 00010000
R13217DK: LA R2,RC124 SET UP ERROR INDEX @VA13217 00011000
R13217DK: B ERROR ISSUE ERROR MESSAGE @VA13217 00012000
R13217DK: SPACE 1 00013000
R13217DK: ./ I 1217000 $ 1218000 00014000
R13217DK: B CHKRANGE INDEX = 124 @VA13217 00015000
R13217DK: ./ I 1490800 $ 1490900 00016000
R13217DK: RC124 EQU 124 MAXIMUM DEVICES EXCEEDED @VA13217 00017000
BEGIN APPLY >>> ./ I 310000 $ 310300 300 00001000
END APPLY >>> ./ I 310000 $ 310300 300 00001000
BEGIN APPLY >>> ./ I 534000 $ 534300 300 00004000
END APPLY >>> ./ I 534000 $ 534300 300 00004000
BEGIN APPLY >>> ./ R 1128780 $ 1128790 30 00007000
END APPLY >>> ./ R 1128780 $ 1128790 30 00007000
BEGIN APPLY >>> ./ I 1217000 $ 1218000 00014000
END APPLY >>> ./ I 1217000 $ 1218000 00014000
BEGIN APPLY >>> ./ I 1490800 $ 1490900 00016000
END APPLY >>> ./ I 1490800 $ 1490900 00016000
Update Succeeded
Update Execution Time 16 milliseconds.
HRC039DK
Date Tuesday Feb 14, 2017 01:08:00 PM
Loaded from MAINT(094)
HRC039DK: ./ R 00853000 $ 00853100 100
HRC039DK: * WITH OR WITHOUT LINKS HRC039DK
HRC039DK: ./ R 00864000 00865000 $ 00864100 100
HRC039DK: CLC RDEVLNKS,=H'0' Does dasd have existing links? HRC039DK
HRC039DK: BNE DEVSHRD Minidisks in use on dasd HRC039DK
HRC039DK: TM RDEVFLAG,RDEVSYS Dasd already attached to sys.? HRC039DK
HRC039DK: BZ ALLOK No. Can be attached now. HRC039DK
HRC039DK: ./ I 00935000 $ 00935100 100
HRC039DK: OI RDEVFLAG,RDEVSYS Device now attached to system HRC039DK
BEGIN APPLY >>> ./ R 00853000 $ 00853100 100
END APPLY >>> ./ R 00853000 $ 00853100 100
BEGIN APPLY >>> ./ R 00864000 00865000 $ 00864100 100
END APPLY >>> ./ R 00864000 00865000 $ 00864100 100
BEGIN APPLY >>> ./ I 00935000 $ 00935100 100
END APPLY >>> ./ I 00935000 $ 00935100 100
Update Succeeded
Update Execution Time 23 milliseconds.