ibm:vm370-lib:cp:dmkvsc.assemble_hst
Table of Contents
DMKVSC History
References
- Fixes Applied : 8
- Latest Source Date : Wednesday, March 28, 1979
- Last Fix ID : [HRC011DK]
Update History
CMS File Input : DMKVSC ASSEMBLE
Date : 3/28/1979 3:23:00 AM
VM Context : MAINT(394)
File Name : DMKVSC.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:48 AM
Created : 1/16/2021 7:31:48 AM
Update Order
- R08629DK 603 2250/3250
- R09957DK - CORRECT IOBLOK CONFLICT IN MSS SUPPORT
- R09849DK 607 FAILURE TO OBTAIN SYSTEM LOCK BEFORE CALLING DMKVSC
- R09758DK 609 INCORRECT FLAG DEFINITION
- R09352DK 609 V=R NOT SETTING PROPER POLLING LOOP
- R14146DK 624 UV05428 RESTORE CORRECT CCW FLAGS WHEN DOING TIC
- R15317DK 629 UV06338 PEVM12941 IOERBLOK CHANGED BUT DMKVSC NOT COGNIZANT
- HRC011DK V01 ADD 3380 MDISK/DEDICATED DEVICE SUPPORT
R08629DK
Date Thursday May 10, 1979 04:51:00 PM
Loaded from MAINT(294)
R08629DK: ./ I 225000 $ 225050 050 00001000
R08629DK: UNSTKIO ICM R1,7,VDEVIO ANY I/O PENDING? @VA08629 00002000
R08629DK: BZR R2 NO, NOTHING TO UNSTACK @VA08629 00003000
R08629DK: VIORUNQ L R10,IOBFPNT-IOBLOK(R1) GET POINTER TO NEXT @VA08629 00004000
R08629DK: * PRIOR 00005000
R08629DK: LA R0,IOBSIZE SIZE TO RETURN IN DBLWORDS. @VA08629 00006000
R08629DK: CALL DMKFREE RELEASE PENDING INTERRUPTS @VA08629 00007000
R08629DK: LTR R10,R10 ANYMORE ON CHAIN? @VA08629 00008000
R08629DK: BZR R2 NO, RETURN @VA08629 00009000
R08629DK: LR R1,R10 CONTINUE TO STACK @VA08629 00010000
R08629DK: B VIORUNQ ... @VA08629 00011000
BEGIN APPLY >>> ./ I 225000 $ 225050 050 00001000
END APPLY >>> ./ I 225000 $ 225050 050 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 8 milliseconds.
R09849DK
Date Friday Nov 30, 1979 05:29:00 AM
Loaded from MAINT(294)
R09849DK: ./ R 122000 $ 122100 100 00001000
R09849DK: DMKVSCVR DS 0D @VA09849 00002000
R09849DK: STM R0,R14,BALRSAVE SAVE REGS (R0-R14) @VA09849 00004000
R09849DK: LR R12,R15 USE R12 AS BASE @VA09849 00003000
R09849DK: ./ R 214000 $ 214100 100 00005000
R09849DK: LM R0,R14,BALRSAVE RESTORE REGS (R0-R14) @VA09849 00006000
R09849DK: BR R14 @VA09849 00007000
R09849DK: ./ R 217000 $ 217100 100 00008000
R09849DK: LM R0,R14,BALRSAVE RESTORE REGS (R0-R14) @VA09849 00009000
R09849DK: BR R14 @VA09849 00010000
R09849DK: ./ R 375000 $ 375100 100 00011000
R09849DK: DMKVSCAN STM R0,R9,TEMPSAVE SAVE REGS (R0-R9) @VA09849 00012000
R09849DK: ./ R 514000 $ 514100 100 00013000
R09849DK: LM R0,R9,TEMPSAVE RESTORE REGS (R0-R9) @VA09849 00014000
BEGIN APPLY >>> ./ R 122000 $ 122100 100 00001000
END APPLY >>> ./ R 122000 $ 122100 100 00001000
BEGIN APPLY >>> ./ R 214000 $ 214100 100 00005000
END APPLY >>> ./ R 214000 $ 214100 100 00005000
BEGIN APPLY >>> ./ R 217000 $ 217100 100 00008000
END APPLY >>> ./ R 217000 $ 217100 100 00008000
BEGIN APPLY >>> ./ R 375000 $ 375100 100 00011000
END APPLY >>> ./ R 375000 $ 375100 100 00011000
BEGIN APPLY >>> ./ R 514000 $ 514100 100 00013000
END APPLY >>> ./ R 514000 $ 514100 100 00013000
Update Succeeded
Update Execution Time 16 milliseconds.
R09758DK
Date Wednesday Jan 23, 1980 01:15:00 AM
Loaded from MAINT(294)
R09758DK: ./ R 130000 $ 130010 00001000
R09758DK: TM VDEVFLG2,VDEVVIRT IS VDEV A 3330V ? @VA09758 00002000
BEGIN APPLY >>> ./ R 130000 $ 130010 00001000
END APPLY >>> ./ R 130000 $ 130010 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R09352DK
Date Saturday Feb 09, 1980 05:16:00 AM
Loaded from MAINT(294)
R09352DK: ./ I 438000 $ 438100 100 00001000
R09352DK: CLI VDEVTYPC,CLASTERM TERMINAL ? @VA09352 00002000
R09352DK: BNE NOTERM NO @VA09352 00003000
R09352DK: CLI PRVCOMND,X'09' AUTOPOLL CCW ? @VA09352 00004000
R09352DK: BE NOTERM YES,IT SETS STATUS @VA09352 00005000
R09352DK: CLI PRVCOMND,X'1E' PREPARE CCW ? @VA09352 00006000
R09352DK: BNE CCWNXT11 NO, THIS IS END OF CCWS @VA09352 00007000
R09352DK: NOTERM EQU * @VA09352 00008000
R09352DK: ./ I 473000 $ 473200 200 00009000
R09352DK: C R1,=V(DMKSLC) IS IDAL TO HIGH ? @VA09352 00010000
R09352DK: BNL VIOSCERX YES, BAD @VA09352 00011000
R09352DK: C R1,F4096 IS IDAL IN PAGE 0 ? @VA09352 00012000
R09352DK: BL VIOSCERX YES, BAD @VA09352 00013000
R09352DK: ./ R 490000 493000 $ 490100 600 00014000
R09352DK: BZ CCWNXT8 NOT THIS TIME @VA09352 00015000
R09352DK: C R1,=V(DMKSLC) IS IDAL TO HIGH ? @VA09352 00016000
R09352DK: BNL VIOSCERX YES, BAD @VA09352 00017000
R09352DK: C R1,F4096 IS IDAL IN PAGE 0 ? @VA09352 00018000
R09352DK: BL VIOSCERX YES, BAD @VA09352 00019000
R09352DK: L R1,0(,R1) GET REAL ADDRESS @VA09352 00020000
BEGIN APPLY >>> ./ I 438000 $ 438100 100 00001000
END APPLY >>> ./ I 438000 $ 438100 100 00001000
BEGIN APPLY >>> ./ I 473000 $ 473200 200 00009000
END APPLY >>> ./ I 473000 $ 473200 200 00009000
BEGIN APPLY >>> ./ R 490000 493000 $ 490100 600 00014000
END APPLY >>> ./ R 490000 493000 $ 490100 600 00014000
Update Succeeded
Update Execution Time 8 milliseconds.
R14146DK
Date Wednesday Sep 23, 1981 08:50:00 AM
Loaded from MAINT(294)
R14146DK: ./ R 438200 $ 438210 00001000
R14146DK: BNE CCWNXT2 NO @VA14146 00002000
R14146DK: ./ R 438400 $ 438410 00003000
R14146DK: BE CCWNXT2 YES, IT SETS STATUS @VA14146 00004000
R14146DK: ./ R 438700 440000 $ 438710 00005000
R14146DK: B CCWNXT2 LOOK AT NEXT CCW IN STRING @VA14146 00006000
BEGIN APPLY >>> ./ R 438200 $ 438210 00001000
END APPLY >>> ./ R 438200 $ 438210 00001000
BEGIN APPLY >>> ./ R 438400 $ 438410 00003000
END APPLY >>> ./ R 438400 $ 438410 00003000
BEGIN APPLY >>> ./ R 438700 440000 $ 438710 00005000
END APPLY >>> ./ R 438700 440000 $ 438710 00005000
Update Succeeded
Update Execution Time 16 milliseconds.
R15317DK
Date Monday Mar 15, 1982 08:44:00 AM
Loaded from MAINT(294)
R15317DK: ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
BEGIN APPLY >>> ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
Comment >>> ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
END APPLY >>> ./ * FORCE RE-ASSEMBLY FOR IOERBLOK CHANGE BY VM12941
Update Succeeded
Update Execution Time 8 milliseconds.
HRC011DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC011DK: ./ R 00185000 $ 185490 490 01/26/06 19:35:14
HRC011DK: BNE DASD3380 NO, TRY 3380 HRC011DK 00185000
HRC011DK: ./ I 00188000 $ 188050 50 01/26/06 19:35:14
HRC011DK: DASD3380 CLI VDEVTYPE,TYP3380 3380? HRC011DK
HRC011DK: BNE DASD2314 NO, TRY 2314 HRC011DK
HRC011DK: TM RDEVMDL,RDEVMD83 IS THIS A -3 HRC011DK
HRC011DK: BNO DASD3382 TRY -2 HRC011DK
HRC011DK: CLC VDEVBND(2),=H'2655' ALL CYLS USED ? HRC011DK
HRC011DK: BNL TSTSENSE YES, HOPEFULLY BYPASS CCWTRANS HRC011DK
HRC011DK: B CCWTR2 NO, DO CCW TRANS HRC011DK
HRC011DK: DASD3382 DS 0H HRC011DK
HRC011DK: TM RDEVMDL,RDEVMD82 IS THIS A -2 HRC011DK
HRC011DK: BNO DASD3381 ASSUME - 1 HRC011DK
HRC011DK: CLC VDEVBND(2),=H'1770' ALL CYLS USED ? HRC011DK
HRC011DK: BNL TSTSENSE YES, HOPEFULLY BYPASS CCWTRANS HRC011DK
HRC011DK: B CCWTR2 NO, DO CCW TRANS HRC011DK
HRC011DK: DASD3381 DS 0H HRC011DK
HRC011DK: CLC VDEVBND(2),=H'0885' ALL CYLS USED ? HRC011DK
HRC011DK: BNL TSTSENSE YES, HOPEFULLY BYPASS CCWTRANS HRC011DK
HRC011DK: B CCWTR2 NO, DO CCW TRANS HRC011DK
BEGIN APPLY >>> ./ R 00185000 $ 185490 490 01/26/06 19:35:14
END APPLY >>> ./ R 00185000 $ 185490 490 01/26/06 19:35:14
BEGIN APPLY >>> ./ I 00188000 $ 188050 50 01/26/06 19:35:14
END APPLY >>> ./ I 00188000 $ 188050 50 01/26/06 19:35:14
Update Succeeded
Update Execution Time 16 milliseconds.
ibm/vm370-lib/cp/dmkvsc.assemble_hst.txt · Last modified: 2023/08/06 13:37 by Site Administrator