ibm:vm370-lib:cp:dmkvda.assemble_hst
Table of Contents
DMKVDA History
References
- Fixes Applied : 21
- Latest Source Date : Thursday, December 14, 1978
- 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.
ibm/vm370-lib/cp/dmkvda.assemble_hst.txt · Last modified: 2023/08/06 13:37 by Site Administrator