ibm:vm370-lib:cp:dmkckp.assemble_hst
Table of Contents
DMKCKP History
References
- Fixes Applied : 17
- Latest Source Date : Wednesday, December 13, 1978
- Last Fix ID : [HRC076DK]
Update History
CMS File Input : DMKCKP ASSEMBLE
Date : 12/13/1978 4:55:00 PM
VM Context : MAINT(394)
File Name : DMKCKP.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM
Update Order
- R09273DK 601 3800 VSPXBLOK REORGANIZED FOR PERFORMANCE
- R09017DK 601 DMKCKP WAIT STATE CODE X'17'
- R09296DK 601 REASSEMBLE FOR V09296
- R09957DK 604 CORRECT IOBLOK CONFLICT IN MSS SUPPORT
- R10076DK 604 CP DUMP SERVICES SUPPORT
- R09276DK 606 UNNEEDED CKPT START IF HUNG DEVICE AFTER WARM START DATA SAVED
- R09139DK 610 CP DMKCKP DOES NOT CHECK SEQUENCE NUMBER OF LOG MESSAGE
- R10546DK 610 FIX ABENDPGT005 IN WARMSTART WITH DEDICATED 3800
- R12228DK 617 UV03026 SPOOL FILE IS INCOMPATIBLE BETWEEN R060 AND VM/SP
- R11232DK 618 UV02264 ABENDPGT002 ABENDPGT003 CHAIN PROBLEMS WITH SPLINKS
- R13748DK 623 UV04992 MSDMKWRM904W IF RECORD ON BUFFER BOUNDARY
- HRC002DK V01 POWEROFF AT SHUTDOWN
- HRC028DK V01 MAKE STARTUP MESSAGE MORE READABLE
- HRC032DK V01 ASK FOR CKPT RESTART IF WARM FAILS
- HRC106DK H40 SYSOWN support for 3375 & 3380 dasd
- HRC075DK V01 Alternate nucleus support
- HRC076DK V01 SHUTDOWN REIPL support
R09273DK
Date Friday Jan 19, 1979 09:15:00 AM
Loaded from MAINT(294)
R09273DK: ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK DMK00010
BEGIN APPLY >>> ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK DMK00010
Comment >>> ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK DMK00010
END APPLY >>> ./ * DUMMY UPDATE FOR REASSEMBLY FOR NEW VSPXBLOK DMK00010
Update Succeeded
Update Execution Time 16 milliseconds.
R09017DK
Date Monday Feb 26, 1979 01:35:00 PM
Loaded from MAINT(294)
R09017DK: ./ R 210000 $ 210100 00001000
R09017DK: MVC PRNPSW(8),WAIT17 SET PROGRAM NEW PSW @VA09017 00002000
R09017DK: ./ R 349000 $ 349100 00003000
R09017DK: LPSW WAIT17 WAIT - ERROR READING CKP PAGE 2 @VA09017 00004000
R09017DK: ./ R 518000 519000 $ 518100 1000 00005000
R09017DK: WAIT17 DC X'000A0000' ERROR LOADING CKP PAGE 2 @VA09017 00006000
R09017DK: DC X'00000017' DISABLE WAIT STATE (CODE 17) @VA09017 00007000
BEGIN APPLY >>> ./ R 210000 $ 210100 00001000
END APPLY >>> ./ R 210000 $ 210100 00001000
BEGIN APPLY >>> ./ R 349000 $ 349100 00003000
END APPLY >>> ./ R 349000 $ 349100 00003000
BEGIN APPLY >>> ./ R 518000 519000 $ 518100 1000 00005000
END APPLY >>> ./ R 518000 519000 $ 518100 1000 00005000
Update Succeeded
Update Execution Time 23 milliseconds.
R09296DK
Date Wednesday Mar 07, 1979 05:31: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.
R09957DK
Date Thursday Jul 12, 1979 09:51: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.
R10076DK
Date Monday Jul 02, 1979 11:07:00 AM
Loaded from MAINT(294)
R10076DK: ./ R 01212000 01214000 $ 1212000 100 04/12/79 08:02:43
R10076DK: SPACE 01212100
R10076DK: * ROUTINE TO MOVE ENTRIES ON 'INCOMPLETE DUMP' CHAIN TO DELETE 01212200
R10076DK: CHK04 DS 0H @V67CAH7 01212300
R10076DK: ICM R3,B'1111',DMKRSPDP POINTER TO DUMPS IN PRC @V67CAH7 01212400
R10076DK: BZ CHK041 NO DUMPS..SKIP LOGIC @V67CAH7 01212500
R10076DK: * NOW ADD DUMPS IN PROCESS TO DELETE CHAIN 01212600
R10076DK: GETNEXT DS 0H @V67CAH7 01212700
R10076DK: LR R14,R3 SAVE LAST POINTER @V67CAH7 01212800
R10076DK: ICM R3,B'1111',SFBPNT-SFBLOK(R14) FORWARD POINTER @V67CAH7 01212900
R10076DK: BNZ GETNEXT MORE SFBLOKS...BRANCH @V67CAH7 01213000
R10076DK: * R14 NOW HAS LAST SFBLOK POINTER ON DUMP CHAIN 01213100
R10076DK: L R3,DMKRSPDL ADDRESS OF DELETE @V67CAH7 01213200
R10076DK: * CHAINS FIRST SFBLOK POINTER 01213300
R10076DK: ST R3,SFBPNT-SFBLOK(,R14) PUT FULL DUMP CHAIN IN @V67CAH7 01213400
R10076DK: * FRONT OF DELETE CHAIN 01213500
R10076DK: * THE DUMP CHAIN NOW HAS IT'S DUMP SFBLOKS FOLLOWED BY 01213600
R10076DK: * THE DELETE CHAIN'S SFBLOK 01213700
R10076DK: * *** NOW ATTACH FULL CHAIN TO DELETE ANCHOR 01213800
R10076DK: L R14,DMKRSPDP GET POINTER TO DUMP @V67CAH7 01213900
R10076DK: * CHAINS FIRST SFBLOK 01214000
R10076DK: ST R14,DMKRSPDL MOVE TO DELETE ANCHOR @V67CAH7 01214100
R10076DK: * NOW BOTH DUMP AND DELETE SFBLOKS ARE ON DELETE CHAIN 01214200
R10076DK: CHK041 DS 0H @V67CAH7 01214300
R10076DK: MVC DLMREC+16(2),DMKRSPID SAVE ID COUNTER IN @V67CAH7 01214400
R10076DK: * DELIMITER RECORD 01214500
R10076DK: ./ I 01618000 $ 1618300 300 04/12/79 08:02:43
R10076DK: DS CL4 CL4'DUMP' @V67CAH7 01618100
R10076DK: DMKRSPDP DS 1F DUMP IN PROGRESS CHAIN @V67CAH7 01618200
BEGIN APPLY >>> ./ R 01212000 01214000 $ 1212000 100 04/12/79 08:02:43
END APPLY >>> ./ R 01212000 01214000 $ 1212000 100 04/12/79 08:02:43
BEGIN APPLY >>> ./ I 01618000 $ 1618300 300 04/12/79 08:02:43
END APPLY >>> ./ I 01618000 $ 1618300 300 04/12/79 08:02:43
Update Succeeded
Update Execution Time 16 milliseconds.
R09276DK
Date Wednesday Oct 31, 1979 10:15:00 AM
Loaded from MAINT(294)
R09276DK: ./ R 234000 235000 $ 234200 200 00001000
R09276DK: BE SHUTSYS YES - GO DO IT @VA09276 00002000
R09276DK: MVC CPID(4),=C'WRM ' INDICATE AUTOMATIC WARM START @VA09276 00003000
R09276DK: MVC IPLPSW(8),WAIT16 LOAD RESTART PSW - WARM START @VA09276 00004000
R09276DK: * DATA SAVED 00005000
R09276DK: B WARM GO WARM START @VA09276 00006000
R09276DK: ./ I 517000 $ 517500 100 00007000
R09276DK: WAIT16 DC X'000A0000' WARM START DATA SAVED-RESTART @VA09276 00008000
R09276DK: DC X'00000016' DISABLE WAIT STATE ( CODE 16 ) @VA09276 00009000
BEGIN APPLY >>> ./ R 234000 235000 $ 234200 200 00001000
END APPLY >>> ./ R 234000 235000 $ 234200 200 00001000
BEGIN APPLY >>> ./ I 517000 $ 517500 100 00007000
END APPLY >>> ./ I 517000 $ 517500 100 00007000
Update Succeeded
Update Execution Time 23 milliseconds.
R09139DK
Date Monday Mar 03, 1980 12:11:00 PM
Loaded from MAINT(294)
R09139DK: ./ I 1063000 $ 1063100 100 00001000
R09139DK: LH R2,6(R5) PICK UP SEQ NUMBER @VA09139 00002000
R09139DK: CH R2,SEQNO GET SAVED SEQUENCE NUMBER @VA09139 00003000
R09139DK: BNE LOGEND NO - BAD LOG MSG CHAIN @VA09139 00004000
R09139DK: LA R2,1(,R2) BUMP SEQ NUMBER @VA09139 00005000
R09139DK: STH R2,SEQNO AND SAVE FOR NEXT TIME THROUGH @VA09139 00006000
R09139DK: ./ I 1067000 $ 1067500 00007000
R09139DK: SEQNO DC H'1' INITIALIZE SEQ NUMBER TO ONE @VA09139 00008000
BEGIN APPLY >>> ./ I 1063000 $ 1063100 100 00001000
END APPLY >>> ./ I 1063000 $ 1063100 100 00001000
BEGIN APPLY >>> ./ I 1067000 $ 1067500 00007000
END APPLY >>> ./ I 1067000 $ 1067500 00007000
Update Succeeded
Update Execution Time 16 milliseconds.
R10546DK
Date Thursday Mar 06, 1980 02:06:00 AM
Loaded from MAINT(294)
R10546DK: ./ I 01377000 $ 01377100 100 00001000
R10546DK: TM RDEVSTAT,RDEVDED DEDICATED 3800? @VA10546 00002000
R10546DK: BO NXTDEV YES,GO ON TO NEXT DEVICE @VA10546 00003000
BEGIN APPLY >>> ./ I 01377000 $ 01377100 100 00001000
END APPLY >>> ./ I 01377000 $ 01377100 100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
R12228DK
Date Friday Nov 21, 1980 02:26:00 PM
Loaded from MAINT(294)
R12228DK: ./ I 00229000 $ 229500 500 10/22/80 09:54:46
R12228DK: MVI BUFFVER,VERR6 MAKE IT TO BE RELEASE 6 VERSION @VA12228 00229500
R12228DK: ./ R 01079000 01080000 $ 1079000 1000 10/22/80 09:54:46
R12228DK: CLC INDEX,=AL2(4096-8-SPSFBSZ*8) WILL FIRST SFBLOK @VA12228 01079000
R12228DK: * FIT (EXPANDED FOR VM/SP) @VA12228 01080000
R12228DK: ./ R 01091000 $ 1091000 1000 10/22/80 09:54:46
R12228DK: MVI SIZE+1,SPSFBSZ*8 SIZE OF ONE SFBLOK (VM/SP) @VA12228 01091000
R12228DK: ./ R 01229000 $ 1229000 1000 10/22/80 09:54:46
R12228DK: CHK05 CLC INDEX,=AL2(4096-8-SPRCSZ*8) WILL FIRST VM/SP @VA12228 01229000
R12228DK: ./ R 01235000 $ 1235000 1000 10/22/80 09:54:46
R12228DK: MVI SIZE+1,SPRCSZ*8 SIZE OF ONE VM/SP RECBLOK @VA12228 01235000
R12228DK: ./ R 01258000 $ 1258000 200 10/22/80 09:54:46
R12228DK: MVC ALLOCBUF(8),RECPNT MOVE RECBLOK HEADER TO BUFFE@VA12228 01258000
R12228DK: MVC ALLOCBUF+8(8),ZEROES ZERO FLAG BYTE @VA12228 01258200
R12228DK: MVC ALLOCBUF+16(16),RECMAP MOVE RECBLOK MAP BITS @VA12228 01258400
R12228DK: MVC ALLOCBUF+32(8),FFS SET UNUSED PAGES ALLOCATED @VA12228 01258600
R12228DK: ./ I 01373000 $ 1373500 500 10/22/80 09:54:46
R12228DK: MVC SFBUFORM,=C'STANDARD' DEFAULT FORM @VA12228 01373500
R12228DK: ./ I 01449000 $ 1449500 500 10/22/80 09:54:46
R12228DK: DROP R3 @VA12228 01449500
R12228DK: ./ I 01581000 $ 1581100 100 10/22/80 09:54:46
R12228DK: CLI SIZE+1,SPSFBSZ*8 WRITING SFBLOK FOR VM/SP? @VA12228 01581100
R12228DK: BNE NOTSPSFB SKIP IF NOT @VA12228 01581200
R12228DK: USING SFBLOK,R1 @VA12228 01581300
R12228DK: MVC SFBUFORM,=C'STANDARD' STANDARD FORM NUMBER @VA12228 01581400
R12228DK: MVC SFBOFORM,=C'STANDARD' FOR USER AND OPER @VA12228 01581500
R12228DK: DROP R1 @VA12228 01581600
R12228DK: NOTSPSFB DS 0H @VA12228 01581700
R12228DK: ./ R 01706000 $ 1706000 200 10/22/80 09:54:46
R12228DK: BUFFVER DS X VERSION OF WARM START DATA @VA12228 01706000
R12228DK: VERNULL EQU X'FF' NULL VERSION NUMBER @VA12228 01706200
R12228DK: VERR6 EQU X'01' RELEASE 6 VERSION OF WARM START @VA12228 01706400
R12228DK: VERSP EQU X'02' VM/SP VERSION OF WARM START @VA12228 01706600
R12228DK: DS 7X @VA12228 01706800
R12228DK: ./ I 01720000 $ 1720100 100 10/22/80 09:54:46
R12228DK: SFBLOK DSECT , CONTINUATION OF SFBLOK @VA12228 01720100
R12228DK: ORG , WITH VM/SP SFBLOK DEFINITIONS @VA12228 01720200
R12228DK: SFBUFORM DS D USER FORM @VA12228 01720300
R12228DK: SFBOFORM DS D OPERATOR FORM @VA12228 01720400
R12228DK: SPSFBSZ EQU (*-SFBLOK+7)/8 VM/SP SFBLOK IS 2 DWRDS LONGER @VA12228 01720500
R12228DK: SPRCSZ EQU 8 VM/SP RECBLOK IS 8 DOUBLEWORDS @VA12228 01720600
BEGIN APPLY >>> ./ I 00229000 $ 229500 500 10/22/80 09:54:46
END APPLY >>> ./ I 00229000 $ 229500 500 10/22/80 09:54:46
BEGIN APPLY >>> ./ R 01079000 01080000 $ 1079000 1000 10/22/80 09:54:46
END APPLY >>> ./ R 01079000 01080000 $ 1079000 1000 10/22/80 09:54:46
BEGIN APPLY >>> ./ R 01091000 $ 1091000 1000 10/22/80 09:54:46
END APPLY >>> ./ R 01091000 $ 1091000 1000 10/22/80 09:54:46
BEGIN APPLY >>> ./ R 01229000 $ 1229000 1000 10/22/80 09:54:46
END APPLY >>> ./ R 01229000 $ 1229000 1000 10/22/80 09:54:46
BEGIN APPLY >>> ./ R 01235000 $ 1235000 1000 10/22/80 09:54:46
END APPLY >>> ./ R 01235000 $ 1235000 1000 10/22/80 09:54:46
BEGIN APPLY >>> ./ R 01258000 $ 1258000 200 10/22/80 09:54:46
END APPLY >>> ./ R 01258000 $ 1258000 200 10/22/80 09:54:46
BEGIN APPLY >>> ./ I 01373000 $ 1373500 500 10/22/80 09:54:46
END APPLY >>> ./ I 01373000 $ 1373500 500 10/22/80 09:54:46
BEGIN APPLY >>> ./ I 01449000 $ 1449500 500 10/22/80 09:54:46
END APPLY >>> ./ I 01449000 $ 1449500 500 10/22/80 09:54:46
BEGIN APPLY >>> ./ I 01581000 $ 1581100 100 10/22/80 09:54:46
END APPLY >>> ./ I 01581000 $ 1581100 100 10/22/80 09:54:46
BEGIN APPLY >>> ./ R 01706000 $ 1706000 200 10/22/80 09:54:46
END APPLY >>> ./ R 01706000 $ 1706000 200 10/22/80 09:54:46
BEGIN APPLY >>> ./ I 01720000 $ 1720100 100 10/22/80 09:54:46
END APPLY >>> ./ I 01720000 $ 1720100 100 10/22/80 09:54:46
Update Succeeded
Update Execution Time 31 milliseconds.
R11232DK
Date Monday Dec 08, 1980 12:01:00 PM
Loaded from MAINT(294)
R11232DK: ./ I 919000 $ 919100 500 00001000
R11232DK: CLI VDEVTYPE,TYP3210 SPOOLED CONSOLE DEVICE @VA11232 00002000
R11232DK: BE CONFILE YES @VA11232 00003000
R11232DK: ./ D 920000 921000 $ 00004000
R11232DK: ./ D 932000 934000 $ 00005000
BEGIN APPLY >>> ./ I 919000 $ 919100 500 00001000
END APPLY >>> ./ I 919000 $ 919100 500 00001000
BEGIN APPLY >>> ./ D 920000 921000 $ 00004000
END APPLY >>> ./ D 920000 921000 $ 00004000
BEGIN APPLY >>> ./ D 932000 934000 $ 00005000
END APPLY >>> ./ D 932000 934000 $ 00005000
Update Succeeded
Update Execution Time 16 milliseconds.
R13748DK
Date Friday Aug 07, 1981 07:20:00 AM
Loaded from MAINT(294)
R13748DK: ./ R 1464000 $ 1464100 00001000
R13748DK: BNH MOVREC NO - MOVE IN RECORD @VA13748 00002000
BEGIN APPLY >>> ./ R 1464000 $ 1464100 00001000
END APPLY >>> ./ R 1464000 $ 1464100 00001000
Update Succeeded
Update Execution Time 16 milliseconds.
HRC002DK
Date Friday Jan 11, 2013 08:30:00 PM
Loaded from MAINT(094)
HRC002DK: ./ I 00265000 $ 265100 100 02/08/06 16:12:11
HRC002DK: TM CPSTAT4,CPPWROFF HRC002DK 00265100
HRC002DK: BZ WAITNOW HRC002DK 00265200
HRC002DK: NI CPSTAT4,255-CPPWROFF HRC002DK 00265300
HRC002DK: MVC PRNPSW(8),WAIT8 HRC002DK 00265400
HRC002DK: LM R2,R3,POWEROFF HRC002DK 00265500
HRC002DK: DC X'8323001F' HRC002DK 00265600
HRC002DK: WAITNOW EQU * HRC002DK 00265700
HRC002DK: ./ I 00266000 $ 266300 300 02/08/06 16:12:11
HRC002DK: POWEROFF DS 0D HRC002DK 00266300
HRC002DK: DC C'POWEROFF' HRC002DK 00266600
BEGIN APPLY >>> ./ I 00265000 $ 265100 100 02/08/06 16:12:11
END APPLY >>> ./ I 00265000 $ 265100 100 02/08/06 16:12:11
BEGIN APPLY >>> ./ I 00266000 $ 266300 300 02/08/06 16:12:11
END APPLY >>> ./ I 00266000 $ 266300 300 02/08/06 16:12:11
Update Succeeded
Update Execution Time 23 milliseconds.
HRC028DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC028DK: ./ R 00285000 $ 285490 490 02/23/06 08:26:54
HRC028DK: MSG960 DC C'DMKCKP960I System' HRC028DK 00285000
HRC028DK: ./ R 00288000 $ 288490 490 02/23/06 08:26:54
HRC028DK: CDATA DC C'data saved' HRC028DK 00288000
HRC028DK: ./ R 00291000 00292000 $ 291590 590 02/23/06 08:26:54
HRC028DK: MSG961 DC C'DMKCKP961W System ' HRC028DK 00291000
HRC028DK: CSHUT DC C'Shutdown Complete' HRC028DK 00292000
HRC028DK: ./ R 00446000 00447000 $ 446590 590 02/23/06 08:26:54
HRC028DK: MSGNUM2 DC C'0W System Recovery failure; ' HRC028DK 00446000
HRC028DK: MSGDATA DC CL24'Program Check' HRC028DK 00447000
HRC028DK: ./ R 00450000 $ 450490 490 02/23/06 08:26:54
HRC028DK: CINVAL DC C'Invalid ' HRC028DK 00450000
HRC028DK: ./ R 00453000 $ 453490 490 02/23/06 08:26:54
HRC028DK: CAREA DC C'area full' HRC028DK 00453000
BEGIN APPLY >>> ./ R 00285000 $ 285490 490 02/23/06 08:26:54
END APPLY >>> ./ R 00285000 $ 285490 490 02/23/06 08:26:54
BEGIN APPLY >>> ./ R 00288000 $ 288490 490 02/23/06 08:26:54
END APPLY >>> ./ R 00288000 $ 288490 490 02/23/06 08:26:54
BEGIN APPLY >>> ./ R 00291000 00292000 $ 291590 590 02/23/06 08:26:54
END APPLY >>> ./ R 00291000 00292000 $ 291590 590 02/23/06 08:26:54
BEGIN APPLY >>> ./ R 00446000 00447000 $ 446590 590 02/23/06 08:26:54
END APPLY >>> ./ R 00446000 00447000 $ 446590 590 02/23/06 08:26:54
BEGIN APPLY >>> ./ R 00450000 $ 450490 490 02/23/06 08:26:54
END APPLY >>> ./ R 00450000 $ 450490 490 02/23/06 08:26:54
BEGIN APPLY >>> ./ R 00453000 $ 453490 490 02/23/06 08:26:54
END APPLY >>> ./ R 00453000 $ 453490 490 02/23/06 08:26:54
Update Succeeded
Update Execution Time 55 milliseconds.
HRC032DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC032DK: ./ R 00602000 00603000 $ 602990 990 02/19/06 15:47:08
HRC032DK: SPACE 2 HRC032DK 00602000
HRC032DK: ./ R 00624000 00625000 $ 624590 590 02/19/06 15:47:08
HRC032DK: * CLC CPID(4),CWARM SYSTEM RESTARTING ? HRC032DK 00624000
HRC032DK: * BNE TERMHIO NO - SKIP ENABLED ADDRESSES HRC032DK 00625000
HRC032DK: ./ R 00834000 00835000 $ 834590 590 02/19/06 15:47:08
HRC032DK: * CLC CPID(4),CWARM SYSTEM RESTARTING ?? HRC032DK 00834000
HRC032DK: * BNE TERMCLOS NO -- DO NOT RECORD HRC032DK 00835000
BEGIN APPLY >>> ./ R 00602000 00603000 $ 602990 990 02/19/06 15:47:08
END APPLY >>> ./ R 00602000 00603000 $ 602990 990 02/19/06 15:47:08
BEGIN APPLY >>> ./ R 00624000 00625000 $ 624590 590 02/19/06 15:47:08
END APPLY >>> ./ R 00624000 00625000 $ 624590 590 02/19/06 15:47:08
BEGIN APPLY >>> ./ R 00834000 00835000 $ 834590 590 02/19/06 15:47:08
END APPLY >>> ./ R 00834000 00835000 $ 834590 590 02/19/06 15:47:08
Update Succeeded
Update Execution Time 31 milliseconds.
HRC106DK
Date Tuesday Feb 16, 2016 04:16:00 PM
Loaded from MAINT(094)
HRC106DK: ./ I 00799000 $ 00799100 100
HRC106DK: MVI PAGECYL,96 Pages/cyl for 3375 HRC106DK
HRC106DK: CLI TYPE,TYP3375 Sysres a 3375 HRC106DK
HRC106DK: BE SETSIZE Yes - HRC106DK
HRC106DK: MVI PAGECYL,150 Pages/cyl for 3380 HRC106DK
HRC106DK: CLI TYPE,TYP3380 Sysres a 3380 HRC106DK
HRC106DK: BE SETSIZE Yes - HRC106DK
HRC106DK: ./ R 01258400 01258600 $ 01258500 100
HRC106DK: MVC ALLOCBUF+16(L'RECMAP),RECMAP Move RECBLOK map HRC106DK
HRC106DK: ./ I 01271000 $ 01271100 50
HRC106DK: CLI RDEVTYPE,TYP3380 3380 device ? HRC106DK
HRC106DK: BNE TST3375 No - check for 3375 HRC106DK
HRC106DK: LA R14,2654 Max cylinder for 3380 (K) HRC106DK
HRC106DK: TM RDEVMDL,RDEVMD83 Triple density 3380? HRC106DK
HRC106DK: BO CYLCMP Check max cyl HRC106DK
HRC106DK: LA R14,1769 Max cylinder for 3380 (E) HRC106DK
HRC106DK: TM RDEVMDL,RDEVMD82 Double density 3380? HRC106DK
HRC106DK: BO CYLCMP Check max cyl HRC106DK
HRC106DK: LA R14,884 Max cylinder for 3380 (A/D/J) HRC106DK
HRC106DK: B CYLCMP Check max cyl HRC106DK
HRC106DK: TST3375 LA R14,958 Max cylinder for 3375 HRC106DK
HRC106DK: CLI RDEVTYPE,TYP3375 3375 device ? HRC106DK
HRC106DK: BE CYLCMP Check max cyl HRC106DK
HRC106DK: ./ I 01546000 $ 01546100 100
HRC106DK: CLI TYPE,TYP3375 3375 ? HRC106DK
HRC106DK: BE HD3375 Yes -- HRC106DK
HRC106DK: CLI TYPE,TYP3380 3380 ? HRC106DK
HRC106DK: BE HD3380 Yes -- HRC106DK
HRC106DK: ./ I 01555000 $ 01555100 100
HRC106DK: HD3375 D R2,=F'8' Divide by 8 Pages per track HRC106DK
HRC106DK: B STOREHD And store head HRC106DK
HRC106DK: SPACE 1 HRC106DK
HRC106DK: HD3380 D R2,=F'10' Divide by 10 Pages per track HRC106DK
HRC106DK: B STOREHD And store head HRC106DK
HRC106DK: SPACE 1 HRC106DK
BEGIN APPLY >>> ./ I 00799000 $ 00799100 100
END APPLY >>> ./ I 00799000 $ 00799100 100
BEGIN APPLY >>> ./ R 01258400 01258600 $ 01258500 100
END APPLY >>> ./ R 01258400 01258600 $ 01258500 100
BEGIN APPLY >>> ./ I 01271000 $ 01271100 50
END APPLY >>> ./ I 01271000 $ 01271100 50
BEGIN APPLY >>> ./ I 01546000 $ 01546100 100
END APPLY >>> ./ I 01546000 $ 01546100 100
BEGIN APPLY >>> ./ I 01555000 $ 01555100 100
END APPLY >>> ./ I 01555000 $ 01555100 100
Update Succeeded
Update Execution Time 39 milliseconds.
HRC075DK
Date Sunday Feb 25, 2018 10:21:00 AM
Loaded from MAINT(094)
HRC075DK: ./ R 00353000 00353000 $ 00353000 500
HRC075DK: SAVERD EQU * HRC075DK
HRC075DK: L R10,SYSRES Get addr of the IPL devive HRC075DK
HRC075DK: ./ R 00557000 00558000 $ 00557000 1000
HRC075DK: L R1,DMKSYSWM -> WRM area cyls info HRC075DK
HRC075DK: MVC TYPE(1),7(R1) Save device type of WRM HRC075DK
HRC075DK: ./ R 01487000 01487000 $ 01487000 500
HRC075DK: L R2,DMKSYSWM -> WRM area cyls info HRC075DK
HRC075DK: LH R2,4(,R2) Get CUU of WRM area volume HRC075DK
HRC075DK: ./ R 01495000 01495000 $ 01495000 500
HRC075DK: IOINT EQU * HRC075DK
HRC075DK: CH R2,INTTIO RIGHT DEVICE ? HRC075DK
BEGIN APPLY >>> ./ R 00353000 00353000 $ 00353000 500
END APPLY >>> ./ R 00353000 00353000 $ 00353000 500
BEGIN APPLY >>> ./ R 00557000 00558000 $ 00557000 1000
END APPLY >>> ./ R 00557000 00558000 $ 00557000 1000
BEGIN APPLY >>> ./ R 01487000 01487000 $ 01487000 500
END APPLY >>> ./ R 01487000 01487000 $ 01487000 500
BEGIN APPLY >>> ./ R 01495000 01495000 $ 01495000 500
END APPLY >>> ./ R 01495000 01495000 $ 01495000 500
Update Succeeded
Update Execution Time 31 milliseconds.
HRC076DK
Date Sunday Feb 25, 2018 10:19:00 AM
Loaded from MAINT(094)
HRC076DK: ./ I 00265000 $ 00265010 10
HRC076DK: TM CPSTAT4,CPREIPL Was SHUTDOWN REIPL in prog? HRC076DK
HRC076DK: BO REIPL Yes HRC076DK
HRC076DK: ./ I 00274000 $ 00274100 30
HRC076DK: * HRC076DK
HRC076DK: REIPL EQU * Here for SHUTDOWN REIPL HRC076DK
HRC076DK: NI CPSTAT4,255-CPREIPL Turn off REIPL flag HRC076DK
HRC076DK: MVC CPID,=C'WARM' Indicate warm start HRC076DK
HRC076DK: XC CSW,CSW Clear prior CSW HRC076DK
HRC076DK: LA R2,WAIT8 -> shutdown complete PSW HRC076DK
HRC076DK: LA R1,READIPL -> IPL CCW string HRC076DK
HRC076DK: ST R1,CAW Set its address in the CAW HRC076DK
HRC076DK: LH R1,SYSIPLDV Get the IPL device address HRC076DK
HRC076DK: STH R1,INTTIO Place as i/o interrupt code HRC076DK
HRC076DK: SIO 0(R1) Issue the read ipl CCW HRC076DK
HRC076DK: BC 4,LOADCK CSW stored; check status HRC076DK
HRC076DK: BC 7,IPLLOAD Error on SIO, load wait PSW HRC076DK
HRC076DK: TIO 0(R1) Loop for i/o completion HRC076DK
HRC076DK: BC 7,*-4 Keep trying HRC076DK
HRC076DK: * HRC076DK
HRC076DK: LOADCK EQU * HRC076DK
HRC076DK: CLI CSW+4,X'0C' CE+DE from i/o operation? HRC076DK
HRC076DK: BNE IPLLOAD No, error. Load WAIT8 PSW HRC076DK
HRC076DK: LA R2,IPLPSW Good read; -> IPL PSW HRC076DK
HRC076DK: * HRC076DK
HRC076DK: IPLLOAD EQU * HRC076DK
HRC076DK: LPSW 0(R2) Load WAIT8 PSW or IPL PSW HRC076DK
HRC076DK: * HRC076DK
HRC076DK: READIPL CCW X'02',X'000000',X'60',24 READ IPL HRC076DK
HRC076DK: CCW X'08',X'000008',0,0 TIC to IPL record CCWs HRC076DK
BEGIN APPLY >>> ./ I 00265000 $ 00265010 10
END APPLY >>> ./ I 00265000 $ 00265010 10
BEGIN APPLY >>> ./ I 00274000 $ 00274100 30
END APPLY >>> ./ I 00274000 $ 00274100 30
Update Succeeded
Update Execution Time 23 milliseconds.
ibm/vm370-lib/cp/dmkckp.assemble_hst.txt · Last modified: 2023/08/06 13:36 by Site Administrator