ibm:vm370-lib:cp:dmkbox.assemble_hst
Table of Contents
DMKBOX History
References
- Fixes Applied : 4
- Latest Source Date : Thursday, December 7, 1978
- Last Fix ID : [HRC073DK]
Update History
CMS File Input : DMKBOX ASSEMBLE
Date : 12/7/1978 4:54:00 PM
VM Context : MAINT(394)
File Name : DMKBOX.ASSEMBLE.Z1.txt
Modified : 1/16/2021 7:31:45 AM
Created : 1/16/2021 7:31:45 AM
Update Order
- HRC029DK V01 UPDATE TO SUPPORT 24 PFS AND LARGER LOGO
- HRC101DK V02 TERMINAL ENHANCEMENTS LIKE Z/VM
- HRC370DK V03 Update logo for VM/370 SixPack
- HRC073DK V01 Support for 3278 model 5 devices
HRC029DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC029DK: ./ R 00007000 00022000 $ 7890 890 02/13/06 15:36:39 HRC029DK: DC CL46' ' 00007890 HRC029DK: DC CL46' VV VV MM MM 3333 77777 000 ' 00008780 HRC029DK: DC CL46' VV VV MMMMM // 3 77 0 0 ' 00009670 HRC029DK: DC CL46' VV VV M M M // 333 77 0 0 ' 00010560 HRC029DK: DC CL46' VVVV M M // 3 77 0 0 ' 00011450 HRC029DK: DC CL46' VV M M 3333 77 000 ' 00012340 HRC029DK: DC CL46' ' 00013230 HRC029DK: DC CL46' ========================================== ' 00014120 HRC029DK: DC CL46' ' 00015010 HRC029DK: DC CL46' H H EEEE RRRR CCC U U L EEEE SSSS ' 00015900 HRC029DK: DC CL46' H H E R R C U U L E S ' 00016790 HRC029DK: DC CL46' HHHH EEE RRRR C U U L EEE SSS ' 00017680 HRC029DK: DC CL46' H H E R R C U U L E S ' 00018570 HRC029DK: DC CL46' H H EEEE R R CCC UU LLLL EEEE SSSS ' 00019460 HRC029DK: DC CL46' ' 00020350 HRC029DK: DC CL46' ' 00021240 BEGIN APPLY >>> ./ R 00007000 00022000 $ 7890 890 02/13/06 15:36:39 END APPLY >>> ./ R 00007000 00022000 $ 7890 890 02/13/06 15:36:39 Update Succeeded Update Execution Time 16 milliseconds.
HRC101DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC101DK: ./ I 00001000 $ 1040 40 03/08/06 15:52:43 HRC101DK: MACRO HRC101DK 00001040 HRC101DK: &LABEL LOGO &X,&Y,&LINE HRC101DK 00001080 HRC101DK: GBLC &INDEXES,&INIT HRC101DK 00001120 HRC101DK: LCLA &A,&B,&C HRC101DK 00001160 HRC101DK: LCLC &XVAL,&YVAL HRC101DK 00001200 HRC101DK: AIF ( '&X' EQ '' ).NOX HRC101DK 00001240 HRC101DK: AIF ( '&Y' EQ '' ).NOY HRC101DK 00001280 HRC101DK: AIF ('&INIT' EQ 'YES').NOINIT HRC101DK 00001320 HRC101DK: $INIT HRC101DK 00001360 HRC101DK: .NOINIT ANOP HRC101DK 00001400 HRC101DK: &C SETA (&X*80)+&Y-81 HRC101DK 00001440 HRC101DK: &A SETA &C/64 HRC101DK 00001480 HRC101DK: &B SETA &C-(&A*64) HRC101DK 00001520 HRC101DK: &A SETA 1+&A+&A HRC101DK 00001560 HRC101DK: &B SETA 1+&B+&B HRC101DK 00001600 HRC101DK: &XVAL SETC '&INDEXES'(&A,2) HRC101DK 00001640 HRC101DK: &YVAL SETC '&INDEXES'(&B,2) HRC101DK 00001680 HRC101DK: DC X'11&XVAL.&YVAL',CL46&LINE HRC101DK 00001720 HRC101DK: MEXIT , HRC101DK 00001760 HRC101DK: .NOX MNOTE 8,'NO X VALUE SPECIFIED' HRC101DK 00001800 HRC101DK: MEXIT , HRC101DK 00001840 HRC101DK: .NOY MNOTE 8,'NO Y VALUE SPECIFIED' HRC101DK 00001880 HRC101DK: MEND , HRC101DK 00001920 HRC101DK: EJECT , HRC101DK 00001960 HRC101DK: ./ I 00004000 $ 4500 500 03/08/06 15:52:43 HRC101DK: ENTRY DMKBOXMD HRC101DK 00004500 HRC101DK: ./ I 00005000 $ 5010 10 03/08/06 15:52:43 HRC101DK: SPACE , HRC101DK 00005010 HRC101DK: DMKBOXMD DC A(DMKBOX02,DMKBOX03,DMKBOX04,DMKBOX2A) HRC101DK 00005020 HRC101DK: SPACE , HRC101DK 00005030 HRC101DK: DMKBOX02 DS 0H HRC101DK 00005040 HRC101DK: DC AL2(DMKBXL02) HRC101DK 00005050 HRC101DK: LOGO 5,18,' ' HRC101DK 00005060 HRC101DK: LOGO 6,18,' VV VV MM MM 3333 77777 000 ' HRC101DK 00005070 HRC101DK: LOGO 7,18,' VV VV MMMMM // 3 77 0 0 ' HRC101DK 00005080 HRC101DK: LOGO 8,18,' VV VV M M M // 333 77 0 0 ' HRC101DK 00005090 HRC101DK: LOGO 9,18,' VVVV M M // 3 77 0 0 ' HRC101DK 00005100 HRC101DK: LOGO 10,18,' VV M M 3333 77 000 ' HRC101DK 00005110 HRC101DK: LOGO 11,18,' ' HRC101DK 00005120 HRC101DK: LOGO 12,18,' ========================================== ' HRC101DK 00005130 HRC101DK: LOGO 13,18,' ' HRC101DK 00005140 HRC101DK: LOGO 14,18,' H H EEEE RRRR CCC U U L EEEE SSSS ' HRC101DK 00005150 HRC101DK: LOGO 15,18,' H H E R R C U U L E S ' HRC101DK 00005160 HRC101DK: LOGO 16,18,' HHHH EEE RRRR C U U L EEE SSS ' HRC101DK 00005170 HRC101DK: LOGO 17,18,' H H E R R C U U L E S ' HRC101DK 00005180 HRC101DK: LOGO 18,18,' H H EEEE R R CCC UU LLLL EEEE SSSS ' HRC101DK 00005190 HRC101DK: LOGO 19,18,' ' HRC101DK 00005200 HRC101DK: LOGO 20,18,' ' HRC101DK 00005210 HRC101DK: DMKBXL02 EQU *-DMKBOX02 HRC101DK 00005220 HRC101DK: DMKBOX2A EQU DMKBOX02 HRC101DK 00005230 HRC101DK: EJECT , HRC101DK 00005240 HRC101DK: DMKBOX03 DS 0H HRC101DK 00005250 HRC101DK: DC AL2(DMKBXL03) HRC101DK 00005260 HRC101DK: LOGO 9,18,' ' HRC101DK 00005270 HRC101DK: LOGO 10,18,' VV VV MM MM 3333 77777 000 ' HRC101DK 00005280 HRC101DK: LOGO 11,18,' VV VV MMMMM // 3 77 0 0 ' HRC101DK 00005290 HRC101DK: LOGO 12,18,' VV VV M M M // 333 77 0 0 ' HRC101DK 00005300 HRC101DK: LOGO 13,18,' VVVV M M // 3 77 0 0 ' HRC101DK 00005310 HRC101DK: LOGO 14,18,' VV M M 3333 77 000 ' HRC101DK 00005320 HRC101DK: LOGO 15,18,' ' HRC101DK 00005330 HRC101DK: LOGO 16,18,' ========================================== ' HRC101DK 00005340 HRC101DK: LOGO 17,18,' ' HRC101DK 00005350 HRC101DK: LOGO 18,18,' H H EEEE RRRR CCC U U L EEEE SSSS ' HRC101DK 00005360 HRC101DK: LOGO 19,18,' H H E R R C U U L E S ' HRC101DK 00005370 HRC101DK: LOGO 20,18,' HHHH EEE RRRR C U U L EEE SSS ' HRC101DK 00005380 HRC101DK: LOGO 21,18,' H H E R R C U U L E S ' HRC101DK 00005390 HRC101DK: LOGO 22,18,' H H EEEE R R CCC UU LLLL EEEE SSSS ' HRC101DK 00005400 HRC101DK: LOGO 23,18,' ' HRC101DK 00005410 HRC101DK: LOGO 24,18,' ' HRC101DK 00005420 HRC101DK: DMKBXL03 EQU *-DMKBOX03 HRC101DK 00005430 HRC101DK: EJECT , HRC101DK 00005440 HRC101DK: DMKBOX04 DS 0H HRC101DK 00005450 HRC101DK: DC AL2(DMKBXL04) HRC101DK 00005460 HRC101DK: LOGO 14,18,' ' HRC101DK 00005470 HRC101DK: LOGO 15,18,' VV VV MM MM 3333 77777 000 ' HRC101DK 00005480 HRC101DK: LOGO 16,18,' VV VV MMMMM // 3 77 0 0 ' HRC101DK 00005490 HRC101DK: LOGO 17,18,' VV VV M M M // 333 77 0 0 ' HRC101DK 00005500 HRC101DK: LOGO 18,18,' VVVV M M // 3 77 0 0 ' HRC101DK 00005510 HRC101DK: LOGO 19,18,' VV M M 3333 77 000 ' HRC101DK 00005520 HRC101DK: LOGO 20,18,' ' HRC101DK 00005530 HRC101DK: LOGO 21,18,' ========================================== ' HRC101DK 00005540 HRC101DK: LOGO 22,18,' ' HRC101DK 00005550 HRC101DK: LOGO 23,18,' H H EEEE RRRR CCC U U L EEEE SSSS ' HRC101DK 00005560 HRC101DK: LOGO 24,18,' H H E R R C U U L E S ' HRC101DK 00005570 HRC101DK: LOGO 25,18,' HHHH EEE RRRR C U U L EEE SSS ' HRC101DK 00005580 HRC101DK: LOGO 26,18,' H H E R R C U U L E S ' HRC101DK 00005590 HRC101DK: LOGO 27,18,' H H EEEE R R CCC UU LLLL EEEE SSSS ' HRC101DK 00005600 HRC101DK: LOGO 28,18,' ' HRC101DK 00005610 HRC101DK: LOGO 29,18,' ' HRC101DK 00005620 HRC101DK: DMKBXL04 EQU *-DMKBOX04 HRC101DK 00005630 HRC101DK: EJECT , HRC101DK 00005640 BEGIN APPLY >>> ./ I 00001000 $ 1040 40 03/08/06 15:52:43 END APPLY >>> ./ I 00001000 $ 1040 40 03/08/06 15:52:43 BEGIN APPLY >>> ./ I 00004000 $ 4500 500 03/08/06 15:52:43 END APPLY >>> ./ I 00004000 $ 4500 500 03/08/06 15:52:43 BEGIN APPLY >>> ./ I 00005000 $ 5010 10 03/08/06 15:52:43 END APPLY >>> ./ I 00005000 $ 5010 10 03/08/06 15:52:43 Update Succeeded Update Execution Time 23 milliseconds.
HRC370DK
Date Tuesday Jan 01, 2013 05:53:00 PM
Loaded from MAINT(094)
HRC370DK: ./ R 00005010 00005640 $ 5010 10 07/12/10 16:22:58 HRC370DK: SPACE , HRC370DK 00005010 HRC370DK: DMKBOXMD DC A(DMKBOX02,DMKBOX03,DMKBOX04,DMKBOX2A) HRC370DK 00005020 HRC370DK: SPACE , HRC370DK 00005030 HRC370DK: DMKBOX02 DS 0H HRC370DK 00005040 HRC370DK: DC AL2(DMKBXL02) HRC370DK 00005050 HRC370DK: LOGO 5,18,' VV VV MM MM ' HRC370DK 00005060 HRC370DK: LOGO 6,18,' VV VV MMM MMM ' HRC370DK 00005070 HRC370DK: LOGO 7,18,' 3333333333 777777777777 MM00000000 ' HRC370DK 00005080 HRC370DK: LOGO 8,18,' 333333333333 77777777777MM MM0000000000 ' HRC370DK 00005090 HRC370DK: LOGO 9,18,' 33 VV33 77VV 77 MMMM00MM 00 ' HRC370DK 00005100 HRC370DK: LOGO 10,18,' V33 VV 77M MM 00MM 00 ' HRC370DK 00005110 HRC370DK: LOGO 11,18,' 33 VV 77MM 00MM 00 ' HRC370DK 00005120 HRC370DK: LOGO 12,18,' 3333VV VV 77 MM 00MM 00 ' HRC370DK 00005130 HRC370DK: LOGO 13,18,' 3333 VVVV 77 MM 00MM 00 ' HRC370DK 00005140 HRC370DK: LOGO 14,18,' 33 VV 77 MM 00MM 00 ' HRC370DK 00005150 HRC370DK: LOGO 15,18,' 33 77 00 00 ' HRC370DK 00005160 HRC370DK: LOGO 16,18,' 33 33 77 00 00 ' HRC370DK 00005170 HRC370DK: LOGO 17,18,' 333333333333 77 0000000000 ' HRC370DK 00005180 HRC370DK: LOGO 18,18,' 3333333333 77 00000000 ' HRC370DK 00005190 HRC370DK: LOGO 19,18,' ' HRC370DK 00005200 HRC370DK: LOGO 20,18,' VM/370 Release 6 "SixPack" version 1.2 ' HRC370DK 00005210 HRC370DK: DMKBXL02 EQU *-DMKBOX02-2 HRC370DK 00005220 HRC370DK: DMKBOX2A EQU DMKBOX02 HRC370DK 00005230 HRC370DK: EJECT , HRC370DK 00005240 HRC370DK: DMKBOX03 DS 0H HRC370DK 00005250 HRC370DK: DC AL2(DMKBXL03) HRC370DK 00005260 HRC370DK: LOGO 9,18,' VV VV MM MM ' HRC370DK 00005270 HRC370DK: LOGO 10,18,' VV VV MMM MMM ' HRC370DK 00005280 HRC370DK: LOGO 11,18,' 3333333333 777777777777 MM00000000 ' HRC370DK 00005290 HRC370DK: LOGO 12,18,' 333333333333 77777777777MM MM0000000000 ' HRC370DK 00005300 HRC370DK: LOGO 13,18,' 33 VV33 77VV 77 MMMM00MM 00 ' HRC370DK 00005310 HRC370DK: LOGO 14,18,' V33 VV 77M MM 00MM 00 ' HRC370DK 00005320 HRC370DK: LOGO 15,18,' 33 VV 77MM 00MM 00 ' HRC370DK 00005330 HRC370DK: LOGO 16,18,' 3333VV VV 77 MM 00MM 00 ' HRC370DK 00005340 HRC370DK: LOGO 17,18,' 3333 VVVV 77 MM 00MM 00 ' HRC370DK 00005350 HRC370DK: LOGO 18,18,' 33 VV 77 MM 00MM 00 ' HRC370DK 00005360 HRC370DK: LOGO 19,18,' 33 77 00 00 ' HRC370DK 00005370 HRC370DK: LOGO 20,18,' 33 33 77 00 00 ' HRC370DK 00005380 HRC370DK: LOGO 21,18,' 333333333333 77 0000000000 ' HRC370DK 00005390 HRC370DK: LOGO 22,18,' 3333333333 77 00000000 ' HRC370DK 00005400 HRC370DK: LOGO 23,18,' ' HRC370DK 00005410 HRC370DK: LOGO 24,18,' VM/370 Release 6 "SixPack" version 1.2 ' HRC370DK 00005420 HRC370DK: DMKBXL03 EQU *-DMKBOX03-2 HRC370DK 00005430 HRC370DK: EJECT , HRC370DK 00005440 HRC370DK: DMKBOX04 DS 0H HRC370DK 00005450 HRC370DK: DC AL2(DMKBXL04) HRC370DK 00005460 HRC370DK: LOGO 14,18,' VV VV MM MM ' HRC370DK 00005470 HRC370DK: LOGO 15,18,' VV VV MMM MMM ' HRC370DK 00005480 HRC370DK: LOGO 16,18,' 3333333333 777777777777 MM00000000 ' HRC370DK 00005490 HRC370DK: LOGO 17,18,' 333333333333 77777777777MM MM0000000000 ' HRC370DK 00005500 HRC370DK: LOGO 18,18,' 33 VV33 77VV 77 MMMM00MM 00 ' HRC370DK 00005510 HRC370DK: LOGO 19,18,' V33 VV 77M MM 00MM 00 ' HRC370DK 00005520 HRC370DK: LOGO 20,18,' 33 VV 77MM 00MM 00 ' HRC370DK 00005530 HRC370DK: LOGO 21,18,' 3333VV VV 77 MM 00MM 00 ' HRC370DK 00005540 HRC370DK: LOGO 22,18,' 3333 VVVV 77 MM 00MM 00 ' HRC370DK 00005550 HRC370DK: LOGO 23,18,' 33 VV 77 MM 00MM 00 ' HRC370DK 00005560 HRC370DK: LOGO 24,18,' 33 77 00 00 ' HRC370DK 00005570 HRC370DK: LOGO 25,18,' 33 33 77 00 00 ' HRC370DK 00005580 HRC370DK: LOGO 26,18,' 333333333333 77 0000000000 ' HRC370DK 00005590 HRC370DK: LOGO 27,18,' 3333333333 77 00000000 ' HRC370DK 00005600 HRC370DK: LOGO 28,18,' ' HRC370DK 00005610 HRC370DK: LOGO 29,18,' VM/370 Release 6 "SixPack" version 1.2 ' HRC370DK 00005620 HRC370DK: DMKBXL04 EQU *-DMKBOX04-2 HRC370DK 00005630 HRC370DK: EJECT , HRC370DK 00005640 HRC370DK: ./ R 00006000 00021240 $ 6010 10 07/12/10 16:22:58 HRC370DK: DMKBOXBX EQU * HRC370DK 00006010 HRC370DK: DC CL46' VV VV MM MM ' HRC370DK 00006020 HRC370DK: DC CL46' VV VV MMM MMM ' HRC370DK 00006030 HRC370DK: DC CL46' 3333333333 777777777777 MM00000000 ' HRC370DK 00006040 HRC370DK: DC CL46'333333333333 77777777777MM MM0000000000 ' HRC370DK 00006050 HRC370DK: DC CL46'33 VV33 77VV 77 MMMM00MM 00 ' HRC370DK 00006060 HRC370DK: DC CL46' V33 VV 77M MM 00MM 00 ' HRC370DK 00006070 HRC370DK: DC CL46' 33 VV 77MM 00MM 00 ' HRC370DK 00006080 HRC370DK: DC CL46' 3333VV VV 77 MM 00MM 00 ' HRC370DK 00006090 HRC370DK: DC CL46' 3333 VVVV 77 MM 00MM 00 ' HRC370DK 00006100 HRC370DK: DC CL46' 33 VV 77 MM 00MM 00 ' HRC370DK 00006110 HRC370DK: DC CL46' 33 77 00 00 ' HRC370DK 00006120 HRC370DK: DC CL46'33 33 77 00 00 ' HRC370DK 00006130 HRC370DK: DC CL46'333333333333 77 0000000000 ' HRC370DK 00006140 HRC370DK: DC CL46' 3333333333 77 00000000 ' HRC370DK 00006150 HRC370DK: DC CL46' ' HRC370DK 00006160 HRC370DK: DC CL46' VM/370 Release 6 "SixPack" version 1.2 ' HRC370DK 00006170 BEGIN APPLY >>> ./ R 00005010 00005640 $ 5010 10 07/12/10 16:22:58 END APPLY >>> ./ R 00005010 00005640 $ 5010 10 07/12/10 16:22:58 BEGIN APPLY >>> ./ R 00006000 00021240 $ 6010 10 07/12/10 16:22:58 END APPLY >>> ./ R 00006000 00021240 $ 6010 10 07/12/10 16:22:58 Update Succeeded Update Execution Time 16 milliseconds.
HRC073DK
Date Wednesday Feb 07, 2018 03:28:00 PM
Loaded from MAINT(094)
HRC073DK: ./ I 00005020 $ 00005025 1 HRC073DK: DC A(DMKBOX05) HRC073DK HRC073DK: ./ I 00005640 $ 00005700 10 HRC073DK: DMKBOX05 DS 0H HRC073DK HRC073DK: DC AL2(DMKBXL05) HRC073DK HRC073DK: LOGO 11,35,' VV VV MM MM ' HRC073DK HRC073DK: LOGO 13,07,' VV VV MMM MMM ' HRC073DK HRC073DK: LOGO 14,59,' 3333333333 777777777777 MM00000000 ' HRC073DK HRC073DK: LOGO 16,31,' 333333333333 77777777777MM MM0000000000 ' HRC073DK HRC073DK: LOGO 18,03,' 33 VV33 77VV 77 MMMM00MM 00 ' HRC073DK HRC073DK: LOGO 19,55,' V33 VV 77M MM 00MM 00 ' HRC073DK HRC073DK: LOGO 21,27,' 33 VV 77MM 00MM 00 ' HRC073DK HRC073DK: LOGO 22,79,' 3333VV VV 77 MM 00MM 00 ' HRC073DK HRC073DK: LOGO 24,51,' 3333 VVVV 77 MM 00MM 00 ' HRC073DK HRC073DK: LOGO 26,23,' 33 VV 77 MM 00MM 00 ' HRC073DK HRC073DK: LOGO 27,75,' 33 77 00 00 ' HRC073DK HRC073DK: LOGO 29,47,' 33 33 77 00 00 ' HRC073DK HRC073DK: LOGO 31,19,' 333333333333 77 0000000000 ' HRC073DK HRC073DK: LOGO 32,71,' 3333333333 77 00000000 ' HRC073DK HRC073DK: LOGO 34,43,' ' HRC073DK HRC073DK: LOGO 36,15,' VM/370 Release 6 "SixPack" version 1.2 ' HRC073DK HRC073DK: DMKBXL05 EQU *-DMKBOX05-2 HRC073DK BEGIN APPLY >>> ./ I 00005020 $ 00005025 1 END APPLY >>> ./ I 00005020 $ 00005025 1 BEGIN APPLY >>> ./ I 00005640 $ 00005700 10 END APPLY >>> ./ I 00005640 $ 00005700 10 Update Succeeded Update Execution Time 16 milliseconds.
ibm/vm370-lib/cp/dmkbox.assemble_hst.txt ยท Last modified: 2023/08/06 13:36 by Site Administrator