Retro1.org codex

User Tools

Site Tools

Trace: • DMKRIO Source
ibm:vm370-lib:cp:dmkrio.assemble_src

Table of Contents

DMKRIO Source

References

Source Listing

DMKRIO.ASSEMBLE.txt 
  1. NAS      TITLE '  DMKRIO       VM/370 RELEASE 6 - TURNKEY MVS ENABLED'  DMK00010
  2. DMKRIO   CSECT                                                          DMK00020
  3.          EJECT                                                          DMK00030
  4. **********************************************************************  DMK00040
  5. **                                                                  **  DMK00050
  6. **  THIS IS A NEW I/O GEN TO SUIT THE TURNKEY (4) MVS SYSTEM        **  DMK00060
  7. **                                                                  **  DMK00070
  8. **                                                                  **  DMK00080
  9. **********************************************************************  DMK00090
  10. *****  CHANNEL ZERO ( 000 ) DEVICES                              *****  DMK00100
  11. *****  ----------------------------                              *****  DMK00110
  12. **********************************************************************  DMK00120
  13.          SPACE 2                                                        DMK00130
  14.          RDEVICE ADDRESS=004,DEVTYPE=3215                               DMK00140
  15.          RDEVICE ADDRESS=005,DEVTYPE=3215                               DMK00150
  16.          RDEVICE ADDRESS=006,DEVTYPE=3215                               DMK00160
  17.          RDEVICE ADDRESS=007,DEVTYPE=3215                               DMK00170
  18.          RDEVICE ADDRESS=008,DEVTYPE=3215                               DMK00180
  19.          RDEVICE ADDRESS=009,DEVTYPE=3215                               DMK00190
  20.          RDEVICE ADDRESS=00A,DEVTYPE=3215                               DMK00200
  21.          RDEVICE ADDRESS=00C,DEVTYPE=2540R                              DMK00210
  22.          RDEVICE ADDRESS=00D,DEVTYPE=2540P,CLASS=P                      DMK00220
  23.          RDEVICE ADDRESS=(00E),DEVTYPE=1403,FEATURE=UNVCHSET,          *DMK00230
  24.                CLASS=(A)                                                DMK00240
  25.          RDEVICE ADDRESS=(00F),DEVTYPE=1403,FEATURE=UNVCHSET,          *DMK00250
  26.                CLASS=(D)                                                DMK00260
  27.          RDEVICE ADDRESS=(010,7),DEVTYPE=3277                           DMK00270
  28.          RDEVICE ADDRESS=(01F),DEVTYPE=3215                             DMK00280
  29.          RDEVICE ADDRESS=(020,16),DEVTYPE=2701,ADAPTER=TELE2            DMK00290
  30.          RDEVICE ADDRESS=(040,16),DEVTYPE=2701,ADAPTER=BSCA             DMK00300
  31.          RDEVICE ADDRESS=(0C0,32),DEVTYPE=3277                          DMK00310
  32. **********************************************************************  DMK00320
  33. *****  CHANNEL ONE  ( 100 ) DEVICES                              *****  DMK00330
  34. *****  ----------------------------                              *****  DMK00340
  35. **********************************************************************  DMK00350
  36.          RDEVICE ADDRESS=(102),DEVTYPE=3211,CLASS=(M)                   DMK00360
  37.          RDEVICE ADDRESS=(103),DEVTYPE=3211,CLASS=(M)                   DMK00370
  38.          RDEVICE ADDRESS=(10C),DEVTYPE=2540R,CLASS=Z                    DMK00380
  39.          RDEVICE ADDRESS=(10D),DEVTYPE=2540P,CLASS=Z                    DMK00390
  40.          RDEVICE ADDRESS=(10E),DEVTYPE=1403,FEATURE=UNVCHSET            DMK00400
  41.          RDEVICE ADDRESS=(10F),DEVTYPE=1403,FEATURE=UNVCHSET            DMK00410
  42.          RDEVICE ADDRESS=(130,16),DEVTYPE=2314                          DMK00420
  43.          RDEVICE ADDRESS=(140,16),DEVTYPE=3350                          DMK00430
  44.          RDEVICE ADDRESS=(150,16),DEVTYPE=3330,MODEL=11                 DMK00440
  45.          RDEVICE ADDRESS=(160,16),DEVTYPE=3340                          DMK00450
  46.          RDEVICE ADDRESS=(170,16),DEVTYPE=3375,CLASS=DASD               DMK00460
  47.          RDEVICE ADDRESS=(1A0,16),DEVTYPE=3380,CLASS=DASD               DMK00470
  48.          RDEVICE ADDRESS=(1B0,16),DEVTYPE=3390,CLASS=DASD               DMK00480
  49.          RDEVICE ADDRESS=(1C0,7),DEVTYPE=3277                           DMK00490
  50.          RDEVICE ADDRESS=(1C7),DEVTYPE=3284                             DMK00500
  51.          RDEVICE ADDRESS=(1C8,7),DEVTYPE=3277                           DMK00510
  52.          RDEVICE ADDRESS=(1CF),DEVTYPE=3284                             DMK00520
  53. **********************************************************************  DMK00530
  54. *****  CHANNEL TWO  ( 200 ) DEVICES                              *****  DMK00540
  55. *****  ----------------------------                              *****  DMK00550
  56. **********************************************************************  DMK00560
  57.          RDEVICE ADDRESS=(202),DEVTYPE=3211,CLASS=(M)                   DMK00570
  58.          RDEVICE ADDRESS=(203),DEVTYPE=3211,CLASS=(M)                   DMK00580
  59.          RDEVICE ADDRESS=(20C),DEVTYPE=2540R,CLASS=Z                    DMK00590
  60.          RDEVICE ADDRESS=(20D),DEVTYPE=2540P,CLASS=Z                    DMK00600
  61.          RDEVICE ADDRESS=(20E),DEVTYPE=1403,FEATURE=UNVCHSET            DMK00610
  62.          RDEVICE ADDRESS=(20F),DEVTYPE=1403,FEATURE=UNVCHSET            DMK00620
  63.          RDEVICE ADDRESS=(230,16),DEVTYPE=2314                          DMK00630
  64.          RDEVICE ADDRESS=(240,16),DEVTYPE=3350                          DMK00640
  65.          RDEVICE ADDRESS=(250,16),DEVTYPE=3330,MODEL=11                 DMK00650
  66.          RDEVICE ADDRESS=(260,16),DEVTYPE=3340                          DMK00660
  67.          RDEVICE ADDRESS=(270,16),DEVTYPE=3375,CLASS=DASD               DMK00670
  68.          RDEVICE ADDRESS=(280,16),DEVTYPE=3380,CLASS=DASD               DMK00680
  69.          RDEVICE ADDRESS=(290,16),DEVTYPE=3390,CLASS=DASD               DMK00690
  70.          RDEVICE ADDRESS=(2C0,7),DEVTYPE=3277                           DMK00700
  71.          RDEVICE ADDRESS=(2C7),DEVTYPE=3284                             DMK00710
  72.          RDEVICE ADDRESS=(2C8,7),DEVTYPE=3277                           DMK00720
  73.          RDEVICE ADDRESS=(2CF),DEVTYPE=3284                             DMK00730
  74. **********************************************************************  DMK00740
  75. *****  CHANNEL THREE( 300 ) DEVICES                              *****  DMK00750
  76. *****  ----------------------------                              *****  DMK00760
  77. **********************************************************************  DMK00770
  78.          RDEVICE ADDRESS=(302),DEVTYPE=3211,CLASS=(M)                   DMK00780
  79.          RDEVICE ADDRESS=(303),DEVTYPE=3211,CLASS=(M)                   DMK00790
  80.          RDEVICE ADDRESS=(30C),DEVTYPE=2540R,CLASS=Z                    DMK00800
  81.          RDEVICE ADDRESS=(30D),DEVTYPE=2540P,CLASS=Z                    DMK00810
  82.          RDEVICE ADDRESS=(30E),DEVTYPE=1403,FEATURE=UNVCHSET            DMK00820
  83.          RDEVICE ADDRESS=(30F),DEVTYPE=1403,FEATURE=UNVCHSET            DMK00830
  84.          RDEVICE ADDRESS=(330,16),DEVTYPE=2314                          DMK00840
  85.          RDEVICE ADDRESS=(340,16),DEVTYPE=3350                          DMK00850
  86.          RDEVICE ADDRESS=(350,16),DEVTYPE=3330,MODEL=11                 DMK00860
  87.          RDEVICE ADDRESS=(360,16),DEVTYPE=3340                          DMK00870
  88.          RDEVICE ADDRESS=(370,16),DEVTYPE=3375,CLASS=DASD               DMK00880
  89.          RDEVICE ADDRESS=(380,16),DEVTYPE=3380,CLASS=DASD               DMK00890
  90.          RDEVICE ADDRESS=(390,16),DEVTYPE=3390,CLASS=DASD               DMK00900
  91.          RDEVICE ADDRESS=(3C0,7),DEVTYPE=3277                           DMK00910
  92.          RDEVICE ADDRESS=(3C7),DEVTYPE=3284                             DMK00920
  93.          RDEVICE ADDRESS=(3C8,7),DEVTYPE=3277                           DMK00930
  94.          RDEVICE ADDRESS=(3CF),DEVTYPE=3284                             DMK00940
  95. **********************************************************************  DMK00950
  96. *****  CHANNEL FOUR ( 400 ) DEVICES                              *****  DMK00960
  97. *****                                                            *****  DMK00970
  98. **********************************************************************  DMK00980
  99.          RDEVICE ADDRESS=(400,16),DEVTYPE=3420,MODEL=8                  DMK00990
  100.          RDEVICE ADDRESS=(440,16),DEVTYPE=3350                          DMK01000
  101.          RDEVICE ADDRESS=(480,16),DEVTYPE=3420,MODEL=8                  DMK01010
  102.          RDEVICE ADDRESS=(4A0,16),DEVTYPE=3480                          DMK01020
  103. **********************************************************************  DMK01030
  104. *****  CHANNEL FIVE  ( 500 ) DEVICES                             *****  DMK01040
  105. **********************************************************************  DMK01050
  106.          RDEVICE ADDRESS=(500,8),DEVTYPE=CTCA                           DMK01060
  107.          RDEVICE ADDRESS=(510,8),DEVTYPE=CTCA                           DMK01070
  108.          RDEVICE ADDRESS=(540,16),DEVTYPE=3350                          DMK01080
  109.          RDEVICE ADDRESS=(580,16),DEVTYPE=3420,MODEL=8,FEATURE=DUALDENS DMK01090
  110. **********************************************************************  DMK01100
  111. *****  CHANNEL SIX   ( 600 ) DEVICES                             *****  DMK01110
  112. **********************************************************************  DMK01120
  113.          RDEVICE ADDRESS=(600,8),DEVTYPE=CTCA                           DMK01130
  114.          RDEVICE ADDRESS=(610,8),DEVTYPE=CTCA                           DMK01140
  115.          RDEVICE ADDRESS=(630,16),DEVTYPE=3330,MODEL=11                 DMK01150
  116.          RDEVICE ADDRESS=(640,16),DEVTYPE=3330,MODEL=1                  DMK01160
  117.          RDEVICE ADDRESS=(6A0,32),DEVTYPE=3350                          DMK01170
  118.          RDEVICE ADDRESS=(6F0,16),DEVTYPE=3350                          DMK01180
  119. **********************************************************************  DMK01190
  120. *****  CHANNEL SEVEN ( 700 ) DEVICES                             *****  DMK01200
  121. **********************************************************************  DMK01210
  122.          RDEVICE ADDRESS=(700,32),DEVTYPE=3350                          DMK01220
  123.          RDEVICE ADDRESS=(730,16),DEVTYPE=3330,MODEL=11                 DMK01230
  124.          RDEVICE ADDRESS=(740,16),DEVTYPE=3330,MODEL=1                  DMK01240
  125.          RDEVICE ADDRESS=(7A0,32),DEVTYPE=3350                          DMK01250
  126.          RDEVICE ADDRESS=(7F0,16),DEVTYPE=3350                          DMK01260
  127. **********************************************************************  DMK01270
  128. *****  CHANNEL EIGHT ( 800 ) DEVICES                             *****  DMK01280
  129. **********************************************************************  DMK01290
  130.          RDEVICE ADDRESS=(830,16),DEVTYPE=3330,MODEL=11                 DMK01300
  131.          RDEVICE ADDRESS=(840,16),DEVTYPE=3330,MODEL=1                  DMK01310
  132.          RDEVICE ADDRESS=(8A0,32),DEVTYPE=3350                          DMK01320
  133.          RDEVICE ADDRESS=(8F0,16),DEVTYPE=3350                          DMK01330
  134. **********************************************************************  DMK01340
  135. *****  CHANNEL NINE  ( 900 ) DEVICES                             *****  DMK01350
  136. **********************************************************************  DMK01360
  137.          RDEVICE ADDRESS=(930,16),DEVTYPE=3330,MODEL=11                 DMK01370
  138.          RDEVICE ADDRESS=(940,16),DEVTYPE=3330,MODEL=1                  DMK01380
  139.          RDEVICE ADDRESS=(9A0,32),DEVTYPE=3350                          DMK01390
  140.          RDEVICE ADDRESS=(9F0,16),DEVTYPE=3350                          DMK01400
  141. **********************************************************************  DMK01410
  142. *****  CHANNEL TEN   ( A00 ) DEVICES                             *****  DMK01420
  143. **********************************************************************  DMK01430
  144.          RDEVICE ADDRESS=(A00,32),DEVTYPE=3390                          DMK01440
  145.          RDEVICE ADDRESS=(A20,32),DEVTYPE=3390                          DMK01450
  146.          RDEVICE ADDRESS=(A40,32),DEVTYPE=3390                          DMK01460
  147.          RDEVICE ADDRESS=(A60,32),DEVTYPE=3390                          DMK01470
  148.          RDEVICE ADDRESS=(A80,32),DEVTYPE=3390                          DMK01480
  149.          RDEVICE ADDRESS=(AA0,32),DEVTYPE=3390                          DMK01490
  150.          RDEVICE ADDRESS=(AC0,32),DEVTYPE=3390                          DMK01500
  151.          RDEVICE ADDRESS=(AE0,32),DEVTYPE=3390                          DMK01510
  152. **********************************************************************  DMK01520
  153. *****  CHANNEL ELEVEN( B00 ) DEVICES                             *****  DMK01530
  154. **********************************************************************  DMK01540
  155.          RDEVICE ADDRESS=(B00,32),DEVTYPE=3390                          DMK01550
  156.          RDEVICE ADDRESS=(B20,32),DEVTYPE=3390                          DMK01560
  157.          RDEVICE ADDRESS=(B40,32),DEVTYPE=3390                          DMK01570
  158.          RDEVICE ADDRESS=(B60,32),DEVTYPE=3390                          DMK01580
  159.          RDEVICE ADDRESS=(B80,32),DEVTYPE=3390                          DMK01590
  160.          RDEVICE ADDRESS=(BA0,32),DEVTYPE=3390                          DMK01600
  161.          RDEVICE ADDRESS=(BC0,32),DEVTYPE=3390                          DMK01610
  162.          RDEVICE ADDRESS=(BE0,32),DEVTYPE=3390                          DMK01620
  163. **********************************************************************  DMK01630
  164. *****  CHANNEL TWELVE( C00 ) DEVICES                             *****  DMK01640
  165. **********************************************************************  DMK01650
  166.          RDEVICE ADDRESS=(C00,32),DEVTYPE=3390                          DMK01660
  167.          RDEVICE ADDRESS=(C20,32),DEVTYPE=3390                          DMK01670
  168.          RDEVICE ADDRESS=(C40,32),DEVTYPE=3390                          DMK01680
  169.          RDEVICE ADDRESS=(C60,32),DEVTYPE=3390                          DMK01690
  170.          RDEVICE ADDRESS=(C80,32),DEVTYPE=3390                          DMK01700
  171.          RDEVICE ADDRESS=(CA0,32),DEVTYPE=3390                          DMK01710
  172.          RDEVICE ADDRESS=(CC0,32),DEVTYPE=3390                          DMK01720
  173.          RDEVICE ADDRESS=(CE0,32),DEVTYPE=3390                          DMK01730
  174. **********************************************************************  DMK01740
  175. *****  CHANNEL THIRTEEN D90 ) DEVICES                            *****  DMK01750
  176. **********************************************************************  DMK01760
  177.          RDEVICE ADDRESS=(D00,32),DEVTYPE=3390                          DMK01770
  178.          RDEVICE ADDRESS=(D20,32),DEVTYPE=3390                          DMK01780
  179.          RDEVICE ADDRESS=(D40,32),DEVTYPE=3390                          DMK01790
  180.          RDEVICE ADDRESS=(D60,32),DEVTYPE=3390                          DMK01800
  181.          RDEVICE ADDRESS=(D80,32),DEVTYPE=3390                          DMK01810
  182.          RDEVICE ADDRESS=(DA0,32),DEVTYPE=3390                          DMK01820
  183.          RDEVICE ADDRESS=(DC0,32),DEVTYPE=3390                          DMK01830
  184.          RDEVICE ADDRESS=(DE0,32),DEVTYPE=3390                          DMK01840
  185. **********************************************************************  DMK01850
  186. *****  CHANNEL FOURTEEN ( E00 ) DEVICES                          *****  DMK01860
  187. **********************************************************************  DMK01870
  188.          RDEVICE ADDRESS=(E00,32),DEVTYPE=3390                          DMK01880
  189.          RDEVICE ADDRESS=(E20,32),DEVTYPE=3390                          DMK01890
  190.          RDEVICE ADDRESS=(E40,32),DEVTYPE=3390                          DMK01900
  191.          RDEVICE ADDRESS=(E60,32),DEVTYPE=3390                          DMK01910
  192.          RDEVICE ADDRESS=(E80,32),DEVTYPE=3390                          DMK01920
  193.          RDEVICE ADDRESS=(EA0,32),DEVTYPE=3390                          DMK01930
  194.          RDEVICE ADDRESS=(EC0,32),DEVTYPE=3390                          DMK01940
  195.          RDEVICE ADDRESS=(EE0,32),DEVTYPE=3390                          DMK01950
  196. **********************************************************************  DMK01960
  197. *****  CHANNEL FIFTEEN ( F00 ) DEVICES                           *****  DMK01970
  198. *********************************************************************   DMK01980
  199.          RDEVICE ADDRESS=(F00,32),DEVTYPE=3390                          DMK01990
  200.          RDEVICE ADDRESS=(F20,32),DEVTYPE=3390                          DMK02000
  201.          RDEVICE ADDRESS=(F40,32),DEVTYPE=3390                          DMK02010
  202.          RDEVICE ADDRESS=(F60,32),DEVTYPE=3390                          DMK02020
  203.          RDEVICE ADDRESS=(F80,32),DEVTYPE=3390                          DMK02030
  204.          RDEVICE ADDRESS=(FA0,32),DEVTYPE=3390                          DMK02040
  205.          RDEVICE ADDRESS=(FC0,32),DEVTYPE=3390                          DMK02050
  206.          RDEVICE ADDRESS=(FE0,32),DEVTYPE=3390                          DMK02060
  207. **********************************************************************  DMK02070
  208. *****  CONTROL UNIT DEFINITIONS                                  *****  DMK02080
  209. *****  ------------------------                                  *****  DMK02090
  210. **********************************************************************  DMK02100
  211.          RCTLUNIT ADDRESS=000,CUTYPE=3811                               DMK02110
  212.          RCTLUNIT ADDRESS=008,CUTYPE=2821                               DMK02120
  213.          RCTLUNIT ADDRESS=010,CUTYPE=2821                               DMK02130
  214.          RCTLUNIT ADDRESS=018,CUTYPE=3215                               DMK02140
  215.          RCTLUNIT ADDRESS=020,CUTYPE=2701,FEATURE=16-DEVICE             DMK02150
  216.          RCTLUNIT ADDRESS=040,CUTYPE=2701,FEATURE=16-DEVICE             DMK02160
  217.          RCTLUNIT ADDRESS=0C0,CUTYPE=3272,FEATURE=32-DEVICE             DMK02170
  218. *                                                                       DMK02180
  219.          RCTLUNIT ADDRESS=100,CUTYPE=2821,FEATURE=16-DEVICE             DMK02190
  220.          RCTLUNIT ADDRESS=130,CUTYPE=3830,FEATURE=16-DEVICE             DMK02200
  221.          RCTLUNIT ADDRESS=140,CUTYPE=3830,FEATURE=16-DEVICE             DMK02210
  222.          RCTLUNIT ADDRESS=150,CUTYPE=3830,FEATURE=16-DEVICE             DMK02220
  223.          RCTLUNIT ADDRESS=160,CUTYPE=3830,FEATURE=16-DEVICE             DMK02230
  224.          RCTLUNIT ADDRESS=170,CUTYPE=3830,FEATURE=16-DEVICE             DMK02240
  225.          RCTLUNIT ADDRESS=1A0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02250
  226.          RCTLUNIT ADDRESS=1B0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02260
  227.          RCTLUNIT ADDRESS=1C0,CUTYPE=3272,FEATURE=16-DEVICE             DMK02270
  228. *                                                                       DMK02280
  229.          RCTLUNIT ADDRESS=200,CUTYPE=2821,FEATURE=16-DEVICE             DMK02290
  230.          RCTLUNIT ADDRESS=230,CUTYPE=3830,FEATURE=16-DEVICE             DMK02300
  231.          RCTLUNIT ADDRESS=240,CUTYPE=3830,FEATURE=16-DEVICE             DMK02310
  232.          RCTLUNIT ADDRESS=250,CUTYPE=3830,FEATURE=16-DEVICE             DMK02320
  233.          RCTLUNIT ADDRESS=260,CUTYPE=3830,FEATURE=16-DEVICE             DMK02330
  234.          RCTLUNIT ADDRESS=270,CUTYPE=3830,FEATURE=16-DEVICE             DMK02340
  235.          RCTLUNIT ADDRESS=280,CUTYPE=3830,FEATURE=16-DEVICE             DMK02350
  236.          RCTLUNIT ADDRESS=290,CUTYPE=3830,FEATURE=16-DEVICE             DMK02360
  237.          RCTLUNIT ADDRESS=2A0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02370
  238.          RCTLUNIT ADDRESS=2C0,CUTYPE=3272,FEATURE=16-DEVICE             DMK02380
  239. *                                                                       DMK02390
  240.          RCTLUNIT ADDRESS=300,CUTYPE=2821,FEATURE=16-DEVICE             DMK02400
  241.          RCTLUNIT ADDRESS=330,CUTYPE=3830,FEATURE=16-DEVICE             DMK02410
  242.          RCTLUNIT ADDRESS=340,CUTYPE=3830,FEATURE=16-DEVICE             DMK02420
  243.          RCTLUNIT ADDRESS=350,CUTYPE=3830,FEATURE=16-DEVICE             DMK02430
  244.          RCTLUNIT ADDRESS=360,CUTYPE=3830,FEATURE=16-DEVICE             DMK02440
  245.          RCTLUNIT ADDRESS=370,CUTYPE=3830,FEATURE=16-DEVICE             DMK02450
  246.          RCTLUNIT ADDRESS=380,CUTYPE=3830,FEATURE=16-DEVICE             DMK02460
  247.          RCTLUNIT ADDRESS=390,CUTYPE=3830,FEATURE=16-DEVICE             DMK02470
  248.          RCTLUNIT ADDRESS=3B0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02480
  249.          RCTLUNIT ADDRESS=3C0,CUTYPE=3272,FEATURE=16-DEVICE             DMK02490
  250. *                                                                       DMK02500
  251.          RCTLUNIT ADDRESS=400,CUTYPE=3420,FEATURE=16-DEVICE             DMK02510
  252.          RCTLUNIT ADDRESS=440,CUTYPE=3830,FEATURE=16-DEVICE             DMK02520
  253.          RCTLUNIT ADDRESS=480,CUTYPE=3420,FEATURE=16-DEVICE             DMK02530
  254.          RCTLUNIT ADDRESS=4A0,CUTYPE=3420,FEATURE=16-DEVICE             DMK02540
  255.          RCTLUNIT ADDRESS=4F0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02550
  256. *                                                                       DMK02560
  257.          RCTLUNIT ADDRESS=500,CUTYPE=3088                               DMK02570
  258.          RCTLUNIT ADDRESS=510,CUTYPE=3088                               DMK02580
  259.          RCTLUNIT ADDRESS=540,CUTYPE=3830,FEATURE=16-DEVICE             DMK02590
  260.          RCTLUNIT ADDRESS=580,CUTYPE=3803,FEATURE=16-DEVICE             DMK02600
  261.          RCTLUNIT ADDRESS=5F0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02610
  262. *                                                                       DMK02620
  263.          RCTLUNIT ADDRESS=600,CUTYPE=3088                               DMK02630
  264.          RCTLUNIT ADDRESS=610,CUTYPE=3088                               DMK02640
  265.          RCTLUNIT ADDRESS=630,CUTYPE=3830,FEATURE=16-DEVICE             DMK02650
  266.          RCTLUNIT ADDRESS=640,CUTYPE=3830,FEATURE=16-DEVICE             DMK02660
  267.          RCTLUNIT ADDRESS=6A0,CUTYPE=3830,FEATURE=32-DEVICE             DMK02670
  268.          RCTLUNIT ADDRESS=6F0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02680
  269. *                                                                       DMK02690
  270.          RCTLUNIT ADDRESS=700,CUTYPE=3830,FEATURE=32-DEVICE             DMK02700
  271.          RCTLUNIT ADDRESS=730,CUTYPE=3830,FEATURE=16-DEVICE             DMK02710
  272.          RCTLUNIT ADDRESS=740,CUTYPE=3830,FEATURE=16-DEVICE             DMK02720
  273.          RCTLUNIT ADDRESS=7A0,CUTYPE=3830,FEATURE=32-DEVICE             DMK02730
  274.          RCTLUNIT ADDRESS=7F0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02740
  275. *                                                                       DMK02750
  276.          RCTLUNIT ADDRESS=830,CUTYPE=3830,FEATURE=16-DEVICE             DMK02760
  277.          RCTLUNIT ADDRESS=840,CUTYPE=3830,FEATURE=16-DEVICE             DMK02770
  278.          RCTLUNIT ADDRESS=8A0,CUTYPE=3830,FEATURE=32-DEVICE             DMK02780
  279.          RCTLUNIT ADDRESS=8F0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02790
  280. *                                                                       DMK02800
  281.          RCTLUNIT ADDRESS=930,CUTYPE=3830,FEATURE=16-DEVICE             DMK02810
  282.          RCTLUNIT ADDRESS=940,CUTYPE=3830,FEATURE=16-DEVICE             DMK02820
  283.          RCTLUNIT ADDRESS=9A0,CUTYPE=3830,FEATURE=32-DEVICE             DMK02830
  284.          RCTLUNIT ADDRESS=9F0,CUTYPE=3830,FEATURE=16-DEVICE             DMK02840
  285. *                                                                       DMK02850
  286.          RCTLUNIT ADDRESS=A00,CUTYPE=3830,FEATURE=32-DEVICE             DMK02860
  287.          RCTLUNIT ADDRESS=A20,CUTYPE=3830,FEATURE=32-DEVICE             DMK02870
  288.          RCTLUNIT ADDRESS=A40,CUTYPE=3830,FEATURE=32-DEVICE             DMK02880
  289.          RCTLUNIT ADDRESS=A60,CUTYPE=3830,FEATURE=32-DEVICE             DMK02890
  290.          RCTLUNIT ADDRESS=A80,CUTYPE=3830,FEATURE=32-DEVICE             DMK02900
  291.          RCTLUNIT ADDRESS=AA0,CUTYPE=3830,FEATURE=32-DEVICE             DMK02910
  292.          RCTLUNIT ADDRESS=AC0,CUTYPE=3830,FEATURE=32-DEVICE             DMK02920
  293.          RCTLUNIT ADDRESS=AE0,CUTYPE=3830,FEATURE=32-DEVICE             DMK02930
  294. *                                                                       DMK02940
  295.          RCTLUNIT ADDRESS=B00,CUTYPE=3830,FEATURE=32-DEVICE             DMK02950
  296.          RCTLUNIT ADDRESS=B20,CUTYPE=3830,FEATURE=32-DEVICE             DMK02960
  297.          RCTLUNIT ADDRESS=B40,CUTYPE=3830,FEATURE=32-DEVICE             DMK02970
  298.          RCTLUNIT ADDRESS=B60,CUTYPE=3830,FEATURE=32-DEVICE             DMK02980
  299.          RCTLUNIT ADDRESS=B80,CUTYPE=3830,FEATURE=32-DEVICE             DMK02990
  300.          RCTLUNIT ADDRESS=BA0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03000
  301.          RCTLUNIT ADDRESS=BC0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03010
  302.          RCTLUNIT ADDRESS=BE0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03020
  303. *                                                                       DMK03030
  304.          RCTLUNIT ADDRESS=C00,CUTYPE=3830,FEATURE=32-DEVICE             DMK03040
  305.          RCTLUNIT ADDRESS=C20,CUTYPE=3830,FEATURE=32-DEVICE             DMK03050
  306.          RCTLUNIT ADDRESS=C40,CUTYPE=3830,FEATURE=32-DEVICE             DMK03060
  307.          RCTLUNIT ADDRESS=C60,CUTYPE=3830,FEATURE=32-DEVICE             DMK03070
  308.          RCTLUNIT ADDRESS=C80,CUTYPE=3830,FEATURE=32-DEVICE             DMK03080
  309.          RCTLUNIT ADDRESS=CA0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03090
  310.          RCTLUNIT ADDRESS=CC0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03100
  311.          RCTLUNIT ADDRESS=CE0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03110
  312. *                                                                       DMK03120
  313.          RCTLUNIT ADDRESS=D00,CUTYPE=3830,FEATURE=32-DEVICE             DMK03130
  314.          RCTLUNIT ADDRESS=D20,CUTYPE=3830,FEATURE=32-DEVICE             DMK03140
  315.          RCTLUNIT ADDRESS=D40,CUTYPE=3830,FEATURE=32-DEVICE             DMK03150
  316.          RCTLUNIT ADDRESS=D60,CUTYPE=3830,FEATURE=32-DEVICE             DMK03160
  317.          RCTLUNIT ADDRESS=D80,CUTYPE=3830,FEATURE=32-DEVICE             DMK03170
  318.          RCTLUNIT ADDRESS=DA0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03180
  319.          RCTLUNIT ADDRESS=DC0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03190
  320.          RCTLUNIT ADDRESS=DE0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03200
  321. *                                                                       DMK03210
  322.          RCTLUNIT ADDRESS=E00,CUTYPE=3830,FEATURE=32-DEVICE             DMK03220
  323.          RCTLUNIT ADDRESS=E20,CUTYPE=3830,FEATURE=32-DEVICE             DMK03230
  324.          RCTLUNIT ADDRESS=E40,CUTYPE=3830,FEATURE=32-DEVICE             DMK03240
  325.          RCTLUNIT ADDRESS=E60,CUTYPE=3830,FEATURE=32-DEVICE             DMK03250
  326.          RCTLUNIT ADDRESS=E80,CUTYPE=3830,FEATURE=32-DEVICE             DMK03260
  327.          RCTLUNIT ADDRESS=EA0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03270
  328.          RCTLUNIT ADDRESS=EC0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03280
  329.          RCTLUNIT ADDRESS=EE0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03290
  330. *                                                                       DMK03300
  331.          RCTLUNIT ADDRESS=F00,CUTYPE=3830,FEATURE=32-DEVICE             DMK03310
  332.          RCTLUNIT ADDRESS=F20,CUTYPE=3830,FEATURE=32-DEVICE             DMK03320
  333.          RCTLUNIT ADDRESS=F40,CUTYPE=3830,FEATURE=32-DEVICE             DMK03330
  334.          RCTLUNIT ADDRESS=F60,CUTYPE=3830,FEATURE=32-DEVICE             DMK03340
  335.          RCTLUNIT ADDRESS=F80,CUTYPE=3830,FEATURE=32-DEVICE             DMK03350
  336.          RCTLUNIT ADDRESS=FA0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03360
  337.          RCTLUNIT ADDRESS=FC0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03370
  338.          RCTLUNIT ADDRESS=FE0,CUTYPE=3830,FEATURE=32-DEVICE             DMK03380
  339. **********************************************************************  DMK03390
  340. *****  CHANNEL UNIT DEFINITIONS                                  *****  DMK03400
  341. *****  ------------------------                                  *****  DMK03410
  342. **********************************************************************  DMK03420
  343.          RCHANNEL ADDRESS=0,CHTYPE=MULTIPLEXOR                          DMK03430
  344.          RCHANNEL ADDRESS=1,CHTYPE=BLKMPXR                              DMK03440
  345.          RCHANNEL ADDRESS=2,CHTYPE=BLKMPXR                              DMK03450
  346.          RCHANNEL ADDRESS=3,CHTYPE=BLKMPXR                              DMK03460
  347.          RCHANNEL ADDRESS=4,CHTYPE=BLKMPXR                              DMK03470
  348.          RCHANNEL ADDRESS=5,CHTYPE=BLKMPXR                              DMK03480
  349.          RCHANNEL ADDRESS=6,CHTYPE=BLKMPXR                              DMK03490
  350.          RCHANNEL ADDRESS=7,CHTYPE=BLKMPXR                              DMK03500
  351.          RCHANNEL ADDRESS=8,CHTYPE=BLKMPXR                              DMK03510
  352.          RCHANNEL ADDRESS=9,CHTYPE=BLKMPXR                              DMK03520
  353.          RCHANNEL ADDRESS=A,CHTYPE=BLKMPXR                              DMK03530
  354.          RCHANNEL ADDRESS=B,CHTYPE=BLKMPXR                              DMK03540
  355.          RCHANNEL ADDRESS=C,CHTYPE=BLKMPXR                              DMK03550
  356.          RCHANNEL ADDRESS=D,CHTYPE=BLKMPXR                              DMK03560
  357.          RCHANNEL ADDRESS=E,CHTYPE=BLKMPXR                              DMK03570
  358.          RCHANNEL ADDRESS=F,CHTYPE=BLKMPXR                              DMK03580
  359. **********************************************************************  DMK03590
  360. *****  CONSOLE UNIT DEFINITIONS                                  *****  DMK03600
  361. *****  ------------------------                                  *****  DMK03610
  362. **********************************************************************  DMK03620
  363.          RIOGEN CONS=010,ALTCONS=(011,009)                              DMK03630
  364.          END                                                            DMK03640
  365.                                                                         DMK03650
  366.                                                                         DMK03660
  367.                                                                         DMK03670
ibm/vm370-lib/cp/dmkrio.assemble_src.txt · Last modified: 2023/08/06 13:37 by Site Administrator