ibm:vm370-lib:cp:dmkcfd.assemble_hst
Table of Contents
DMKCFD History
References
- Fixes Applied : 2
- Latest Source Date : Thursday, December 7, 1978
- Last Fix ID : [HRC104DK]
Update History
CMS File Input : DMKCFD ASSEMBLE
Date : 12/7/1978 4:55:00 PM
VM Context : MAINT(394)
File Name : DMKCFD.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM
Update Order
- R12533DK 622 UV04614 ABENDATS001 WHEN STORE COMMAND CHANGES SHR'D PAGE
- HRC104DK V02 LOCATE SYMBOL NAME IN NUCLEUS
R12533DK
Date Tuesday Jun 30, 1981 06:08:00 AM
Loaded from MAINT(294)
R12533DK: ./ I 352000 $ 352500 00001000
R12533DK: LR R2,R8 GET VITURAL ADDRESS @VA12533 00002000
BEGIN APPLY >>> ./ I 352000 $ 352500 00001000
END APPLY >>> ./ I 352000 $ 352500 00001000
Update Succeeded
Update Execution Time 8 milliseconds.
HRC104DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC104DK: ./ I 00087000 $ 87500 500 05/02/06 12:37:28
HRC104DK: EXTRN DMKCPEND,DMKSYMTB HRC104DK 00087500
HRC104DK: ./ I 00112000 $ 112500 500 05/02/06 12:37:28
HRC104DK: * | | SYMBOL_NAME | HRC104DK 00112500
HRC104DK: ./ R 00142000 $ 142190 190 05/02/06 12:37:28
HRC104DK: * SYMBOL = XXXXXX PAGEABLE, REAL = XXXXXX HRC104DK 00142190
HRC104DK: * SYMBOL = XXXXXX RESIDENT HRC104DK 00142190
HRC104DK: * HRC104DK 00142380
HRC104DK: * VMBLOK = XXXXXX HRC104DK 00142570
HRC104DK: ./ I 00156000 $ 156500 500 05/02/06 12:37:28
HRC104DK: * DMKCFD1003E XXXXX WAS NOT FOUND. (THIS WILL BE ADDED) HRC104DK 00156000
HRC104DK: ./ R 00226000 $ 226490 490 05/02/06 12:37:28
HRC104DK: BH SCNSYM BRANCH IF TOO MANY CHARACTERS HRC104DK 00226490
HRC104DK: ./ I 00249000 $ 249010 10 05/02/06 12:37:28
HRC104DK: B CFDWRIT SEND MESSAGE NEXT HRC104DK 00249010
HRC104DK: SPACE , HRC104DK 00249020
HRC104DK: SCNSYM DS 0H HRC104DK 00249030
HRC104DK: LM R2,R3,SAVEWRK2 LOAD LENGTH AND ADDRESS OF ARG. HRC104DK 00249040
HRC104DK: L R1,=A(DMKSYMTB) HRC104DK 00249050
HRC104DK: BCTR R2,0 DECREMENT FOR EXECUTE HRC104DK 00249060
HRC104DK: SPACE , HRC104DK 00249070
HRC104DK: SCNSYMLP DS 0H HRC104DK 00249080
HRC104DK: CLI 0(R1),X'00' END OF LIST? HRC104DK 00249090
HRC104DK: BE SCNSYMDN HRC104DK 00249100
HRC104DK: EX R2,SYMCLC HRC104DK 00249110
HRC104DK: BE SYMFND HRC104DK 00249120
HRC104DK: LA R1,12(,R1) INCREMENT TO NEXT HRC104DK 00249130
HRC104DK: B SCNSYMLP HRC104DK 00249140
HRC104DK: SPACE , HRC104DK 00249150
HRC104DK: SYMCLC CLC 0(0,R3),0(R1) HRC104DK 00249160
HRC104DK: SPACE , HRC104DK 00249170
HRC104DK: SCNSYMDN DS 0H HRC104DK 00249180
HRC104DK: B CFD1003 HRC104DK 00249190
HRC104DK: SPACE , HRC104DK 00249200
HRC104DK: SYMFND DS 0H HRC104DK 00249210
HRC104DK: LR R3,R1 GET ADDRESS OF DATA HRC104DK 00249220
HRC104DK: LA R0,SYMMSGSZ HRC104DK 00249230
HRC104DK: CALL DMKFREE GET BUFFER HRC104DK 00249240
HRC104DK: LR R10,R1 HRC104DK 00249250
HRC104DK: USING SYMMSG,R10 HRC104DK 00249260
HRC104DK: MVC SYMBOL,0(R3) MOVE SYMBOL NAME HRC104DK 00249270
HRC104DK: MVC SYMBOL+8,=C' = ' HRC104DK 00249280
HRC104DK: L R1,8(R3) GET ADDRESS OF DATA HRC104DK 00249290
HRC104DK: CALL DMKCVTBH HRC104DK 00249300
HRC104DK: STCM R0,B'0011',SYMADR HRC104DK 00249310
HRC104DK: STCM R1,B'1111',SYMADR+2 HRC104DK 00249320
HRC104DK: MVC SYMRES,=C' RESIDENT' HRC104DK 00249330
HRC104DK: LA R0,26 HRC104DK 00249340
HRC104DK: L R2,8(R3) GET ADDRESS OF DATA HRC104DK 00249350
HRC104DK: CL R2,=A(DMKCPEND) END OF NUCLEUS HRC104DK 00249360
HRC104DK: BNH SYMADDR HRC104DK 00249370
HRC104DK: MVC SYMRES,=C' PAGEABLE' HRC104DK 00249380
HRC104DK: L R15,ASYSVM SYSTEM VMBLOK HRC104DK 00249390
HRC104DK: LCTL C1,C1,VMSEG-VMBLOK(R15) SEGMENT TABLE HRC104DK 00249400
HRC104DK: LRA R1,0(0,R2) GET REAL ADDRESS HRC104DK 00249410
HRC104DK: BNZ SYMNREAL HRC104DK 00249420
HRC104DK: LCTL C1,C1,VMSEG RESTORE USERS SEGMENT TABLE HRC104DK 00249430
HRC104DK: MVC SYMREAL,=C', REAL = ' HRC104DK 00249440
HRC104DK: CALL DMKCVTBH HRC104DK 00249450
HRC104DK: STCM R0,B'0011',SYMRADR HRC104DK 00249460
HRC104DK: STCM R1,B'1111',SYMRADR+2 HRC104DK 00249470
HRC104DK: LA R0,41 HRC104DK 00249480
HRC104DK: B SYMADDR HRC104DK 00249490
HRC104DK: SPACE , HRC104DK 00249500
HRC104DK: SYMNREAL DS 0H HRC104DK 00249510
HRC104DK: LCTL C1,C1,VMSEG RESTORE USERS SEGMENT TABLE HRC104DK 00249520
HRC104DK: SPACE , HRC104DK 00249530
HRC104DK: SYMADDR DS 0H HRC104DK 00249540
HRC104DK: LR R1,R10 HRC104DK 00249550
HRC104DK: CALL DMKQCNWT,PARM=NORET SEND MESSAGE HRC104DK 00249560
HRC104DK: LA R0,SYMMSGSZ SIZE OF BUFFER HRC104DK 00249570
HRC104DK: B CFDFRET HRC104DK 00249580
HRC104DK: ./ R 00255000 $ 255490 490 05/02/06 12:37:28
HRC104DK: CFDFRET LR R1,R10 ADDRESS OF BUFFER HRC104DK 00255490
HRC104DK: ./ I 00411000 $ 411500 500 05/02/06 12:37:28
HRC104DK: CFD1003 EQU * LATER HRC104DK
HRC104DK: ./ I 00443000 $ 443100 100 05/02/06 12:37:28
HRC104DK: SPACE 3 , HRC104DK 00443100
HRC104DK: SYMMSG DSECT HRC104DK 00443200
HRC104DK: SYMBOL DS CL8 HRC104DK 00443300
HRC104DK: DS CL3 HRC104DK 00443400
HRC104DK: SYMADR DS CL6 HRC104DK 00443500
HRC104DK: SYMRES DS CL9 HRC104DK 00443600
HRC104DK: SYMREAL DS CL9 ', REAL = ' HRC104DK 00443700
HRC104DK: SYMRADR DS CL6 HRC104DK 00443800
HRC104DK: SYMMSGSZ EQU (*-SYMMSG+7)/8 SIZE IN DOUBLE WORDS HRC104DK 00443900
BEGIN APPLY >>> ./ I 00087000 $ 87500 500 05/02/06 12:37:28
END APPLY >>> ./ I 00087000 $ 87500 500 05/02/06 12:37:28
BEGIN APPLY >>> ./ I 00112000 $ 112500 500 05/02/06 12:37:28
END APPLY >>> ./ I 00112000 $ 112500 500 05/02/06 12:37:28
BEGIN APPLY >>> ./ R 00142000 $ 142190 190 05/02/06 12:37:28
END APPLY >>> ./ R 00142000 $ 142190 190 05/02/06 12:37:28
BEGIN APPLY >>> ./ I 00156000 $ 156500 500 05/02/06 12:37:28
END APPLY >>> ./ I 00156000 $ 156500 500 05/02/06 12:37:28
BEGIN APPLY >>> ./ R 00226000 $ 226490 490 05/02/06 12:37:28
END APPLY >>> ./ R 00226000 $ 226490 490 05/02/06 12:37:28
BEGIN APPLY >>> ./ I 00249000 $ 249010 10 05/02/06 12:37:28
END APPLY >>> ./ I 00249000 $ 249010 10 05/02/06 12:37:28
BEGIN APPLY >>> ./ R 00255000 $ 255490 490 05/02/06 12:37:28
END APPLY >>> ./ R 00255000 $ 255490 490 05/02/06 12:37:28
BEGIN APPLY >>> ./ I 00411000 $ 411500 500 05/02/06 12:37:28
END APPLY >>> ./ I 00411000 $ 411500 500 05/02/06 12:37:28
BEGIN APPLY >>> ./ I 00443000 $ 443100 100 05/02/06 12:37:28
END APPLY >>> ./ I 00443000 $ 443100 100 05/02/06 12:37:28
Update Succeeded
Update Execution Time 23 milliseconds.
ibm/vm370-lib/cp/dmkcfd.assemble_hst.txt · Last modified: 2023/08/06 13:36 by Site Administrator