User Tools

Site Tools


cdc:nos2.source:opl.opl871:common:comscio

Common COMSCIO

Library Member Format: MODIFY

Source

Seq #  *Modification Id* Act 
----------------------------+
00001  M00S00001.comscio +++|          CTEXT  COMSCIO - CIO EQUIVALENCES.
00002  M00S00002.comscio +++|          SPACE  4,10
00003  M00S00003.comscio +++|          BASE   OCTAL
Line S00001 Modification History
M01 (Added by) 281l803
Seq #  *Modification Id* Act 
----------------------------+
00004  M01S00001.281l803 +++|*         COMMENT  COPYRIGHT CONTROL DATA SYSTEMS INC.  1992.
Line S00004 Modification History
M01 (Removed by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00005  M01S00004.ns2483  ---|          LIST   G
00006  M00S00005.comscio ---|          SPACE  4
00007  M00S00006.comscio ---|***       COMSCIO - CIO EQUIVALENCES.
00008  M00S00007.comscio ---|*         G. R. MANSFIELD.  72/03/16.
00009  M00S00008.comscio ---|*         J. L. LARSON.      80/08/01.
Line S00009 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00010  M01S00009.ns22000 ---|          SPACE  4
Line S00001 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00011  M01S00001.ns22000 +++|          SPACE  4,10
00012  M00S00010.comscio +++|***              COMSCIO PROVIDES EQUIVALENCES FOR *CIO*
00013  M00S00011.comscio +++|*         RA+1 CALL PROCESSING.
00014  M00S00012.comscio +++|          SPACE  4,10
00015  M00S00013.comscio +++|***       *CIO* CALL.
00016  M00S00014.comscio +++|*
00017  M00S00015.comscio +++|*T RA+1   18/ *CIO*, 1/, 1/A, 4/, 18/ SKIP, 18/ FET
Figure RA+1

0171829 FET SKIP3035363940414259 SKIPA *CIO*

00018  M00S00016.comscio +++|*         A      SET IF AUTO RECALL REQUESTED
Line S00017 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00019  M01S00017.ns22000 ---|*         SKIP   COUNT FOR SKIP OPERATIONS
Line S00002 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00020  M01S00002.ns22000 +++|*         SKIP   COUNT FOR SKIP OPERATIONS, DATA PATTERN FLAGS FOR
00021  M01S00003.ns22000 +++|*                OVERWRITE OPERATION.
00022  M00S00018.comscio +++|*         FET    ADDRESS OF FET
00023  M00S00019.comscio +++|          SPACE  4,10
00024  M00S00020.comscio +++|***       FILE ENVIRONMENT TABLE (FET) DESCRIPTION.
00025  M00S00021.comscio +++|*
00026  M00S00022.comscio +++|*T FET+0  42/ LFN, 4/ LN, 5/ AT, 9/ CODE
Figure FET+0

0891314171829 CODE AT LN LFN3059 LFN

00027  M00S00023.comscio +++|*T,   +1  12/ DT, 12/ SP, 12/, 6/ L, 18/ FIRST
Figure +1

01718232429 FIRST L303536474859 SP DT

00028  M00S00024.comscio +++|*T,   +2  42/ 0, 18/ IN
Figure +2

0171829 IN 03059 0

00029  M00S00025.comscio +++|*T,   +3  42/ 0, 18/ OUT
Figure +3

0171829 OUT 03059 0


Line S00026 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00030  M01S00026.ns22000 ---|*T,   +4  12/ FNT, 12/, 18/ PRU, 18/ LIMIT
Figure +4

0171829 LIMIT PRU303536474859 PRU FNT


Line S00004 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00031  M01S00004.ns22000 +++|*T,   +4  12/ FNT, 9/, 3/ AL, 18/ PRU, 18/ LIMIT
Figure +4

0171829 LIMIT PRU3035363839474859 PRU AL FNT

00032  M00S00027.comscio +++|*T,   +5  42/, 18/ LIST
Figure +5

0171829 LIST3059

00033  M00S00028.comscio +++|*T,   +6  30/, 6/ UBC, 6/, 18/ MLRS
Figure +6

01718232429 MLRS UBC3059

00034  M00S00029.comscio +++|*T,   +6  30/ CRI, 1/W, 5/, 24/ RR OR DEC
Figure +6

023242829 RR OR DECW3059 CRI

00035  M00S00030.comscio +++|*T,   +7  24/, 18/ INDL, 18/ INDEX
Figure +7

0171829 INDEX INDL30353659 INDL

00036  M00S00031.comscio +++|*
00037  M00S00032.comscio +++|*         LFN    LOCAL FILE NAME.
00038  M00S00033.comscio +++|*         LN     LEVEL NUMBER (0 TO 17B) FOR EOR/EOF OPERATION.
00039  M00S00034.comscio +++|*                0           EOR OPERATION.
00040  M00S00035.comscio +++|*                1 - 16B     SAME AS LEVEL 0.
00041  M00S00036.comscio +++|*                17B         EOF OPERATION.
00042  M00S00037.comscio +++|*         AT     STATUS INFORMATION RETURNED FOR ABNORMAL TERMINATION.
00043  M00S00038.comscio +++|*                01          END OF INFORMATION.
00044  M00S00039.comscio +++|*                02          END OF REEL/END OF DEVICE.
00045  M00S00040.comscio +++|*                04          PARITY ERROR.
00046  M00S00041.comscio +++|*                22B         OTHER ERROR (MASS STORAGE ONLY).
00047  M00S00042.comscio +++|*                23B         RANDOM INDEX TOO LARGE FOR INDEX BUFFER.
00048  M00S00043.comscio +++|*                FOR ABNORMAL TERMINATION CODES OTHER THAN 01,
00049  M00S00044.comscio +++|*                DETAILED STATUS IS RETURNED IN THE *DEC* FIELD
00050  M00S00045.comscio +++|*                FOR A MASS STORAGE FILE, IF ERROR PROCESSING IS
00051  M00S00046.comscio +++|*                SELECTED (BIT 44 OF FET+1) AND THE FET IS
00052  M00S00047.comscio +++|*                LONG ENOUGH.
00053  M00S00048.comscio +++|*         CODE   REQUEST/RETURN CODE.
00054  M00S00049.comscio +++|*                BITS 4,3    BINARY 10 = EOR, BINARY 11 = EOF.
00055  M00S00050.comscio +++|*                BIT 1       0 = CODED FILE, 1 = BINARY FILE.
00056  M00S00051.comscio +++|*                BIT 0       COMPLETION BIT (SET WHEN OPERATION
00057  M00S00052.comscio +++|*                            COMPLETE).
00058  M00S00053.comscio +++|*         DT     DEVICE TYPE
00059  M00S00054.comscio +++|*         SP     SPECIAL PROCESSING BITS.
00060  M00S00055.comscio +++|*                BIT 47      RANDOM PROCESSING BIT.
00061  M00S00056.comscio +++|*                BIT 45      USER PROCESSING BIT (USER PROCESSES
00062  M00S00057.comscio +++|*                            END OF DEVICE (TRACK LIMIT) AND
00063  M00S00058.comscio +++|*                            MAGNETIC TAPE END OF REEL).
00064  M00S00059.comscio +++|*                BIT 44      USER ERROR PROCESSING BIT.
Line S00001 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00065  M01S00001.242l642 +++|*                BIT 43      REAL TIME BIT.  (RETURN TO CALLER
00066  M01S00002.242l642 +++|*                            FOR CONDITIONS CIO WAITS FOR)
00067  M00S00060.comscio +++|*                BIT 41      EXTENDED TAPE LABEL PROCESSING.
Line S00005 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00068  M01S00005.ns22000 +++|*                BIT 39      ACCESS LEVEL PROCESSING BIT.
00069  M00S00061.comscio +++|*                BIT 36      FILE FLUSH BIT.
00070  M00S00062.comscio +++|*         L      FET LENGTH - 5.
00071  M00S00063.comscio +++|*         FIRST  FIRST ADDRESS OF BUFFER.
00072  M00S00064.comscio +++|*         IN     NEXT INPUT ADDRESS.
00073  M00S00065.comscio +++|*         OUT    NEXT OUTPUT ADDRESS.
00074  M00S00066.comscio +++|*         FNT    RELATIVE ADDRESS OF FNT ORDINAL IN NEGATIVE FL.
00075  M01S00006.ns22000 +++|*         AL     IF FET+1 BIT 39 SET, ACCESS LEVEL TO BE SET ON FILE
00076  M01S00007.ns22000 +++|*                WHEN INITIALLY CREATED.  FIELD TO RETURN CURRENT
00077  M01S00008.ns22000 +++|*                ACCESS LEVEL OF FILE IF FET+1 BIT 39 SET WHEN
00078  M01S00009.ns22000 +++|*                FILE ALREADY EXISTS.
00079  M00S00067.comscio +++|*         PRU    PRU SIZE OF THE DEVICE ON WHICH THE FILE RESIDES.
00080  M00S00068.comscio +++|*         LIMIT  LIMIT ADDRESS OF BUFFER.
00081  M00S00069.comscio +++|*         LIST   ADDRESS OF A LIST OF RANDOM ADDRESSES TO BE USED WITH
00082  M00S00070.comscio +++|*                THE *READLS* OR *RPHRLS* MASS STORAGE FUNCTIONS.
00083  M00S00071.comscio +++|*         UBC    UNUSED BIT COUNT FOR S AND L FORMAT TAPES.
00084  M00S00072.comscio +++|*         MLRS   MAXIMUM LOGICAL RECORD SIZE FOR S AND L FORMAT TAPES.
00085  M00S00073.comscio +++|*         CRI    CURRENT RANDOM INDEX (MASS STORAGE ONLY).  SET BY
00086  M00S00074.comscio +++|*                *CIO* PROCESSOR IF THE RANDOM FILE BIT IS SET.
00087  M00S00075.comscio +++|*         W      RANDOM RE-WRITE REQUEST (MASS STORAGE ONLY).
00088  M00S00076.comscio +++|*         RR     RANDOM REQUEST (MASS STORAGE ONLY).
00089  M00S00077.comscio +++|*                IF RR .NE. 0 FOR READ REQUEST, RR IS RANDOM INDEX.
00090  M00S00078.comscio +++|*                IF RR .NE. 0 AND W = 1 FOR WRITE REQUEST,
00091  M00S00079.comscio +++|*                RR IS RANDOM INDEX.
00092  M00S00080.comscio +++|*                IF RR .NE. 0 AND W = 0 FOR WRITE REQUEST, RR IS
00093  M00S00081.comscio +++|*                ADDRESS FOR RETURN OF RANDOM INDEX (FOR WRITE
00094  M00S00082.comscio +++|*                OPERATION AT CURRENT POSITION).
00095  M00S00083.comscio +++|*         DEC    DETAILED ERROR CODE (MASS STORAGE ONLY).
00096  M00S00084.comscio +++|*                BITS 12-23 = 0.  BITS 0-11 ARE DEFINED AS FOLLOWS -
00097  M00S00085.comscio +++|*                X001        PARITY ERROR.
00098  M00S00086.comscio +++|*                X002        ADDRESS ERROR.
00099  M00S00087.comscio +++|*                X003        DEVICE STATUS ERROR.
00100  M00S00088.comscio +++|*                X004        CONTROLLER FUNCTION REJECT OR TIMEOUT.
00101  M00S00089.comscio +++|*                X005        DEVICE RESERVED.
00102  M00S00090.comscio +++|*                X006        DEVICE NOT READY.
00103  M00S00091.comscio +++|*                X007        TRACK LIMIT (DEVICE FULL).
00104  M00S00092.comscio +++|*                0000        OTHER ERROR.
00105  M00S00093.comscio +++|*                WHERE X = 0 IF INCORRECT DATA READ HAS BEEN
00106  M00S00094.comscio +++|*                TRANSFERRED TO CIRCULAR BUFFER, X = 1 OTHERWISE.
00107  M00S00095.comscio +++|*         INDL   LENGTH OF RANDOM INDEX AREA (MASS STORAGE ONLY).
00108  M00S00096.comscio +++|*         INDEX  FWA OF RANDOM INDEX AREA (MASS STORAGE ONLY).
00109  M00S00097.comscio +++|          SPACE  4,10
00110  M00S00098.comscio +++|***       FUNCTION DESCRIPTIONS.
00111  M00S00099.comscio +++|*
00112  M00S00100.comscio +++|*         FUNCTION (OPERATION) CODES ARE SPECIFIED IN THE *CODE* FIELD
00113  M00S00101.comscio +++|*         OF THE FET.  WHEN THE *CIO* OPERATION HAS BEEN COMPLETED,
00114  M00S00102.comscio +++|*         BIT 0 OF THE *CODE* FIELD IS SET AND THE *LN* AND *CODE*
00115  M00S00103.comscio +++|*         FIELDS (BITS 0 - 17) ARE SET AS INDICATED BELOW.  THE *AT*
00116  M00S00104.comscio +++|*         FIELD IS CLEARED AND APPROPRIATELY SET IF AN ERROR IS
00117  M00S00105.comscio +++|*         DETECTED.
00118  M00S00106.comscio +++|          SPACE  4,10
00119  M00S00107.comscio +++|***       READ FUNCTIONS.
00120  M00S00108.comscio +++|
00121  M00S00109.comscio +++|
00122  M00S00110.comscio +++|***       FUNCTION 000 - *RPHR*.
00123  M00S00111.comscio +++|*         READ PHYSICAL RECORD.
00124  M00S00112.comscio +++|*         TRANSFERS ONE PRU INTO CIRCULAR BUFFER.
00125  M00S00113.comscio +++|*
00126  M00S00114.comscio +++|*         STATUS RESPONSE -
00127  M00S00115.comscio +++|*         000001   FULL SECTOR TRANSFERRED.
00128  M00S00116.comscio +++|*         000021   EOR ENCOUNTERED.
00129  M00S00117.comscio +++|*         740031   EOF ENCOUNTERED.
00130  M00S00118.comscio +++|*         741031   EOI ENCOUNTERED.
00131  M00S00119.comscio +++|
00132  M00S00120.comscio +++|
00133  M00S00121.comscio +++|***       FUNCTION 010 - *READ*.
00134  M00S00122.comscio +++|*         BUFFER READ.
00135  M00S00123.comscio +++|*         IF BUFFER HAS ROOM FOR AT LEAST ONE FULL PRU, THE READ
00136  M00S00124.comscio +++|*         IS INITIATED AND CONTINUES UNTIL THE BUFFER IS FULL,
00137  M00S00125.comscio +++|*         AN EOR OR EOF IS ENCOUNTERED, EOI IS ENCOUNTERED,
00138  M00S00126.comscio +++|*         OR FOR S OR L FORMAT TAPE, ONE PRU IS READ.
00139  M00S00127.comscio +++|*
00140  M00S00128.comscio +++|*         STATUS RESPONSE -
00141  M00S00129.comscio +++|*         000011   BUFFER FILLED.
00142  M00S00130.comscio +++|*         000021   EOR ENCOUNTERED.
00143  M00S00131.comscio +++|*         740031   EOF ENCOUNTERED.
00144  M00S00132.comscio +++|*         741031   EOI ENCOUNTERED.
00145  M00S00133.comscio +++|
00146  M00S00134.comscio +++|
00147  M00S00135.comscio +++|***       FUNCTION 020 - *READSKP*.
00148  M00S00136.comscio +++|*         READ SKIP.
00149  M00S00137.comscio +++|*         READS UNTIL THE BUFFER IS FILLED OR EOR, EOF OR EOI IS
00150  M00S00138.comscio +++|*         ENCOUNTERED.  IF BUFFER IS FILLED, THE FILE IS POSITIONED
00151  M00S00139.comscio +++|*         TO THE NEXT EOR, EOF OR EOI (WHICHEVER IS ENCOUNTERED
00152  M00S00140.comscio +++|*         FIRST).  IF LEVEL 17B IS SPECIFIED, READ AND SKIP IS
00153  M00S00141.comscio +++|*         CONTINUED UNTIL EOF OR EOI IS ENCOUNTERED.
00154  M00S00142.comscio +++|*
00155  M00S00143.comscio +++|*         STATUS RESPONSE -
00156  M00S00144.comscio +++|*         000021   BUFFER FILLED OR EOR ENCOUNTERED.
00157  M00S00145.comscio +++|*         740031   EOF ENCOUNTERED.
00158  M00S00146.comscio +++|*         741031   EOI ENCOUNTERED.
00159  M00S00147.comscio +++|
00160  M00S00148.comscio +++|
00161  M00S00149.comscio +++|***       FUNCTION 200 - *READCW*.
00162  M00S00150.comscio +++|*         READ NON-STOP WITH CONTROL WORDS.
00163  M00S00151.comscio +++|*         PERFORMS NONSTOP READ OF PRUS BOUNDED BY CONTROL WORDS
00164  M00S00152.comscio +++|*         UNTIL BUFFER IS FULL OR EOI IS ENCOUNTERED.  IF LEVEL
00165  M00S00153.comscio +++|*         17B IS SPECIFIED, READ STOPS AT NEXT EOF.
00166  M00S00154.comscio +++|*
00167  M00S00155.comscio +++|*         EACH PHYSICAL RECORD RETURNED TO THE CIRCULAR BUFFER IS
00168  M00S00156.comscio +++|*         BOUNDED BY CONTROL WORDS.  THIS ALLOWS EORS AND EOFS TO BE
00169  M00S00157.comscio +++|*         READ WITHOUT REISSUING THE *CIO* RA+1 CALL FOR THE NEXT
00170  M00S00158.comscio +++|*         SEQUENTIAL READ.
00171  M00S00159.comscio +++|*
00172  M00S00160.comscio +++|*         PRU FORMAT -
00173  M00S00161.comscio +++|*T        1/E, 4/, 1/C, 18/ PRU SIZE, 6/, 6/ UBC, 24/ BYTE COUNT
Figure

0232429 BYTE COUNT UBC3035365354555859 PRU SIZECE

00174  M00S00162.comscio +++|*T        60/ ... FIRST OF (BYTE COUNT+4)/5 DATA WORDS ...
Figure

029 ... FIRST OF (BYTE COUNT+4)3059 ... FIRST OF (BYTE COUNT+4)

00175  M00S00163.comscio +++|*T        60/ .......
Figure

029 .......3059 .......

00176  M00S00164.comscio +++|*T        12/ LN, 12/ CH, 12/ EQ, 12/ TK, 12/ SC
Figure

01112232429 SC TK EQ303536474859 EQ CH LN


Line S00165 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00177  M01S00165.242l642 ---|*         P = 1              IF PARITY ERROR ENCOUNTERED WHEN READING
Line S00003 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00178  M01S00003.242l642 +++|*         E = 1              IF PARITY ERROR ENCOUNTERED WHEN READING
00179  M00S00166.comscio +++|*                            THIS PRU.
00180  M00S00167.comscio +++|*         C = 1              IF CODED OPERATION ON TAPE.
00181  M00S00168.comscio +++|*         PRU SIZE           NUMBER OF 60 BIT WORDS IN EACH PRU.
00182  M00S00169.comscio +++|*         UBC                UNUSED BIT COUNT (0 TO 11).
00183  M00S00170.comscio +++|*                            NONZERO ONLY FOR S AND L FORMAT TAPES.
00184  M00S00171.comscio +++|*         BYTE COUNT         NUMBER OF 12 BIT DATA BYTES IN THIS PRU.
00185  M00S00172.comscio +++|*                            IF .LT. 500, THIS IS AN END-OF-RECORD OR
00186  M00S00173.comscio +++|*                            END-OF-FILE.
Line S00174 Modification History
M01 (Removed by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00187  M01S00174.242l642 ---|*         LN                 LEVEL NUMBER FOR SHORT PRU.
Line S00004 Modification History
M01 (Added by) 242l642
Seq #  *Modification Id* Act 
----------------------------+
00188  M01S00004.242l642 +++|*         LN                 LEVEL NUMBER FOR ZERO-LENGTH PRU.
00189  M00S00175.comscio +++|*                            0         EOR.
00190  M00S00176.comscio +++|*                            1-16B     SAME AS LEVEL 0.
00191  M00S00177.comscio +++|*                            17B       EOF.
00192  M00S00178.comscio +++|*         CH                 CHANNEL USED FOR THE READ.
00193  M00S00179.comscio +++|*         EQ                 EST ORDINAL OF MASS STORAGE DEVICE.
00194  M00S00180.comscio +++|*         TK                 TRACK NUMBER THAT WAS READ.
00195  M00S00181.comscio +++|*         SC                 SECTOR NUMBER THAT WAS READ.
00196  M00S00182.comscio +++|*
00197  M00S00183.comscio +++|*         STATUS RESPONSE -
00198  M00S00184.comscio +++|*         000201   BUFFER FILLED.
00199  M00S00185.comscio +++|*         740031   EOF ENCOUNTERED (ONLY IF LEVEL 17B SPECIFIED).
00200  M00S00186.comscio +++|*         741031   EOI ENCOUNTERED.
00201  M00S00187.comscio +++|
00202  M00S00188.comscio +++|
00203  M00S00189.comscio +++|***       FUNCTION 210 - *READLS*.
00204  M00S00190.comscio +++|*         READ NON-STOP WITH LIST.  (MASS STORAGE ONLY)
00205  M00S00191.comscio +++|*         READS GROUP OF MASS STORAGE LOGICAL RECORDS AS
00206  M00S00192.comscio +++|*         SPECIFIED BY LIST SUPPLIED BY USER, UNTIL THE LIST
00207  M00S00193.comscio +++|*         IS EXHAUSTED OR THE BUFFER IS FILLED.  THE USER MUST
00208  M00S00194.comscio +++|*         SUPPLY THE ADDRESS OF THE LIST IN BITS 0 - 17 OF FET+5.
00209  M00S00195.comscio +++|*         THE LIST CONTAINS ONE RANDOM ADDRESS IN BITS 0 - 17
00210  M00S00196.comscio +++|*         OF EACH WORD AND IS TERMINATED BY A WORD IN WHICH
00211  M00S00197.comscio +++|*         THESE BITS ARE ZERO.
00212  M00S00198.comscio +++|*
00213  M00S00199.comscio +++|*         STATUS RESPONSE -
00214  M00S00200.comscio +++|*         000211   OPERATION NOT COMPLETE.  THE *CIO* PROCESSOR
00215  M00S00201.comscio +++|*                  ADVANCES THE LIST ADDRESS IN FET+5 TO THE NEXT
00216  M00S00202.comscio +++|*                  ENTRY IN THE LIST TO BE PROCESSED AND SETS BIT 23
00217  M00S00203.comscio +++|*                  OF FET+5 TO INDICATE A NON-INITIAL *READLS* CALL.
00218  M00S00204.comscio +++|*         740031   OPERATION COMPLETE (ENTIRE LIST READ).
00219  M00S00205.comscio +++|
00220  M00S00206.comscio +++|
00221  M00S00207.comscio +++|***       FUNCTION 230 - *RPHRLS*.
00222  M00S00208.comscio +++|*         READ PRUS WITH LIST.  (MASS STORAGE ONLY)
00223  M00S00209.comscio +++|*         LIST STRUCTURE IS THE SAME AS FOR *READLS*,
00224  M00S00210.comscio +++|*         BUT TRANSFERS GROUP OF PRUS SPECIFIED BY LIST
00225  M00S00211.comscio +++|*         RATHER THAN RECORDS.
00226  M00S00212.comscio +++|*
00227  M00S00213.comscio +++|*         STATUS RESPONSE -
00228  M00S00214.comscio +++|*         000231   OPERATION NOT COMPLETE (REFER TO *READLS*).
00229  M00S00215.comscio +++|*         740031   OPERATION COMPLETE (ENTIRE LIST READ).
00230  M00S00216.comscio +++|
00231  M00S00217.comscio +++|
00232  M00S00218.comscio +++|***       FUNCTION 250 - *READNS*.
00233  M00S00219.comscio +++|*         READ NON-STOP.
00234  M00S00220.comscio +++|*         READ DATA UNTIL CM BUFFER IS FULL OR UNTIL EOF OR EOI
00235  M00S00221.comscio +++|*         IS ENCOUNTERED.
00236  M00S00222.comscio +++|*
00237  M00S00223.comscio +++|*         STATUS RESPONSE -
00238  M00S00224.comscio +++|*         000251   BUFFER FULL.
00239  M00S00225.comscio +++|*         740031   EOF ENCOUNTERED.
00240  M00S00226.comscio +++|*         741031   EOI ENCOUNTERED.
00241  M00S00227.comscio +++|
00242  M00S00228.comscio +++|
00243  M00S00229.comscio +++|***       FUNCTION 260 - *READN*.
00244  M00S00230.comscio +++|*         READ NON-STOP *S* OR *L* FORMAT MAGNETIC TAPE. (TAPE ONLY)
00245  M00S00231.comscio +++|*         READS UNTIL BUFFER IS FULL OR EOF OR EOI IS ENCOUNTERED.
00246  M00S00232.comscio +++|*         EACH PRU IS PRECEDED BY A HEADER WORD OF FORMAT -
00247  M00S00233.comscio +++|*T        30/, 6/ UBC, 6/, 18/ BS
Figure

01718232429 BS UBC3059

00248  M00S00234.comscio +++|*         UBC    UNUSED BIT COUNT (0 - 55).
00249  M00S00235.comscio +++|*         BS     BLOCK SIZE.  NUMBER OF CM WORDS IN FOLLOWING PRU.
00250  M00S00236.comscio +++|*
00251  M00S00237.comscio +++|*         STATUS RESPONSE -
00252  M00S00238.comscio +++|*         000261   BUFFER FULL.
00253  M00S00239.comscio +++|*         740271   EOF ENCOUNTERED.
00254  M00S00240.comscio +++|*         741271   EOI ENCOUNTERED.
00255  M00S00241.comscio +++|
00256  M00S00242.comscio +++|
00257  M00S00243.comscio +++|***       FUNCTION 600 - *READEI*.
00258  M00S00244.comscio +++|*         READ TO END OF INFORMATION.
00259  M00S00245.comscio +++|*         READS UNTIL BUFFER IS FILLED OR EOI IS ENCOUNTERED.
00260  M00S00246.comscio +++|*
00261  M00S00247.comscio +++|*         STATUS RESPONSE -
00262  M00S00248.comscio +++|*         000601   BUFFER FILLED.
00263  M00S00249.comscio +++|*         741031   EOI ENCOUNTERED.
00264  M00S00250.comscio +++|          SPACE  4,10
00265  M00S00251.comscio +++|***       WRITE FUNCTIONS.
00266  M00S00252.comscio +++|*
00267  M00S00253.comscio +++|*         WRITE FUNCTION RESPONSE SETS THE COMPLETE BIT WITH THE
00268  M00S00254.comscio +++|*         FUNCTION CODE IN THE *CODE* FIELD OF THE FET, AND LEAVES
00269  M00S00255.comscio +++|*         THE *LN* FIELD UNALTERED.
00270  M00S00256.comscio +++|
00271  M00S00257.comscio +++|
00272  M00S00258.comscio +++|***       FUNCTION 004 - *WPHR*.
00273  M00S00259.comscio +++|*         WRITE PHYSICAL RECORD.
00274  M00S00260.comscio +++|*         IF THE CIRCULAR BUFFER CONTAINS AT LEAST ONE FULL PRU
00275  M00S00261.comscio +++|*         OF DATA, *WPHR* WRITES ONE PRU FROM THE BUFFER.
00276  M00S00262.comscio +++|
00277  M00S00263.comscio +++|
00278  M00S00264.comscio +++|***       FUNCTION 014 - *WRITE*.
00279  M00S00265.comscio +++|*         BUFFER WRITE.
00280  M00S00266.comscio +++|*         WRITES UNTIL THE CIRCULAR BUFFER CONTAINS LESS THAN
00281  M00S00267.comscio +++|*         ONE PRU OF DATA.
00282  M00S00268.comscio +++|
00283  M00S00269.comscio +++|
00284  M00S00270.comscio +++|***       FUNCTION 024 - *WRITER*.
00285  M00S00271.comscio +++|*         END OF RECORD WRITE.
00286  M00S00272.comscio +++|*         WRITES ALL DATA FROM THE CIRCULAR BUFFER.  THE LAST
00287  M00S00273.comscio +++|*         PRU IS WRITTEN AS A SHORT PRU TO INDICATE EOR.
00288  M00S00274.comscio +++|*         IF THE DATA EXACTLY FILLS THE LAST PRU, A PRU WITH
00289  M00S00275.comscio +++|*         NO DATA IS ALSO WRITTEN.  A *WRITER* WITH LEVEL 17B
00290  M00S00276.comscio +++|*         SPECIFIED PERFORMS THE SAME OPERATION AS A *WRITEF*.
00291  M00S00277.comscio +++|
00292  M00S00278.comscio +++|
00293  M00S00279.comscio +++|***       FUNCTION 034 - *WRITEF*.
00294  M00S00280.comscio +++|*         END OF FILE WRITE.
00295  M00S00281.comscio +++|*         WRITES ALL DATA FROM THE CIRCULAR BUFFER AS FOR *WRITER*
00296  M00S00282.comscio +++|*         THEN AN EOF PRU IS WRITTEN.  IF THE BUFFER IS EMPTY AND
00297  M00S00283.comscio +++|*         THE LAST OPERATION WAS AN INCOMPLETE WRITE (LAST PRU
00298  M00S00284.comscio +++|*         WRITTEN WAS NOT EOR OR EOF), AN EOR (PRU WITH NO DATA)
00299  M00S00285.comscio +++|*         AND AN EOF ARE WRITTEN, OTHERWISE ONLY AN EOF IS WRITTEN.
00300  M00S00286.comscio +++|
00301  M00S00287.comscio +++|
00302  M00S00288.comscio +++|***       FUNCTION 204 - *WRITECW*.
00303  M00S00289.comscio +++|*         WRITE NON-STOP WITH CONTROL WORDS.
00304  M00S00290.comscio +++|*         THE PRUS IN THE CIRCULAR BUFFER ARE IN THE SAME FORMAT
00305  M00S00291.comscio +++|*         AS DESCRIBED FOR *READCW*.  THE UNUSED BIT COUNT
00306  M00S00292.comscio +++|*         (FOR TAPE), BYTE COUNT, AND EOR/EOF LEVEL NUMBER FIELDS
00307  M00S00293.comscio +++|*         IN THE HEADER AND TRAILER CONTROL WORDS ARE USED TO
00308  M00S00294.comscio +++|*         WRITE DATA TO THE FILE (CONTROL WORDS ARE NOT WRITTEN
00309  M00S00295.comscio +++|*         AS PART OF DATA).
00310  M00S00296.comscio +++|
00311  M00S00297.comscio +++|
00312  M00S00298.comscio +++|***       FUNCTION 214 - *REWRITE*.
00313  M00S00299.comscio +++|*         BUFFER RE-WRITE IN PLACE.  (MASS STORAGE ONLY)
00314  M00S00300.comscio +++|*         PERFORMS SAME FUNCTION AS *WRITE* BUT PROCESSES
00315  M00S00301.comscio +++|*         OPERATION AS RANDOM FUNCTION (DOES NOT DESTROY PORTION OF
00316  M00S00302.comscio +++|*         FILE FOLLOWING THAT WRITTEN).  IF RANDOM PARAMETERS ARE
00317  M00S00303.comscio +++|*         SPECIFED IN THE FET, THE WRITE OCCURS AT THE SPECIFIED
00318  M00S00304.comscio +++|*         RANDOM ADDRESS, OTHERWISE THE WRITE OCCURS AT THE CURRENT
00319  M00S00305.comscio +++|*         POSITION OF THE FILE.
00320  M00S00306.comscio +++|
00321  M00S00307.comscio +++|
00322  M00S00308.comscio +++|***       FUNCTION 224 - *REWRITER*.
00323  M00S00309.comscio +++|*         END OF RECORD RE-WRITE IN PLACE.  (MASS STORAGE ONLY)
00324  M00S00310.comscio +++|*         PERFORMS SAME FUNCTION AS *WRITER* BUT PROCESSES
00325  M00S00311.comscio +++|*         OPERATION AS RANDOM FUNCTION (AS NOTED FOR *REWRITE*).
00326  M00S00312.comscio +++|*         A *REWRITER* WITH LEVEL 17B SPECIFIED PERFORMS THE SAME
00327  M00S00313.comscio +++|*         OPERATION AS A *REWRITEF*.
00328  M00S00314.comscio +++|
00329  M00S00315.comscio +++|
00330  M00S00316.comscio +++|***       FUNCTION 234 - *REWRITEF*.
00331  M00S00317.comscio +++|*         END OF FILE RE-WRITE IN PLACE.  (MASS STORAGE ONLY)
00332  M00S00318.comscio +++|*         PERFORMS THE SAME FUNCTION AS *WRITEF* BUT PROCESSES
00333  M00S00319.comscio +++|*         OPERATION AS RANDOM FUNCTION (AS NOTED FOR *REWRITE*).
00334  M00S00320.comscio +++|
00335  M00S00321.comscio +++|
00336  M00S00322.comscio +++|***       FUNCTION 264 - *WRITEN*.
00337  M00S00323.comscio +++|*         WRITE NON-STOP *S* OR *L* FORMAT MAGNETIC TAPES. (TAPE ONLY)
00338  M00S00324.comscio +++|*         WRITES DATA UNTIL BUFFER IS EMPTY OR END-OF-REEL IS
00339  M00S00325.comscio +++|*         ENCOUNTERED.  A HEADER WORD (SAME FORMAT AS FOR *READN*)
00340  M00S00326.comscio +++|*         MUST PRECEDE EACH PRU IN THE CIRCULAR BUFFER (HEADER
00341  M00S00327.comscio +++|*         IS NOT WRITTEN ON THE TAPE).
Line S00010 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00342  M01S00010.ns22000 +++|          SPACE  4,10
00343  M01S00011.ns22000 +++|***       OVERWRITE FUNCTIONS.
00344  M01S00012.ns22000 +++|
00345  M01S00013.ns22000 +++|
00346  M01S00014.ns22000 +++|***       FUNCTION 244 - *OVWRITE*.
00347  M01S00015.ns22000 +++|*         OVERWRITE FILE WITH BINARY ZEROES (SKIP COUNT = 0)
00348  M01S00016.ns22000 +++|*         OR DECLASSIFY FILE BY OVERWRITE WITH BINARY ZEROES,
00349  M01S00017.ns22000 +++|*         THEN WITH BINARY ONES, AND THEN WITH ALTERNATING
00350  M01S00018.ns22000 +++|*         ONES AND ZEROES (SKIP COUNT = 3).
00351  M01S00019.ns22000 +++|*         FILE IS POSITIONED TO BOI AFTER OPERATION IS COMPLETE.
00352  M01S00020.ns22000 +++|*         FUNCTION RESPONSE SETS THE COMPLETE BIT OF THE FET,
00353  M01S00021.ns22000 +++|*         AND LEAVES THE *LN* FIELD UNALTERED.
00354  M01S00022.ns22000 +++|
00355  M01S00023.ns22000 +++|
00356  M01S00024.ns22000 +++|***       FUNCTION 254 - *OVWRITE RETURN*.
00357  M01S00025.ns22000 +++|*         SAME AS FUNCTION 244 EXCEPT FILE IS RETURNED
00358  M01S00026.ns22000 +++|*         AFTER OVERWRITE IS COMPLETE.
00359  M00S00328.comscio +++|          SPACE  4,10
00360  M00S00329.comscio +++|***       POSITION FUNCTIONS.
00361  M00S00330.comscio +++|
00362  M00S00331.comscio +++|
00363  M00S00332.comscio +++|***       FUNCTION 040 - *BKSP*.
00364  M00S00333.comscio +++|*         BACKSPACE RECORD.
00365  M00S00334.comscio +++|*
00366  M00S00335.comscio +++|*         STATUS RESPONSE -
00367  M00S00336.comscio +++|*         000041   OPERATION COMPLETED ON EOR.
00368  M00S00337.comscio +++|*         000051   BOI OR LOAD POINT OF TAPE ENCOUNTERED BEFORE
00369  M00S00338.comscio +++|*                  OPERATION COMPLETED.
00370  M00S00339.comscio +++|*         740041   OPERATION COMPLETED ON EOF.
00371  M00S00340.comscio +++|
00372  M00S00341.comscio +++|
00373  M00S00342.comscio +++|***       FUNCTION 044 - *BKSPRU*.
00374  M00S00343.comscio +++|*         BACKSPACE USER SPECIFIED NUMBER OF PRUS.
00375  M00S00344.comscio +++|*
00376  M00S00345.comscio +++|*         STATUS RESPONSE -
00377  M00S00346.comscio +++|*         000045   OPERATION COMPLETED.
00378  M00S00347.comscio +++|*         000051   BOI ENCOUNTERED BEFORE OPERATION COMPLETED
00379  M00S00348.comscio +++|*                  (SPECIFIED NUMBER OF PRUS NOT BACKSPACED).
00380  M00S00349.comscio +++|
00381  M00S00350.comscio +++|
00382  M00S00351.comscio +++|***       FUNCTION 050 - *REWIND*.
00383  M00S00352.comscio +++|*         REWIND FILE.
00384  M00S00353.comscio +++|*         IN AND OUT ARE SET EQUAL TO FIRST.
00385  M00S00354.comscio +++|*         FUNCTION RESPONSE SETS THE COMPLETE BIT WITH THE FUNCTION
00386  M00S00355.comscio +++|*         CODE IN THE *CODE* FIELD OF THE FET, AND LEAVES THE *LN*
00387  M00S00356.comscio +++|*         FIELD UNALTERED.
00388  M00S00357.comscio +++|
00389  M00S00358.comscio +++|
00390  M00S00359.comscio +++|***       FUNCTION 054 - *REWIND*.
00391  M00S00360.comscio +++|*         SAME AS FUNCTION 050.
00392  M00S00361.comscio +++|
00393  M00S00362.comscio +++|
00394  M00S00363.comscio +++|***       FUNCTION 060 - *UNLOAD*.
00395  M00S00364.comscio +++|*         UNLOAD FILE.
00396  M00S00365.comscio +++|*         RELEASES FILE ATTACHMENT TO JOB.
00397  M00S00366.comscio +++|*         FUNCTION RESPONSE SETS THE COMPLETE BIT WITH THE FUNCTION
00398  M00S00367.comscio +++|*         CODE IN THE *CODE* FIELD OF THE FET, AND LEAVES THE *LN*
00399  M00S00368.comscio +++|*         FIELD UNALTERED.
00400  M00S00369.comscio +++|
00401  M00S00370.comscio +++|
00402  M00S00371.comscio +++|***       FUNCTION 070 - *RETURN*.
00403  M00S00372.comscio +++|*         RETURN FILE.
00404  M00S00373.comscio +++|*         RELEASES FILE ATTACHMENT TO JOB.
00405  M00S00374.comscio +++|*         FUNCTION RESPONSE SETS THE COMPLETE BIT WITH THE FUNCTION
00406  M00S00375.comscio +++|*         CODE IN THE *CODE* FIELD OF THE FET, AND LEAVES THE *LN*
00407  M00S00376.comscio +++|*         FIELD UNALTERED.
00408  M00S00377.comscio +++|
00409  M00S00378.comscio +++|
00410  M00S00379.comscio +++|***       FUNCTION 110 - *POSMF*.
00411  M00S00380.comscio +++|*         POSITION TO SPECIFIED FILE OF MULTI-FILE SET.  (TAPE ONLY)
00412  M00S00381.comscio +++|
00413  M00S00382.comscio +++|
00414  M00S00383.comscio +++|***       FUNCTION 114 - *EVICT*.
00415  M00S00384.comscio +++|*         EVICT FILE.
00416  M00S00385.comscio +++|*         FOR MASS STORAGE, *EVICT* RELEASES FILE SPACE FOR FILE BUT
00417  M00S00386.comscio +++|*         DOES NOT RELEASE FILE ATTACHMENT TO JOB.  FOR TAPES AND
00418  M00S00387.comscio +++|*         LOCKED PERMANENT FILES, *EVICT* PERFORMS THE SAME FUNCTION
00419  M00S00388.comscio +++|*         AS *UNLOAD*.
00420  M00S00389.comscio +++|*         FUNCTION RESPONSE SETS THE COMPLETE BIT WITH THE FUNCTION
00421  M00S00390.comscio +++|*         CODE IN THE *CODE* FIELD OF THE FET, AND LEAVES THE *LN*
00422  M00S00391.comscio +++|*         FIELD UNALTERED.
00423  M00S00392.comscio +++|
00424  M00S00393.comscio +++|
00425  M00S00394.comscio +++|***       FUNCTION 240 - *SKIPF*/*SKIPFF*/*SKIPEI*.
00426  M00S00395.comscio +++|*         SKIP SPECIFIED NUMBER OF RECORDS FORWARD (*SKIPF*).
00427  M00S00396.comscio +++|*         IF LEVEL 17B SPECIFIED, SKIP SPECIFIED NUMBER OF FILES
00428  M00S00397.comscio +++|*         FORWARD (*SKIPFF*).
00429  M00S00398.comscio +++|*         IF SKIP COUNT = 777777B, SKIP TO EOI (*SKIPEI*).
00430  M00S00399.comscio +++|*         OPERATION TERMINATES WHEN SKIP COUNT IS SATISFIED OR
00431  M00S00400.comscio +++|*         EOI IS ENCOUNTERED.
00432  M00S00401.comscio +++|*
00433  M00S00402.comscio +++|*         STATUS RESPONSE -
00434  M00S00403.comscio +++|*         000261   LAST RECORD SKIPPED WAS EOR.
00435  M00S00404.comscio +++|*         740271   LAST RECORD SKIPPED WAS EOF.
00436  M00S00405.comscio +++|*         741271   EOI ENCOUNTERED.
00437  M00S00406.comscio +++|
00438  M00S00407.comscio +++|
00439  M00S00408.comscio +++|***       FUNCTION 640 - *SKIPB*/*SKIPFB*.
00440  M00S00409.comscio +++|*         SKIP SPECIFIED NUMBER OF RECORDS BACKWARD (*SKIPB*).
00441  M00S00410.comscio +++|*         IF LEVEL 17B SPECIFIED, BACKSPACE FILE SPECIFIED
00442  M00S00411.comscio +++|*         NUMBER OF FILES FROM CURRENT POSITION (*SKIPFB*).
00443  M00S00412.comscio +++|*
00444  M00S00413.comscio +++|*         STATUS RESPONSE -
00445  M00S00414.comscio +++|*         000051   BOI OR LOAD POINT OF TAPE ENCOUNTERED BEFORE
00446  M00S00415.comscio +++|*                  OPERATION COMPLETE FOR RECORD OPERATION.
00447  M00S00416.comscio +++|*         740051   BOI OR LOAD POINT OF TAPE ENCOUNTERED BEFORE
00448  M00S00417.comscio +++|*                  OPERATION COMPLETE FOR FILE OPERATION.
00449  M00S00418.comscio +++|*         000641   OPERATION COMPLETE ON EOR.
00450  M00S00419.comscio +++|*         740641   OPERATION COMPLETE ON EOF.
00451  M00S00420.comscio +++|          SPACE  4,10
00452  M00S00421.comscio +++|***       OPEN FUNCTIONS.
00453  M00S00422.comscio +++|*
00454  M00S00423.comscio +++|*         FOR ALL OPEN FUNCTIONS, THE *CIO* PROCESSOR LOADS A RANDOM
00455  M00S00424.comscio +++|*         INDEX INTO THE INDEX AREA SPECIFIED IN THE FET IF THE
00456  M00S00425.comscio +++|*         RANDOM FILE BIT IS SET.  IF THE INDEX LENGTH IS ZERO,
00457  M00S00426.comscio +++|*         NO LOAD IS ATTEMPTED AND THE RANDOM FILE BIT IS CLEARED IN
00458  M00S00427.comscio +++|*         THE FET.  THE RANDOM INDEX IS THE LAST RECORD ON THE FILE.
00459  M00S00428.comscio +++|*         IF THIS RECORD IS FOUND TO BE OF ZERO LENGTH, THE RANDOM
00460  M00S00429.comscio +++|*         FILE BIT IS CLEARED.  THE INDEX AREA IS FILLED WITH ZERO
00461  M00S00430.comscio +++|*         WORDS BEFORE THE INDEX IS LOADED.  FOR MASS STORAGE FILES,
00462  M00S00431.comscio +++|*         ALL REWIND FUNCTIONS ARE IDENTICAL (*READ*, *WRITE*,
00463  M00S00432.comscio +++|*         *ALTER*, *REEL*) AND ALL NO REWIND FUNCTIONS ARE IDENTICAL
00464  M00S00433.comscio +++|*         (*READNR*, *WRITENR*, *NR*, *ALTERNR*, *REELNR*).
00465  M00S00434.comscio +++|*         FOR MAGNETIC TAPE FILES, *READ*, *REEL*, AND *ALTER* ARE
00466  M00S00435.comscio +++|*         IDENTICAL, AS ARE *READNR*, *REELNR*, AND *ALTERNR*.
00467  M00S00436.comscio +++|*
00468  M00S00437.comscio +++|*         OPEN FUNCTION RESPONSE SETS THE COMPLETE BIT WITH THE
00469  M00S00438.comscio +++|*         FUNCTION CODE IN THE *CODE* FIELD OF THE FET, AND LEAVES
00470  M00S00439.comscio +++|*         THE *LN* FIELD UNALTERED.
00471  M00S00440.comscio +++|
00472  M00S00441.comscio +++|
00473  M00S00442.comscio +++|***       FUNCTION 100 - *READNR*.
00474  M00S00443.comscio +++|*         OPEN - READ, NO REWIND.
00475  M00S00444.comscio +++|
00476  M00S00445.comscio +++|
00477  M00S00446.comscio +++|***       FUNCTION 104 - *WRITENR*.
00478  M00S00447.comscio +++|*         OPEN - WRITE, NO REWIND.
00479  M00S00448.comscio +++|
00480  M00S00449.comscio +++|
00481  M00S00450.comscio +++|***       FUNCTION 120 - *NR* OR *ALTERNR*.
00482  M00S00451.comscio +++|*         OPEN - NO REWIND.
00483  M00S00452.comscio +++|*         OPEN - ALTER, NO REWIND.
00484  M00S00453.comscio +++|
00485  M00S00454.comscio +++|
00486  M00S00455.comscio +++|***       FUNCTION 140 - *READ*.
00487  M00S00456.comscio +++|*         OPEN - READ, REWIND.
00488  M00S00457.comscio +++|
00489  M00S00458.comscio +++|
00490  M00S00459.comscio +++|***       FUNCTION 144 - *WRITE*.
00491  M00S00460.comscio +++|*         OPEN - WRITE, REWIND.
00492  M00S00461.comscio +++|
00493  M00S00462.comscio +++|
00494  M00S00463.comscio +++|***       FUNCTION 160 - *ALTER*.
00495  M00S00464.comscio +++|*         OPEN - ALTER, REWIND.
00496  M00S00465.comscio +++|
00497  M00S00466.comscio +++|
00498  M00S00467.comscio +++|***       FUNCTION 300 - *REELNR*.
00499  M00S00468.comscio +++|*         OPEN - READ REEL, NO REWIND.
00500  M00S00469.comscio +++|
00501  M00S00470.comscio +++|
00502  M00S00471.comscio +++|***       FUNCTION 340 - *REEL*.
00503  M00S00472.comscio +++|*         OPEN - READ REEL, REWIND.
00504  M00S00473.comscio +++|          SPACE  4,10
00505  M00S00474.comscio +++|***       CLOSE FUNCTIONS.
00506  M00S00475.comscio +++|*
00507  M00S00476.comscio +++|*         FOR ALL CLOSE FUNCTIONS, IF THE FILE IS RANDOM AND HAS BEEN
00508  M00S00477.comscio +++|*         WRITTEN UPON SINCE THE LAST OPEN, AND AN INDEX AREA IS
00509  M00S00478.comscio +++|*         SPECIFIED, THE RANDOM INDEX IS PLACED ON THE FILE AS THE LAST
00510  M00S00479.comscio +++|*         RECORD.  THE INDEX IS NOT WRITTEN IF THE FILE IS IN A WRITE
00511  M00S00480.comscio +++|*         LOCK-OUT STATE.  RETURN AND UNLOAD CLEAR THE ASSIGNMENT OF
00512  M00S00481.comscio +++|*         THE FILE TO THE JOB.
00513  M00S00482.comscio +++|*
00514  M00S00483.comscio +++|*         CLOSE FUNCTION RESPONSE SETS THE COMPLETE BIT WITH THE
00515  M00S00484.comscio +++|*         FUNCTION CODE IN THE *CODE* FIELD OF THE FET, AND LEAVES
00516  M00S00485.comscio +++|*         THE *LN* FIELD UNALTERED.
00517  M00S00486.comscio +++|
00518  M00S00487.comscio +++|
00519  M00S00488.comscio +++|***       FUNCTION 130 - *NR*.
00520  M00S00489.comscio +++|*         CLOSE - NO REWIND.
00521  M00S00490.comscio +++|
00522  M00S00491.comscio +++|
00523  M00S00492.comscio +++|***       FUNCTION 150.
00524  M00S00493.comscio +++|*         CLOSE - REWIND.
00525  M00S00494.comscio +++|
00526  M00S00495.comscio +++|
00527  M00S00496.comscio +++|***       FUNCTION 170 - *UNLOAD*.
00528  M00S00497.comscio +++|*         CLOSE - UNLOAD.
00529  M00S00498.comscio +++|
00530  M00S00499.comscio +++|
00531  M00S00500.comscio +++|***       FUNCTION 174 - *RETURN*.
00532  M00S00501.comscio +++|*         CLOSE - RETURN.
00533  M00S00502.comscio +++|
00534  M00S00503.comscio +++|
00535  M00S00504.comscio +++|***       FUNCTION 330 - *NR*.
00536  M00S00505.comscio +++|*         CLOSER - NO REWIND.
00537  M00S00506.comscio +++|
00538  M00S00507.comscio +++|
00539  M00S00508.comscio +++|***       FUNCTION 350.
00540  M00S00509.comscio +++|*         CLOSER - REWIND.
00541  M00S00510.comscio +++|
00542  M00S00511.comscio +++|
00543  M00S00512.comscio +++|***       FUNCTION 370 - *UNLOAD*.
00544  M00S00513.comscio +++|*         CLOSER - UNLOAD.
Line S00001 Modification History
M01 (Added by) ns2106
Seq #  *Modification Id* Act 
----------------------------+
00545  M01S00001.ns2106  +++|
00546  M01S00002.ns2106  +++|
00547  M01S00003.ns2106  +++|***       FUNCTION 374 - *RETURN*.
00548  M01S00004.ns2106  +++|*         CLOSER - RETURN.
00549  M00S00514.comscio +++|          SPACE  4
00550  M00S00515.comscio +++|**        INTERNAL *CIO* FUNCTION CODES.
00551  M00S00516.comscio +++|*
00552  M00S00517.comscio +++|*         BIT 0 SET IF *FIRST* AND *LIMIT* TO BE VALIDATED
00553  M00S00518.comscio +++|*                SET FOR READ, WRITE, OPEN, REWIND, AND CLOSE/REWIND.
00554  M00S00519.comscio +++|*         BIT 1 SET IF *IN* AND *OUT* TO BE VALIDATED
00555  M00S00520.comscio +++|*                SET FOR READ AND WRITE.
00556  M00S00521.comscio +++|*         BITS 2 - 3 = TERMINATION CONDITION
00557  M00S00522.comscio +++|*                (0 = PRU, 1 = EOR, 2 = EOF, 3 = EOI).
00558  M00S00523.comscio +++|*         BIT 4 SET IF *READN*/*WRITEN* FOR MAGNETIC TAPE,
00559  M00S00524.comscio +++|*                OR IF *READLS*/*RPHRLS* FOR MASS STORAGE FILE.
00560  M00S00525.comscio +++|*         BIT 5 SET IF *READCW*/*WRITECW*.
00561  M00S00526.comscio +++|*         BITS 6 - 9 = INTERNAL FUNCTION CODE.
00562  M00S00527.comscio +++|*         BIT 10 SET IF UNLOAD, SKIP, OR REWRITE OPERATION.
00563  M00S00528.comscio +++|*                SET FOR *UNLOAD* AND *EVICT* (NOT SET FOR
00564  M00S00529.comscio +++|*                *CLOSE/UNLOAD*), SET FOR ALL SKIP FUNCTIONS
00565  M00S00530.comscio +++|*                AND *READSKP*, SET FOR RANDOM REWRITE OPERATIONS.
00566  M00S00531.comscio +++|*         BIT 11 SET IF BACKWARD OPERATION.
00567  M00S00532.comscio +++|
00568  M00S00533.comscio +++|
00569  M00S00534.comscio +++|          QUAL   CIO
00570  M00S00535.comscio +++|
00571  M00S00536.comscio +++|*         INTERNAL FUNCTION CODES.
00572  M00S00537.comscio +++|
00573  M00S00538.comscio +++| RDF      EQU    0           READ
00574  M00S00539.comscio +++| WTF      EQU    1           WRITE
00575  M00S00540.comscio +++| SKP      EQU    2           SKIP
00576  M00S00541.comscio +++| OPE      EQU    3           OPEN
00577  M00S00542.comscio +++| CLO      EQU    4           CLOSE
00578  M00S00543.comscio +++| REW      EQU    5           REWIND
00579  M00S00544.comscio +++| RET      EQU    6           RETURN/UNLOAD
00580  M00S00545.comscio +++| EVI      EQU    7           EVICT
Line S00546 Modification History
M01 (Removed by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00581  M01S00546.ns22000 ---| MFC      EQU    10          MAXIMUM FUNCTION CODE
Line S00027 Modification History
M01 (Added by) ns22000
Seq #  *Modification Id* Act 
----------------------------+
00582  M01S00027.ns22000 +++| OVW      EQU    10          OVERWRITE
00583  M01S00028.ns22000 +++| MFC      EQU    11          MAXIMUM FUNCTION CODE
00584  M00S00547.comscio +++|
00585  M00S00548.comscio +++|*         TERMINATION CONDITIONS.
00586  M00S00549.comscio +++|
00587  M00S00550.comscio +++| PRU      EQU    0
00588  M00S00551.comscio +++| EOR      EQU    4
00589  M00S00552.comscio +++| EOF      EQU    10B
00590  M00S00553.comscio +++| EOI      EQU    14B
00591  M00S00554.comscio +++|
00592  M00S00555.comscio +++|          QUAL   *
00593  M00S00556.comscio +++|          SPACE  4,10
00594  M00S00557.comscio +++|**        ERROR CODES.
00595  M00S00558.comscio +++|
00596  M00S00559.comscio +++|
00597  M00S00560.comscio +++|          QUAL   CIOERR
00598  M00S00561.comscio +++|
00599  M00S00562.comscio +++| BEGIN    BSSN   1
00600  M00S00563.comscio +++|
00601  M00S00564.comscio +++|*         HANG CONDITIONS.
00602  M00S00565.comscio +++|
00603  M00S00566.comscio +++| IEQ      BSSN   1           ILLEGAL EQUIPMENT ON FILE
00604  M00S00567.comscio +++|
00605  M00S00568.comscio +++| HMSL     EQU    *           HANG MESSAGE LIMIT
00606  M00S00569.comscio +++|
00607  M00S00570.comscio +++|*         WARNING MESSAGES.
00608  M00S00571.comscio +++|
00609  M00S00572.comscio +++| UCF      BSSN   1           UNNECESSARY CIO FUNCTION
00610  M00S00573.comscio +++|
00611  M00S00574.comscio +++| WMSL     EQU    *           WARNING MESSAGE LIMIT
00612  M00S00575.comscio +++|
00613  M00S00576.comscio +++|*         ERROR MESSAGES.
00614  M00S00577.comscio +++|
00615  M00S00578.comscio +++| ARG      BSSN   1           FET ADDRESS OUT OF RANGE
00616  M00S00579.comscio +++| ASD      BSSN   1           ASSIGNED FOR DIAGNOSTICS
00617  M00S00580.comscio +++| BLE      BSSN   1           BUFFER CONTROL WORD ERROR
00618  M00S00581.comscio +++| BUF      BSSN   1           BUFFER ARGUMENT ERROR
00619  M00S00582.comscio +++| DRE      BSSN   1           DEVICE ERROR
00620  M00S00583.comscio +++| EFT      BSSN   1           ERROR FLAG TERMINATION
00621  M00S00584.comscio +++| EXO      BSSN   1           I/O ON EXECUTE-ONLY FILE
00622  M00S00585.comscio +++| FLN      BSSN   1           ILLEGAL FILE NAME
00623  M00S00586.comscio +++| FPE      BSSN   1           FET PARAMETER ERROR
00624  M00S00587.comscio +++| FSQ      BSSN   1           I/O SEQUENCE ERROR
00625  M00S00588.comscio +++| FTL      BSSN   1           FILE TOO LONG
00626  M00S00589.comscio +++| IFM      BSSN   1           ILLEGAL FILE MODIFICATION
00627  M00S00590.comscio +++| IRQ      BSSN   1           ILLEGAL I/O REQUEST
00628  M00S00591.comscio +++| ITL      BSSN   1           INDEX TOO LARGE ON OPEN
00629  M00S00592.comscio +++| IWR      BSSN   1           WRITE ON READ-ONLY FILE
00630  M00S00593.comscio +++| LFL      BSSN   1           LOCAL FILE LIMIT
00631  M01S00029.ns22000 +++| LNF      BSSN   1           ACCESS LEVEL NOT VALID FOR FILE
00632  M01S00030.ns22000 +++| LNJ      BSSN   1           ACCESS LEVEL NOT VALID FOR JOB
00633  M00S00594.comscio +++| PRL      BSSN   1           PRU LIMIT
00634  M00S00595.comscio +++| RAD      BSSN   1           RANDOM ADDRESS NOT ON FILE
00635  M00S00596.comscio +++| RUD      BSSN   1           REQUEST UNDEFINED ON DEVICE
00636  M00S00597.comscio +++| RWT      BSSN   1           INDEX ADDRESS OUT OF RANGE
00637  M00S00598.comscio +++| TKL      BSSN   1           TRACK LIMIT
00638  M00S00599.comscio +++| TNA      BSSN   1           MAGNETIC TAPE NOT AVAILABLE
00639  M01S00031.ns22000 +++| WDP      BSSN   1           WRITEDOWN PROHIBITED ON FILE
00640  M00S00600.comscio +++|
Line S00601 Modification History
M01 (Removed by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00641  M01S00601.ns2483  ---| MEC      BSSN   1           MAXIMUM ERROR CODE
Line S00001 Modification History
M01 (Added by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00642  M01S00001.ns2483  +++| MEC      BSSN   0           MAXIMUM ERROR CODE
00643  M00S00602.comscio +++| END      BSSN
00644  M00S00603.comscio +++|
00645  M00S00604.comscio +++|          ERRPL  MEC-100B    LIMIT ERROR CODE FIELD TO 6 BITS
00646  M00S00605.comscio +++|
00647  M00S00606.comscio +++|          QUAL   *
00648  M00S00607.comscio +++|          SPACE  4,10
00649  M00S00608.comscio +++|**        THE FOLLOWING EQUATES DEFINE THE AMOUNT OF I/O PROCESSING
00650  M00S00609.comscio +++|*         TO BE DONE BY *1MS* BEFORE RELEASING THE PP (ENTERS RECALL
00651  M00S00610.comscio +++|*         STACK IF FUNCTION NOT YET COMPLETE).
00652  M00S00611.comscio +++|*         *RWPC* IS USED TO CALCULATE THE NUMBER OF TRACKS
00653  M00S00612.comscio +++|*         TO PROCESS FOR READ AND BUFFERED WRITE OPERATIONS,
00654  M00S00613.comscio +++|*         BEFORE RELEASING THE PP.
00655  M00S00614.comscio +++|*         *RSPT* DEFINES THE PROCESSING TIME (IN MILLISECONDS)
00656  M00S00615.comscio +++|*         ALLOWED FOR SKIP OPERATIONS (ALSO FOR SKIP PORTION
00657  M00S00616.comscio +++|*         OF *READSKP*) AND FOR A *READLS* (READ RECORDS WITH
00658  M00S00617.comscio +++|*         LIST) FUNCTION, BEFORE THE PP SHOULD BE RELEASED.
00659  M00S00618.comscio +++|
00660  M00S00619.comscio +++|
00661  M00S00620.comscio +++| RSPT     EQU    1500D       *1MS* READ/SKIP PROCESSING TIME
00662  M00S00621.comscio +++|
00663  M00S00622.comscio +++|*         THE VALUE OF *RWPC* HAS BEEN CHOSEN TO ALLOW FOUR TRACKS
00664  M00S00623.comscio +++|*         AT A TIME ON A *DL* AND TWO TRACKS AT A TIME ON A *DQ*.
00665  M00S00624.comscio +++|
00666  M00S00625.comscio +++| RWPC     EQU    227D*3+1
00667  M00S00626.comscio +++|
00668  M00S00627.comscio +++| MSLT     EQU    343B*8D     MAXIMUM SECTORS PER LOGICAL TRACK (DJ-8)
00669  M00S00628.comscio +++|          ERRNG  7777B-RWPC-MSLT  CHECK IF EXCEEDS 12 BITS
00670  M00S00629.comscio +++|
00671  M00S00630.comscio +++|*         MAXIMUM NUMBER OF RANDOM ADDRESSES TO PRE-PROCESS
00672  M00S00631.comscio +++|*         FOR READ WITH LIST FUNCTIONS (*READLS* AND *RPHRLS*).
00673  M00S00632.comscio +++|*         NOTE THAT *MRAL* ALSO LIMITS THE NUMBER OF PRUS TRANSFERRED
00674  M00S00633.comscio +++|*         FOR A *RPHRLS* FUNCTION BEFORE THE PP IS RELEASED.
00675  M00S00634.comscio +++|
00676  M00S00635.comscio +++| MRAL     EQU    402         MAXIMUM RANDOM ADDRESSES TO PRE-PROCESS
00677  M00S00636.comscio +++|          ERRNG  RWPC-MRAL   LIMIT PRU COUNT
00678  M00S00637.comscio +++|
00679  M00S00638.comscio +++|*         MAXIMUM NUMBER OF PRUS TO TRANSFER CONSECUTIVELY
00680  M00S00639.comscio +++|*         FOR RECORD BACKSPACE OPERATION.
00681  M00S00640.comscio +++|
00682  M00S00641.comscio +++| MPTB     EQU    200B        MAXIMUM PRUS TO TRANSFER FOR BACKSPACE
00683  M00S00642.comscio +++|          SPACE  4,10
00684  M00S00643.comscio +++|**        THE FOLLOWING EQUATES DEFINE THE RECALL TIMES FOR
00685  M00S00644.comscio +++|*         *1MS*/*CPUCIO* (IN MILLISECONDS).
00686  M00S00645.comscio +++|
00687  M00S00646.comscio +++|
Line S00647 Modification History
M01 (Removed by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00688  M01S00647.v23l617 ---| DART     EQU    20D         EXCESSIVE DEVICE ACTIVITY RECALL TIME
Line S00001 Modification History
M01 (Added by) v23l617
Seq #  *Modification Id* Act 
----------------------------+
00689  M01S00001.v23l617 +++| ACRT     EQU    20D         EXCESSIVE DEVICE ACTIVITY RECALL TIME
00690  M00S00648.comscio +++| IORT     EQU    6           I/O RECALL TIME
00691  M00S00649.comscio +++| TIRT     EQU    12D         TRACK INTERLOCK RECALL TIME
00692  M00S00650.comscio +++| TLRT     EQU    2000D       TRACK LIMIT RECALL TIME
00693  M00S00651.comscio +++|          SPACE  4
00694  M00S00652.comscio +++|          BASE   *
Line S00653 Modification History
M01 (Removed by) ns2483
Seq #  *Modification Id* Act 
----------------------------+
00695  M01S00653.ns2483  ---|          LIST   *
00696  M00S00654.comscio ---|          ENDX
cdc/nos2.source/opl.opl871/common/comscio.txt ยท Last modified: (external edit)