Deck CPUMTR Part 035

308 Modifications

Listing Sections

Source

Seq #  *Modification Id* Act 
----------------------------+
Line S00066 Modification History
M01 (Added by) cpum244
Seq #  *Modification Id* Act 
----------------------------+
45392  M01S00066.cpum244 +++|          SX6    X3
Line S00944 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
45393  M01S00944.283l840 +++|          SA6    A1          UPDATE *IN*
45394  M01S00945.283l840 +++|
45395  M01S00946.283l840 +++|*         UPDATE BST ENTRY.
45396  M01S00947.283l840 +++|
45397  M01S00948.283l840 +++|          SX1    60
45398  M01S00949.283l840 +++|          SB4    -B4
45399  M01S00950.283l840 +++|          SB4    X1+B4       SHIFT COUNT TO RESTORE ENTRY
45400  M01S00951.283l840 +++|          LX6    X4,B4
Line S00952 Modification History
M01 (Added by) 283l840
M02 (Removed by) cpum244
Seq #  *Modification Id* Act 
----------------------------+
45401  M02S00952.cpum244 ---|          SA6    A4+
Line S00067 Modification History
M01 (Added by) cpum244
Seq #  *Modification Id* Act 
----------------------------+
45402  M01S00067.cpum244 +++|          SA6    A4
Line S00953 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
45403  M01S00953.283l840 +++|
45404  M01S00954.283l840 +++|*         EXIT TO CALLER OF *CHA*.
45405  M01S00955.283l840 +++|
45406  M01S00956.283l840 +++| CSD4     SX2    -2          SET ACCESS REJECTED STATUS
45407  M01S00957.283l840 +++|          JP     B6          EXIT TO *CHA* CALLER
45408  M01S00958.283l840 +++| IPP      SPACE  4,10
45409  M01S00959.283l840 +++|**        IPS - *IPP* PREPROCESSOR FOR SHARED DEVICES.
45410  M01S00960.283l840 +++|*
45411  M01S00961.283l840 +++|*         ENTRY  SEE *CPUCIO* SPECIAL PROCESSOR DOCUMENTATION.
45412  M01S00962.283l840 +++|*
45413  M01S00963.283l840 +++|*         EXIT   TO *IPP0* IF REQUEST CAN BE PROCESSED BY PSEUDO-PP.
45414  M01S00964.283l840 +++|*                TO */CPUCIO/RPC* IF REQUEST CANNOT BE PROCESSED BY
45415  M01S00965.283l840 +++|*                  PSEUDO-PP.
45416  M01S00966.283l840 +++|*
45417  M01S00967.283l840 +++|*         USES   X - 1, 2.
45418  M01S00968.283l840 +++|
45419  M01S00969.283l840 +++|
45420  M01S00970.283l840 +++| IPS      BSS    0           ENTRY
45421  M01S00971.283l840 +++|          BX1    X3
45422  M01S00972.283l840 +++|          LX1    59-57
45423  M01S00973.283l840 +++|          PL     X1,IPP0     IF NOT SHARED DEVICE
45424  M01S00974.283l840 +++|          EQ     B3,B1,/CPUCIO/RPC  IF WRITE FUNCTION
45425  M01S00975.283l840 +++|          ERRNZ  /CIO/WTF-1
45426  M01S00976.283l840 +++|          SX1    1
45427  M01S00977.283l840 +++|          IX1    X0-X1       FNT ADDRESS
45428  M01S00978.283l840 +++|          ERX1   X1          READ FNT ENTRY
45429  M01S00979.283l840 +++|          MX2    -6
45430  M01S00980.283l840 +++|          LX1    0-6
45431  M01S00981.283l840 +++|          BX2    -X2*X1      FILE TYPE
45432  M01S00982.283l840 +++|          LX1    59-16-0+6
45433  M01S00983.283l840 +++|          SX2    X2-PMFT
45434  M01S00984.283l840 +++|          NZ     X2,IPP0     IF NOT DIRECT ACCESS PERMANENT FILE
45435  M01S00985.283l840 +++|          PL     X1,IPP0     IF NOT M, A, RM, OR RA MODE
45436  M01S00986.283l840 +++|          EQ     /CPUCIO/RPC CALL PP CIO
45437  M01S00987.283l840 +++| SBP      SPACE  4,15
45438  M01S00988.283l840 +++|**        SBP - SET BST PARAMETERS.
45439  M01S00989.283l840 +++|*
45440  M01S00990.283l840 +++|*         ENTRY  (B5) = RETURN ADDRESS.
45441  M01S00991.283l840 +++|*
45442  M01S00992.283l840 +++|*         EXIT   (X2) .LT. 0 IF BST PROCESSING DISABLED.
45443  M01S00993.283l840 +++|*                (X3) = LOGICAL TRACK.
45444  M01S00994.283l840 +++|*                (X4) = BST WORD WITH ENTRY RIGHT JUSTIFIED.
45445  M01S00995.283l840 +++|*                (A4) = BST WORD ADDRESS.
45446  M01S00996.283l840 +++|*                (B4) = SHIFT COUNT TO POSITION ENTRY.
45447  M01S00997.283l840 +++|*
45448  M01S00998.283l840 +++|*         USES   X - 2, 3, 4, 6.
45449  M01S00999.283l840 +++|*                A - 2, 3, 4.
45450  M01S01000.283l840 +++|*                B - 4.
45451  M01S01001.283l840 +++|
45452  M01S01002.283l840 +++|
45453  M01S01003.283l840 +++| SBP      BSS    0           ENTRY
45454  M01S01004.283l840 +++|          SA2    MSTA        GET MST ADDRESS
45455  M01S01005.283l840 +++|          SA2    X2+BDLL
45456  M01S01006.283l840 +++|          SA3    LTRK        GET TRACK
45457  M01S01007.283l840 +++|          LX2    -24
45458  M01S01008.283l840 +++|          SB4    X2          SET BST ADDRESS
45459  M01S01009.283l840 +++|          NG     X2,RB5      IF BST PROCESSING DISABLED
45460  M01S01010.283l840 +++|          SX4    X3-4000B
45461  M01S01011.283l840 +++|          MX6    -4
45462  M01S01012.283l840 +++|          BX6    -X6*X4      ENTRY ORDINAL IN WORD
45463  M01S01013.283l840 +++|          AX4    4           BST WORD OFFSET
45464  M01S01014.283l840 +++|          SA4    B4+X4       READ BST ENTRY
45465  M01S01015.283l840 +++|          SX6    X6+B1       ENTRIES TO SHIFT TO RIGHT JUSTIFY ENTRY
45466  M01S01016.283l840 +++|          SB4    X6
45467  M01S01017.283l840 +++|          LX6    1
45468  M01S01018.283l840 +++|          SB4    X6+B4       SHIFT COUNT TO POSITION ENTRY
45469  M01S01019.283l840 +++|          LX4    B4          POSITION TO ENTRY
45470  M01S01020.283l840 +++|          JP     B5          RETURN
45471  M01S01021.283l840 +++|
45472  M01S01022.283l840 +++|
45473  M01S01023.283l840 +++|          QUAL   *
45474  M01S01024.283l840 +++|
45475  M01S01025.283l840 +++|          ENDBLK
45476  M00S26983.cpumtr  +++|          BLOCK  CPUCIO,(CPUCIO PROCESSOR.)
45477  M00S26984.cpumtr  +++|          TITLE  CPUCIO GLOBAL DATA.
45478  M00S26985.cpumtr  +++|          SPACE  4,10
45479  M00S26986.cpumtr  +++|**        GLOBAL DATA.
45480  M00S26987.cpumtr  +++|
45481  M00S26988.cpumtr  +++|
45482  M00S26989.cpumtr  +++|*         THE FOLLOWING DATA IS ORDER DEPENDENT.
45483  M00S26990.cpumtr  +++|
45484  M00S26991.cpumtr  +++| IR       BSS    1           *CIO* CALL
45485  M00S26992.cpumtr  +++| MB       BSS    1           *CIO* PARAMETERS
45486  M00S26993.cpumtr  +++| MB1      BSS    1           12/0, 24/IN, 24/OUT
45487  M00S26994.cpumtr  +++| MB2      BSS    1           1/R,5/0,6/FET LENGTH,24/FIRST,24/LIMIT
45488  M00S26995.cpumtr  +++| MB3      BSS    1           FUNCTION FLAGS
45489  M00S26996.cpumtr  +++|
45490  M00S26997.cpumtr  +++|
45491  M00S26998.cpumtr  +++|          ERRNZ  /CIO/RDF    CODE DEPENDS ON INTERNAL CODE FOR READ
45492  M00S26999.cpumtr  +++|          ERRNZ  /CIO/WTF-1  CODE DEPENDS ON INTERNAL CODE FOR WRITE
45493  M00S27000.cpumtr  +++|          ERRNZ  FSTL-1      CODE DEPENDS ON POSITION OF FST
45494  M00S27001.cpumtr  +++|          ERRNZ  FUTL-FSTL-1 CODE DEPENDS ON POSITION OF WORD
45495  M00S27002.cpumtr  +++|          TITLE  CPUCIO EXIT ROUTINES.
Line S00001 Modification History
M01 (Added by) cpum179
Seq #  *Modification Id* Act 
----------------------------+
45496  M01S00001.cpum179 +++| PMV      SPACE  4,10
45497  M01S00002.cpum179 +++|**        PMV - PROCESS *MAGNET* MOVING.
45498  M01S00003.cpum179 +++|
45499  M01S00004.cpum179 +++|
45500  M01S00005.cpum179 +++| PMV      SB5    PMV1        SER *SRC* RETURN ADDRESS
45501  M01S00006.cpum179 +++|          EQ     SRC         SET *RCLP* IN RA+1
45502  M01S00007.cpum179 +++|
45503  M01S00008.cpum179 +++| PMV1     SB5    MVPR        SET RECALL STACK REASON CODE
45504  M01S00009.cpum179 +++|*         EQ     RCR         SET REQUEST IN RECALL QUEUE
45505  M00S27003.cpumtr  +++| RCR      SPACE  4,10
45506  M00S27004.cpumtr  +++|**        RCR - REQUEST *CIO* RECALL.
45507  M00S27005.cpumtr  +++|*
45508  M00S27006.cpumtr  +++|*         ENTRY  (B5) = RECALL STACK REASON CODE.
45509  M00S27007.cpumtr  +++|*                (IR) = *CIO* CALL.
45510  M00S27008.cpumtr  +++|*                (MB) = *CIO* MESSAGE BUFFER PARAMETERS.
45511  M00S27009.cpumtr  +++|*
45512  M00S27010.cpumtr  +++|*         EXIT   TO *CPCX*.
45513  M00S27011.cpumtr  +++|*
45514  M00S27012.cpumtr  +++|*         CALLS  /MONITOR/AQR.
45515  M00S27013.cpumtr  +++|
45516  M00S27014.cpumtr  +++|
45517  M00S27015.cpumtr  +++| RCR      SA4    IR          GET *CIO* CALL
45518  M00S27016.cpumtr  +++|          SX7    B5          RECALL STACK REASON CODE
45519  M00S27017.cpumtr  +++|          MX3    6
45520  M00S27018.cpumtr  +++|          SA1    MB          *CIO* PARAMETER WORD
45521  M00S27019.cpumtr  +++|          LX7    -12
45522  M00S27020.cpumtr  +++|          BX6    X4
45523  M00S27021.cpumtr  +++|          LX3    -6
45524  M00S27022.cpumtr  +++|          BX1    -X3*X1
45525  M00S27023.cpumtr  +++|          R=     X2,/MONITOR/RQ
45526  M00S27024.cpumtr  +++|          BX7    X7+X1
45527  M00S27025.cpumtr  +++|          SA1    RTCL
45528  M00S27026.cpumtr  +++|          SA7    /MONITOR/AQRA  SAVE PARAMETER WORD
45529  M00S27027.cpumtr  +++|          MX3    -36
45530  M00S27028.cpumtr  +++|          SA4    RCRA        GET RECALL TIME PARAMETERS
45531  M00S27029.cpumtr  +++|          BX1    -X3*X1
45532  M00S27030.cpumtr  +++|          LX1    12
45533  M00S27031.cpumtr  +++|          IX0    X1+X4
45534  M00S27032.cpumtr  +++|          SA1    B7+STSW
45535  M00S27033.cpumtr  +++|          SB3    CPCX        SET RETURN ADDRESS FOR *AQR*
45536  M00S27034.cpumtr  +++|          LX1    59-24
45537  M00S27035.cpumtr  +++|          PL     X1,/MONITOR/AQR  IF ROLLOUT NOT SET
45538  M00S27036.cpumtr  +++|          BX2    X7
45539  M00S27037.cpumtr  +++|
45540  M00S27038.cpumtr  +++|
45541  M00S27039.cpumtr  +++|*         ROLLOUT SET ON CONTROL POINT -
45542  M00S27040.cpumtr  +++|*         PLACE REQUEST IN CPA RECALL AREA, BUT NOT IN QUEUE.
45543  M00S27041.cpumtr  +++|*
45544  M00S27042.cpumtr  +++|*         ENTRY  (A1) = ADDRESS OF *STSW*.
45545  M00S27043.cpumtr  +++|*                (X1) = *STSW* LEFT-SHIFTED 59-24
45546  M00S27044.cpumtr  +++|*                (X2) = PARAMETER WORD.
45547  M00S27045.cpumtr  +++|*                (X6) = PP REQUEST.
45548  M00S27046.cpumtr  +++|*                (B3) = RETURN ADDRESS.
45549  M00S27047.cpumtr  +++|*                (B7) = CONTROL POINT AREA ADDRESS.
45550  M00S27048.cpumtr  +++|
45551  M00S27049.cpumtr  +++|
45552  M00S27050.cpumtr  +++| RCR1     LX1    24-59
45553  M00S27051.cpumtr  +++|          MX7    -4
45554  M00S27052.cpumtr  +++|          SB4    B7+RCCW-1
45555  M00S27053.cpumtr  +++|          BX4    -X7*X1      NEXT FREE RECALL SLOT
45556  M00S27054.cpumtr  +++|          BX7    X7*X1
45557  M00S27055.cpumtr  +++|          SA3    B4+X4       READ NEXT FREE RECALL SLOT
45558  M00S27056.cpumtr  +++|          MX4    1
45559  M00S27057.cpumtr  +++|          SA6    A3+RECW-RCCW  STORE REQUEST
45560  M00S27058.cpumtr  +++|          SX3    X3+20B
45561  M00S27059.cpumtr  +++|          BX6    X2+X4       SET RECALL BIT
45562  M00S27060.cpumtr  +++|          IX7    X7+X3
45563  M00S27061.cpumtr  +++|          SA6    A3+REPW-RCCW  STORE PARAMETER WORD
45564  M00S27062.cpumtr  +++|          SA7    A1          UPDATE STSW
45565  M00S27063.cpumtr  +++|          JP     B3          RETURN
45566  M00S27064.cpumtr  +++|
45567  M00S27065.cpumtr  +++|
45568  M00S27066.cpumtr  +++| RCRA     VFD    12/PTMF,36/IORT,12/0  RECALL TIME PARAMETERS
Line S00626 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
45569  M01S00626.242l642 +++| RET      SPACE  4,10
45570  M01S00627.242l642 +++|**        RET - RETURN FILE.
Line S00628 Modification History
M01 (Added by) 242l642
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
45571  M02S00628.283l840 ---|*
45572  M02S00629.283l840 ---|*         ENTRY  (X3) = EST ENTRY, SHIFTED RIGHT 12.
Line S00630 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
45573  M01S00630.242l642 +++|
45574  M01S00631.242l642 +++|
45575  M01S00632.242l642 +++| RET      BSS    0
45576  M01S00633.242l642 +++|          BX1    X3
Line S00634 Modification History
M01 (Added by) 242l642
M02 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
45577  M02S00634.283l840 ---|          LX1    59-56+12
Line S01026 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
45578  M01S01026.283l840 +++|          LX1    59-56
Line S00635 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
45579  M01S00635.242l642 +++|          BX3    X1*X3
45580  M01S00636.242l642 +++|          PL     X3,RPC      IF NOT REMOVABLE MASS STORAGE
45581  M01S00637.242l642 +++|
45582  M01S00638.242l642 +++|*         FORCE AUTORECALL TO PREVENT TWO FILE RETURNS ON A REMOVABLE
45583  M01S00639.242l642 +++|*         DEVICE FROM OCCURRING SIMULTANEOUSLY. THIS PREVENTS EACH
45584  M01S00640.242l642 +++|*         RETURN FROM DECIDING THAT ITS NOT THE LAST FILE ON THE DEVICE
45585  M01S00641.242l642 +++|*         AND, THUS, NOT DECREMENTING THE RESOURCE COUNT.
45586  M01S00642.242l642 +++|
45587  M01S00643.242l642 +++|          SA1    IR
45588  M01S00644.242l642 +++|          MX2    1
45589  M01S00645.242l642 +++|          LX2    41-59
45590  M01S00646.242l642 +++|          BX6    X2+X1
45591  M01S00647.242l642 +++|          SA6    A1
45592  M01S00648.242l642 +++|*         EQ     RPC         REQUEST PP CIO
45593  M00S27067.cpumtr  +++| RPC      SPACE  4,15
45594  M00S27068.cpumtr  +++|**        RPC - REQUEST PP CIO.
45595  M00S27069.cpumtr  +++|*
45596  M00S27070.cpumtr  +++|*         ENTRY  (X7) = 18/*TAPQ* INDEX, 42/REQUEST PARAMETERS.
45597  M00S27071.cpumtr  +++|*                (IR) = *CIO* CALL.
45598  M00S27072.cpumtr  +++|*                (MB) = *CIO* MESSAGE BUFFER PARAMETERS.
45599  M00S27073.cpumtr  +++|*                (MB1) = FET LENGTH - 5, FIRST AND LIMIT.
45600  M00S27074.cpumtr  +++|*                (MB2) = IN AND OUT.
45601  M00S27075.cpumtr  +++|*
45602  M00S27076.cpumtr  +++|*         EXIT   TO *CPCX*.
45603  M00S27077.cpumtr  +++|*
45604  M00S27078.cpumtr  +++|*         CALLS  /MONITOR/APQ.
45605  M00S27079.cpumtr  +++|
45606  M00S27080.cpumtr  +++|
45607  M00S27081.cpumtr  +++| RPC      SA1    IR          GET *CIO* CALL
45608  M00S27082.cpumtr  +++|          MX0    -6
45609  M00S27083.cpumtr  +++|          SA4    A1+B1       CLEAR RECALL STACK FLAG
45610  M00S27084.cpumtr  +++|          BX0    -X0*X7
45611  M00S27085.cpumtr  +++|          SB3    CPCX        SET RETURN ADDRESS FOR *APQ*
45612  M00S27086.cpumtr  +++|          MX6    -59
45613  M00S27087.cpumtr  +++|          MX2    -42         PRESERVE ERROR CODE AND PARAMETERS
45614  M00S27088.cpumtr  +++|          BX6    -X6*X4
45615  M00S27089.cpumtr  +++|          BX4    -X2*X7
45616  M00S27090.cpumtr  +++|          LX4    36
45617  M00S27091.cpumtr  +++|          BX6    X6+X4
45618  M00S27092.cpumtr  +++|          SA6    A4
45619  M00S27093.cpumtr  +++|          SA6    /MONITOR/APQA
45620  M00S27094.cpumtr  +++|          ZR     X0,RPC1     IF NO ERROR
45621  M00S27095.cpumtr  +++|          MX2    1           FORCE AUTO RECALL ON ERROR
45622  M00S27096.cpumtr  +++|          LX2    41-59
45623  M00S27097.cpumtr  +++|          BX6    X1+X2
45624  M00S27098.cpumtr  +++|          SA6    A1+         REWRITE INPUT REGISTER
45625  M00S27099.cpumtr  +++|          BX1    X6
45626  M00S27100.cpumtr  +++|
45627  M00S27101.cpumtr  +++|*         INDEX INTO TABLE *TAPQ* TO BUILD PP REQUEST.
45628  M00S27102.cpumtr  +++|
45629  M00S27103.cpumtr  +++| RPC1     AX7    42          *TAPQ* OFFSET
45630  M00S27104.cpumtr  +++|          SA2    TAPQ+X7
45631  M00S27105.cpumtr  +++|          MX6    18
45632  M00S27106.cpumtr  +++|          SB4    X2          PP FAST LOAD ADDRESS FROM *TAPQ*
45633  M00S27107.cpumtr  +++|          BX1    -X6*X1
45634  M00S27108.cpumtr  +++|          BX6    X6*X2
45635  M00S27109.cpumtr  +++|          BX6    X6+X1
45636  M00S27110.cpumtr  +++|          SA1    B7+STSW     CHECK IF ROLLOUT REQUESTED
45637  M00S27111.cpumtr  +++|          LX1    59-24
Line S27112 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
45638  M01S27112.271l750 ---|          PL     X1,/MONITOR/APQ  IF ROLLOUT NOT SET
Line S02083 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
45639  M01S02083.271l750 +++|          TPL    X1,(/DCP/APQ,DCPC,/MONITOR/APQ)  IF ROLLOUT NOT SET
45640  M00S27113.cpumtr  +++|          SA2    /MONITOR/APQA
45641  M00S27114.cpumtr  +++|          EQ     RCR1        SET REQUEST IN CPA
45642  M00S27115.cpumtr  +++| TAPQ     SPACE  4,10
45643  M00S27116.cpumtr  +++|**        TAPQ - TABLE OF PP REQUEST CRITERIA.
45644  M00S27117.cpumtr  +++|*
45645  M00S27118.cpumtr  +++|*         ENTRY  ONE WORD.
45646  M00S27119.cpumtr  +++|*
45647  M00S27120.cpumtr  +++|*T        18/PP CALL, 42/PP FAST LOAD PARAMETER ADDRESS
Figure

029PP FAST LOAD PARAMETER ADDRESS30414259PP FAST LOAD PARAMETER ADDRESSPP CALL

45648  M00S27121.cpumtr  +++|
45649  M00S27122.cpumtr  +++|
45650  M00S27123.cpumtr  +++| TAPQ     BSS    0
45651  M00S27124.cpumtr  +++|          LOC    0
45652  M00S27125.cpumtr  +++|
45653  M00S27126.cpumtr  +++|          VFD    18/3L1MS,42//MONITOR/LA1MS
45654  M00S27127.cpumtr  +++|          VFD    18/3L1MI,42//MONITOR/LA1MI
45655  M00S27128.cpumtr  +++|          VFD    18/3L1ML,42//MONITOR/LA1ML
Line S00039 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
45656  M01S00039.274l797 +++|          VFD    18/3L1OD,42//MONITOR/LA1OD
45657  M00S27129.cpumtr  +++|
45658  M00S27130.cpumtr  +++|          LOC    *O
45659  M00S27131.cpumtr  +++|
45660  M00S27132.cpumtr  +++| TAPQL    EQU    *-TAPQ      PP REQUEST TABLE LENGTH
45661  M00S27133.cpumtr  +++| SRC      SPACE  4,10
45662  M00S27134.cpumtr  +++|**        SRC - SET *RCLP* AND CLEAR RECALL STATUS IN REQUEST.
45663  M00S27135.cpumtr  +++|*
45664  M00S27136.cpumtr  +++|*         ENTRY  (B5) = EXIT ADDRESS.
45665  M00S27137.cpumtr  +++|*                (IR) = *CIO* CALL.
45666  M00S27138.cpumtr  +++|*
45667  M00S27139.cpumtr  +++|*         USES   X - 1, 2, 3, 6.
45668  M00S27140.cpumtr  +++|*                A - 1, 2, 6.
45669  M00S27141.cpumtr  +++|
45670  M00S27142.cpumtr  +++|
45671  M00S27143.cpumtr  +++| SRC      BSS    0
45672  M00S27144.cpumtr  +++|          SA1    IR
45673  M00S27145.cpumtr  +++|          LX1    59-41
45674  M00S27146.cpumtr  +++|          MX6    -59
45675  M00S27147.cpumtr  +++|          PL     X1,SRC1     IF NOT AUTO RECALL
45676  M00S27148.cpumtr  +++|          BX6    -X6*X1      CLEAR AUTO RECALL
45677  M00S27149.cpumtr  +++|          LX6    41-59
45678  M00S27150.cpumtr  +++|          SA2    /MONITOR/RC *RCLP* REQUEST
45679  M00S27151.cpumtr  +++|          SA6    A1
45680  M00S27152.cpumtr  +++|          SX3    X6          EXTRACT FET ADDRESS
45681  M00S27153.cpumtr  +++|          SA1    B7+FLSW     GET RA
45682  M00S27154.cpumtr  +++|          BX6    X2+X3
45683  M00S27155.cpumtr  +++|          MX2    -RMSK
45684  M00S27156.cpumtr  +++|          AX1    RSHF
45685  M00S27157.cpumtr  +++|          BX3    -X2*X1
45686  M00S27158.cpumtr  +++|          SX1    B1          STORE *RCLP* IN RA + 1
45687  M00S27159.cpumtr  +++|          LX3    6
45688  M00S27160.cpumtr  +++|          IX3    X3+X1
45689  M00S27161.cpumtr  +++|          EWX6   X3
45690  M00S27162.cpumtr  +++| SRC1     JP     B5          RETURN
45691  M00S27163.cpumtr  +++| CPCX     SPACE  4,15
45692  M00S27164.cpumtr  +++|**        CPCX - CPUCIO EXIT PROCESSOR.
45693  M00S27165.cpumtr  +++|*
45694  M00S27166.cpumtr  +++|*         ENTRY  (A0) = CPU NUMBER.
45695  M00S27167.cpumtr  +++|*                (A5) = PP *OR* ADDRESS OR CP RA+1 ADDRESS.
45696  M00S27168.cpumtr  +++|*                (B1) = 1.
45697  M00S27169.cpumtr  +++|*                (B2) = USER EXCHANGE PACKAGE AREA.
45698  M00S27170.cpumtr  +++|*                (B7) = CPA.
45699  M00S27171.cpumtr  +++|*                (IR) = *CIO* CALL.
45700  M00S27172.cpumtr  +++|*
45701  M00S27173.cpumtr  +++|*         EXIT   TO */MONITOR/.DPPM* IF PP REQUEST COMPLETE AND
45702  M00S27174.cpumtr  +++|*                   DROP OPTION SELECTED.
45703  M00S27175.cpumtr  +++|*                TO */MONITOR/MTR* IF RA+1 CALL WITHOUT AUTO RECALL
45704  M00S27176.cpumtr  +++|*                   FLAG SET.
45705  M00S27177.cpumtr  +++|*                TO */MONITOR/MTRX* IF RECALLED REQUEST OR IF RA+1 CALL
45706  M00S27178.cpumtr  +++|*                   WITHOUT AUTO RECALL WHEN JOB NOT ACTIVE IN CPU.
45707  M00S27179.cpumtr  +++|*                TO */MONITOR/PPR1* IF PP REQUEST COMPLETE AND
45708  M00S27180.cpumtr  +++|*                   DROP OPTION NOT SELECTED.
45709  M00S27181.cpumtr  +++|*                TO */MONITOR/SIS* IF RA+1 CALL WITH AUTO RECALL
45710  M00S27182.cpumtr  +++|*                   WHEN JOB ACTIVE IN CPU.
45711  M00S27183.cpumtr  +++|
45712  M00S27184.cpumtr  +++|
45713  M00S27185.cpumtr  +++| CPCX     TX1    10B,SP
45714  M00S27186.cpumtr  +++|          SX2    A5
45715  M00S27187.cpumtr  +++|          MX0    -18
45716  M00S27188.cpumtr  +++|          BX2    -X0*X2
45717  M00S27189.cpumtr  +++|          IX1    X2-X1
45718  M00S27190.cpumtr  +++|          ZR     X1,/MONITOR/MTRX  IF RECALLED REQUEST
45719  M00S27191.cpumtr  +++|          NG     X1,CPCX1    IF PP *RPPM* REQUEST
45720  M00S27192.cpumtr  +++|          SA1    IR
45721  M00S27193.cpumtr  +++|          MX0    3
45722  M00S27194.cpumtr  +++|          LX1    59-41
45723  M00S27195.cpumtr  +++|          PL     X1,/MONITOR/MTR  IF NO AUTO RECALL
45724  M00S27196.cpumtr  +++|          SA1    B7+STSW     GET CPU STATUS
45725  M00S27197.cpumtr  +++|          NO
45726  M00S27198.cpumtr  +++|          BX0    X0*X1
45727  M00S27199.cpumtr  +++|          ZR     X0,/MONITOR/MTRX  IF NULL CPU STATUS
45728  M00S27200.cpumtr  +++|          PL     X1,/MONITOR/SIS  IF JOB ACTIVE IN CPU
45729  M00S27201.cpumtr  +++|          EQ     /MONITOR/MTRX  EXIT
45730  M00S27202.cpumtr  +++|
45731  M00S27203.cpumtr  +++| CPCX1    SA5    A5
45732  M00S27204.cpumtr  +++|          LX5    59-37
45733  M00S27205.cpumtr  +++|          NG     X5,/MONITOR/.DPPM  IF DROP OPTION SELECTED
45734  M00S27206.cpumtr  +++|          SX7    B1          RETURN RESPONSE
45735  M00S27207.cpumtr  +++|          LX7    36
45736  M00S27208.cpumtr  +++|          EQ     /MONITOR/PPR1
45737  M00S27209.cpumtr  +++|          TITLE  CPUCIO MAIN ROUTINE.
45738  M00S27210.cpumtr  +++| CPC      SPACE  4,10
45739  M00S27211.cpumtr  +++|**        CPC - CPUCIO PROCESSOR (MONITOR MODE ENTRY POINT).
45740  M00S27212.cpumtr  +++|*
45741  M00S27213.cpumtr  +++|*         ENTRY  (A0) = CPU NUMBER.
45742  M00S27214.cpumtr  +++|*                (B1) = 1.
45743  M00S27215.cpumtr  +++|*                (B2) = USER EXCHANGE PACKAGE AREA.
45744  M00S27216.cpumtr  +++|*                (B7) = CPA.
45745  M00S27217.cpumtr  +++|*                (A5) = PP *OR* ADDRESS OR CP RA+1 ADDRESS.
45746  M00S27218.cpumtr  +++|*                (IR) = *CIO* CALL.
45747  M00S27219.cpumtr  +++|*                (MB) = *CIO* PARAMETER WORD IF RESTART.
45748  M00S27220.cpumtr  +++|*                     = 0 IF INITIAL *CIO* CALL.
45749  M00S27221.cpumtr  +++|*
45750  M00S27222.cpumtr  +++|*         EXIT   TO */CIO819/IPP1* IF PSEUDO PP CONTINUATION FUNCTION.
45751  M00S27223.cpumtr  +++|*                TO EQUIPMENT FUNCTION PROCESSOR (SEE *TFPJ* TABLE).
45752  M00S27224.cpumtr  +++|*
45753  M00S27225.cpumtr  +++|*         ERROR  EXIT TO *RPC* IF ERROR DETECTED.
45754  M00S27226.cpumtr  +++|*
45755  M00S27227.cpumtr  +++|*         CALLS  /MONITOR/VFA, /MONITOR/VFP.
45756  M00S27228.cpumtr  +++|
45757  M00S27229.cpumtr  +++|
45758  M00S27230.cpumtr  +++|*         VALIDATE FET ADDRESS.
45759  M00S27231.cpumtr  +++|
45760  M00S27232.cpumtr  +++| CPC      SA4    MB          CHECK IF CONTINUATION FUNCTION
45761  M00S27233.cpumtr  +++|          MX1    -59
45762  M00S27234.cpumtr  +++|          BX4    -X1*X4      IGNORE RECALL STACK FLAG
45763  M00S27235.cpumtr  +++|          SX6    B0+
45764  M00S27236.cpumtr  +++|          MX1    -54
45765  M00S27237.cpumtr  +++|          LX4    59-55
Line S27238 Modification History
M01 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
45766  M01S27238.252l678 ---| CPC1     TNG    X4,(/BUFIO/IPP1,/CPUCIO/CPC1,BUFIO)  IF BUFFERED I/O
Line S00861 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
45767  M01S00861.252l678 +++| CPC1     TNG    X4,(/BUFIO/IPP1,BUFIO,/CPUCIO/CPC1)  IF BUFFERED I/O
45768  M00S27239.cpumtr  +++|          LX4    59-53-59+55
45769  M00S27240.cpumtr  +++|          BX4    -X1*X4      IGNORE RECALL STACK REASON CODE
45770  M00S27241.cpumtr  +++|          SA6    A4+B1       CLEAR FET PARAMETER WORDS
45771  M00S27242.cpumtr  +++|          SA1    A4-B1       GET FET ADDRESS
45772  M00S27243.cpumtr  +++|          SA6    A6+B1
45773  M00S27244.cpumtr  +++|          SA6    A6+B1
45774  M00S27245.cpumtr  +++|          SX7    /CIOERR/ARG *FET ADDRESS OUT OF RANGE*
45775  M00S27246.cpumtr  +++|          SB3    RPC         SET ERROR EXIT ADDRESS FOR *VFA*
45776  M00S27247.cpumtr  +++|          SB6    CPC3        SET RETURN ADDRESS FOR *VFA*
45777  M00S27248.cpumtr  +++|          ZR     X4,/MONITOR/VFA  IF INITIAL CALL
45778  M00S27249.cpumtr  +++|          SB6    CPC2        SET RETURN ADDRESS FOR *VFA*
45779  M00S27250.cpumtr  +++|          EQ     /MONITOR/VFA  VALIDATE FET ADDRESS
45780  M00S27251.cpumtr  +++|
45781  M00S27252.cpumtr  +++| CPC2     SA4    A4
45782  M00S27253.cpumtr  +++|          MX2    -12
45783  M00S27254.cpumtr  +++|          SA6    MB2         SAVE FET LENGTH - 5 AND RANDOM FILE FLAG
45784  M00S27255.cpumtr  +++|          LX4    -24
45785  M00S27256.cpumtr  +++|          BX2    -X2*X4      FNT ORDINAL
45786  M00S27257.cpumtr  +++|          SX2    X2-FSTL
45787  M00S27258.cpumtr  +++|          IX0    X0-X2       ABSOLUTE FST ADDRESS
45788  M00S27259.cpumtr  +++|          LX4    24
45789  M00S27260.cpumtr  +++|          EQ     CPC16       VERIFY FET PARAMETERS
45790  M00S27261.cpumtr  +++|
45791  M00S27262.cpumtr  +++| CPC3     SA6    MB2         SAVE FET LENGTH - 5 AND RANDOM FILE FLAG
45792  M00S27263.cpumtr  +++|          MX4    -12
45793  M00S27264.cpumtr  +++|          LX2    -36
45794  M00S27265.cpumtr  +++|          SX6    B1+
45795  M00S27266.cpumtr  +++|          BX2    -X4*X2      NFL/100B
45796  M00S27267.cpumtr  +++|          IX3    X5-X6       FET+0
45797  M00S27268.cpumtr  +++|          MX6    -2
45798  M00S27269.cpumtr  +++|          ERX3   X3
45799  M00S27270.cpumtr  +++|          IX5    X5-X6       FET+4
45800  M00S27271.cpumtr  +++|          MX6    42
45801  M00S27272.cpumtr  +++|          SX7    /CIOERR/FLN *FILE NAME ERROR*
45802  M00S27273.cpumtr  +++|          BX1    X6*X3
45803  M00S27274.cpumtr  +++|          LX2    6
45804  M00S27275.cpumtr  +++|          ZR     X1,RPC      IF NO FILE NAME
45805  M00S27276.cpumtr  +++|
45806  M00S27277.cpumtr  +++|*         CHECK FNT POINTER FROM FET.
45807  M00S27278.cpumtr  +++|
45808  M00S27279.cpumtr  +++|          SX7    FNTN
45809  M00S27280.cpumtr  +++|          ERX1   X5          GET FNT POINTER FROM FET
45810  M00S27281.cpumtr  +++|          IX0    X0-X7
45811  M00S27282.cpumtr  +++|          LX1    12
45812  M00S27283.cpumtr  +++|          BX1    -X4*X1      FNT ORDINAL
45813  M00S27284.cpumtr  +++|          IX4    X2-X1
45814  M00S27285.cpumtr  +++|          IX1    X1-X7
45815  M00S27286.cpumtr  +++|          IX2    X2-X7
45816  M00S27287.cpumtr  +++|          PX2    X2
45817  M00S27288.cpumtr  +++|          NG     X1,CPC4     IF FNT POINTER TOO SMALL
45818  M00S27289.cpumtr  +++|          NG     X4,CPC4     IF FNT POINTER TOO LARGE
45819  M00S27290.cpumtr  +++|          IX0    X0-X1       ABSOLUTE FNT ADDRESS
45820  M00S27291.cpumtr  +++|          ERX4   X0          GET FNT ENTRY
45821  M00S27292.cpumtr  +++|          BX4    X3-X4
45822  M00S27293.cpumtr  +++|          BX4    X6*X4
45823  M00S27294.cpumtr  +++|          IX6    X1+X7       FNT ORDINAL
45824  M00S27295.cpumtr  +++|          ZR     X4,CPC7     IF FILE NAME MATCH
45825  M00S27296.cpumtr  +++|          IX0    X0+X1
45826  M00S27297.cpumtr  +++|
45827  M00S27298.cpumtr  +++|*         LOCATE FNT ENTRY.
45828  M00S27299.cpumtr  +++|
45829  M00S27300.cpumtr  +++| CPC4     SX7    LENF        COMPUTE ADDRESS OF LAST FNT ENTRY
45830  M00S27301.cpumtr  +++|          PX4    X7
45831  M00S27302.cpumtr  +++|          NX4    X4
45832  M00S27303.cpumtr  +++|          FX2    X2/X4
45833  M00S27304.cpumtr  +++|          UX2    X2,B6
45834  M00S27305.cpumtr  +++|          LX2    B6
45835  M00S27306.cpumtr  +++|          IX2    X7*X2
45836  M00S27307.cpumtr  +++|          BX6    X3
45837  M00S27308.cpumtr  +++|          IX4    X0-X2
45838  M00S27309.cpumtr  +++|          EWX6   X4          STORE FILE NAME FOR MATCH
45839  M00S27310.cpumtr  +++|          MX6    42
45840  M00S27311.cpumtr  +++| CPC5     ERX1   X0
45841  M00S27312.cpumtr  +++|          IX0    X0-X7
45842  M00S27313.cpumtr  +++|          ERX2   X0
45843  M00S27314.cpumtr  +++|          BX1    X1-X3
45844  M00S27315.cpumtr  +++|          BX1    X6*X1
45845  M00S27316.cpumtr  +++|          ZR     X1,CPC6     IF FOUND
45846  M00S27317.cpumtr  +++|          BX2    X2-X3
45847  M00S27318.cpumtr  +++|          IX0    X0-X7
45848  M00S27319.cpumtr  +++|          BX2    X6*X2
45849  M00S27320.cpumtr  +++|          NZ     X2,CPC5     IF NOT FOUND
45850  M00S27321.cpumtr  +++| CPC6     IX1    X0+X7
45851  M00S27322.cpumtr  +++|          BX6    X6-X6       CLEAR FILE NAME FROM END OF FNT
45852  M00S27323.cpumtr  +++|          IX0    X4-X1
45853  M00S27324.cpumtr  +++|          EWX6   X4
45854  M00S27325.cpumtr  +++|          ZR     X0,CPC8     IF FILE NOT FOUND
45855  M00S27326.cpumtr  +++|          SA2    B7+FLSW     GET RA
45856  M00S27327.cpumtr  +++|          BX0    X1
45857  M00S27328.cpumtr  +++|          MX7    -48
45858  M00S27329.cpumtr  +++|          LX2    -12
45859  M00S27330.cpumtr  +++|          ERX1   X5          SET FNT ORDINAL IN FET
45860  M00S27331.cpumtr  +++|          SX2    X2
45861  M00S27332.cpumtr  +++|          BX7    -X7*X1
45862  M00S27333.cpumtr  +++|          LX2    6
45863  M00S27334.cpumtr  +++|          IX6    X2-X0       FNT ORDINAL
45864  M00S27335.cpumtr  +++|          LX6    -12
45865  M00S27336.cpumtr  +++|          BX7    X6+X7
45866  M00S27337.cpumtr  +++|          EWX7   X5
45867  M00S27338.cpumtr  +++|          LX6    12
45868  M00S27339.cpumtr  +++|
45869  M00S27340.cpumtr  +++|*         CHECK FILE BUSY.
45870  M00S27341.cpumtr  +++|
45871  M00S27342.cpumtr  +++| CPC7     SX2    B1
45872  M00S27343.cpumtr  +++|          ERRNZ  FSTL-1      CODE DEPENDS ON VALUE
45873  M00S27344.cpumtr  +++|          IX0    X0+X2       ABSOLUTE FST ADDRESS
45874  M00S27345.cpumtr  +++|          ERX1   X0          CHECK FILE BUSY
45875  M00S27346.cpumtr  +++|          BX4    X2*X1
45876  M00S27347.cpumtr  +++|          SX7    /CIOERR/FSQ *I/O SEQUENCE ERROR*
45877  M00S27348.cpumtr  +++|          ZR     X4,RPC      IF FILE BUSY
45878  M00S27349.cpumtr  +++|          BX7    X1-X2       SET FILE BUSY
45879  M00S27350.cpumtr  +++|          EWX7   X0
45880  M00S27351.cpumtr  +++|
45881  M00S27352.cpumtr  +++|*         IDENTIFY *CIO* REQUEST.
45882  M00S27353.cpumtr  +++|
45883  M00S27354.cpumtr  +++| CPC8     LX3    -14         GET LEVEL NUMBER
45884  M00S27355.cpumtr  +++|          MX4    -4
45885  M00S27356.cpumtr  +++|          BX1    -X4*X3
45886  M00S27357.cpumtr  +++|          MX4    -8
45887  M00S27358.cpumtr  +++|          LX3    13          GET EXTERNAL CIO FUNCTION CODE
45888  M00S27359.cpumtr  +++|          BX3    -X4*X3
45889  M00S27360.cpumtr  +++|          LX1    8
45890  M00S27361.cpumtr  +++|          BX1    X1+X3
45891  M00S27362.cpumtr  +++|          SX2    B1
45892  M00S27363.cpumtr  +++|          LX6    12
45893  M00S27364.cpumtr  +++|          AX3    1
45894  M00S27365.cpumtr  +++|          BX4    -X3*X2
45895  M00S27366.cpumtr  +++|          SB3    X3-600B/4
45896  M00S27367.cpumtr  +++|          BX6    X6+X1
45897  M00S27368.cpumtr  +++|          LX6    12
45898  M00S27369.cpumtr  +++|          SX2    30
45899  M00S27370.cpumtr  +++|          LX3    -4
45900  M00S27371.cpumtr  +++|          IX4    X2*X4
45901  M00S27372.cpumtr  +++|          SX1    X3-3
45902  M00S27373.cpumtr  +++|          SA6    MB          SAVE FNT ORDINAL AND EXTERNAL CODE
45903  M00S27374.cpumtr  +++|          SX7    /CIOERR/IRQ *ILLEGAL I/O REQUEST ON FILE*
45904  M00S27375.cpumtr  +++|          NG     X1,CPC9     IF 0XX, 1XX, OR 2XX FUNCTION CODE
45905  M00S27376.cpumtr  +++|          SX2    B1+B1
45906  M00S27377.cpumtr  +++|          IX3    X3-X2       MAP 3XX INTO 1XX FUNCTION CODE
45907  M00S27378.cpumtr  +++|          ZR     X1,CPC9     IF 3XX FUNCTION CODE
45908  M00S27379.cpumtr  +++|          LX2    1
45909  M00S27380.cpumtr  +++|          IX3    X3-X2       MAP 6XX INTO 0XX FUNCTION CODE
Line S27381 Modification History
M01 (Removed by) cpumt71
Seq #  *Modification Id* Act 
----------------------------+
45910  M01S27381.cpumt71 ---|          SX1    X3+
Line S00001 Modification History
M01 (Added by) cpumt71
Seq #  *Modification Id* Act 
----------------------------+
45911  M01S00001.cpumt71 +++|          MX1    -3
45912  M01S00002.cpumt71 +++|          BX1    -X1*X3
45913  M00S27382.cpumtr  +++|          NZ     X1,RPC      IF NOT 6XX FUNCTION CODE
45914  M00S27383.cpumtr  +++| CPC9     LX3    3
45915  M00S27384.cpumtr  +++|          SA3    TCIC+X3     GET INTERNAL CODE AND FUNCTION FLAGS
45916  M00S27385.cpumtr  +++|          SB6    X4
45917  M00S27386.cpumtr  +++|          LX3    B6
45918  M00S27387.cpumtr  +++|          LX3    -18
45919  M00S27388.cpumtr  +++|          MX2    48
45920  M00S27389.cpumtr  +++|          BX1    X1+X3
45921  M00S27390.cpumtr  +++|          PL     X1,RPC      IF NOT LEGAL 3XX/6XX FUNCTION CODE
45922  M00S27391.cpumtr  +++|          BX1    X2+X3
45923  M00S27392.cpumtr  +++|          BX4    -X2*X3      INTERNAL CIO FUNCTION CODE
45924  M00S27393.cpumtr  +++|          ZR     X1,RPC      IF ILLEGAL FUNCTION CODE
45925  M00S27394.cpumtr  +++|          LX7    X3          SAVE FUNCTION FLAGS
45926  M00S27395.cpumtr  +++|          LX3    59-56       CHECK IF FNT REQUIRED
45927  M00S27396.cpumtr  +++|          SA7    MB3
45928  M00S27397.cpumtr  +++|          MX7    1
45929  M00S27398.cpumtr  +++|          BX1    -X3*X7
45930  M00S27399.cpumtr  +++|          LX7    6-59
45931  M00S27400.cpumtr  +++|          BX1    X1+X0
45932  M00S27401.cpumtr  +++|          SB5    RPC
45933  M00S27402.cpumtr  +++|          ZR     X1,SRC      IF FNT REQUIRED AND NOT FOUND
45934  M00S27403.cpumtr  +++|          NZ     B3,CPC10    IF NOT 600 FUNCTION CODE
45935  M00S27404.cpumtr  +++|          SX4    X4+/CIO/EOI SET EOI TERMINATION CONDITION
45936  M00S27405.cpumtr  +++|
45937  M00S27406.cpumtr  +++|*         PROCESS SKIP COUNT AND LEVEL NUMBER.
45938  M00S27407.cpumtr  +++|
45939  M00S27408.cpumtr  +++| CPC10    BX3    X6
45940  M00S27409.cpumtr  +++|          AX3    20          GET LEVEL NUMBER
45941  M00S27410.cpumtr  +++|          MX7    56
45942  M00S27411.cpumtr  +++|          BX3    X7+X3
45943  M00S27412.cpumtr  +++|          SA1    A6-B1
45944  M00S27413.cpumtr  +++|          MX2    42
45945  M00S27414.cpumtr  +++|          LX2    18
45946  M00S27415.cpumtr  +++|          BX7    X2*X1       CLEAR SKIP COUNT
45947  M00S27416.cpumtr  +++|          BX2    -X2*X1
45948  M00S27417.cpumtr  +++|          SX1    1754B
45949  M00S27418.cpumtr  +++|          BX1    X1*X4       FUNCTION CODE AND TERMINATION CONDITION
45950  M00S27419.cpumtr  +++|          SB3    X1-/CIO/SKP*100B-/CIO/PRU
45951  M00S27420.cpumtr  +++|          ZR     B3,CPC12    IF BACKSPACE PRU FUNCTION
45952  M00S27421.cpumtr  +++|          SB3    X1-/CIO/SKP*100B-/CIO/EOR
45953  M00S27422.cpumtr  +++|          ZR     B3,CPC11    IF SKIP RECORD FUNCTION
45954  M00S27423.cpumtr  +++|          SX2    B1+
45955  M00S27424.cpumtr  +++|          NZ     X3,CPC14    IF NOT LEVEL 17B
45956  M00S27425.cpumtr  +++|          SB3    X1-/CIO/WTF*100B-/CIO/EOR
45957  M00S27426.cpumtr  +++|          ZR     B3,CPC13    IF WRITER/REWRITER
45958  M00S27427.cpumtr  +++|          SX3    X1-/CIO/RDF*100B-40B-/CIO/EOI
45959  M00S27428.cpumtr  +++|          NZ     X3,CPC14    IF NOT *READCW*
45960  M00S27429.cpumtr  +++|          SX4    X4+/CIO/EOF-/CIO/EOI  STOP ON EOF
45961  M00S27430.cpumtr  +++|          EQ     CPC14       UPDATE PARAMETER WORD
45962  M00S27431.cpumtr  +++|
45963  M00S27432.cpumtr  +++| CPC11    NZ     X3,CPC12    IF NOT LEVEL 17B
45964  M00S27433.cpumtr  +++|          SX4    X4+/CIO/EOF-/CIO/EOR  SET EOF STOP
45965  M00S27434.cpumtr  +++| CPC12    MX3    1           SET SKIP DATA TRANSFER FLAG
45966  M00S27435.cpumtr  +++|          LX3    56-59
45967  M00S27436.cpumtr  +++|          BX6    X6+X3
45968  M00S27437.cpumtr  +++|          LX2    -18
45969  M00S27438.cpumtr  +++|          SX3    X2
45970  M00S27439.cpumtr  +++|          NZ     X3,CPC14    IF SKIP COUNT SPECIFIED
45971  M00S27440.cpumtr  +++|          SX3    B1          SET SKIP COUNT = 1
45972  M00S27441.cpumtr  +++|          LX3    18
45973  M00S27442.cpumtr  +++|          BX7    X7+X3
45974  M00S27443.cpumtr  +++|          SA7    A1+
45975  M00S27444.cpumtr  +++|          ZR     X2,CPC14    IF SKIP COUNT NOT INDEFINITE
45976  M00S27445.cpumtr  +++|          SX3    /CIO/EOI    SET STOP ON EOI FOR FORWARD SKIP
45977  M00S27446.cpumtr  +++|          BX4    X4+X3
45978  M00S27447.cpumtr  +++|          BX7    X4
45979  M00S27448.cpumtr  +++|          MX2    7
45980  M00S27449.cpumtr  +++|          LX7    59-11
45981  M00S27450.cpumtr  +++|          PL     X7,CPC14    IF FORWARD SKIP
45982  M00S27451.cpumtr  +++|          SX4    X4+/CIO/REW*100B-/CIO/SKP*100B-/CIO/EOI  SET REWIND
45983  M00S27452.cpumtr  +++|          SX3    50B/2
45984  M00S27453.cpumtr  +++|          LX2    19-59
45985  M00S27454.cpumtr  +++|          BX6    -X2*X6
45986  M00S27455.cpumtr  +++|          LX3    12
45987  M00S27456.cpumtr  +++|          BX6    X6+X3
45988  M00S27457.cpumtr  +++|          EQ     CPC14       UPDATE FET+0
45989  M00S27458.cpumtr  +++|
45990  M00S27459.cpumtr  +++| CPC13    SX4    X4+/CIO/EOF-/CIO/EOR  SET WRITEF/REWRITEF FUNCTION
45991  M00S27460.cpumtr  +++|          LX2    14-0
45992  M00S27461.cpumtr  +++|          IX6    X6+X2       SET EXTERNAL FUNCTION CODE
45993  M00S27462.cpumtr  +++| CPC14    BX6    X6+X4       SET INTERNAL CODE IN PARAMETER WORD
45994  M00S27463.cpumtr  +++|          SA6    A6
45995  M00S27464.cpumtr  +++|          LX6    -12
45996  M00S27465.cpumtr  +++|          MX7    -8
45997  M00S27466.cpumtr  +++|          BX6    -X7*X6      UPDATE EXTERNAL CODE IN FET
45998  M00S27467.cpumtr  +++|          SX3    4
45999  M00S27468.cpumtr  +++|          LX6    1
46000  M00S27469.cpumtr  +++|          IX5    X5-X3       GET FET+0
46001  M00S27470.cpumtr  +++|          ERX2   X5
46002  M00S27471.cpumtr  +++|          MX7    46
46003  M00S27472.cpumtr  +++|          BX7    X7*X2       CLEAR ABNORMAL TERMINATION FIELD
46004  M00S27473.cpumtr  +++|          IX7    X7+X6
46005  M00S27474.cpumtr  +++|          EWX7   X5
46006  M00S27475.cpumtr  +++|          SX6    B1
46007  M00S27476.cpumtr  +++|          IX5    X5+X6       FET+1
46008  M00S27477.cpumtr  +++|
46009  M00S27478.cpumtr  +++|*         CHECK FILE ACCESS.
46010  M00S27479.cpumtr  +++|
46011  M00S27480.cpumtr  +++|          SA4    A6
46012  M00S27481.cpumtr  +++|          ZR     X0,CPC16    IF NO FNT ENTRY
46013  M00S27482.cpumtr  +++|          IX2    X0-X6
46014  M00S27483.cpumtr  +++|          ERX2   X2          GET FNT ENTRY
46015  M00S27484.cpumtr  +++|          AX1    6
46016  M00S27485.cpumtr  +++|          LX2    59-14
46017  M00S27486.cpumtr  +++|          SB5    X1          INTERNAL FUNCTION CODE
46018  M00S27487.cpumtr  +++|          PL     X2,CPC15    IF NOT EXECUTE-ONLY FILE
Line S27488 Modification History
M01 (Removed by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46019  M01S27488.cpumt59 ---|          SA1    MB3         GET FUNCTION FLAGS
Line S00001 Modification History
M01 (Added by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46020  M01S00001.cpumt59 +++|          SA1    B7+EOCW     CHECK LAST FILE EXECUTED
46021  M00S27489.cpumtr  +++|          SA3    B7+SEPW     CHECK SPECIAL ENTRY POINTS
Line S27490 Modification History
M01 (Removed by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46022  M01S27490.cpumt59 ---|          LX1    59-54
Line S00002 Modification History
M01 (Added by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46023  M01S00002.cpumt59 +++|          MX7    12
46024  M01S00003.cpumt59 +++|          LX4    24
46025  M01S00004.cpumt59 +++|          BX1    X1-X4
46026  M00S27491.cpumtr  +++|          LX3    59-55
Line S27492 Modification History
M01 (Removed by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46027  M01S27492.cpumt59 ---|          NG     X1,CPC15    IF FUNCTION ALLOWED ON EXECUTE-ONLY FILE
Line S00005 Modification History
M01 (Added by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46028  M01S00005.cpumt59 +++|          BX1    X1*X7
46029  M01S00006.cpumt59 +++|          LX4    -24
46030  M01S00007.cpumt59 +++|          ZR     X1,CPC15    IF PROGRAM LOADED FROM THIS FILE
46031  M01S00008.cpumt59 +++|          NG     X3,CPC15    IF LDR= PROGRAM
46032  M01S00009.cpumt59 +++|          SA1    MB3         GET FUNCTION FLAGS
46033  M00S27493.cpumtr  +++|          SX7    /CIOERR/EXO *I/O ON EXECUTE-ONLY FILE*
Line S27494 Modification History
M01 (Removed by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46034  M01S27494.cpumt59 ---|          PL     X3,RPC      IF NOT LDR= JOB
Line S00010 Modification History
M01 (Added by) cpumt59
Seq #  *Modification Id* Act 
----------------------------+
46035  M01S00010.cpumt59 +++|          LX1    59-54
46036  M01S00011.cpumt59 +++|          PL     X1,RPC      IF FUNCTION INVALID ON EXECUTE ONLY FILE
46037  M00S27495.cpumtr  +++| CPC15    SX1    B5-/CIO/OVW
46038  M00S27496.cpumtr  +++|          LX2    59-12-59+14
46039  M00S27497.cpumtr  +++|          ZR     X1,CPC15.1  IF OVERWRITE FUNCTION
46040  M00S27498.cpumtr  +++|          NE     B5,B1,CPC16 IF NOT WRITE FUNCTION
46041  M00S27499.cpumtr  +++| CPC15.1  SX7    /CIOERR/IWR *WRITE ON READ ONLY FILE*
46042  M00S27500.cpumtr  +++|          NG     X2,RPC      IF WRITE LOCKOUT SET
46043  M00S27501.cpumtr  +++|
46044  M00S27502.cpumtr  +++|*         VERIFY FET PARAMETERS.
46045  M00S27503.cpumtr  +++|
46046  M00S27504.cpumtr  +++| CPC16    MX1    -2          GET VALIDATION FLAGS
46047  M00S27505.cpumtr  +++|          BX6    -X1*X4
46048  M00S27506.cpumtr  +++|          ZR     X6,CPC18    IF NO VALIDATION REQUIRED
46049  M00S27507.cpumtr  +++|          SB6    CPC17       SET RETURN ADDRESS FOR *VFP*
46050  M00S27508.cpumtr  +++|          SB3    RPC         SET ERROR EXIT ADDRESS FOR *VFP*
46051  M00S27509.cpumtr  +++|          SX7    /CIOERR/BUF *BUFFER ARGUMENT ERROR*
46052  M00S27510.cpumtr  +++|          EQ     /MONITOR/VFP  VERIFY FET PARAMETERS
46053  M00S27511.cpumtr  +++|
46054  M00S27512.cpumtr  +++| CPC17    SA2    MB2         GET FET LENGTH - 5 AND RANDOM FLAG
46055  M00S27513.cpumtr  +++|          SA3    A2+B1       GET FUNCTION FLAGS
46056  M00S27514.cpumtr  +++|          BX7    X1+X2
46057  M00S27515.cpumtr  +++|          SA6    A2-B1       SAVE IN AND OUT
46058  M00S27516.cpumtr  +++|          LX3    59-55       CHECK FOR REWIND OPERATION
46059  M00S27517.cpumtr  +++|          SA7    A2          SAVE FIRST, LIMIT, AND FET LENGTH
46060  M00S27518.cpumtr  +++|          SX2    B1
46061  M00S27519.cpumtr  +++|          PL     X3,CPC18    IF NOT REWIND OPERATION
46062  M00S27520.cpumtr  +++|          SX7    B4+         FIRST
46063  M00S27521.cpumtr  +++|          IX1    X5+X2       FET+2
46064  M00S27522.cpumtr  +++|          EWX7   X1          SET IN = FIRST
46065  M00S27523.cpumtr  +++|          IX1    X1+X2       FET+3
46066  M00S27524.cpumtr  +++|          EWX7   X1          SET OUT = FIRST
46067  M00S27525.cpumtr  +++|          ZR     X0,CPC18    IF NO FNT ENTRY
46068  M00S27526.cpumtr  +++|          ERX1   X0          GET FST ENTRY
46069  M00S27527.cpumtr  +++|          LX2    11          CLEAR SYSTEM SECTOR PROCESSING BIT
Line S00001 Modification History
M01 (Added by) cpumt73
Seq #  *Modification Id* Act 
----------------------------+
46070  M01S00001.cpumt73 +++|          MX7    12          GET EST ENTRY
Line S00002 Modification History
M01 (Added by) cpumt73
M02 (Removed by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
46071  M02S00002.261l700 ---|          R=     X4,ESTE
Line S00003 Modification History
M01 (Added by) cpumt73
Seq #  *Modification Id* Act 
----------------------------+
46072  M01S00003.cpumt73 +++|          BX7    X7*X1
46073  M01S00004.cpumt73 +++|          LX7    12
Line S00005 Modification History
M01 (Added by) cpumt73
M02 (Removed by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
46074  M02S00005.261l700 ---|          IX4    X4*X7
Line S00147 Modification History
M01 (Added by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
46075  M01S00147.261l700 +++|          CX4    X7,EST      CONVERT EST ORDINAL TO OFFSET
Line S00006 Modification History
M01 (Added by) cpumt73
Seq #  *Modification Id* Act 
----------------------------+
46076  M01S00006.cpumt73 +++|          TA4    X4+EQDE,EST
46077  M01S00007.cpumt73 +++|          MX7    -11
46078  M01S00008.cpumt73 +++|          LX4    -12
46079  M01S00009.cpumt73 +++|          BX7    -X7*X4
46080  M01S00010.cpumt73 +++|          SB6    X7-2RMT
46081  M01S00011.cpumt73 +++|          ZR     B6,CPC18    IF *MT* EQUIPMENT
46082  M01S00012.cpumt73 +++|          SB6    X7-2RNT
46083  M01S00013.cpumt73 +++|          ZR     B6,CPC18    IF *NT* EQUIPMENT
46084  M00S27528.cpumtr  +++|          BX7    -X2*X1
46085  M00S27529.cpumtr  +++|          EWX7   X0
46086  M00S27530.cpumtr  +++|
46087  M00S27531.cpumtr  +++|*         VALIDATE SECURITY ACCESS LEVEL OF FILE AND JOB.
46088  M00S27532.cpumtr  +++|
46089  M00S27533.cpumtr  +++| CPC18    ZR     X0,CPC18.4  IF NO FNT ENTRY
46090  M00S27534.cpumtr  +++|          TB6    OSSM        GET O/S SECURITY MODE
46091  M00S27535.cpumtr  +++|          ZR     B6,CPC18.4  IF UNSECURED SYSTEM
46092  M00S27536.cpumtr  +++|          GT     B5,B1,CPC18.4  IF NOT READ OR WRITE FUNCTION
46093  M00S27537.cpumtr  +++|          SX2    B1
46094  M00S27538.cpumtr  +++|          SA1    B7+JSCW     GET JOB ACCESS LEVEL
46095  M00S27539.cpumtr  +++|          IX2    X0+X2
46096  M00S27540.cpumtr  +++|          LX1    15
46097  M00S27541.cpumtr  +++|          ERX2   X2          GET FILE ACCESS LEVEL
46098  M00S27542.cpumtr  +++|          MX6    -3
46099  M00S27543.cpumtr  +++|          LX2    -24
46100  M00S27544.cpumtr  +++|          BX7    -X6*X1
46101  M00S27545.cpumtr  +++|          SA4    B7+SEPW     CHECK FOR SSJ=
46102  M00S27546.cpumtr  +++|          BX6    -X6*X2
46103  M00S27547.cpumtr  +++|          IX7    X7-X6
46104  M00S27548.cpumtr  +++|          LX4    59-50
46105  M00S27549.cpumtr  +++|          ZR     X7,CPC18.4  IF JOB AND FILE AT SAME ACCESS LEVEL
46106  M00S27550.cpumtr  +++|          SA3    B7+JCIW     CHECK FOR SUBSYSTEM
46107  M00S27551.cpumtr  +++|          NG     X4,CPC18.4  IF JOB HAS SSJ= PRIVILEGES
46108  M00S27552.cpumtr  +++|          LX3    -24
46109  M00S27553.cpumtr  +++|          MX4    -12
46110  M00S27554.cpumtr  +++|          BX3    -X4*X3
46111  M00S27555.cpumtr  +++|          MX4    57
46112  M00S27556.cpumtr  +++|          SX3    X3-LSSI-1
46113  M00S27557.cpumtr  +++|          PL     X3,CPC18.4  IF SUBSYSTEM
46114  M00S27558.cpumtr  +++|          SX3    B1
46115  M00S27559.cpumtr  +++|          IX3    X0-X3
46116  M00S27560.cpumtr  +++|          EQ     B5,B1,CPC18.1  IF WRITE FUNCTION
46117  M00S27561.cpumtr  +++|          PL     X7,CPC18.4  IF READ FROM FILE AT LOWER LEVEL
46118  M00S27562.cpumtr  +++|          BX1    X4*X1       RAISE JOB LEVEL TO FILE LEVEL
46119  M00S27563.cpumtr  +++|          BX7    X1+X6
46120  M00S27564.cpumtr  +++|          LX7    -15
46121  M00S27565.cpumtr  +++|          SA7    A1
46122  M00S27566.cpumtr  +++|          EQ     CPC18.4     GET DEVICE TYPE
46123  M00S27567.cpumtr  +++|
46124  M00S27568.cpumtr  +++| CPC18.1  NG     X7,CPC18.4  IF WRITE TO FILE AT HIGHER LEVEL
46125  M00S27569.cpumtr  +++|          LX1    59-53-15
46126  M00S27570.cpumtr  +++|          ERX3   X3          GET FNT ENTRY
46127  M00S27571.cpumtr  +++|          MX6    -6
46128  M00S27572.cpumtr  +++|          NG     X1,CPC18.4  IF USER ALLOWED TO WRITE TO LOWER LEVEL
46129  M00S27573.cpumtr  +++|          LX3    -6
46130  M00S27574.cpumtr  +++|          BX6    -X6*X3      GET FILE TYPE FROM FNT
46131  M00S27575.cpumtr  +++|          SX6    X6-PMFT
46132  M00S27576.cpumtr  +++|          ERX3   X0          GET EQUIPMENT FROM FST
46133  M00S27577.cpumtr  +++|          SX7    /CIOERR/WDP *WRITEDOWN PROHIBITED.*
46134  M00S27578.cpumtr  +++|          ZR     X6,RPC      IF DIRECT ACCESS PERMANENT FILE
46135  M00S27579.cpumtr  +++|          MX6    -9
46136  M00S27580.cpumtr  +++|          LX3    12
46137  M00S27581.cpumtr  +++|          BX3    -X6*X3
46138  M00S27582.cpumtr  +++|          LX1    53-59+15
46139  M00S27583.cpumtr  +++|          MX6    -3
46140  M00S27584.cpumtr  +++|          BX1    -X6*X1
46141  M00S27585.cpumtr  +++|          ZR     X3,CPC18.3  IF NO EQUIPMENT ASSIGNED
Line S27586 Modification History
M01 (Removed by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
46142  M01S27586.261l700 ---|          R=     X4,ESTE
46143  M01S27587.261l700 ---|          IX4    X3*X4
Line S00148 Modification History
M01 (Added by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
46144  M01S00148.261l700 +++|          CX4    X3,EST      CONVERT EST ORDINAL TO OFFSET
46145  M00S27588.cpumtr  +++|          TA3    X4+EQDE,EST GET EST ENTRY
46146  M00S27589.cpumtr  +++|          MX6    -11         GET EQUIPMENT MNEMONIC
46147  M00S27590.cpumtr  +++|          LX6    12
46148  M00S27591.cpumtr  +++|          BX6    -X6*X3
46149  M00S27592.cpumtr  +++|          LX6    -12
46150  M00S27593.cpumtr  +++|          SB6    X6-2RMT
46151  M00S27594.cpumtr  +++|          ZR     B6,RPC      IF TAPE EQUIPMENT
46152  M00S27595.cpumtr  +++|          SB6    X6-2RNT
46153  M00S27596.cpumtr  +++|          ZR     B6,RPC      IF TAPE EQUIPMENT
46154  M00S27597.cpumtr  +++|          SB6    CPC18.2     SET *VAE* RETURN ADDRESS
46155  M00S27598.cpumtr  +++|          EQ     /MONITOR/VAE0  VALIDATE EQUIPMENT ACCESS LEVEL
46156  M00S27599.cpumtr  +++|
46157  M00S27600.cpumtr  +++| CPC18.2  SX7    /CIOERR/LNF *ACCESS LEVEL NOT VALID FOR FILE*
46158  M00S27601.cpumtr  +++|          NG     X6,RPC      IF JOB LEVEL NOT VALID FOR EQUIPMENT
46159  M00S27602.cpumtr  +++| CPC18.3  MX7    57          RAISE FILE TO JOB ACCESS LEVEL
46160  M00S27603.cpumtr  +++|          SX3    B1+
46161  M00S27604.cpumtr  +++|          BX7    X7*X2
46162  M00S27605.cpumtr  +++|          IX3    X0+X3
46163  M00S27606.cpumtr  +++|          BX7    X7+X1
46164  M00S27607.cpumtr  +++|          LX7    24
46165  M00S27608.cpumtr  +++|          EWX7   X3
46166  M00S27609.cpumtr  +++|
46167  M00S27610.cpumtr  +++|*         GET DEVICE TYPE.
46168  M00S27611.cpumtr  +++|
Line S27612 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46169  M01S27612.284l847 ---| CPC18.4  SA1    TFCP-1
Line S00278 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46170  M01S00278.284l847 +++| CPC18.4  SA1    TFCP
46171  M00S27613.cpumtr  +++|          MX6    -11
46172  M00S27614.cpumtr  +++|          BX4    X4-X4
46173  M00S27615.cpumtr  +++|          MX3    -12
46174  M00S27616.cpumtr  +++|          ZR     X0,CPC19    IF NO FNT ENTRY
46175  M00S27617.cpumtr  +++|          ERX2   X0
46176  M00S27618.cpumtr  +++|          LX2    12
46177  M00S27619.cpumtr  +++|          BX4    -X3*X2      EST ORDINAL
46178  M00S27620.cpumtr  +++|          ZR     X4,CPC19    IF EQUIPMENT NOT ASSIGNED
Line S27621 Modification History
M01 (Removed by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
46179  M01S27621.261l700 ---|          R=     X1,ESTE
46180  M01S27622.261l700 ---|          IX4    X4*X1
46181  M01S27623.261l700 ---|          TA3    X4+EQDE,EST READ EST ENTRY
Line S00149 Modification History
M01 (Added by) 261l700
Seq #  *Modification Id* Act 
----------------------------+
46182  M01S00149.261l700 +++|          CX3    X4,EST      CONVERT EST ORDINAL TO OFFSET
46183  M01S00150.261l700 +++|          TA3    X3+EQDE,EST READ EST ENTRY
Line S27624 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46184  M01S27624.283l840 ---|          AX3    12
Line S01027 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46185  M01S01027.283l840 +++|          LX3    -12
46186  M00S27625.cpumtr  +++|          BX4    -X6*X3      DEVICE TYPE
Line S01028 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46187  M01S01028.283l840 +++|          LX3    12
Line S00279 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46188  M01S00279.284l847 +++|          PL     X3,CPC19    IF NOT MASS STORAGE
46189  M01S00280.284l847 +++|          BX2    X3
46190  M01S00281.284l847 +++|          LX2    59-53
46191  M01S00282.284l847 +++|          NG     X2,CPC20    IF BUFFERED DEVICE
46192  M00S27626.cpumtr  +++|
46193  M00S27627.cpumtr  +++|*         DETERMINE FUNCTION PROCESSOR.
46194  M00S27628.cpumtr  +++|
Line S27629 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46195  M01S27629.284l847 ---| CPC19    SA1    A1+B1
46196  M01S27630.284l847 ---|          LX1    12
Line S00283 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46197  M01S00283.284l847 +++| CPC19    SA1    A1+1
46198  M00S27631.cpumtr  +++|          BX2    -X6*X1
46199  M00S27632.cpumtr  +++|          BX7    X2-X4
46200  M00S27633.cpumtr  +++|          ZR     X7,CPC20    IF EQUIPMENT FOUND
46201  M00S27634.cpumtr  +++|          NZ     X2,CPC19    IF MORE ENTRIES TO CHECK
46202  M00S27635.cpumtr  +++|          NG     X3,CPC20    IF MASS STORAGE EQUIPMENT
Line S27636 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46203  M01S27636.284l847 ---|          SA1    A1+B1       GET ALL OTHER EQUIPMENT ENTRY
46204  M01S27637.284l847 ---|          LX1    12
Line S00284 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46205  M01S00284.284l847 +++|          SA1    A1+1        GET ALL OTHER EQUIPMENT ENTRY
46206  M00S27638.cpumtr  +++| CPC20    BX6    X3
46207  M00S27639.cpumtr  +++|          NG     X3,CPC21    IF MASS STORAGE
Line S27640 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46208  M01S27640.283l840 ---|          LX6    59-58+12
Line S01029 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46209  M01S01029.283l840 +++|          LX6    59-58
46210  M00S27641.cpumtr  +++| CPC21    ERX2   X5          SET DEVICE TYPE IN FET
46211  M00S27642.cpumtr  +++|          MX7    1
46212  M00S27643.cpumtr  +++|          BX7    -X6*X7      NON-ALLOCATABLE FLAG
46213  M00S27644.cpumtr  +++|          MX6    -48
46214  M00S27645.cpumtr  +++|          LX4    -12
46215  M00S27646.cpumtr  +++|          BX6    -X6*X2
46216  M00S27647.cpumtr  +++|          SA2    MB3         GET FUNCTION FLAGS
46217  M00S27648.cpumtr  +++|          BX7    X7+X4
46218  M00S27649.cpumtr  +++|          LX2    59-53
46219  M00S27650.cpumtr  +++|          BX6    X6+X7
46220  M00S27651.cpumtr  +++|          SX4    B1
46221  M00S27652.cpumtr  +++|          NG     X2,CPC22    IF DEVICE TYPE NOT TO BE RETURNED
46222  M00S27653.cpumtr  +++|          EWX6   X5
46223  M00S27654.cpumtr  +++|          LX6    59-39
46224  M00S27655.cpumtr  +++|          PL     X6,CPC22    IF FILE ACCESS LEVEL NOT TO BE RETURNED
46225  M00S27656.cpumtr  +++|          IX4    X0+X4
46226  M00S27657.cpumtr  +++|          MX6    -3
46227  M00S27658.cpumtr  +++|          ERX4   X4          GET FILE ACCESS LEVEL
46228  M00S27659.cpumtr  +++|          SX7    3
46229  M00S27660.cpumtr  +++|          IX7    X5+X7       GET FET + 4
46230  M00S27661.cpumtr  +++|          LX4    -24
46231  M00S27662.cpumtr  +++|          ERX2   X7
46232  M00S27663.cpumtr  +++|          BX4    -X6*X4
46233  M00S27664.cpumtr  +++|          LX2    -36
46234  M00S27665.cpumtr  +++|          BX2    X6*X2
46235  M00S27666.cpumtr  +++|          BX6    X2+X4       RETURN FILE ACCESS LEVEL IN FET + 4
46236  M00S27667.cpumtr  +++|          LX6    36
46237  M00S27668.cpumtr  +++|          EWX6   X7
46238  M00S27669.cpumtr  +++| CPC22    SA2    MB3         GET FUNCTION FLAGS
46239  M00S27670.cpumtr  +++|          MX7    2
46240  M00S27671.cpumtr  +++|          LX2    59-58
46241  M00S27672.cpumtr  +++|          BX2    X7*X2
46242  M00S27673.cpumtr  +++|          BX7    X7*X1
46243  M00S27674.cpumtr  +++|          MX6    -4
46244  M00S27675.cpumtr  +++|          BX2    X7*X2
46245  M00S27676.cpumtr  +++|          SA4    MB          GET INTERNAL FUNCTION CODE
46246  M00S27677.cpumtr  +++|          LX1    -12
46247  M00S27678.cpumtr  +++|          LX4    -6
46248  M00S27679.cpumtr  +++|          NZ     X2,TFPJ+/TFPJ/RUD  IF FUNCTION NOT VALID ON EQUIPMENT
46249  M00S27680.cpumtr  +++|          BX2    -X6*X4
46250  M00S27681.cpumtr  +++|          SB3    X2
46251  M00S27682.cpumtr  +++|          SB6    B3+B3
46252  M00S27683.cpumtr  +++|          BX7    X7-X7
46253  M00S27684.cpumtr  +++|          SB6    B6+B6       FUNCTION CODE * 4
46254  M00S27685.cpumtr  +++|          AX1    B6
46255  M00S27686.cpumtr  +++|          BX1    -X6*X1      INDEX INTO *TFPJ* JUMP TABLE
46256  M00S27687.cpumtr  +++|          SB6    X1
46257  M00S27688.cpumtr  +++|          JP     TFPJ+B6     EXIT TO PROCESSOR
46258  M00S27689.cpumtr  +++|
46259  M00S27690.cpumtr  +++|
46260  M00S27691.cpumtr  +++| TFPJ     BSS    0           TABLE OF FUNCTION PROCESSOR JUMPS
46261  M00S27692.cpumtr  +++|          QUAL   TFPJ
46262  M00S27693.cpumtr  +++|
46263  M00S27694.cpumtr  +++| IPP      EQU    *-/CPUCIO/TFPJ
Line S27695 Modification History
M01 (Removed by) cpumt71
Seq #  *Modification Id* Act 
----------------------------+
46264  M01S27695.cpumt71 ---|          TEQ    (/BUFIO/IPP,*,BUFIO)  CALL PSEUDO PP
Line S00003 Modification History
M01 (Added by) cpumt71
M02 (Removed by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
46265  M02S00003.252l678 ---|          TEQ    (/BUFIO/IPP,/CPUCIO/TFPJ+/TFPJ/IPP,BUFIO)  PSEUDO PP
Line S00862 Modification History
M01 (Added by) 252l678
Seq #  *Modification Id* Act 
----------------------------+
46266  M01S00862.252l678 +++|          TEQ    (/BUFIO/IPP,BUFIO,/CPUCIO/TFPJ+/TFPJ/IPP)  PSEUDO PP
46267  M00S27696.cpumtr  +++|          BSS    0
Line S00649 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46268  M01S00649.242l642 +++|
46269  M00S27697.cpumtr  +++| OPE      EQU    *-/CPUCIO/TFPJ
46270  M00S27698.cpumtr  +++|          SA1    /CPUCIO/MB2  READ RANDOM FILE FLAG
46271  M00S27699.cpumtr  +++|          EQ     /CPUCIO/OPE  PROCESS OPEN
46272  M00S27700.cpumtr  +++|          BSS    0
Line S00650 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46273  M01S00650.242l642 +++|
46274  M00S27701.cpumtr  +++| RET      EQU    *-/CPUCIO/TFPJ
Line S27702 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46275  M01S27702.242l642 ---|          NZ     X0,/CPUCIO/RPC  IF FNT/FST PRESENT
Line S00651 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46276  M01S00651.242l642 +++|          NZ     X0,/CPUCIO/RET  FNT/FST PRESENT
46277  M00S27703.cpumtr  +++|          EQ     /CPUCIO/RWF SET CRI AND COMPLETE FET
46278  M00S27704.cpumtr  +++|          BSS    0
Line S00652 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46279  M01S00652.242l642 +++|
46280  M00S27705.cpumtr  +++| PMT      EQU    *-/CPUCIO/TFPJ
46281  M00S27706.cpumtr  +++|          EQ     /CPUCIO/PMT PROCESS MAGNETIC TAPE
46282  M00S27707.cpumtr  +++|          BSS    0
Line S00040 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46283  M01S00040.274l797 +++|
46284  M01S00041.274l797 +++| POD      EQU    *-/CPUCIO/TFPJ
46285  M01S00042.274l797 +++|          EQ     /CPUCIO/POD PROCESS OPTICAL DISK
46286  M01S00043.274l797 +++|          BSS    0
46287  M01S00044.274l797 +++|
Line S00653 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46288  M01S00653.242l642 +++|
46289  M00S27708.cpumtr  +++| RPC      EQU    *-/CPUCIO/TFPJ
46290  M00S27709.cpumtr  +++|          EQ     /CPUCIO/RPC CALL PP CIO
46291  M00S27710.cpumtr  +++|          BSS    0
Line S00654 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46292  M01S00654.242l642 +++|
46293  M00S27711.cpumtr  +++| RWF      EQU    *-/CPUCIO/TFPJ
46294  M00S27712.cpumtr  +++|          EQ     /CPUCIO/RWF PROCESS REWIND FUNCTION
46295  M00S27713.cpumtr  +++|          BSS    0
Line S00655 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46296  M01S00655.242l642 +++|
46297  M00S27714.cpumtr  +++| TIO      EQU    *-/CPUCIO/TFPJ
46298  M00S27715.cpumtr  +++|          PL     X4,/CPUCIO/TIO  IF NOT CONTROL WORDS
46299  M00S27716.cpumtr  +++|          EQ     /CPUCIO/TFPJ+/TFPJ/RUD  CONTROL WORDS NOT VALID
46300  M00S27717.cpumtr  +++|          BSS    0
Line S00656 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46301  M01S00656.242l642 +++|
46302  M00S27718.cpumtr  +++| CCI      EQU    *-/CPUCIO/TFPJ
46303  M00S27719.cpumtr  +++|          SX7    B1+B1       *TAPQ* TABLE OF PP REQUESTS INDEX
46304  M00S27720.cpumtr  +++|          LX7    42-0
46305  M00S27721.cpumtr  +++|          EQ     /CPUCIO/RPC CALL PP CIO
46306  M00S27722.cpumtr  +++|          BSS    0
Line S00657 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46307  M01S00657.242l642 +++|
46308  M00S27723.cpumtr  +++| RUD      EQU    *-/CPUCIO/TFPJ
46309  M00S27724.cpumtr  +++|          SX7    /CIOERR/RUD *REQUEST UNDEFINED ON DEVICE*
46310  M00S27725.cpumtr  +++|          EQ     /CPUCIO/RPC CALL PP CIO
46311  M00S27726.cpumtr  +++|          BSS    0
Line S00658 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46312  M01S00658.242l642 +++|
46313  M00S27727.cpumtr  +++| IEQ      EQU    *-/CPUCIO/TFPJ
46314  M00S27728.cpumtr  +++|          SX7    /CIOERR/IEQ *ILLEGAL EQUIPMENT ON FILE*
46315  M00S27729.cpumtr  +++|          EQ     /CPUCIO/RPC CALL PP CIO
Line S00001 Modification History
M01 (Added by) ns2365
Seq #  *Modification Id* Act 
----------------------------+
46316  M01S00001.ns2365  +++|
46317  M01S00002.ns2365  +++| RTE      EQU    *-/CPUCIO/TFPJ
46318  M01S00003.ns2365  +++|          SX4    1           SET FST STATUS (EQUIVALENT TO TAPE)
46319  M01S00004.ns2365  +++|          EQ     /CPUCIO/RWF0  PROCESS REWIND FUNCTION FOR *TEEQ*
46320  M01S00005.ns2365  +++|          BSS    0
46321  M00S27730.cpumtr  +++|
46322  M00S27731.cpumtr  +++|          QUAL   *
46323  M00S27732.cpumtr  +++| TFCP     SPACE  4,20
46324  M00S27733.cpumtr  +++|**        TFCP - TABLE OF FUNCTION CODE PROCESSORS.
46325  M00S27734.cpumtr  +++|*
Line S27735 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46326  M01S27735.284l847 ---|*T        12/ DT, 1/S, 1/T, 10/, 36/ TFPJI
Figure

029 TFPJI3035364546474859 TFPJITS DT


Line S00285 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46327  M01S00285.284l847 +++|*T        1/S, 1/T, 10/, 36/ TFPJI, 12/ DT
Figure

0111229 DT TFPJI304748575859 TFPJITS

46328  M00S27736.cpumtr  +++|*         DT     DEVICE TYPE (0 = ANY DEVICE).
46329  M00S27737.cpumtr  +++|*         S      IF SET, MASS STORAGE ONLY FUNCTION IS NOT ALLOWED
46330  M00S27738.cpumtr  +++|*                ON THIS EQUIPMENT.
46331  M00S27739.cpumtr  +++|*         T      IF SET, MAGNETIC TAPE ONLY FUNCTION IS NOT
46332  M00S27740.cpumtr  +++|*                ALLOWED ON THIS EQUIPMENT.
46333  M00S27741.cpumtr  +++|*         TFPJI  *TFPJ* TABLE INDICES TO PROCESS *CIO* FUNCTIONS -
46334  M00S27742.cpumtr  +++|*                4/OV,4/EV,4/RT,4/RW,4/CL,4/OP,4/SK,4/WT,4/RD
46335  M00S27743.cpumtr  +++|*         OV     *TFPJ* TABLE INDEX FOR *OVERWRITE* PROCESSOR.
46336  M00S27744.cpumtr  +++|*         EV     *TFPJ* TABLE INDEX FOR *EVICT* PROCESSOR.
46337  M00S27745.cpumtr  +++|*         RT     *TFPJ* TABLE INDEX FOR *RETURN/UNLOAD* PROCESSOR.
46338  M00S27746.cpumtr  +++|*         RW     *TFPJ* TABLE INDEX FOR *REWIND* PROCESSOR.
46339  M00S27747.cpumtr  +++|*         CL     *TFPJ* TABLE INDEX FOR *CLOSE* PROCESSOR.
46340  M00S27748.cpumtr  +++|*         OP     *TFPJ* TABLE INDEX FOR *OPEN* PROCESSOR.
46341  M00S27749.cpumtr  +++|*         SK     *TFPJ* TABLE INDEX FOR *SKIP* PROCESSOR.
46342  M00S27750.cpumtr  +++|*         WT     *TFPJ* TABLE INDEX FOR *WRITE* PROCESSOR.
46343  M00S27751.cpumtr  +++|*         RD     *TFPJ* TABLE INDEX FOR *READ* PROCESSOR.
46344  M00S27752.cpumtr  +++|*
46345  M00S27753.cpumtr  +++|*         NOTE - FUNCTION PROCESSOR JUMP INDEXES MUST BE IN SAME
46346  M00S27754.cpumtr  +++|*                ORDER AS INTERNAL *CIO* FUNCTION CODES.
46347  M00S27755.cpumtr  +++|
46348  M00S27756.cpumtr  +++|
46349  M00S27757.cpumtr  +++|          ERRNZ  /CIO/RDF
46350  M00S27758.cpumtr  +++|          ERRNZ  /CIO/WTF-1
46351  M00S27759.cpumtr  +++|          ERRNZ  /CIO/SKP-2
46352  M00S27760.cpumtr  +++|          ERRNZ  /CIO/OPE-3
46353  M00S27761.cpumtr  +++|          ERRNZ  /CIO/CLO-4
46354  M00S27762.cpumtr  +++|          ERRNZ  /CIO/REW-5
46355  M00S27763.cpumtr  +++|          ERRNZ  /CIO/RET-6
46356  M00S27764.cpumtr  +++|          ERRNZ  /CIO/EVI-7
46357  M00S27765.cpumtr  +++|          ERRNZ  /CIO/OVW-10B
46358  M00S27766.cpumtr  +++|
46359  M00S27767.cpumtr  +++|
46360  M00S27768.cpumtr  +++| TFCP     BSS    0
46361  M00S27769.cpumtr  +++|          QUAL    TFPJ
Line S00286 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46362  M01S00286.284l847 +++|          VFD    1/0,1/1,10/0      BUFFERED MASS STORAGE
46363  M01S00287.284l847 +++|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46364  M01S00288.284l847 +++|          VFD    12/3777B
46365  M01S00289.284l847 +++|
46366  M01S00290.284l847 +++|*         TABLE SEARCH STARTS HERE FOR ALL BUT BUFFERED MASS STORAGE.
46367  M01S00291.284l847 +++|
Line S00045 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46368  M02S00045.284l847 ---|          VFD    12/2ROD,1/1,1/0,10/0    OPTICAL DISK
Line S00292 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46369  M01S00292.284l847 +++|          VFD    1/1,1/0,10/0      OPTICAL DISK
Line S00046 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46370  M01S00046.274l797 +++|          VFD    4/POD,4/POD,4/POD,4/POD,4/POD,4/POD,4/POD,4/POD,4/POD
Line S00293 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46371  M01S00293.284l847 +++|          VFD    12/2ROD
Line S00047 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46372  M01S00047.274l797 +++|
Line S27770 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46373  M01S27770.274l797 ---|          VFD    12/2RMT,1/1,1/0,10/0  MAGNETIC TAPE
Line S00048 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46374  M02S00048.284l847 ---|          VFD    12/2RMT,1/1,1/0,10/0  7-TRACK TAPE
Line S00294 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46375  M01S00294.284l847 +++|          VFD    1/1,1/0,10/0      7-TRACK TAPE
46376  M00S27771.cpumtr  +++|          VFD    4/RUD,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT
Line S00295 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46377  M01S00295.284l847 +++|          VFD    12/2RMT
Line S00659 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46378  M01S00659.242l642 +++|
Line S27772 Modification History
M01 (Removed by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46379  M01S27772.274l797 ---|          VFD    12/2RNT,1/1,1/0,10/0  MAGNETIC TAPE
Line S00049 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46380  M02S00049.284l847 ---|          VFD    12/2RNT,1/1,1/0,10/0  9-TRACK TAPE
Line S00296 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46381  M01S00296.284l847 +++|          VFD    1/1,1/0,10/0      9-TRACK TAPE
Line S00050 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46382  M01S00050.274l797 +++|          VFD    4/RUD,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT
Line S00297 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46383  M01S00297.284l847 +++|          VFD    12/2RNT
Line S00051 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46384  M01S00051.274l797 +++|
Line S00052 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46385  M02S00052.284l847 ---|          VFD    12/2RCT,1/1,1/0,10/0  CARTRIDGE TAPE
Line S00298 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46386  M01S00298.284l847 +++|          VFD    1/1,1/0,10/0      CARTRIDGE TAPE
Line S00053 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46387  M01S00053.274l797 +++|          VFD    4/RUD,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT
Line S00299 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46388  M01S00299.284l847 +++|          VFD    12/2RCT
Line S00054 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46389  M01S00054.274l797 +++|
Line S00055 Modification History
M01 (Added by) 274l797
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46390  M02S00055.284l847 ---|          VFD    12/2RAT,1/1,1/0,10/0  ACS CARTRIDGE TAPE
Line S00300 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46391  M01S00300.284l847 +++|          VFD    1/1,1/0,10/0      ACS CARTRIDGE TAPE
46392  M00S27773.cpumtr  +++|          VFD    4/RUD,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT,4/PMT
Line S00301 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46393  M01S00301.284l847 +++|          VFD    12/2RAT
Line S00660 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46394  M01S00660.242l642 +++|
Line S27774 Modification History
M01 (Removed by) ns2365
Seq #  *Modification Id* Act 
----------------------------+
46395  M01S27774.ns2365  ---|          VFD    12/2RTE,1/1,1/1,10/0  PSEUDO TAPE EQUIPMENT
46396  M01S27775.ns2365  ---|          VFD    4/RUD,4/RPC,4/RPC,4/RWF,4/RPC,4/RUD,4/RUD,4/RUD,4/RUD
Line S00006 Modification History
M01 (Added by) ns2365
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46397  M02S00006.284l847 ---|          VFD    12/2RTE,1/1,1/1,10/0  *TE* PSEUDO-EQUIPMENT
Line S00302 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46398  M01S00302.284l847 +++|          VFD    1/1,1/1,10/0      *TE* PSEUDO-EQUIPMENT
Line S00007 Modification History
M01 (Added by) ns2365
Seq #  *Modification Id* Act 
----------------------------+
46399  M01S00007.ns2365  +++|          VFD    4/RUD,4/RPC,4/RPC,4/RTE,4/RPC,4/RUD,4/RUD,4/RUD,4/RUD
Line S00303 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46400  M01S00303.284l847 +++|          VFD    12/2RTE
Line S00661 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46401  M01S00661.242l642 +++|
Line S27776 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46402  M01S27776.284l847 ---|          VFD    12/2RTT,1/1,1/1,10/0  TERMINAL
Line S00304 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46403  M01S00304.284l847 +++|          VFD    1/1,1/1,10/0      TERMINAL
46404  M00S27777.cpumtr  +++|          VFD    4/RUD,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/RPC,4/TIO,4/TIO
Line S00305 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46405  M01S00305.284l847 +++|          VFD    12/2RTT
Line S00662 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46406  M01S00662.242l642 +++|
Line S27778 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46407  M01S27778.284l847 ---|          VFD    12/2RNE,1/0,1/1,10/0  NULL
Line S00306 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46408  M01S00306.284l847 +++|          VFD    1/0,1/1,10/0      NULL EQUIPMENT
46409  M00S27779.cpumtr  +++|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/RPC,4/RPC,4/RPC
Line S00307 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46410  M01S00307.284l847 +++|          VFD    12/2RNE
Line S00056 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46411  M01S00056.274l797 +++|
Line S00663 Modification History
M01 (Added by) 242l642
M02 (Removed by) ns2365
Seq #  *Modification Id* Act 
----------------------------+
46412  M02S00663.ns2365  ---|
Line S00664 Modification History
M01 (Added by) 242l642
M02 (Removed by) 251l670
Seq #  *Modification Id* Act 
----------------------------+
46413  M02S00664.251l670 ---|
Line S27780 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46414  M01S27780.284l847 ---|          VFD    12/2RDV,1/0,1/1,10/0  819
46415  M01S27781.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
Line S00665 Modification History
M01 (Added by) 242l642
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46416  M02S00665.284l847 ---|
Line S27782 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46417  M01S27782.284l847 ---|          VFD    12/2RDW,1/0,1/1,10/0  819
46418  M01S27783.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
Line S00666 Modification History
M01 (Added by) 242l642
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46419  M02S00666.284l847 ---|
Line S27784 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46420  M01S27784.284l847 ---|          VFD    12/2RCC,1/1,1/1,10/0  COMMUNICATION COUPLER
Line S00308 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46421  M01S00308.284l847 +++|          VFD    1/1,1/1,10/0      COMMUNICATION COUPLER
46422  M00S27785.cpumtr  +++|          VFD    4/RUD,4/CCI,4/CCI,4/CCI,4/CCI,4/CCI,4/CCI,4/CCI,4/CCI
Line S00309 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46423  M01S00309.284l847 +++|          VFD    12/2RCC
Line S00667 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46424  M01S00667.242l642 +++|
Line S27786 Modification History
M01 (Removed by) 251l664
Seq #  *Modification Id* Act 
----------------------------+
46425  M01S27786.251l664 ---|          VFD    12/2RDB,1/0,1/1,10/0  PFMD/DEMA
Line S02770 Modification History
M01 (Added by) 251l664
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46426  M02S02770.284l847 ---|          VFD    12/2RDB,1/0,1/1,10/0  885-42
Line S27787 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46427  M01S27787.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
Line S00668 Modification History
M01 (Added by) 242l642
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46428  M02S00668.284l847 ---|
Line S27788 Modification History
M01 (Removed by) 241l630
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46429  M02S27788.284l847 ---|          VFD    12/2RDC,1/0,1/1,10/0  PFMD/AFMD
Line S00442 Modification History
M01 (Added by) 241l630
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46430  M02S00442.284l847 ---|          VFD    12/2RDC,1/0,1/1,10/0  7165/895
Line S27789 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46431  M01S27789.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
Line S00403 Modification History
M01 (Added by) 251l670
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46432  M02S00403.284l847 ---|
46433  M02S00404.284l847 ---|          VFD    12/2RDF,1/0,1/1,10/0  887
46434  M02S00405.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46435  M02S00406.284l847 ---|
46436  M02S00407.284l847 ---|          VFD    12/2RDH,1/0,1/1,10/0  887
46437  M02S00408.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
Line S02078 Modification History
M01 (Added by) 271l716
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46438  M02S02078.284l847 ---|
46439  M02S02079.284l847 ---|          VFD    12/2RDN,1/0,1/1,10/0  9853
46440  M02S02080.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
Line S00409 Modification History
M01 (Added by) 251l670
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46441  M02S00409.284l847 ---|
Line S00154 Modification History
M01 (Added by) 272l774
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46442  M02S00154.284l847 ---|          VFD    12/2REA,1/0,1/1,10/0  5832 (1X SSD)
46443  M02S00155.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46444  M02S00156.284l847 ---|
46445  M02S00157.284l847 ---|          VFD    12/2REB,1/0,1/1,10/0  5832 (2X SSD)
46446  M02S00158.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46447  M02S00159.284l847 ---|
46448  M02S00160.284l847 ---|          VFD    12/2REC,1/0,1/1,10/0  5833 (1X SABRE)
46449  M02S00161.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46450  M02S00162.284l847 ---|
46451  M02S00163.284l847 ---|          VFD    12/2RED,1/0,1/1,10/0  5833 (1XP SABRE)
46452  M02S00164.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46453  M02S00165.284l847 ---|
46454  M02S00166.284l847 ---|          VFD    12/2REE,1/0,1/1,10/0  5833 (2X SABRE)
46455  M02S00167.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46456  M02S00168.284l847 ---|
46457  M02S00169.284l847 ---|          VFD    12/2REF,1/0,1/1,10/0  5833 (2XP SABRE)
46458  M02S00170.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46459  M02S00171.284l847 ---|
Line S00037 Modification History
M01 (Added by) ns2768
M02 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46460  M02S00037.284l847 ---|          VFD    12/2REG,1/0,1/1,10/0  5838 (1X ELITE)
46461  M02S00038.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46462  M02S00039.284l847 ---|
46463  M02S00040.284l847 ---|          VFD    12/2REH,1/0,1/1,10/0  5838 (1XP ELITE)
46464  M02S00041.284l847 ---|          VFD    4/RPC,4/RPC,4/RPC,4/RWF,4/RPC,4/OPE,4/IPP,4/IPP,4/IPP
46465  M02S00042.284l847 ---|
Line S27790 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46466  M01S27790.284l847 ---|          VFD    12/0,1/0,1/1,10/0     ALL OTHER EQUIPMENT
Line S00310 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46467  M01S00310.284l847 +++|          VFD    1/0,1/1,10/0      ALL OTHER MASS STORAGE
46468  M00S27791.cpumtr  +++|          VFD    4/RPC,4/RET,4/RET,4/RWF,4/RPC,4/OPE,4/RPC,4/RPC,4/RPC
Line S00311 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46469  M01S00311.284l847 +++|          VFD    12/0
Line S00669 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
46470  M01S00669.242l642 +++|
Line S27792 Modification History
M01 (Removed by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46471  M01S27792.284l847 ---|          VFD    12/0,1/1,1/1,10/0     ALL OTHER NON-MASS STORAGE
Line S00312 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46472  M01S00312.284l847 +++|          VFD    1/1,1/1,10/0      ALL OTHER NON-MASS STORAGE
46473  M00S27793.cpumtr  +++|          VFD    4/IEQ,4/RET,4/RET,4/RWF,4/RPC,4/IEQ,4/IEQ,4/IEQ,4/IEQ
Line S00313 Modification History
M01 (Added by) 284l847
Seq #  *Modification Id* Act 
----------------------------+
46474  M01S00313.284l847 +++|          VFD    12/0
46475  M00S27794.cpumtr  +++|          QUAL   *
46476  M00S27795.cpumtr  +++| TCIC     SPACE  4,10
46477  M00S27796.cpumtr  +++|**        TCIC - TABLE OF CIO INTERNAL FUNCTION CODES.
46478  M00S27797.cpumtr  +++|*
46479  M00S27798.cpumtr  +++|*         30 BITS PER ENTRY -
46480  M00S27799.cpumtr  +++|*T        12/ IC, 1/E, 1/M, 1/T, 1/F, 1/R, 1/X, 1/D, 11/0
Figure

0101112131415161718290DXRFTME IC

46481  M00S27800.cpumtr  +++|*         IC = INTERNAL CIO CODE (DEFINED IN *COMSCIO*).
46482  M00S27801.cpumtr  +++|*            = 7777B IF ILLEGAL REQUEST CODE.
46483  M00S27802.cpumtr  +++|*         E = 1, IF EXTENDED FUNCTION LEGAL (3XX/6XX CIO CODE).
46484  M00S27803.cpumtr  +++|*         M = 1, IF MASS STORAGE ONLY FUNCTION.
46485  M00S27804.cpumtr  +++|*         T = 1, IF MAGNETIC TAPE ONLY FUNCTION.
46486  M00S27805.cpumtr  +++|*         F = 1, IF FUNCTION REQUIRES FNT ENTRY.
46487  M00S27806.cpumtr  +++|*         R = 1, IF REWIND OPERATION (SET *IN* = *OUT* = *FIRST*).
46488  M00S27807.cpumtr  +++|*         X = 1, IF FUNCTION LEGAL ON EXECUTE ONLY FILE.
46489  M00S27808.cpumtr  +++|*         D = 1, IF FUNCTION DOES NOT RETURN DEVICE TYPE TO FET.
46490  M00S27809.cpumtr  +++|*
46491  M00S27810.cpumtr  +++|*         REFER TO *ICTE* MACRO FOR PARAMETER DESCRIPTION.
46492  M00S27811.cpumtr  +++|
46493  M00S27812.cpumtr  +++|
46494  M00S27813.cpumtr  +++| TCIC     BSS    0
46495  M00S27814.cpumtr  +++|          QUAL   CIO
46496  M00S27815.cpumtr  +++|
46497  M00S27816.cpumtr  +++|*         THE FOLLOWING TABLE SECTION CONTAINS THE INTERNAL
46498  M00S27817.cpumtr  +++|*         CODES CORRESPONDING TO THE 000XXXX00 AND 110XXXX00
46499  M00S27818.cpumtr  +++|*         BINARY EXTERNAL CIO FUNCTION CODES.
46500  M00S27819.cpumtr  +++|
46501  M00S27820.cpumtr  +++|  ICTE    RDF,(PRU,VFL,VIO,RFE,XF)          RPHR (000), READEI (600)
46502  M00S27821.cpumtr  +++|  ICTE    WTF,(PRU,VFL,VIO,RFE)             WPHR (004)
46503  M00S27822.cpumtr  +++|  ICTE    RDF,(EOR,VFL,VIO,RFE)             READ (010)
46504  M00S27823.cpumtr  +++|  ICTE    WTF,(EOI,VFL,VIO,RFE)             WRITE(014)
46505  M00S27824.cpumtr  +++|  ICTE    RDF,(EOR,VFL,VIO,SKO,RFE)         READSKP (020)
46506  M00S27825.cpumtr  +++|  ICTE    WTF,(EOR,VFL,VIO,RFE)             WRITER (024)
46507  M00S27826.cpumtr  +++|  ICTE                                      UNUSED (030)
46508  M00S27827.cpumtr  +++|  ICTE    WTF,(EOF,VFL,VIO,RFE)             WRITEF (034)
46509  M00S27828.cpumtr  +++|  ICTE    SKP,(EOR,SKO,BKW,EXF,XF)          BKSP (040), SKIPB (640)
46510  M00S27829.cpumtr  +++|  ICTE    SKP,(PRU,SKO,BKW,EXF)             BKSPRU (044)
46511  M00S27830.cpumtr  +++|  ICTE    REW,(VFL,BKW,IOF,EXF)             REWIND (050)
46512  M00S27831.cpumtr  +++|  ICTE    REW,(VFL,BKW,IOF,EXF)             REWIND (054)
46513  M00S27832.cpumtr  +++|  ICTE    RET,(UNL,EXF,NDT)                 UNLOAD (060)
46514  M00S27833.cpumtr  +++|  ICTE                                      UNUSED (064)
46515  M00S27834.cpumtr  +++|  ICTE    RET,(EXF,NDT)                     RETURN (070)
46516  M00S27835.cpumtr  +++|  ICTE                                      UNUSED (074)
46517  M00S27836.cpumtr  +++|
46518  M00S27837.cpumtr  +++|*         THE FOLLOWING TABLE SECTION CONTAINS THE INTERNAL
46519  M00S27838.cpumtr  +++|*         CODES CORRESPONDING TO THE 001XXXX00 AND 011XXXX00
46520  M00S27839.cpumtr  +++|*         BINARY EXTERNAL CIO FUNCTION CODES.
46521  M00S27840.cpumtr  +++|
46522  M00S27841.cpumtr  +++|  ICTE    OPE,(VFL,RFE,XF)                  OPEN READ/REEL NR(100/300)
46523  M00S27842.cpumtr  +++|  ICTE    OPE,(VFL,RFE)                     OPEN WRITENR (104)
46524  M00S27843.cpumtr  +++|  ICTE    OPE,(VFL,MTO)                     POSMF (110)
46525  M00S27844.cpumtr  +++|  ICTE    EVI,(UNL,EXF)                     EVICT (114)
46526  M00S27845.cpumtr  +++|  ICTE    OPE,(VFL,RFE)                     OPEN NR/ALTERNR (120)
46527  M00S27846.cpumtr  +++|  ICTE                                      UNUSED (124)
46528  M00S27847.cpumtr  +++|  ICTE    CLO,(EOR,XF)                      CLOSE(R) NR (130/330)
46529  M00S27848.cpumtr  +++|  ICTE                                      UNUSED (134)
46530  M00S27849.cpumtr  +++|  ICTE    OPE,(VFL,BKW,RFE,XF)              OPEN READ (140)/REEL (340)
46531  M00S27850.cpumtr  +++|  ICTE    OPE,(VFL,BKW,RFE)                 OPEN WRITE (144)
46532  M00S27851.cpumtr  +++|  ICTE    CLO,(VFL,BKW,EOR,XF)              CLOSE(R) REWIND(150/350)
46533  M00S27852.cpumtr  +++|  ICTE                                      UNUSED (154)
46534  M00S27853.cpumtr  +++|  ICTE    OPE,(VFL,BKW,RFE)                 OPEN ALTER (160)
46535  M00S27854.cpumtr  +++|  ICTE                                      UNUSED (164)
46536  M00S27855.cpumtr  +++|  ICTE    CLO,(BKW,EOR,XF)                  CLOSE(R) UNLOAD(170/370)
46537  M00S27856.cpumtr  +++|  ICTE    CLO,(BKW,EOR,XF)                  CLOSE(R) RETURN (174/374)
46538  M00S27857.cpumtr  +++|
46539  M00S27858.cpumtr  +++|*         THE FOLLOWING TABLE SECTION CONTAINS THE INTERNAL
46540  M00S27859.cpumtr  +++|*         CODES CORRESPONDING TO THE 010XXXX00 BINARY EXTERNAL
46541  M00S27860.cpumtr  +++|*         CIO FUNCTION CODES.
46542  M00S27861.cpumtr  +++|
46543  M00S27862.cpumtr  +++|  ICTE    RDF,(EOI,VFL,VIO,CRW,RFE)         READCW (200)
46544  M00S27863.cpumtr  +++|  ICTE    WTF,(EOI,VFL,VIO,CRW,RFE)         WRITECW (204)
46545  M00S27864.cpumtr  +++|  ICTE    RDF,(EOR,VFL,VIO,LST,RFE,MSO)     READLS (210)
46546  M00S27865.cpumtr  +++|  ICTE    WTF,(EOI,VFL,VIO,RWO,RFE,MSO)     REWRITE (214)
46547  M00S27866.cpumtr  +++|  ICTE                                      UNUSED (220)
46548  M00S27867.cpumtr  +++|  ICTE    WTF,(EOR,VFL,VIO,RWO,RFE,MSO)     REWRITER(224)
46549  M00S27868.cpumtr  +++|  ICTE    RDF,(PRU,VFL,VIO,LST,RFE,MSO)     RPHRLS (230)
46550  M00S27869.cpumtr  +++|  ICTE    WTF,(EOF,VFL,VIO,RWO,RFE,MSO)     REWRITEF (234)
46551  M00S27870.cpumtr  +++|  ICTE    SKP,(EOR,SKO,EXF)                 SKIPF/SKIPFF/SKIPEI (240)
46552  M00S27871.cpumtr  +++|  ICTE    OVW,(EOI,MSO)                     OVERWRITE (244)
46553  M00S27872.cpumtr  +++|  ICTE    RDF,(EOF,VFL,VIO,RFE)             READNS (250)
46554  M00S27873.cpumtr  +++|  ICTE    OVW,(EOI,MSO,NDT)                 OVERWRITE RETURN (254)
46555  M00S27874.cpumtr  +++|  ICTE    RDF,(EOF,VFL,VIO,NRW,MTO)         READN (260)
46556  M00S27875.cpumtr  +++|  ICTE    WTF,(EOI,VFL,VIO,NRW,MTO)         WRITEN (264)
46557  M00S27876.cpumtr  +++|  ICTE                                      UNUSED (270)
46558  M00S27877.cpumtr  +++|  ICTE                                      UNUSED (274)
46559  M00S27878.cpumtr  +++|
46560  M00S27879.cpumtr  +++|          QUAL   *
46561  M00S27880.cpumtr  +++|          TITLE  CPUCIO SPECIAL PROCESSORS.
46562  M00S27881.cpumtr  +++|          SPACE  4,10
46563  M00S27882.cpumtr  +++|**        CPUCIO SPECIAL PROCESSORS.
46564  M00S27883.cpumtr  +++|*
46565  M00S27884.cpumtr  +++|*         STANDARD REGISTER DEFINITIONS.
46566  M00S27885.cpumtr  +++|*
46567  M00S27886.cpumtr  +++|*         (B1) = 1.
46568  M00S27887.cpumtr  +++|*         (B2) = USER EXCHANGE PACKAGE AREA.
46569  M00S27888.cpumtr  +++|*         (B7) = CPA.
46570  M00S27889.cpumtr  +++|*         (A0) = CPU NUMBER.
46571  M00S27890.cpumtr  +++|*         (A5) = PP *OR* ADDRESS OR CP RA+1 ADDRESS.
46572  M00S27891.cpumtr  +++|*
46573  M00S27892.cpumtr  +++|*T  IR    18/ *CIO*, 1/A, 5/ CP, 18/ SKIP COUNT, 18/ FET ADDRESS
Figure IR

0171829 FET ADDRESS SKIP COUNT30353640414259 SKIP COUNT CPA *CIO*

46574  M00S27893.cpumtr  +++|*
46575  M00S27894.cpumtr  +++|*T  MB    1/S,5/ RF,6/ RC,5/0,1/F,6/ EC,12/ ORD,4/ LV,8/ XC,12/IC
Figure MB

011121920232429IC XC LV ORD303536414243474853545859 ORD ECF0 RC RFS

46576  M00S27895.cpumtr  +++|*         S      SET IF *CIO* RESTARTED FROM RECALL STACK
46577  M00S27896.cpumtr  +++|*         RF     RESTART FLAGS = 1/TIF, 1/0, 1/SDT, 1/BDF, 1/DTF.
46578  M00S27897.cpumtr  +++|*                TIF = TRACK INTERLOCK FLAG.
46579  M00S27898.cpumtr  +++|*                SDT = SKIP DATA TRANSFER FLAG.
46580  M00S27899.cpumtr  +++|*                BDF = BUFFERED DEVICE FUNCTION FLAG.
46581  M00S27900.cpumtr  +++|*                DTF = DATA TRANSFERRED FLAG.
46582  M00S27901.cpumtr  +++|*         RC     RECALL STACK REASON CODE.
46583  M00S27902.cpumtr  +++|*         F      CREATE FNT ENTRY FLAG.  IF SET, *1MS* CREATES
46584  M00S27903.cpumtr  +++|*                AN FNT ENTRY AND RESTARTS CPUCIO.
46585  M00S27904.cpumtr  +++|*         EC     ERROR CODE IF NONZERO.
46586  M00S27905.cpumtr  +++|*         ORD    RELATIVE ADDRESS OF FNT ENTRY IN NFL.
46587  M00S27906.cpumtr  +++|*         LV     LEVEL NUMBER (0 - 17B).
46588  M00S27907.cpumtr  +++|*         XC     EXTERNAL *CIO* FUNCTION CODE.
46589  M00S27908.cpumtr  +++|*         IC     INTERNAL *CIO* FUNCTION CODE (SEE *COMSCIO*).
46590  M00S27909.cpumtr  +++|*
46591  M00S27910.cpumtr  +++|*T  MB1   12/ 0, 24/ *IN*, 24/ *OUT*
Figure MB1

0232429 *OUT* *IN*30474859 *IN* 0

46592  M00S27911.cpumtr  +++|*
46593  M00S27912.cpumtr  +++|*T  MB2   1/R, 5/0, 6/ FETL, 24/ *FIRST*, 24/ *LIMIT*
Figure MB2

0232429 *LIMIT* *FIRST*30474853545859 *FIRST* FETL0R

46594  M00S27913.cpumtr  +++|*         R      SET IF RANDOM FILE.
46595  M00S27914.cpumtr  +++|*         FETL   FET LENGTH - 5.
46596  M00S27915.cpumtr  +++|*
46597  M00S27916.cpumtr  +++|*         INITIAL ENTRY CONDITIONS.
46598  M00S27917.cpumtr  +++|*
46599  M00S27918.cpumtr  +++|*         (X0) = ABSOLUTE FST ADDRESS, IF NONZERO.
Line S27919 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46600  M01S27919.283l840 ---|*         (X2) = (B3) = INTERNAL FUNCTION CODE (4 BITS).
46601  M01S27920.283l840 ---|*         (X3) = MASS STORAGE FLAG IN BIT 59.
Line S01030 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46602  M01S01030.283l840 +++|*         (X3) = *EQDE* WORD OF EST ENTRY.
46603  M00S27921.cpumtr  +++|*         (X4) = (MB) LEFT SHIFTED BY -6.
46604  M00S27922.cpumtr  +++|*         (X5) = ABSOLUTE FET+1 ADDRESS.
Line S00001 Modification History
M01 (Added by) ns2306
Seq #  *Modification Id* Act 
----------------------------+
46605  M01S00001.ns2306  +++|*         (X6) = -17B.
46606  M00S27923.cpumtr  +++|*         (X7) = 0.
46607  M00S27924.cpumtr  +++|*         (A4) = MB.
Line S01031 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46608  M01S01031.283l840 +++|*         (B3) = *COMSCIO* INTERNAL FUNCTION CODE (4 BITS).
46609  M00S27925.cpumtr  +++| CMF      SPACE  4,10
46610  M00S27926.cpumtr  +++|**        CMF - COMPLETE FET.
46611  M00S27927.cpumtr  +++|*
46612  M00S27928.cpumtr  +++|*         EXIT   TO *CPCX*.
46613  M00S27929.cpumtr  +++|
46614  M00S27930.cpumtr  +++|
46615  M00S27931.cpumtr  +++| CMF      SX4    B1          SET FET COMPLETE
46616  M00S27932.cpumtr  +++|          IX5    X5-X4       ADDRESS OF FET+0
46617  M00S27933.cpumtr  +++|          SA1    IR          CLEAR AUTO RECALL BIT
46618  M00S27934.cpumtr  +++|          ERX2   X5          READ FET+0
46619  M00S27935.cpumtr  +++|          BX6    X2+X4
46620  M00S27936.cpumtr  +++|          LX4    41
46621  M00S27937.cpumtr  +++|          BX7    -X4*X1
46622  M00S27938.cpumtr  +++|          EWX6   X5
46623  M00S27939.cpumtr  +++|          SA7    A1
46624  M00S27940.cpumtr  +++|          EQ     CPCX        RETURN
46625  M00S27941.cpumtr  +++| OPE      SPACE  4,20
46626  M00S27942.cpumtr  +++|**        OPE - PROCESS NON-RANDOM OPEN.
46627  M00S27943.cpumtr  +++|*
46628  M00S27944.cpumtr  +++|*         ENTRY  (X1) = (MB2).
46629  M00S27945.cpumtr  +++|*
46630  M00S27946.cpumtr  +++|*         EXIT   TO *RPC* IF RANDOM REQUEST ON MASS STORAGE.
46631  M00S27947.cpumtr  +++|*                TO *RWF* IF NON-RANDOM AND REWIND REQUEST.
46632  M00S27948.cpumtr  +++|*                TO *CMF* IF NON-RANDOM AND NOT REWIND.
46633  M00S27949.cpumtr  +++|
46634  M00S27950.cpumtr  +++|
46635  M00S27951.cpumtr  +++| OPE      BX6    X3*X1
46636  M00S27952.cpumtr  +++|          NG     X6,RPC      IF RANDOM FILE AND MASS STORAGE
46637  M00S27953.cpumtr  +++|          MX7    18
46638  M00S27954.cpumtr  +++|          SX6    3
46639  M00S27955.cpumtr  +++|          IX2    X5+X6
46640  M00S27956.cpumtr  +++|          ERX1   X2          READ FET+4
46641  M00S27957.cpumtr  +++|          LX7    -24         CLEAR PRU SIZE FIELD
46642  M00S27958.cpumtr  +++|          SX6    B1
46643  M00S27959.cpumtr  +++|          BX1    -X7*X1
46644  M00S27960.cpumtr  +++|          LX6    24          SET PRU SIZE = 100
46645  M00S27961.cpumtr  +++|          BX7    X1+X6
46646  M00S27962.cpumtr  +++|          ERX1   X0          READ FST
46647  M00S27963.cpumtr  +++|          LX4    -5          EXTRACT REWIND BIT
46648  M00S27964.cpumtr  +++|          SX6    B1
46649  M00S27965.cpumtr  +++|          EWX7   X2          STORE FET+4
46650  M00S27966.cpumtr  +++|          BX4    -X4*X6      COMPLEMENT OF REWIND BIT
46651  M00S27967.cpumtr  +++|          LX6    7           CLEAR FILE WRITTEN SINCE LAST OPEN BIT
46652  M00S27968.cpumtr  +++|          BX1    -X6*X1
46653  M00S27969.cpumtr  +++|          LX6    1
46654  M00S27970.cpumtr  +++|          BX1    X1+X6       SET FILE OPENED BIT
46655  M00S27971.cpumtr  +++|          BX6    X1+X4       COMPLETE FST IF NOT REWIND
46656  M00S27972.cpumtr  +++|          EWX6   X0          WRITE FST
46657  M00S27973.cpumtr  +++|          ZR     X4,RWF      IF REWIND
46658  M00S27974.cpumtr  +++|          EQ     CMF         COMPLETE FET
Line S00057 Modification History
M01 (Added by) 274l797
Seq #  *Modification Id* Act 
----------------------------+
46659  M01S00057.274l797 +++|POD       SPACE  4,10
46660  M01S00058.274l797 +++|**        POD - PROCESS OPTICAL DISK REQUESTS
46661  M01S00059.274l797 +++|*
46662  M01S00060.274l797 +++|*         EXIT   TO *RPC* TO INITIATE OPTICAL DISK DRIVER *1OD*
46663  M01S00061.274l797 +++|*
46664  M01S00062.274l797 +++| POD      SX7    3           INDEX INTO TABLE(TAPQ) OF PP REQUESTS
46665  M01S00063.274l797 +++|          LX7    42-0
46666  M01S00064.274l797 +++|          EQ     RPC         ISSUE CALL FOR *1OD*
46667  M00S27975.cpumtr  +++| PMT      SPACE  4,10
46668  M00S27976.cpumtr  +++|**        PMT - PROCESS MAGNETIC TAPE REQUEST.
46669  M00S27977.cpumtr  +++|*
46670  M00S27978.cpumtr  +++|*         EXIT   TO *CPCX* IF REQUEST TRANSFERRED TO *MAGNET*
46671  M00S27979.cpumtr  +++|*                SUCCESSFULLY.
46672  M00S27980.cpumtr  +++|*                TO *RCR* IF *CIO* REQUEST TO BE PUT IN RECALL.
46673  M00S27981.cpumtr  +++|*
46674  M00S27982.cpumtr  +++|*         ERROR  EXIT TO *RPC* IF ERROR DETECTED.
46675  M00S27983.cpumtr  +++|*
Line S27984 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
46676  M01S27984.271l750 ---|*         CALLS  /MONITOR/RCC0, /MONITOR/RSC, SRC.
Line S02084 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
46677  M01S02084.271l750 +++|*         CALLS  /MONITOR/RCC1, /MONITOR/RSC, SRC.
46678  M00S27985.cpumtr  +++|
46679  M00S27986.cpumtr  +++|
46680  M00S27987.cpumtr  +++|*         CHECK *MAGNET* AVAILABLE.
46681  M00S27988.cpumtr  +++|
Line S27989 Modification History
M01 (Removed by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46682  M01S27989.283l840 ---| PMT      SB4    X2-/CIO/RET
Line S01032 Modification History
M01 (Added by) 283l840
Seq #  *Modification Id* Act 
----------------------------+
46683  M01S01032.283l840 +++| PMT      SB4    B3-/CIO/RET
46684  M00S27990.cpumtr  +++|          PL     B4,PMT0     IF RETURN/UNLOAD/EVICT FUNCTION
46685  M00S27991.cpumtr  +++|          SX1    B1
46686  M00S27992.cpumtr  +++|          IX1    X0-X1       ABSOLUTE FNT ADDRESS
46687  M00S27993.cpumtr  +++|          ERX1   X1          CHECK IF TAPE ASSIGNED FOR CE DIAGNOSTICS
46688  M00S27994.cpumtr  +++|          LX1    59-17
46689  M00S27995.cpumtr  +++|          SX7    /CIOERR/ASD *ASSIGNED FOR DIAGNOSTICS*
46690  M00S27996.cpumtr  +++|          NG     X1,RPC      IF *CIO* FUNCTION NOT ALLOWED ON TAPE
46691  M00S27997.cpumtr  +++| PMT0     BX4    X0          SAVE ABSOLUTE FST ADDRESS
46692  M00S27998.cpumtr  +++|          MX0    -12
46693  M00S27999.cpumtr  +++|          SX1    MTSI        *MAGNET* SUBSYSTEM IDENTIFICATION
46694  M00S28000.cpumtr  +++|          SX7    /CIOERR/TNA *TAPES NOT AVAILABLE*
Line S28001 Modification History
M01 (Removed by) cpum179
Seq #  *Modification Id* Act 
----------------------------+
46695  M01S28001.cpum179 ---|          SB5    MVPR        MOVE IN PROGRESS RECALL STACK REASON CODE
46696  M00S28002.cpumtr  +++|          SB3    PMT1        SET RETURN ADDRESS FOR *RSC*
46697  M00S28003.cpumtr  +++|          EQ     /MONITOR/RSC  GET *MAGNET* RA AND FL
46698  M00S28004.cpumtr  +++|
46699  M00S28005.cpumtr  +++| PMT0.1   PL     B4,PMT1.1   IF RETURN/UNLOAD/EVICT FUNCTION
46700  M00S28006.cpumtr  +++|          EQ     RPC         PROCESS ERROR
46701  M00S28007.cpumtr  +++|
Line S28008 Modification History
M01 (Removed by) cpum179
Seq #  *Modification Id* Act 
----------------------------+
46702  M01S28008.cpum179 ---|          VFD    12/PMT0.1-PMT1,18/0,12/PMT0.1-PMT1,18/RCR
Line S00010 Modification History
M01 (Added by) cpum179
Seq #  *Modification Id* Act 
----------------------------+
46703  M01S00010.cpum179 +++|          VFD    12/PMT0.1-PMT1,18/0,12/PMT0.1-PMT1,18/PMV
46704  M00S28009.cpumtr  +++|
46705  M00S28010.cpumtr  +++| PMT1     ERX1   X4          GET FST ENTRY
46706  M00S28011.cpumtr  +++|          NO
46707  M00S28012.cpumtr  +++|          LX1    24
Line S28013 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46708  M01S28013.282l826 ---|          BX2    -X0*X1      UDT UCIA ADDRESS
Line S00328 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46709  M01S00328.282l826 +++|          BX2    -X0*X1      UDT ADDRESS
46710  M00S28014.cpumtr  +++|          ZR     X2,PMT0.1   IF NO UDT ADDRESS
46711  M00S28015.cpumtr  +++|          SX7    X2+/MTX/UCIC+1
46712  M00S28016.cpumtr  +++|          IX7    X7-X6
Line S28017 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46713  M01S28017.282l826 ---|          SX2    X2+/MTX/UCIA
46714  M01S28018.282l826 ---|          IX0    X3+X2       ABSOLUTE UDT *UCIA* ADDRESS
Line S00329 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46715  M01S00329.282l826 +++|          SX2    X2+/MTX/UFRQ
46716  M01S00330.282l826 +++|          IX0    X3+X2       ABSOLUTE *UFRQ* ADDRESS
46717  M00S28019.cpumtr  +++|+         PL     X7,*        IF OUTSIDE *MAGNET*-S FL
46718  M00S28020.cpumtr  +++|          SB6    A2-STSW     SAVE *MAGNET* CPA
46719  M00S28021.cpumtr  +++|          ERX2   X0          CHECK IF I/O REQUEST IN PROGRESS
46720  M00S28022.cpumtr  +++|          LX1    -24
46721  M00S28023.cpumtr  +++|          SX7    /CIOERR/FSQ *I/O SEQUENCE ERROR*
Line S28024 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46722  M01S28024.282l826 ---|          SX6    X2-1
46723  M01S28025.282l826 ---|          ZR     X6,PMT0.1   IF TAPE LOST BY *MAGNET*
Line S00331 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46724  M01S00331.282l826 +++|          NG     X2,PMT0.1   IF TAPE LOST BY MAGNET
46725  M00S28026.cpumtr  +++|          NZ     X2,RPC      IF UDT ALREADY BUSY
Line S28027 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46726  M01S28027.282l826 ---|          SX6    B1
46727  M01S28028.282l826 ---|          BX6    X1+X6       SET FST NOT BUSY
46728  M00S28029.cpumtr  +++| PMT1.1   SX7    B0+         INDICATE NO ERROR
46729  M00S28030.cpumtr  +++|          PL     B4,RPC      IF RETURN/UNLOAD/EVICT FUNCTION
Line S28031 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46730  M01S28031.282l826 ---|          EWX6   X4
46731  M00S28032.cpumtr  +++|
Line S28033 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46732  M01S28033.282l826 ---|*         BUILD *MAGNET* PARAMETER WORDS *UCIA*, *UCIB*, AND *UCIC*.
Line S00332 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46733  M01S00332.282l826 +++|*         BUILD *MAGNET* PARAMETER WORDS *UFRQ* - *UCIC*.
46734  M00S28034.cpumtr  +++|
46735  M00S28035.cpumtr  +++|          SA1    MB2         GET FET LENGTH, FIRST, LIMIT
Line S00333 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46736  M01S00333.282l826 +++|          SA3    B7+FLSW     GET FL
46737  M00S28036.cpumtr  +++|          MX4    12
Line S28037 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46738  M01S28037.282l826 ---|          SA3    B7+FLSW     GET FL
46739  M00S28038.cpumtr  +++|          BX7    -X4*X1
46740  M00S28039.cpumtr  +++|          LX3    -12
46741  M00S28040.cpumtr  +++|          BX1    X4*X1       FET LENGTH - 5
Line S28041 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46742  M01S28041.282l826 ---|          SX6    B1+B1
Line S00334 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46743  M01S00334.282l826 +++|          SX6    /MTX/UCIC-/MTX/UFRQ
46744  M00S28042.cpumtr  +++|          BX3    X4*X3
46745  M00S28043.cpumtr  +++|          LX1    1
46746  M00S28044.cpumtr  +++|          IX6    X0+X6       *UCIC* ABSOLUTE ADDRESS
46747  M00S28045.cpumtr  +++|          BX7    X7+X3
46748  M00S28046.cpumtr  +++|          SA2    IR          GET *CIO* CALL
Line S28047 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46749  M01S28047.282l826 ---|          EWX7   X6
Line S00335 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46750  M01S00335.282l826 +++|          EWX7   X6          WRITE *UCIC*
46751  M00S28048.cpumtr  +++|          AX1    7
46752  M00S28049.cpumtr  +++|          MX6    -18
46753  M00S28050.cpumtr  +++|          SX7    X2          FET ADDRESS
46754  M00S28051.cpumtr  +++|          LX2    -18
46755  M00S28052.cpumtr  +++|          BX7    X7+X1
46756  M00S28053.cpumtr  +++|          BX6    -X6*X2      SKIP COUNT
46757  M00S28054.cpumtr  +++|          AX1    42
46758  M00S28055.cpumtr  +++|          LX6    24
46759  M00S28056.cpumtr  +++|          SB3    X1-10+5
46760  M00S28057.cpumtr  +++|          BX7    X7+X6
46761  M00S28058.cpumtr  +++|          AX1    1
46762  M00S28059.cpumtr  +++|          SA3    MB          GET INTERNAL AND EXTERNAL FUNCTION CODES
46763  M00S28060.cpumtr  +++|          SB5    X1
Line S28061 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46764  M01S28061.282l826 ---|          LX3    -12
Line S00336 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46765  M01S00336.282l826 +++|          MX1    -12
46766  M01S00337.282l826 +++|          LX3    -24
46767  M01S00338.282l826 +++|          BX1    -X1*X3      FNT ADDRESS
46768  M01S00339.282l826 +++|          LX3    12
46769  M01S00340.282l826 +++|          SB4    X1          SAVE FNT ADDRESS
46770  M00S28062.cpumtr  +++|          MX1    -8
46771  M00S28063.cpumtr  +++|          BX6    X4*X3       INTERNAL CODE
46772  M00S28064.cpumtr  +++|          LX2    59-41+18
46773  M00S28065.cpumtr  +++|          BX7    X7+X6
46774  M00S28066.cpumtr  +++|          BX1    -X1*X3      EXTERNAL CODE
46775  M00S28067.cpumtr  +++|          LX3    -8
46776  M00S28068.cpumtr  +++|          MX6    -4
46777  M00S28069.cpumtr  +++|          LX1    -11
46778  M00S28070.cpumtr  +++|          BX6    -X6*X3      LEVEL NUMBER
46779  M00S28071.cpumtr  +++|          LX6    32
46780  M00S28072.cpumtr  +++|          MX3    1
46781  M00S28073.cpumtr  +++|          BX1    X6+X1
46782  M00S28074.cpumtr  +++|          BX2    X3*X2       AUTO RECALL FLAG
46783  M00S28075.cpumtr  +++|          BX1    X1+X2
46784  M00S28076.cpumtr  +++|          SA2    A3+B1       GET IN AND OUT
46785  M00S28077.cpumtr  +++|          SX6    X2          OUT
46786  M00S28078.cpumtr  +++|          AX2    24          IN
46787  M00S28079.cpumtr  +++|          LX4    -12
46788  M00S28080.cpumtr  +++|          IX2    X2-X6
46789  M00S28081.cpumtr  +++|          LX3    58-59
46790  M00S28082.cpumtr  +++|          ZR     X2,PMT2     IF BUFFER EMPTY
46791  M00S28083.cpumtr  +++|          BX1    X1+X3
46792  M00S28084.cpumtr  +++| PMT2     ERX2   X5          GET FET+1
46793  M00S28085.cpumtr  +++|          LX3    47-59-58+59
46794  M00S28086.cpumtr  +++|          BX6    -X3*X2      CLEAR RANDOM FLAG
46795  M00S28087.cpumtr  +++|          MX2    -30
46796  M00S28088.cpumtr  +++|          PL     B3,PMT3     IF FET LENGTH .GE. 10D
46797  M00S28089.cpumtr  +++|          LX3    41-59-47+59
46798  M00S28090.cpumtr  +++|          BX6    -X3*X6      CLEAR EXTENDED LABEL OPTION
46799  M00S28091.cpumtr  +++| PMT3     BX4    X4*X6       FET OPTIONS
46800  M00S28092.cpumtr  +++|          EWX6   X5
Line S28093 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46801  M01S28093.282l826 ---|          SX3    B1
Line S00341 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46802  M01S00341.282l826 +++|          R=     X3,/MTX/UCIA-/MTX/UFRQ
46803  M00S28094.cpumtr  +++|          BX6    X1+X4
46804  M00S28095.cpumtr  +++|          ZR     B5,PMT4     IF FET LENGTH .LE. 6
46805  M00S28096.cpumtr  +++|          SX1    5
46806  M00S28097.cpumtr  +++|          IX1    X5+X1       FET+6
46807  M00S28098.cpumtr  +++|          ERX1   X1
46808  M00S28099.cpumtr  +++|          BX1    -X2*X1      UNUSED BIT COUNT AND MLRS FIELD
46809  M00S28100.cpumtr  +++|          BX6    X6+X1
Line S28101 Modification History
M01 (Removed by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
46810  M01S28101.271l750 ---| PMT4     IX3    X0+X3
Line S02085 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
46811  M01S02085.271l750 +++| PMT4     SA1    B7+STSW
Line S02086 Modification History
M01 (Added by) 271l750
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46812  M02S02086.282l826 ---|          SA2    B6+CWQW     CHECK *MAGNET* RECALL STATUS
Line S00342 Modification History
M01 (Added by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46813  M01S00342.282l826 +++|          SA2    B6+CWQW
46814  M01S00343.282l826 +++|          IX4    X0+X3       *UCIA* ABSOLUTE ADDRESS
46815  M01S00344.282l826 +++|          IX5    X4+X3       *UCIB* ABSOLUTE ADDRESS
46816  M01S00345.282l826 +++|          ERRNZ  /MTX/UCIB-/MTX/UCIA-1
46817  M01S00346.282l826 +++|          EWX7   X4          WRITE *UCIA*
46818  M01S00347.282l826 +++|          EWX6   X5          WRITE *UCIB*
46819  M01S00348.282l826 +++|          SX6    /MTX/CIO
46820  M01S00349.282l826 +++|          SX7    B4+         FNT ADDRESS
46821  M01S00350.282l826 +++|          LX6    48
46822  M01S00351.282l826 +++|          BX6    X6+X7
46823  M01S00352.282l826 +++|          SX7    20B
46824  M01S00353.282l826 +++|          EWX6   X0          WRITE *UFRQ*
46825  M01S00354.282l826 +++|          IX7    X1+X7       INCREMENT TAPE ACTIVITY
Line S02087 Modification History
M01 (Added by) 271l750
Seq #  *Modification Id* Act 
----------------------------+
46826  M01S02087.271l750 +++|          SB3    PMT5        SET RETURN ADDRESS FOR *RCC*
Line S02088 Modification History
M01 (Added by) 271l750
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46827  M02S02088.282l826 ---|          IX3    X0+X3
Line S28102 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46828  M01S28102.282l826 ---|          EWX6   X3
46829  M01S28103.282l826 ---|          EWX7   X0
Line S28104 Modification History
M01 (Removed by) 271l750
M02 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46830  M02S28104.282l826 ---|          MX2    -57
Line S28105 Modification History
M01 (Removed by) 282l826
Seq #  *Modification Id* Act 
----------------------------+
46831  M01S28105.282l826 ---|          SX7    20B
Proceed to Part 36