ibm:vm370-lib:cp:dmkcqr.assemble_hst
Table of Contents
DMKCQR History
References
- Fixes Applied : 5
- Latest Source Date : Thursday, December 7, 1978
- Last Fix ID : [HRC068DK]
Update History
CMS File Input : DMKCQR ASSEMBLE
Date : 12/7/1978 4:59:00 PM
VM Context : MAINT(394)
File Name : DMKCQR.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM
Update Order
- R09296DK 601 REASSEMBLE FOR V09296
- R09324DK 601 WILD STORE OF 7FFFFFFFFFFFF000 CAUSES ABENDPRG001
- R10074DK 604 PRG009 AFTER VARY OFFLINE OF I/O PROCESSOR, THEN VARY ONLINE
- HRC101DK V02 TERMINAL ENHANCEMENTS LIKE Z/VM
- HRC068DK V01 Shadow table bypass support
R09296DK
Date Monday Jan 29, 1979 02:39:00 PM
Loaded from MAINT(294)
R09296DK: ./ * REASSEMBLE FOR V09296 00001000
BEGIN APPLY >>> ./ * REASSEMBLE FOR V09296 00001000
Comment >>> ./ * REASSEMBLE FOR V09296 00001000
END APPLY >>> ./ * REASSEMBLE FOR V09296 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R09324DK
Date Friday Feb 02, 1979 02:12:00 PM
Loaded from MAINT(294)
R09324DK: ./ I 580000 $ 580010 10
R09324DK: L R8,PAGEWAIT(R11) 1ST WORD OF CURRENT PG WT TOTAL@VA09324
R09324DK: L R9,PAGEWAIT+N4(R11) 2ND WORD OF PG WT TOTAL @VA09324
R09324DK: STM R8,R9,SAVEWRK3 STORE VALUE @VA09324
R09324DK: LA R1,DMKCQRWS(R10) ADDDRESS CORRECT PG.WT. VALUE @VA09324
R09324DK: CLC SAVEWRK3(8),0(R1) PAGEWAIT HIGHER? @VA09324
R09324DK: BNH COMPST1 NO, BRANCH @VA09324
R09324DK: * CONTROL FALLS HERE WHENEVER
R09324DK: * PAGEWAIT IS HIGHER THAN DMKCQRWS.
R09324DK: * THIS OCCURS ONLY WHEN THE LAST Q
R09324DK: * PAGING WAS DONE WHILE THE SYSTEM
R09324DK: * WAS IN AP MODE, AND THE SYSTEM IS
R09324DK: * NOW IN UP MODE DO TO A VARY OFF
R09324DK: * PROCESSOR COMMAND.
R09324DK: MVC 0(8,R1),INITSAVE SAVE PAGE WAIT VALUE @VA09324
R09324DK: COMPST1 DS 0H @VA09324
R09324DK: ./ D 583000 584000
R09324DK: ./ I 726000 $ 726100 100
R09324DK: INITSAVE DC X'7FFFFFFFFFFFF000' INITIAL DMKCQRWS VALUE @VA09324
BEGIN APPLY >>> ./ I 580000 $ 580010 10
END APPLY >>> ./ I 580000 $ 580010 10
BEGIN APPLY >>> ./ D 583000 584000
END APPLY >>> ./ D 583000 584000
BEGIN APPLY >>> ./ I 726000 $ 726100 100
END APPLY >>> ./ I 726000 $ 726100 100
Update Succeeded
Update Execution Time 16 milliseconds.
R10074DK
Date Thursday Jul 05, 1979 04:08:00 PM
Loaded from MAINT(294)
R10074DK: ./ R 576000 $ 576100
R10074DK: TM APSTAT1,PROCIPL IS THIS THE IPL'ED PROCESSOR? @VMV0008
R10074DK: ./ R 609000 $ 609100
R10074DK: TM APSTAT1-PSA(R11),PROCIPL THE IPL'ED PROCESSOR? @VMV0008
BEGIN APPLY >>> ./ R 576000 $ 576100
END APPLY >>> ./ R 576000 $ 576100
BEGIN APPLY >>> ./ R 609000 $ 609100
END APPLY >>> ./ R 609000 $ 609100
Update Succeeded
Update Execution Time 16 milliseconds.
HRC101DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC101DK: ./ R 00917000 00919000 $ 917590 590 03/12/06 12:23:55
HRC101DK: * LINEND XXX, LINEDEL XXX, CHARDEL XXX, ESCAPE XXX, TABCHAR XXXHRC101DK 00917590
HRC101DK: * LINESIZE NNN, ATTN XXX, APL XXX, TEXT XXX, MODE XX, HILIGHT XHRC101DK 00918180
HRC101DK: * AUTOCR XXX, MORE NNN NNN, HOLD XXX, TIMESTAMP XXX HRC101DK 00918770
HRC101DK: *+ |...+....1....+....2....+....3....+....4....+....5....+....6HRC101DK 00919360
HRC101DK: ./ R 00952000 00954000 $ 952990 990 03/12/06 12:23:55
HRC101DK: MVC TERMLINE(L'TERMSG2),TERMSG2 HRC101DK 00952990
HRC101DK: ./ R 00970000 $ 970490 490 03/12/06 12:23:55
HRC101DK: TM RDEVTFLG,RDEVATOF IS ATTN OFF ? HRC101DK 00970490
HRC101DK: ./ D 00980000 00982000 03/12/06 12:23:55
HRC101DK: ./ D 00996000 00998000 03/12/06 12:23:55
HRC101DK: ./ R 01006000 $ 1006490 490 03/12/06 12:23:55
HRC101DK: STCM R6,7,TERMLINE+38 STORE "OFF" HRC101DK 01006000
HRC101DK: ./ R 01015000 $ 1015490 490 03/12/06 12:23:55
HRC101DK: STCM R6,7,TERMLINE+19 STORE "OFF" HRC101DK 01015490
HRC101DK: ./ R 01019000 01020000 $ 1019190 190 03/12/06 12:23:55
HRC101DK: MVC TERMLINE+48(2),=C'VM' FLAG VM MODE HRC101DK 01019190
HRC101DK: TM VMMLVL2,VMMHLITE HIGHLIGHT ON HRC101DK 01019380
HRC101DK: BO WRTLINE2 YES, OK HRC101DK 01019570
HRC101DK: STCM R6,7,TERMLINE+60 STORE OFF HRC101DK 01019760
HRC101DK: WRTLINE2 EQU * HRC101DK 01019950
HRC101DK: LA R0,L'TERMSG2 LENGTH OF OUTPUT LINE HRC101DK 01020140
HRC101DK: ./ I 01023000 $ 1023040 40 03/12/06 12:23:55
HRC101DK: MVC TERMLINE(L'TERMSG3),TERMSG3 HRC101DK 01023040
HRC101DK: TM VMMLVL2,VMMAUTCR AUTOCR ON HRC101DK 01023080
HRC101DK: BO *+8 YES, OK HRC101DK 01023120
HRC101DK: STCM R6,7,TERMLINE+7 STORE OFF HRC101DK 01023160
HRC101DK: SR R1,R1 CLEAR R1 HRC101DK 01023200
HRC101DK: IC R1,VMMOREBP GET BEEP TIME HRC101DK 01023240
HRC101DK: CALL DMKCVTBD CONVERT IT HRC101DK 01023280
HRC101DK: STCM R1,7,TERMLINE+17 STORE IT HRC101DK 01023320
HRC101DK: SR R1,R1 CLEAR R1 HRC101DK 01023360
HRC101DK: IC R1,VMMORECL GET CLEAR TIME HRC101DK 01023400
HRC101DK: CALL DMKCVTBD CONVERT IT HRC101DK 01023440
HRC101DK: STCM R1,7,TERMLINE+21 STORE IT HRC101DK 01023480
HRC101DK: TM VMMLVL2,VMMNHOLD NO HOLD ON ? HRC101DK 01023520
HRC101DK: BNO *+8 NO, OK HRC101DK 01023560
HRC101DK: STCM R6,7,TERMLINE+31 STORE OFF HRC101DK 01023600
HRC101DK: TM VMMLEVEL,VMMSTMP TIME STAMP ON ? HRC101DK 01023720
HRC101DK: BO WRTLINE3 HRC101DK 01023760
HRC101DK: STCM R6,7,TERMLINE+46 STORE OFF HRC101DK 01023800
HRC101DK: WRTLINE3 EQU * HRC101DK 01023840
HRC101DK: LA R0,L'TERMSG3 LENGTH OF OUTPUT LINE HRC101DK 01023880
HRC101DK: LA R1,TERMLINE AND ALSO ITS ADDRESS HRC101DK 01023920
HRC101DK: CALL DMKQCNWT,PARM=NORET GO PRINT IT HRC101DK 01023960
HRC101DK: ./ R 01135000 $ 1135190 190 03/12/06 12:23:55
HRC101DK: TERMSG2 DC C'LINESIZE NNN, ATTN ON , APL ON , TEXT ON , MODE CP, HI*01135190
HRC101DK: LIGHT ON ' HRC101DK 01135380
HRC101DK: TERMSG3 DC C'AUTOCR ON , MORE 050 010, HOLD ON , TIMESTAMP ON ' *01135570
HRC101DK: NEW FUNCTION HRC101DK 01135760
BEGIN APPLY >>> ./ R 00917000 00919000 $ 917590 590 03/12/06 12:23:55
END APPLY >>> ./ R 00917000 00919000 $ 917590 590 03/12/06 12:23:55
BEGIN APPLY >>> ./ R 00952000 00954000 $ 952990 990 03/12/06 12:23:55
END APPLY >>> ./ R 00952000 00954000 $ 952990 990 03/12/06 12:23:55
BEGIN APPLY >>> ./ R 00970000 $ 970490 490 03/12/06 12:23:55
END APPLY >>> ./ R 00970000 $ 970490 490 03/12/06 12:23:55
BEGIN APPLY >>> ./ D 00980000 00982000 03/12/06 12:23:55
END APPLY >>> ./ D 00980000 00982000 03/12/06 12:23:55
BEGIN APPLY >>> ./ D 00996000 00998000 03/12/06 12:23:55
END APPLY >>> ./ D 00996000 00998000 03/12/06 12:23:55
BEGIN APPLY >>> ./ R 01006000 $ 1006490 490 03/12/06 12:23:55
END APPLY >>> ./ R 01006000 $ 1006490 490 03/12/06 12:23:55
BEGIN APPLY >>> ./ R 01015000 $ 1015490 490 03/12/06 12:23:55
END APPLY >>> ./ R 01015000 $ 1015490 490 03/12/06 12:23:55
BEGIN APPLY >>> ./ R 01019000 01020000 $ 1019190 190 03/12/06 12:23:55
END APPLY >>> ./ R 01019000 01020000 $ 1019190 190 03/12/06 12:23:55
BEGIN APPLY >>> ./ I 01023000 $ 1023040 40 03/12/06 12:23:55
END APPLY >>> ./ I 01023000 $ 1023040 40 03/12/06 12:23:55
BEGIN APPLY >>> ./ R 01135000 $ 1135190 190 03/12/06 12:23:55
END APPLY >>> ./ R 01135000 $ 1135190 190 03/12/06 12:23:55
Update Succeeded
Update Execution Time 23 milliseconds.
HRC068DK
Date Monday Mar 27, 2017 12:45:00 PM
Loaded from MAINT(094)
HRC068DK: ./ I 00437000 $ 0437200 10
HRC068DK: CALL DMKQCNWT,PARM=NORET Type msg line 4 HRC068DK
HRC068DK: MVC SETHDR(L'HDRSET5),HDRSET5 Move in line 5 HRC068DK
HRC068DK: TM VMCXSTAT,VMSTBYPS Is STBYPASS active? HRC068DK
HRC068DK: BO *+8 Yes HRC068DK
HRC068DK: STCM R5,B'0111',SETHDR+9 Set msg text OFF HRC068DK
HRC068DK: LA R0,L'HDRSET5 Line 5's length HRC068DK
HRC068DK: LA R1,SETHDR -> buffer start HRC068DK
HRC068DK: ./ I 00449000 $ 0449500 20
HRC068DK: SPACE
HRC068DK: HDRSET5 DC C'STBYPASS VR ' HRC068DK
BEGIN APPLY >>> ./ I 00437000 $ 0437200 10
END APPLY >>> ./ I 00437000 $ 0437200 10
BEGIN APPLY >>> ./ I 00449000 $ 0449500 20
END APPLY >>> ./ I 00449000 $ 0449500 20
Update Succeeded
Update Execution Time 23 milliseconds.
ibm/vm370-lib/cp/dmkcqr.assemble_hst.txt · Last modified: 2023/08/06 13:36 by Site Administrator