ibm:vm370-lib:cp:dmkmni.assemble_hst
Table of Contents
DMKMNI History
References
- Fixes Applied : 11
- Latest Source Date : Saturday, December 9, 1978
- Last Fix ID : [R12941DK]
Update History
CMS File Input : DMKMNI ASSEMBLE
Date : 12/9/1978 4:56:00 AM
VM Context : MAINT(394)
File Name : DMKMNI.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:47 AM
Created : 1/16/2021 7:31:47 AM
Update Order
- R08888DK 601 AVAILABLE PAGE COUNT INCORRECT AFTER MONITOR START STOP
- R09957DK - CORRECT IOBLOK CONFLICT IN MSS SUPPORT
- R09588DK 611 ABENDPRG001 DMKMNI MON TO SPOOL DASTAP MAX DEV INVALID
- R09843DK 611 FIX FOR MON BUFFER PROB
- R09647DK 611 FIELD DMKPRGMI ZEROED OUT MONITOR CALL RESULTS IN BRANCH
- R10215DK 611 UV00432 DMKMON CAUSES UNDOCUMENTED ABEND DUE TO BAD BRANCH ON REG6
- R11128DK 611 UV00596 ABENDPRG001 AFTER MONITOR CALL
- R12005DK 618 UV02969 AFTER MONITOR CLOSE DEVICE LIST FOR DASTAP RECORDS
- R12214DK 618 UV03393 INSURE MAIN PROCESSOR IN MN097 HEADR REC
- R13063DK 620 UV04056 ABENDPRG005 WITH VM12005 INSTALLED WHEN MAX NBR DEV ON
- R12941DK 622 UV04884 SYNC ERROR RECOV FOR INTERVENTION REQUIRED COND.
R08888DK
Date Monday Feb 26, 1979 04:22:00 PM
Loaded from MAINT(294)
R08888DK: ./ R 746000 $ 746500 00001000 R08888DK: DROP R7,R10 @VA08888 00002000 R08888DK: ./ I 767000 $ 767100 50 00003000 R08888DK: TM MONEX,CLCMD SHUTDOWN OR MONITOR STOP? @VA08888 00004000 R08888DK: BO GOTODSP YES, LEAVE PAGE COUNT ALONE @VA08888 00005000 R08888DK: TM MONFLAG3,SPOOLED ARE WE SPOOLED? @VA08888 00006000 R08888DK: BNO GOTODSP I SAID LEAVE IT ALONE @VA08888 00007000 R08888DK: N R2,XPAGNUM GET PAGE NUMBER @VA08888 00008000 R08888DK: SRL R2,8 DIVIDED BY 256 @VA08888 00009000 R08888DK: A R2,ACORETBL POINT TO CORETABLE ENTRY @VA08888 00010000 R08888DK: USING CORTABLE,R2 @VA08888 00011000 R08888DK: L R0,CORLCNT IF LOCKCOUNT NONZERO LEAVE AND.. @VA08888 00012000 R08888DK: LTR R0,R0 DONT INCREMENT AVAILABLE.. @VA08888 00013000 R08888DK: BP GOTODSP PAGE COUNT THIS TIME @VA08888 00014000 R08888DK: L R14,=A(DMKDSPNP) GET AVAILABLE PAGE COUNT @VA08888 00015000 R08888DK: L R15,0(R14) LOAD IT IN @VA08888 00016000 R08888DK: LA R15,1(R15) BUMP IT UP @VA08888 00017000 R08888DK: ST R15,0(R14) AND STORE IT @VA08888 00018000 R08888DK: DROP R2,R9 @VA08888 00019000 BEGIN APPLY >>> ./ R 746000 $ 746500 00001000 END APPLY >>> ./ R 746000 $ 746500 00001000 BEGIN APPLY >>> ./ I 767000 $ 767100 50 00003000 END APPLY >>> ./ I 767000 $ 767100 50 00003000 Update Succeeded Update Execution Time 16 milliseconds.
R09957DK
Date Thursday Jul 12, 1979 09:52: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.
R09588DK
Date Saturday Mar 29, 1980 05:07:00 AM
Loaded from MAINT(294)
R09588DK: ./ I 373000 $ 373100 100 00001000 R09588DK: TM MONFLAG3,SPOOLED ARE WE SPOOLING @VA09588 00002000 R09588DK: BZ NOTSPOOL NO, USING MAX 291 DEVICES @VA09588 00003000 R09588DK: LA R1,MN600MXS GET SPOOLED MAX DEVICES 289 @VA09588 00004000 R09588DK: NOTSPOOL EQU * @VA09588 00005000 BEGIN APPLY >>> ./ I 373000 $ 373100 100 00001000 END APPLY >>> ./ I 373000 $ 373100 100 00001000 Update Succeeded Update Execution Time 16 milliseconds.
R09843DK
Date Saturday Mar 29, 1980 03:29:00 AM
Loaded from MAINT(294)
R09843DK: ./ * FORCE REASSEMBLY FOR APAR VM09843 BEGIN APPLY >>> ./ * FORCE REASSEMBLY FOR APAR VM09843 Comment >>> ./ * FORCE REASSEMBLY FOR APAR VM09843 END APPLY >>> ./ * FORCE REASSEMBLY FOR APAR VM09843 Update Succeeded Update Execution Time 8 milliseconds.
R09647DK
Date Saturday Mar 29, 1980 11:13:00 AM
Loaded from MAINT(294)
R09647DK: ./ R 752000 $ 752000 100 00001000 R09647DK: STCTL C8,C8,0(R1) STORE CR8 @VA09647 00002000 R09647DK: CLC 0(4,R1),ZEROES IS CR8 ZERO? @VA09647 00003000 R09647DK: BE FINCLEAN YES - CONTINUE @VA09647 00004000 R09647DK: LCTL C8,C8,ZEROES ZERO CR8 @VA09647 00005000 R09647DK: ST R3,0(,R1) NO MORE @VA09647 00006000 R09647DK: LA R0,NOENABLN SET MSG LENGTH @VA09647 00007000 R09647DK: LA R1,NOENAB POINT TO MSG @VA09647 00008000 R09647DK: CALL DMKQCNWT,PARM=NORET @VA09647 00009000 R09647DK: FINCLEAN EQU * @VA09647 00010000 R09647DK: ./ I 1222000 $ 1222300 300 00011000 R09647DK: NOENAB DC C'CANNOT ENABLE - MONITOR IN SHUTDOWN - REENTER ENABLE' 00012000 R09647DK: NOENABLN EQU *-NOENAB @VA09647 00013000 BEGIN APPLY >>> ./ R 752000 $ 752000 100 00001000 END APPLY >>> ./ R 752000 $ 752000 100 00001000 BEGIN APPLY >>> ./ I 1222000 $ 1222300 300 00011000 END APPLY >>> ./ I 1222000 $ 1222300 300 00011000 Update Succeeded Update Execution Time 16 milliseconds.
R10215DK
Date Thursday Apr 03, 1980 02:20:00 AM
Loaded from MAINT(294)
R10215DK: ./ I 227000 $ 227300 300 00001000 R10215DK: LTR R1,R1 TEST BUFFER SPACE @VA10215 00002000 R10215DK: BZ NOMORE NO SPACE-LEAVE @VA10215 00003000 R10215DK: ./ I 396000 $ 396300 300 00004000 R10215DK: LTR R1,R1 @VA10215 00005000 R10215DK: BZ TSTPERF @VA10215 00006000 R10215DK: ./ I 553000 $ 553300 300 00007000 R10215DK: LTR R1,R1 @VA10215 00008000 R10215DK: BZR R7 @VA10215 00009000 BEGIN APPLY >>> ./ I 227000 $ 227300 300 00001000 END APPLY >>> ./ I 227000 $ 227300 300 00001000 BEGIN APPLY >>> ./ I 396000 $ 396300 300 00004000 END APPLY >>> ./ I 396000 $ 396300 300 00004000 BEGIN APPLY >>> ./ I 553000 $ 553300 300 00007000 END APPLY >>> ./ I 553000 $ 553300 300 00007000 Update Succeeded Update Execution Time 16 milliseconds.
R11128DK
Date Monday Apr 07, 1980 03:26:00 AM
Loaded from MAINT(294)
R11128DK: ./ I 750000 $ 750200 200 00001000 R11128DK: ST R3,CPCREG8 ZERO PSA VALUE @VA11128 00002000 R11128DK: L R2,PREFIXB GET OTHER PSA @VA11128 00003000 R11128DK: ST R3,CPCREG8(R2) ZERO IT AS WELL @VA11128 00004000 BEGIN APPLY >>> ./ I 750000 $ 750200 200 00001000 END APPLY >>> ./ I 750000 $ 750200 200 00001000 Update Succeeded Update Execution Time 16 milliseconds.
R12005DK
Date Monday Dec 08, 1980 12:01:00 PM
Loaded from MAINT(294)
R12005DK: ./ R 396600 $ 00001000 R12005DK: BZ SECPASS NO BUFF--REBUILD DEV TABLE @VA12005 00002000 BEGIN APPLY >>> ./ R 396600 $ 00001000 END APPLY >>> ./ R 396600 $ 00001000 Update Succeeded Update Execution Time 16 milliseconds.
R12214DK
Date Tuesday Jan 13, 1981 01:13:00 AM
Loaded from MAINT(294)
R12214DK: ./ I 231000 $ 231100 100 00001000 R12214DK: SWITCH @VA12214 00007000 BEGIN APPLY >>> ./ I 231000 $ 231100 100 00001000 END APPLY >>> ./ I 231000 $ 231100 100 00001000 Update Succeeded Update Execution Time 16 milliseconds.
R13063DK
Date Tuesday Apr 07, 1981 03:30:00 AM
Loaded from MAINT(294)
R13063DK: ./ I 353000 $ 353400 400 00001000 R13063DK: LTR R15,R15 DO WE HAVE A BUFFER? @VA13063 00002000 R13063DK: BZ GOLOOP NO-DON'T TRY TO LOAD IT @VA13063 00003000 R13063DK: ./ R 362000 $ 362000 00004000 R13063DK: GOLOOP BCT R0,EXAMDVI BEWARE OF MAX NO. OF DEVICES @VA13063 00005000 R13063DK: ./ R 396300 398000 $ 396300 300 00006000 R13063DK: LR R15,R1 GIVE R15 THE CURRENT POINTER @VA13063 00007000 R13063DK: LH R0,MONDVNUM GET THE NUMBER OF DEVICES @VA13063 00008000 R13063DK: LTR R1,R1 DO WE HAVE A BUFFER? @VA13063 00009000 R13063DK: BZ SECPASS NO - GO WITHOUT IT @VA13063 00010000 R13063DK: USING MN600HDR,R1 @VA13063 00011000 BEGIN APPLY >>> ./ I 353000 $ 353400 400 00001000 END APPLY >>> ./ I 353000 $ 353400 400 00001000 BEGIN APPLY >>> ./ R 362000 $ 362000 00004000 END APPLY >>> ./ R 362000 $ 362000 00004000 BEGIN APPLY >>> ./ R 396300 398000 $ 396300 300 00006000 END APPLY >>> ./ R 396300 398000 $ 396300 300 00006000 Update Succeeded Update Execution Time 16 milliseconds.
R12941DK
Date Tuesday Jul 07, 1981 01:34:00 PM
Loaded from MAINT(294)
R12941DK: ./ * BEGIN APPLY >>> ./ * Comment >>> ./ * END APPLY >>> ./ * Update Succeeded Update Execution Time 16 milliseconds.
ibm/vm370-lib/cp/dmkmni.assemble_hst.txt ยท Last modified: 2023/08/06 13:37 by Site Administrator