User Tools

Site Tools


ibm:vm370-lib:cp:dmksnt.assemble_src

DMKSNT Source

References

Source Listing

DMKSNT.ASSEMBLE.txt
  1. SNT TITLE 'DMKSNT VM/370 Release 6 - VM/370 SixPack Release 1.2'
  2. SPACE
  3. *.
  4. * MODULE NAME -
  5. * DMKSNT
  6. *
  7. * FUNCTION -
  8. *
  9. * THIS MODULE WILL BE ASSEMBLED BY THE INSTALLATION SYSTEM
  10. * PROGRAMMER. IT WILL DESCRIBE THE THE SYSTEM TO BE SAVED VIA
  11. * THE 'SAVESYS' COMMAND AND TO BE IPL'ED BY NAME. SHARED SEG-
  12. * MENTS MAY BE SPECIFIED. THESE SEGMENTS MUST CONSIST OF
  13. * ALL REENTRANT CODE.
  14. *
  15. *
  16. * Change activity = *
  17. * *
  18. * Flag Date By Description *
  19. * ---- ---------- ---- ------------------------------------ *
  20. * $D01 2010/02/15 KL Move CMSDOS, CMSVSAM and CMSAMS *
  21. * segments to higher load addresses, *
  22. * INSTVSAM to lower. *
  23. SPACE
  24. DMKSNTBL CSECT
  25. SPACE
  26. *
  27. CMS NAMESYS SYSSIZE=256K,SYSNAME=CMS, X
  28. VSYSADR=190,SYSVOL=VM50-1,SYSCYL=103,SYSSTRT=(001,1), X
  29. SYSPGCT=33,SYSPGNM=(0-32),SYSHRSG=(1),VSYSRES=VM50-1
  30. EJECT
  31. * Originally, the CMSSEG shared segment was at 4MB.
  32. *MSSEG NAMESYS SYSNAME=CMSSEG,SYSVOL=VMSYS1,SYSCYL=,
  33. * SYSSTRT=(001,35),SYSPGCT=16,SYSHRSG=(16),
  34. * SYSPGNM=(256-271),SYSSIZE=64K,VSYSRES=,VSYSADR=IGNORE
  35. * We define the CMSSEG shared segment at 15MB to maximize the VM size.
  36. CMSSEG NAMESYS SYSNAME=CMSSEG,SYSVOL=VM50-1,SYSCYL=, X
  37. SYSSTRT=(002,1),SYSPGCT=16,SYSHRSG=(240), X
  38. SYSPGNM=(3840-3855),SYSSIZE=64K,VSYSRES=,VSYSADR=IGNORE
  39. EJECT ,
  40. *----------------------------------------------------------------* @D01
  41. * Originally, the CMSVSAM segment was loaded at * @D01
  42. * X'110000' (1088K). * @D01
  43. *----------------------------------------------------------------* @D01
  44. **VSAM NAMESYS SYSNAME=CMSVSAM,SYSVOL=VM50-1,SYSPGNM=(272-367), @D01
  45. ** SYSSTRT=(003,1),SYSPGCT=96,SYSSIZE=384K,SYSCYL=, @D01
  46. ** SYSHRSG=(17,18,19,20,21),VSYSRES=,VSYSADR=IGNORE @D01
  47. SPACE 1 @D01
  48. *----------------------------------------------------------------* @D01
  49. * CMSVSAM has been moved up to X'E00000' (14336K). * @D01
  50. *----------------------------------------------------------------* @D01
  51. CMSVSAM NAMESYS SYSNAME=CMSVSAM,SYSPGNM=(3584-3679), @D01+
  52. SYSSTRT=(003,1),SYSPGCT=96,SYSSIZE=384K,SYSCYL=, @D01+
  53. SYSHRSG=(224,225,226,227,228), @D01+
  54. SYSVOL=VM50-1,VSYSRES=,VSYSADR=IGNORE @D01
  55. EJECT , @D01
  56. *----------------------------------------------------------------* @D01
  57. * Originally, the CMSAMS segment was loaded at * @D01
  58. * X'170000' (1472K). * @D01
  59. *----------------------------------------------------------------* @D01
  60. **SAMS NAMESYS SYSNAME=CMSAMS,SYSVOL=VM50-1,SYSPGNM=(368-495), @D01
  61. ** SYSSTRT=(004,1),SYSPGCT=128,SYSSIZE=448K,SYSCYL=, @D01
  62. ** SYSHRSG=(23,24,25,26,27,28),VSYSRES=,VSYSADR=IGNORE @D01
  63. SPACE 1 @D01
  64. *----------------------------------------------------------------* @D01
  65. * CMSAMS has been moved up to X'E60000' (14720K). * @D01
  66. *----------------------------------------------------------------* @D01
  67. CMSAMS NAMESYS SYSNAME=CMSAMS,SYSPGNM=(3680-3807), @D01+
  68. SYSSTRT=(004,1),SYSPGCT=128,SYSSIZE=448K,SYSCYL=, @D01+
  69. SYSHRSG=(230,231,232,233,234,235), @D01+
  70. SYSVOL=VM50-1,VSYSRES=,VSYSADR=IGNORE @D01
  71. EJECT , @D01
  72. *----------------------------------------------------------------* @D01
  73. * Originally, the CMSDOS segment was loaded at * @D01
  74. * X'1F0000' (1984K). * @D01
  75. *----------------------------------------------------------------* @D01
  76. **SDOS NAMESYS SYSNAME=CMSDOS,SYSVOL=VM50-1,SYSHRSG=(31), @D01
  77. ** SYSSTRT=(006,1),SYSPGCT=8,SYSSIZE=32K,SYSCYL=, @D01
  78. ** SYSPGNM=(496-503),VSYSRES=,VSYSADR=IGNORE @D01
  79. SPACE 1 @D01
  80. *----------------------------------------------------------------* @D01
  81. * CMSDOS has been moved up to X'F10000' (15424K). * @D01
  82. *----------------------------------------------------------------* @D01
  83. CMSDOS NAMESYS SYSNAME=CMSDOS,SYSPGNM=(3856-3863), @D01+
  84. SYSSTRT=(006,1),SYSPGCT=8,SYSSIZE=32K,SYSCYL=, @D01+
  85. SYSHRSG=(241), @D01+
  86. SYSVOL=VM50-1,VSYSRES=,VSYSADR=IGNORE @D01
  87. EJECT , @D01
  88. *----------------------------------------------------------------* @D01
  89. * Originally, the INSTVSAM segment was loaded at * @D01
  90. * X'FE0000' (16256K). * @D01
  91. *----------------------------------------------------------------* @D01
  92. **STVSAM NAMESYS SYSNAME=INSTVSAM,SYSVOL=VM50-1,SYSHRSG=(254), @D01
  93. ** SYSSTRT=(007,1),SYSPGCT=8,SYSSIZE=32K,SYSCYL=, @D01
  94. ** SYSPGNM=(4064-4071),VSYSRES=,VSYSADR=IGNORE @D01
  95. SPACE 1 @D01
  96. *----------------------------------------------------------------* @D01
  97. * INSTVSAM has been moved down to X'FB0000' (16064K) * @D01
  98. * to avoid VIRTUAL STORAGE EXCEEDED errors in loading. * @D01
  99. *----------------------------------------------------------------* @D01
  100. INSTVSAM NAMESYS SYSNAME=INSTVSAM,SYSPGNM=(4016-4023), @D01+
  101. SYSSTRT=(007,1),SYSPGCT=8,SYSSIZE=32K,SYSCYL=, @D01+
  102. SYSHRSG=(251), @D01+
  103. SYSVOL=VM50-1,VSYSRES=,VSYSADR=IGNORE @D01
  104. EJECT , @D01
  105. *
  106. NAME3800 CPNAME=IMAG3800,SYSVOL=VM50-1,SYSSTRT=(008,1), X
  107. SYSPGCT=5
  108. EJECT
  109. END ,
ibm/vm370-lib/cp/dmksnt.assemble_src.txt ยท Last modified: 2023/08/06 13:37 by Site Administrator