ibm:vm370-lib:cp:dmkspl.assemble_hst
Table of Contents
DMKSPL History
References
- Fixes Applied : 10
- Latest Source Date : Thursday, December 7, 1978
- Last Fix ID : [HRC106DK]
Update History
CMS File Input : DMKSPL ASSEMBLE
Date : 12/7/1978 5:15:00 PM
VM Context : MAINT(394)
File Name : DMKSPL.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:48 AM
Created : 1/16/2021 7:31:48 AM
Update Order
- R09273DK 601 3800 VSPXBLOK REORGANIZED FOR PERFORMANCE
- R09957DK 604 CORRECT IOBLOK CONFLICT IN MSS SUPPORT
- R10076DK 604 CP DUMP SERVICES SUPPORT
- R09714DK 609 RELOCATE TEST FOR VDEVXFER TO SAVE DMKUDR CALLS
- R11259DK 614 REMOVE INVALID CHARACTER *CP* FROM DMKSPL
- R11560DK 616 UV01902 HELD CONSOLE FILE PRINTS AFTER SHUTDOWN
- R11232DK 618 UV02264 ABENDPGT002 ABENDPGT003 CHAIN PROBLEMS WITH SPLINKS
- R11439DK 618 UV02258 SPOOL XXX PURGE COMMAND PURGES WRONG SPOOLFILE
- R13663DK 623 UV04790 PREVENT ABEND WHEN DOING DETACH BY RANGE
- HRC106DK H40 SYSOWN support for 3375 & 3380 dasd
R09273DK
Date Friday Jan 19, 1979 09:17: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 8 milliseconds.
R09957DK
Date Thursday Jul 12, 1979 09:53: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.
R10076DK
Date Monday Jul 02, 1979 11:07:00 AM
Loaded from MAINT(294)
R10076DK: ./ R 01052000 01053000 $ 1052000 200 04/12/79 08:05:15
R10076DK: TM SFBFLAG,SFBDUMP SYSTEM DUMP OR VMDUMP? @V67CAH7 01052000
R10076DK: BNO NOTDUMP NO...CONTINUE PROCESSING @V67CAH7 01053000
R10076DK: * NOW TEST IF IT IS VMDUMP...IF SO CONTINUE NORMAL PROCESSING 01053100
R10076DK: CLI SFBMISC1+1,C'V' IS THIS DUMP FILE A VMDUMP? @V67CAH7 01053200
R10076DK: BNE DUMPFILE NO...IT'S A CP DUMP, BRANCH @V67CAH7 01053300
R10076DK: * YES...DELETE AS NORMAL FILE 01053400
R10076DK: NOTDUMP DS 0H @V67CAH7 01053500
BEGIN APPLY >>> ./ R 01052000 01053000 $ 1052000 200 04/12/79 08:05:15
END APPLY >>> ./ R 01052000 01053000 $ 1052000 200 04/12/79 08:05:15
Update Succeeded
Update Execution Time 16 milliseconds.
R09714DK
Date Friday Jan 25, 1980 01:24:00 AM
Loaded from MAINT(294)
R09714DK: ./ I 404000 $ 404100 100 00001000
R09714DK: TM VDEVSFLG,VDEVXFER SPOOL TO ? @VA09714 00002000
R09714DK: BO SETHOLD IF SO, DON'T CHANGE DISTCODE AND @VA09714 00003000
R09714DK: * NO NEED TO SEARCH DIRECTORY
R09714DK: ./ D 431330 431660 $
BEGIN APPLY >>> ./ I 404000 $ 404100 100 00001000
END APPLY >>> ./ I 404000 $ 404100 100 00001000
BEGIN APPLY >>> ./ D 431330 431660 $
END APPLY >>> ./ D 431330 431660 $
Update Succeeded
Update Execution Time 16 milliseconds.
R11259DK
Date Tuesday Jul 08, 1980 06:18:00 AM
Loaded from MAINT(294)
R11259DK: ./ R 1011000 1017000 $ 1011100 100 00001000
R11259DK: L R15,APAGCP GET END OF RESIDENT NUCLEUS @VA11259 00002000
R11259DK: CR R12,R15 IS THIS MODULE PAGEABLE ? @VA11259 00003000
R11259DK: BL DLEXIT YES...DON'T ISSUE CALL TO LOCK @VA11259 00004000
R11259DK: * PAGE 00005000
R11259DK: ./ R 1223000 1229000 $ 1223100 100 00006000
R11259DK: L R15,APAGCP GET END OF RESIDENT NUCLEUS @VA11259 00007000
R11259DK: CR R12,R15 IS MODULE RESIDENT ? @VA11259 00008000
R11259DK: BL DRDSP YES...DON'T UNLOCK IT @VA11259 00009000
BEGIN APPLY >>> ./ R 1011000 1017000 $ 1011100 100 00001000
END APPLY >>> ./ R 1011000 1017000 $ 1011100 100 00001000
BEGIN APPLY >>> ./ R 1223000 1229000 $ 1223100 100 00006000
END APPLY >>> ./ R 1223000 1229000 $ 1223100 100 00006000
Update Succeeded
Update Execution Time 16 milliseconds.
R11560DK
Date Monday Sep 15, 1980 08:04:00 AM
Loaded from MAINT(294)
R11560DK: ./ R 138000 $ 138100 00001000
R11560DK: BNE SPNOCON NOT CONSOLE CONTINUE @VA11560 00002000
R11560DK: ./ I 139000 $ 139100 50 00003000
R11560DK: TM VDEVSFLG,VDEVHOLD HOLD ON DEVICE @VA11560 00004000
R11560DK: BZ SPNOCON NO-HOLD CONTINUE @VA11560 00005000
R11560DK: OI SFBFLAG,SFBUHOLD SET USER HOLD @VA11560 00006000
R11560DK: SPNOCON EQU * @VA11560 00007000
BEGIN APPLY >>> ./ R 138000 $ 138100 00001000
END APPLY >>> ./ R 138000 $ 138100 00001000
BEGIN APPLY >>> ./ I 139000 $ 139100 50 00003000
END APPLY >>> ./ I 139000 $ 139100 50 00003000
Update Succeeded
Update Execution Time 16 milliseconds.
R11232DK
Date Monday Dec 08, 1980 12:01:00 PM
Loaded from MAINT(294)
R11232DK: ./ I 35100 $ 35200 100 00001000
R11232DK: EXTRN DMKPGTVR @VA11232 00002000
R11232DK: ./ R 1086000 1086000 $ 1085700 025 00003000
R11232DK: CLI SFBTYPE,TYPRDR REAL RDR FILE @VA11232 00004000
R11232DK: BE TRYLAST YES, SPRMISC MAY NOT = START CCPD@VA11232 00005000
R11232DK: L R0,SFBSTART IS STARTING CCPD = ZERO ? @VA11232 00006000
R11232DK: LTR R0,R0 ZERO @VA11232 00007000
R11232DK: BZ TRYLAST INVALID SFBSTART - TRY SFBLAST @VA11232 00008000
R11232DK: USING SPLINK,R2 ADDRESSABILITY @VA11232 00009000
R11232DK: CALL DMKPGTVG GET A VIRTUAL BUFFER @VA11232 00010000
R11232DK: LTR R1,R1 DID WE GET A BUFFER ? @VA11232 00011000
R11232DK: BZ TRYLAST NO, MUST START BY READING SFBLAST@VA11232 00012000
R11232DK: TRANS 2,1,OPT=(BRING,DEFER,LOCK,SYSTEM),IOER=RELVIRT @VA11232 00013000
R11232DK: CALL DMKRPAGT,PARM=(BRING+SYSTEM) BRING IN START CCPD@VA11232 00014000
R11232DK: BNZ RELBUFF BUFFER READ ERROR @VA11232 00015000
R11232DK: L R3,SPRMISC START CCPD SAVED IN SPRMISC? @VA11232 00016000
R11232DK: SLR R0,R0 ... @VA11232 00017000
R11232DK: CALL DMKRPAGT,PARM=SYSTEM RELEASE STORAGE PAGE @VA11232 00018000
R11232DK: CALL DMKPGTVR RELEASE VIRTUAL BUFFER @VA11232 00019000
R11232DK: LTR R3,R3 SPRMISC CONTAIN START CCPD ? @VA11232 00020000
R11232DK: BZ TRYLAST NO, MUST USE SFBLAST @VA11232 00021000
R11232DK: ST R3,SFBSTART BE SAFE AND USE SPRMISC @VA11232 00022000
R11232DK: B DELSTART CONTINUE TO DEALLOCATE CCPDS @VA11232 00023000
R11232DK: DROP R2 @VA11232 00024000
R11232DK: SPACE 00025000
R11232DK: RELBUFF SLR R0,R0 ... @VA11232 00026000
R11232DK: CALL DMKRPAGT,PARM=SYSTEM RELEASE STORAGE PAGE @VA11232 00027000
R11232DK: RELVIRT CALL DMKPGTVR RELEASE VIRTUAL BUFFER @VA11232 00028000
R11232DK: SPACE 00029000
R11232DK: TRYLAST MVC SFBSTART,SFBLAST POINT TO LAST BUFFER OF FILE @VA11232 00030000
R11232DK: ./ R 1246000 1246000 $ 1246000 100 00031000
R11232DK: READ CCW 6,*-*,SILI,12 MODEL READ CCW @VA11232 00032000
BEGIN APPLY >>> ./ I 35100 $ 35200 100 00001000
END APPLY >>> ./ I 35100 $ 35200 100 00001000
BEGIN APPLY >>> ./ R 1086000 1086000 $ 1085700 025 00003000
END APPLY >>> ./ R 1086000 1086000 $ 1085700 025 00003000
BEGIN APPLY >>> ./ R 1246000 1246000 $ 1246000 100 00031000
END APPLY >>> ./ R 1246000 1246000 $ 1246000 100 00031000
Update Succeeded
Update Execution Time 16 milliseconds.
R11439DK
Date Monday Dec 08, 1980 12:01:00 PM
Loaded from MAINT(294)
R11439DK: ./ I 1049000 $ 1049200 200 00001000
R11439DK: TM SFBFLAG2,SFBPURGE IS THIS A PURGE OF AN OPEN @VA11439 00002000
R11439DK: * SPOOL FILE? 00003000
R11439DK: BO NOCKPT YES THEN IT HASNT BEEN CHECK @VA11439 00004000
R11439DK: * POINTED 00005000
R11439DK: ./ I 1050000 $ 1050500 00006000
R11439DK: NOCKPT DS 0H @VA11439 00007000
BEGIN APPLY >>> ./ I 1049000 $ 1049200 200 00001000
END APPLY >>> ./ I 1049000 $ 1049200 200 00001000
BEGIN APPLY >>> ./ I 1050000 $ 1050500 00006000
END APPLY >>> ./ I 1050000 $ 1050500 00006000
Update Succeeded
Update Execution Time 16 milliseconds.
R13663DK
Date Friday Aug 07, 1981 06:26:00 AM
Loaded from MAINT(294)
R13663DK: ./ I 00815000 $ 00815050 50
R13663DK: OI IOBSPEC,IOBUNSL INDICATE UNSOLICITED INTERRUPT
BEGIN APPLY >>> ./ I 00815000 $ 00815050 50
END APPLY >>> ./ I 00815000 $ 00815050 50
Update Succeeded
Update Execution Time 16 milliseconds.
HRC106DK
Date Tuesday Feb 16, 2016 04:17:00 PM
Loaded from MAINT(094)
HRC106DK: ./ I 01143000 $ 01143100 100
HRC106DK: CLI RDEVTYPE,TYP3375 Paging 3375 ? HRC106DK
HRC106DK: BE SP3375 Yes - HRC106DK
HRC106DK: CLI RDEVTYPE,TYP3380 Paging 3380 ? HRC106DK
HRC106DK: BE SP3380 Yes - HRC106DK
HRC106DK: ./ I 01146000 $ 01146100 100
HRC106DK: SP3375 EQU * Convert page to head(3375) HRC106DK
HRC106DK: D R2,F8 Divide by 8 pages/track HRC106DK
HRC106DK: B STOREHD Go store head HRC106DK
HRC106DK: SP3380 EQU * Convert page to head(3380) HRC106DK
HRC106DK: D R2,F10 Divide by 10 pages/track HRC106DK
HRC106DK: B STOREHD Go store head HRC106DK
BEGIN APPLY >>> ./ I 01143000 $ 01143100 100
END APPLY >>> ./ I 01143000 $ 01143100 100
BEGIN APPLY >>> ./ I 01146000 $ 01146100 100
END APPLY >>> ./ I 01146000 $ 01146100 100
Update Succeeded
Update Execution Time 16 milliseconds.
ibm/vm370-lib/cp/dmkspl.assemble_hst.txt · Last modified: 2023/08/06 13:37 by Site Administrator