Seq # *Modification Id* Act
----------------------------+
01185 M01S00899.ns22000 ---| SA1 GJSB+UNI SET USER NUMBER IN CONTROL STATEMENT
01186 M01S00900.ns22000 ---| BX1 X0*X1
01187 M01S00901.ns22000 ---| SB2 1R*
01188 M01S00902.ns22000 ---| SB5 USEA
Line S00115 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01189 M01S00115.ns22000 +++| USE2 SA2 LCNT CHECK LINE COUNT
Line S00116 Modification History
M01 (Added by) ns22000
M02 (Removed by) submi3
Seq # *Modification Id* Act
----------------------------+
01190 M02S00116.submi3 ---| SX6 X2-3
01191 M02S00117.submi3 ---| NZ X6,USE1 IF NOT THE THIRD LINE IN THE FILE
01192 M02S00118.submi3 ---| SX6 B1+ SET */USER* FLAG
01193 M02S00119.submi3 ---| SA6 USRF
Line S00010 Modification History
M01 (Added by) submi3
Seq # *Modification Id* Act
----------------------------+
01194 M01S00010.submi3 +++| SX6 X2-1
01195 M01S00011.submi3 +++| NZ X6,USE1 IF MORE THAN ONE COMMAND PROCESSED
01196 M01S00012.submi3 +++| SA2 USRF
01197 M01S00013.submi3 +++| NZ X2,USE1 IF USER DIRECTIVE ALREADY PROCESSED
01198 M01S00014.submi3 +++| SX6 B1 SET */USER* FLAG
01199 M01S00015.submi3 +++| SA6 A2
Line S00120 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2140
Seq # *Modification Id* Act
----------------------------+
01200 M02S00120.ns2140 ---| SA2 PFPB+0 CHECK FOR DEFAULT FAMILY
Line S00005 Modification History
M01 (Added by) ns2140
Seq # *Modification Id* Act
----------------------------+
01201 M01S00005.ns2140 +++| SYSTEM SFM,R,USEC,RSDF*100B GET FAMILY ORDINAL TABLE
01202 M01S00006.ns2140 +++| SA1 SBUF+0 GET SYSTEM DEFAULT FAMILY NAME
01203 M01S00007.ns2140 +++| SA2 PFPB+0 CHECK FOR DEFAULT FAMILY
Line S00121 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01204 M01S00121.ns22000 +++| SB5 USEB SET ADDRESS OF DEFAULT FAMILY TEMPLATE
Line S00122 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2140
Seq # *Modification Id* Act
----------------------------+
01205 M02S00122.ns2140 ---| LX2 59-17
01206 M02S00123.ns2140 ---| NG X2,USE3 IF CURRENT FAMILY IS THE DEFAULT FAMILY
Line S00008 Modification History
M01 (Added by) ns2140
Seq # *Modification Id* Act
----------------------------+
01207 M01S00008.ns2140 +++| BX2 X1-X2
01208 M01S00009.ns2140 +++| BX2 X0*X2
01209 M01S00010.ns2140 +++| ZR X2,USE3 IF CURRENT FAMILY IS THE DEFAULT FAMILY
Line S00124 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01210 M01S00124.ns22000 +++| SB5 USEA SET ADDRESS OF ALTERNATE FAMILY TEMPLATE
Line S00125 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2140
Seq # *Modification Id* Act
----------------------------+
01211 M02S00125.ns2140 ---| USE3 SB2 1R* SET USER NAME IN *USER* COMMAND
Line S00903 Modification History
M01 (Removed by) ns2140
Seq # *Modification Id* Act
----------------------------+
01212 M01S00903.ns2140 ---| RJ SNM SET NAME IN MESSAGE
Line S00126 Modification History
M01 (Added by) ns22000
M02 (Removed by) ns2140
Seq # *Modification Id* Act
----------------------------+
01213 M02S00126.ns2140 ---| SX6 B5-USEB
01214 M02S00127.ns2140 ---| ZR X6,USE4 IF CURRENT FAMILY IS THE DEFAULT FAMILY
Line S00904 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01215 M01S00904.ns22000 ---| SA1 GJSB+PSW SET PASSWORD IN CONTROL STATEMENT
Line S00128 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01216 M01S00128.ns22000 +++| SA1 PFPB+0 SET FAMILY NAME IN *USER* COMMAND
01217 M00S00905.submit +++| BX1 X0*X1
Line S00906 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01218 M01S00906.ns22000 ---| SB2 1R$
Line S00129 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01219 M01S00129.ns22000 +++| SB2 1R#
Line S00011 Modification History
M01 (Added by) ns2140
Seq # *Modification Id* Act
----------------------------+
01220 M01S00011.ns2140 +++| RJ SNM SET NAME IN MESSAGE
01221 M01S00012.ns2140 +++| USE3 SB2 1R* SET USER NAME IN *USER* COMMAND
01222 M01S00013.ns2140 +++| BX1 X5
01223 M00S00907.submit +++| RJ SNM SET NAME IN MESSAGE
Line S00908 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01224 M01S00908.ns22000 ---| WRITEC F,USEA
Line S00130 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01225 M01S00130.ns22000 +++| USE4 WRITEC F,B5
01226 M00S00909.submit +++| RECALL F
01227 M00S00910.submit +++| SA2 RJ
01228 M00S00911.submit +++| SB2 X2
01229 M00S00912.submit +++| JP B2 RETURN
01230 M00S00913.submit +++|
Line S00914 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01231 M01S00914.ns22000 ---|* *USER* CONTROL STATEMENT TEMPLATE.
01232 M01S00915.ns22000 ---|
01233 M01S00916.ns22000 ---| USEA DATA C/USER,*******,$$$$$$$./
01234 M01S00917.ns22000 ---| USEB BSSZ 1
01235 M01S00918.ns22000 ---|
Line S00131 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01236 M01S00131.ns22000 +++|* *USER* COMMAND TEMPLATES.
01237 M01S00132.ns22000 +++|
01238 M01S00133.ns22000 +++| USEA DATA C/$USER,*******,,#######./ ALTERNATE FAMILY TEMPLATE
01239 M01S00134.ns22000 +++|
01240 M01S00135.ns22000 +++| USEB DATA C/$USER,*******,./ DEFAULT FAMILY TEMPLATE
Line S00014 Modification History
M01 (Added by) ns2140
Seq # *Modification Id* Act
----------------------------+
01241 M01S00014.ns2140 +++|
01242 M01S00015.ns2140 +++| USEC VFD 12/RFDF,12/0,12/SBUFL,6/0,18/SBUF *RSDF* CONTROL WORD
01243 M01S00016.ns2140 +++| CON 0 END OF CONTROL WORDS
01244 M00S00919.submit +++| GLF SPACE 4,10
01245 M00S00920.submit +++|** GLF - GET LOCAL FILE NAME.
01246 M00S00921.submit +++|*
01247 M00S00922.submit +++|* ENTRY (A2) = ADDRESS OF NEXT CHARACTER IN STRING BUFFER.
01248 M00S00923.submit +++|*
Line S00924 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01249 M01S00924.v23l617 ---|* EXIT (X4) .NE. 0 IF ILLEGAL SEPARATOR.
Line S00096 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01250 M01S00096.v23l617 +++|* EXIT (X4) .NE. 0 IF INCORRECT SEPARATOR.
01251 M00S00925.submit +++|* (B2) = NUMBER OF CHARACTERS IN NAME.
01252 M00S00926.submit +++|*
01253 M00S00927.submit +++|* USES A - 1.
Line S00136 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01254 M01S00136.ns22000 +++|* X - 1, 3, 4, 5, 6.
01255 M00S00928.submit +++|* B - 2.
Line S00929 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01256 M01S00929.ns22000 ---|* X - 1, 3, 4, 5, 6.
01257 M00S00930.submit +++|
01258 M00S00931.submit +++|
Line S00932 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01259 M01S00932.ns22000 ---| GLF PS GET LOCAL FILENAME
Line S00137 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01260 M01S00137.ns22000 +++| GLF SUBR ENTRY/EXIT
01261 M00S00933.submit +++| SA1 A2 TEST FOR , OR BLANK SEPARATOR
01262 M00S00934.submit +++| SX4 1R,
01263 M00S00935.submit +++| BX4 X1-X4
01264 M00S00936.submit +++| ZR X4,GLF2
01265 M00S00937.submit +++| SX4 1R
01266 M00S00938.submit +++| BX4 X1-X4
Line S00939 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01267 M01S00939.ns22000 ---| NZ X4,GLF ILLEGAL SEPARATOR
Line S00138 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01268 M02S00138.v23l617 ---| NZ X4,GLFX IF ILLEGAL SEPARATOR
Line S00097 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01269 M01S00097.v23l617 +++| NZ X4,GLFX IF INCORRECT SEPARATOR
01270 M00S00940.submit +++| GLF2 SA1 A2+1 GET LOCAL FILENAME
01271 M00S00941.submit +++| SB2 B0 SET BUFFER INDEX
01272 M00S00942.submit +++| MX5 7 SET FILENAME CHARACTER LIMIT
01273 M00S00943.submit +++| SX3 1R
01274 M00S00944.submit +++| BX6 X6-X6 CLEAR ASSEMBLY
01275 M00S00945.submit +++| GLF1 BX4 X1-X3 TEST FOR BLANK
Line S00946 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01276 M01S00946.ns22000 ---| ZR X4,GLF IF BLANK
Line S00139 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01277 M01S00139.ns22000 +++| ZR X4,GLFX IF BLANK
01278 M00S00947.submit +++| LX6 6
01279 M00S00948.submit +++| BX6 X6+X1 PLANT CHARACTER
01280 M00S00949.submit +++| LX5 1 SHIFT CHARACTER COUNT
01281 M00S00950.submit +++| SB2 B2+B1 INCREMENT CHARACTER INDEX
01282 M00S00951.submit +++| SA1 A1+B1 GET NEXT CHARACTER
01283 M00S00952.submit +++| NG X5,GLF1 IF NOT 7 CHARACTERS
01284 M00S00953.submit +++| BX4 X1-X3 TEST FOR BLANK
Line S00954 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01285 M01S00954.ns22000 ---| EQ GLF
Line S00140 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01286 M01S00140.ns22000 +++| EQ GLFX RETURN
01287 M00S00955.submit +++| SFN SPACE 4,10
01288 M00S00956.submit +++|** SFN - SHIFT AND TEST FILE NAME.
01289 M00S00957.submit +++|*
01290 M00S00958.submit +++|* ENTRY (B2) = NUMBER OF CHARACTERS IN NAME.
01291 M00S00959.submit +++|*
01292 M00S00960.submit +++|* EXIT (X2) = 0 IF NAME SAME AS SUBMIT FILE NAME.
01293 M00S00961.submit +++|*
01294 M00S00962.submit +++|* USES A - 2.
Line S00141 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01295 M01S00141.ns22000 +++|* X - 2, 3, 4.
01296 M00S00963.submit +++|* B - 2.
Line S00964 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01297 M01S00964.ns22000 ---|* X - 2, 3, 4.
01298 M00S00965.submit +++|
01299 M00S00966.submit +++|
Line S00967 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01300 M01S00967.ns22000 ---| SFN PS SHIFT FILENAME + TEST FOR SUBMIT FILENAME
01301 M01S00968.ns22000 ---| SX4 B2 SHIFT FILENAME
Line S00142 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01302 M01S00142.ns22000 +++| SFN SUBR ENTRY/EXIT
01303 M01S00143.ns22000 +++| SX4 B2 SHIFT FILENAME + TEST FOR SUBMIT FILENAME
01304 M00S00969.submit +++| SX3 10D GENERATE SHIFT COUNT
01305 M00S00970.submit +++| IX4 X3-X4
01306 M00S00971.submit +++| BX3 X4
01307 M00S00972.submit +++| LX4 2
01308 M00S00973.submit +++| LX3 1
01309 M00S00974.submit +++| IX4 X4+X3
01310 M00S00975.submit +++| SB2 X4
01311 M00S00976.submit +++| LX6 B2,X6
01312 M00S00977.submit +++| SA2 I TEST READ FILENAME SAME AS SUBMIT FILE NAME
01313 M00S00978.submit +++| MX3 42D
01314 M00S00979.submit +++| BX2 X3*X2
01315 M00S00980.submit +++| BX2 X2-X6
Line S00981 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01316 M01S00981.ns22000 ---| EQ SFN
01317 M01S00982.ns22000 ---| READ SPACE 4
01318 M01S00983.ns22000 ---|** READ - READ AND COPY LOCAL FILE
Line S00144 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01319 M01S00144.ns22000 +++| EQ SFNX RETURN
01320 M01S00145.ns22000 +++| READ SPACE 4,10
01321 M01S00146.ns22000 +++|** READ - READ AND COPY LOCAL FILE.
01322 M00S00984.submit +++|*
01323 M00S00985.submit +++|* USES A - 1, 2, 6.
Line S00147 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01324 M01S00147.ns22000 +++|* X - 0, 1, 2, 3, 4, 6.
01325 M00S00986.submit +++|* B - 3.
Line S00987 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01326 M01S00987.ns22000 ---|* X - 0, 1, 2, 3, 4, 6.
01327 M00S00988.submit +++|*
Line S00989 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01328 M01S00989.ns22000 ---|* CALLS GLF, SFN.
Line S00148 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01329 M01S00148.ns22000 +++|* CALLS GLF, RNM, RTM, SFN.
01330 M01S00149.ns22000 +++|*
01331 M01S00150.ns22000 +++|* MACROS ATTACH, GET, RECALL, RETURN, REWIND, SETFAL, STATUS.
01332 M00S00990.submit +++|
01333 M00S00991.submit +++|
01334 M00S00992.submit +++| READ BSS 0
Line S00151 Modification History
M01 (Added by) ns22000
M02 (Removed by) submi3
Seq # *Modification Id* Act
----------------------------+
01335 M02S00151.submi3 ---| SA1 LCNT DECREMENT LINE COUNT (DO NOT COUNT /READ)
01336 M02S00152.submi3 ---| SX6 X1-1
01337 M02S00153.submi3 ---| SA6 A1+
01338 M00S00993.submit +++| RJ GLF GET LOCAL FILENAME
Line S00994 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01339 M01S00994.ns22000 ---| NZ X4,READ13 IF NOT BLANK,PUT OUT AS DATA
Line S00154 Modification History
M01 (Added by) ns22000
M02 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01340 M02S00154.v23l617 ---| NZ X4,READ13 IF ILLEGAL SEPARATOR, PUT OUT AS DATA
Line S00098 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01341 M01S00098.v23l617 +++| NZ X4,READ13 IF INCORRECT SEPARATOR, PUT OUT AS DATA
01342 M00S00995.submit +++| READ1 NZ B2,READ2 IF VALID CHARACTERS IN FILENAME
01343 M00S00996.submit +++| SA2 =0LTAPE1 SET DEFAULT FILENAME IN FET
01344 M00S00997.submit +++| BX6 X2
01345 M00S00998.submit +++| EQ READ3
01346 M00S00999.submit +++|
01347 M00S01000.submit +++| READ2 RJ SFN SHIFT FILENAME + TEST FOR SUBMIT FILENAME
01348 M00S01001.submit +++| ZR X2,READ13 IF EQUAL, PUT OUT AS DATA
01349 M00S01002.submit +++| READ3 SX1 1
01350 M00S01003.submit +++| IX6 X6+X1
01351 M00S01004.submit +++| SA6 R STORE FILENAME IN FET
01352 M00S01005.submit +++| SA6 RR
01353 M00S01006.submit +++| READ4 SA1 RJ STORE ORIGINAL RETURN JUMP
01354 M00S01007.submit +++| BX6 X1
01355 M00S01008.submit +++| SA6 RJ2
01356 M00S01009.submit +++| SA1 EORBIT SET READ ACTIVE BIT
01357 M00S01010.submit +++| MX2 1
01358 M00S01011.submit +++| LX1 12D
01359 M00S01012.submit +++| BX6 X1+X2
01360 M00S01013.submit +++| LX6 48D
01361 M00S01014.submit +++| SA6 EORBIT
Line S00155 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01362 M01S00155.ns22000 +++| SA1 RR+1 SET ACCESS LEVEL PROCESSING BIT
01363 M01S00156.ns22000 +++| MX6 1
01364 M01S00157.ns22000 +++| LX6 39-59
01365 M01S00158.ns22000 +++| BX6 X1+X6
01366 M01S00159.ns22000 +++| SA6 A1
01367 M00S01015.submit +++| STATUS RR
01368 M00S01016.submit +++| SA1 RR
01369 M00S01017.submit +++| MX3 60-7
01370 M00S01018.submit +++| BX4 -X3*X1
01371 M00S01019.submit +++| SX3 X4-1
01372 M00S01020.submit +++| NZ X3,READ8 IF FILE LOCAL
01373 M00S01021.submit +++| GET RR
01374 M00S01022.submit +++| SB3 B0
Line S01023 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01375 M01S01023.ns22000 ---| READ5 SA1 RR
Line S00160 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01376 M01S00160.ns22000 +++| READ5 SA1 RR CHECK *PFM* ERROR STATUS
01377 M00S01024.submit +++| MX3 60-4
01378 M00S01025.submit +++| AX1 10
01379 M00S01026.submit +++| BX6 -X3*X1
Line S01027 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01380 M01S01027.ns22000 ---| ZR X6,READ10 FILE OBTAINED
Line S00161 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01381 M01S00161.ns22000 +++| ZR X6,READ10 IF FILE OBTAINED
01382 M00S01028.submit +++| SX3 X6-1
Line S01029 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01383 M01S01029.ns22000 ---| ZR X3,READ6
01384 M01S01030.ns22000 ---| NE B3,B0,READ7 IF LAST ATTEMPT
Line S00162 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01385 M01S00162.ns22000 +++| ZR X3,READ6 IF FILE BUSY
01386 M01S00163.ns22000 +++| NE B3,B0,READ7 IF BOTH *GET* AND *ATTACH* FAILED
01387 M00S01031.submit +++| SA1 R
01388 M00S01032.submit +++| BX6 X1
01389 M00S01033.submit +++| SA6 RR RESET LFN AND STATUS
Line S01034 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01390 M01S01034.ns22000 ---| ATTACH RR
Line S00164 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01391 M01S00164.ns22000 +++| ATTACH RR,,,,,,,,NF
Line S01035 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01392 M01S01035.ns22000 ---| SB3 B1 SET LAST TRY
01393 M01S01036.ns22000 ---| EQ READ5
Line S00165 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01394 M01S00165.ns22000 +++| SB3 B1 SET *ATTACH* FLAG
01395 M01S00166.ns22000 +++| EQ READ5 CHECK *PFM* ERROR STATUS
01396 M00S01037.submit +++|
Line S01038 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01397 M01S01038.ns22000 ---| READ6 SA1 R
Line S00167 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01398 M01S00167.ns22000 +++| READ6 SA1 R * READ FILE BUSY - LFN*
01399 M00S01039.submit +++| MX3 42
01400 M00S01040.submit +++| BX6 X3*X1
Line S01041 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01401 M01S01041.ns22000 ---| SA6 BSFIL+2
Line S00168 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01402 M01S00168.ns22000 +++| SA6 BSFIL+2 SET FILE NAME IN MESSAGE
01403 M00S01042.submit +++| SX0 BSFIL
Line S01043 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01404 M01S01043.ns22000 ---| EQ ABT
Line S00169 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01405 M01S00169.ns22000 +++| EQ ABT ABORT
01406 M00S01044.submit +++|
Line S01045 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01407 M01S01045.ns22000 ---| READ7 SA1 R
Line S00170 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01408 M01S00170.ns22000 +++| READ7 SA1 R * NO READ FILE FOUND - LFN*
01409 M00S01046.submit +++| MX3 42
01410 M00S01047.submit +++| BX6 X3*X1
Line S01048 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01411 M01S01048.ns22000 ---| SA6 NOFIL+2 SET FILE NAME
Line S00171 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01412 M01S00171.ns22000 +++| SA6 NOFIL+2 SET FILE NAME IN MESSAGE
01413 M00S01049.submit +++| SX0 NOFIL
Line S01050 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01414 M01S01050.ns22000 ---| EQ ABT CANNOT FIND FILE
Line S00172 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01415 M01S00172.ns22000 +++| EQ ABT ABORT
01416 M00S01051.submit +++|
01417 M00S01052.submit +++| READ8 SA1 NRFLG
01418 M00S01053.submit +++| ZR X1,READ9 IF NO REWIND
01419 M00S01054.submit +++| REWIND RR,R
01420 M00S01055.submit +++| READ9 MX6 0
Line S01056 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01421 M01S01056.ns22000 ---| SA6 RR SET FILE LOCAL
01422 M01S01057.ns22000 ---| READ10 BSS 0
01423 M01S01058.ns22000 ---| SA1 FLAGS TEST FOR TRANS BIT ON
Line S00173 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01424 M01S00173.ns22000 +++| SA6 RR SET *LOCAL FILE* FLAG
01425 M01S00174.ns22000 +++|
01426 M01S00175.ns22000 +++|* CHECK ACCESS LEVEL OF READ FILE.
01427 M01S00176.ns22000 +++|
01428 M01S00177.ns22000 +++| READ10 SA1 RR+CFAL GET ACCESS LEVEL OF READ FILE
01429 M01S00178.ns22000 +++| MX6 -3
01430 M01S00179.ns22000 +++| LX1 -36
01431 M01S00180.ns22000 +++| BX6 -X6*X1
01432 M01S00181.ns22000 +++| SA1 ALVL GET ACCESS LEVEL OF SUBMIT FILE
01433 M01S00182.ns22000 +++| IX1 X1-X6
01434 M01S00183.ns22000 +++| PL X1,READ10.1 IF READ FILE LEVEL .LE. SUBMIT FILE LEVEL
01435 M01S00184.ns22000 +++| SA6 A1+
01436 M01S00185.ns22000 +++| RECALL F
01437 M01S00186.ns22000 +++| SETFAL F,ALVL SET SUBMIT FILE LEVEL TO READ FILE LEVEL
01438 M01S00187.ns22000 +++|
01439 M01S00188.ns22000 +++|* CALL APPROPRIATE READ PROCESSOR.
01440 M01S00189.ns22000 +++|
01441 M01S00190.ns22000 +++| READ10.1 SA1 FLAGS TEST FOR TRANS BIT ON
01442 M00S01059.submit +++| LX1 12D
01443 M00S01060.submit +++| NG X1,RTM TRANS
01444 M00S01061.submit +++| EQ RNM NOTRANS
01445 M00S01062.submit +++|
01446 M00S01063.submit +++| READ11 SA1 EORBIT SET READ ACTIVE BIT INACTIVE
01447 M00S01064.submit +++| MX2 1
01448 M00S01065.submit +++| LX1 12D
01449 M00S01066.submit +++| BX6 -X1*X2
01450 M00S01067.submit +++| LX6 48D
01451 M00S01068.submit +++| SA6 EORBIT
01452 M00S01069.submit +++| SA1 RR
01453 M00S01070.submit +++| ZR X1,READ12 READ FILE NOT ATTACHED BY SUBMIT
01454 M00S01071.submit +++| RETURN RR,R
01455 M00S01072.submit +++| MX6 0
01456 M00S01073.submit +++| SA6 RR CLEAR RETURN FLAG
01457 M00S01074.submit +++| READ12 SA2 RJ2 RESTORE ORIGINAL RETURN ADDRESS
01458 M00S01075.submit +++| SB2 X2
01459 M00S01076.submit +++| JP B2 RETURN
01460 M00S01077.submit +++|
01461 M00S01078.submit +++| READ13 SA1 RJ TEST RETURN ADDRESS = TO NONTRANSPARENT
01462 M00S01079.submit +++| SX2 PNM2 MODE ROUTINE
01463 M00S01080.submit +++| BX2 X1-X2
01464 M00S01081.submit +++| ZR X2,PNM4 RETURN TO NONTRANSPARENT MODE ROUTINE
01465 M00S01082.submit +++| EQ PTM5 RETURN TO TRANSPARENT MODE ROUTINE
Line S01083 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01466 M01S01083.ns22000 ---| RNM SPACE 4
Line S00191 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01467 M01S00191.ns22000 +++| RNM SPACE 4,10
01468 M00S01084.submit +++|** RNM - PROCESS NONTRANSPARENT READ MODE.
01469 M00S01085.submit +++|*
01470 M00S01086.submit +++|* USES A - 1, 2, 3, 6, 7.
Line S00192 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01471 M01S00192.ns22000 +++|* X - 0, 1, 2, 3, 5, 6, 7.
01472 M00S01087.submit +++|* B - 2, 3, 6, 7.
Line S01088 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01473 M01S01088.ns22000 ---|* X - 0, 1, 2, 3, 5, 6, 7.
01474 M00S01089.submit +++|*
01475 M00S01090.submit +++|* CALLS CSF, NLT, SSN, SUBEO.
Line S00193 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01476 M01S00193.ns22000 +++|*
01477 M01S00194.ns22000 +++|* MACROS READ, READS, RECALL, WRITES.
01478 M00S01091.submit +++|
01479 M00S01092.submit +++|
Line S01093 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01480 M01S01093.ns22000 ---| RNM READ R,R
Line S00195 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01481 M01S00195.ns22000 +++| RNM BSS 0 ENTRY
01482 M01S00196.ns22000 +++| RNM0 READ R,R READ NEXT BUFFER LOAD
01483 M00S01094.submit +++| RECALL F
01484 M00S01095.submit +++| RNM1 SA1 R+3 SAVE OUTPTR(R)
01485 M00S01096.submit +++| SA2 R+2 SAVE READ FILE FET *IN* POINTER
01486 M00S01097.submit +++| BX6 X1
01487 M00S01098.submit +++| LX7 X2
01488 M00S01099.submit +++| SA6 OPTR2
01489 M00S01100.submit +++| SA7 IPTR2
01490 M00S01101.submit +++| READS R,BUF,BUFL READ UNIT RECORD
01491 M00S01102.submit +++| ZR X1,RNM1.1 IF NO EOR/EOF/EOI
01492 M00S01103.submit +++| SB7 B6-BUF
01493 M00S01104.submit +++| ZR B7,RNM1.0 IF END OF RECORD
01494 M00S01105.submit +++| SA2 FLAGS CHECK TRANS MODE BIT
01495 M00S01106.submit +++| LX2 59-47
01496 M00S01107.submit +++| PL X2,RNM1.0 IF TRANS NOT SET
01497 M00S01108.submit +++| SA2 OPTR2 RESTORE POINTERS FOR TRANS DATA
01498 M00S01109.submit +++| SA3 IPTR2
01499 M00S01110.submit +++| BX6 X2
01500 M00S01111.submit +++| LX7 X3
01501 M00S01112.submit +++| SA6 R+3
01502 M00S01113.submit +++| SA7 R+2
01503 M00S01114.submit +++| EQ RTM6 SWITCH TO TRANS MODE
01504 M00S01115.submit +++|
01505 M00S01116.submit +++| RNM1.0 RJ NLT WRITE NO LINE TERMINATOR DATA TO BUFFER
01506 M00S01117.submit +++| SX0 B1 READ FILE
01507 M00S01118.submit +++| BX7 X7-X7 SET NO PARTIAL RECORD
01508 M00S01119.submit +++| SX5 READ11 RETURN ADDRESS ON EOF
01509 M00S01120.submit +++| RJ SUBEO
Line S01121 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01510 M01S01121.ns22000 ---| EQ RNM
Line S00197 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01511 M01S00197.ns22000 +++| EQ RNM0 READ NEXT BUFFER LOAD
01512 M00S01122.submit +++|
Line S01123 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01513 M01S01123.ns22000 ---| RNM1.1 SA1 BUF SET STARTING ADDRESS
Line S00198 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01514 M01S00198.ns22000 +++| RNM1.1 SA1 LCNT INCREMENT LINE COUNT
01515 M01S00199.ns22000 +++| SX6 X1+B1
01516 M01S00200.ns22000 +++| SA6 A1
01517 M01S00201.ns22000 +++| SA1 BUF SET STARTING ADDRESS
01518 M00S01124.submit +++| RJ CSF CHECK SPECIAL FORMAT
01519 M00S01125.submit +++| NZ B2,RNM2 IF SPECIAL FORMAT
01520 M00S01126.submit +++| RJ SSN STRIP SEQUENCE NUMBER
01521 M00S01127.submit +++| SB6 A1 SAVE BEGINNING ADDRESS AFTER STRIPPING
01522 M00S01128.submit +++| SB3 B2 SAVE BEGINNING ADDRESS BEFORE STRIPPING
01523 M00S01129.submit +++| RJ CSF CHECK SPECIAL FORMAT AFTER STRIPPING
01524 M00S01130.submit +++| ZR B2,RNM3 IF NOT SPECIAL FORMAT
01525 M00S01131.submit +++| RNM2 SX7 RNM1 SAVE RETURN ADDRESS
01526 M00S01132.submit +++| SA7 RJ
01527 M00S01133.submit +++| JP B2 PROCESS SPECIAL FORMAT
01528 M00S01134.submit +++|
01529 M00S01135.submit +++| RNM3 SA2 FLAGS TEST TRANS BIT
01530 M00S01136.submit +++| LX2 12D
01531 M00S01137.submit +++| PL X2,RNM4 TRANS NOT SET
01532 M00S01138.submit +++| SA1 OPTR2 RESTORE *IN* AND *OUT* POINTERS
01533 M00S01139.submit +++| SA2 IPTR2
01534 M00S01140.submit +++| BX6 X1
01535 M00S01141.submit +++| LX7 X2
01536 M00S01142.submit +++| SA6 R+3
01537 M00S01143.submit +++| SA7 R+2
01538 M00S01144.submit +++| EQ RTM6 SWITCH TO TRANS MODE
01539 M00S01145.submit +++|
01540 M00S01146.submit +++| RNM4 SB2 BUF+BUFL
01541 M00S01147.submit +++| SA2 FLAGS TEST NOSEQ BIT
01542 M00S01148.submit +++| PL X2,RNM5 STRIP SEQUENCE NUMBERS
01543 M00S01149.submit +++| SB6 B3 NO SEQUENCE NUMBER STRIPPING
01544 M00S01150.submit +++| RNM5 SB7 B2-B6 CALCULATE WRITE LENGTH
01545 M00S01151.submit +++| WRITES F,B6,B7
01546 M00S01152.submit +++| EQ RNM1 LOOP TO NEXT RECORD
Line S01153 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01547 M01S01153.ns22000 ---| RTM SPACE 4
Line S00202 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01548 M01S00202.ns22000 +++| RTM SPACE 4,10
01549 M00S01154.submit +++|** RTM - PROCESS TRANSPARENT READ MODE.
01550 M00S01155.submit +++|*
01551 M00S01156.submit +++|* USES A - 1, 2, 3, 6, 7.
01552 M00S01157.submit +++|* B - 3, 6.
01553 M00S01158.submit +++|* X - 0, 1, 2, 3, 5, 6, 7.
01554 M00S01159.submit +++|*
01555 M00S01160.submit +++|* CALLS CSF, SSN, SUBEO, SUBUFR, SUBUFS.
Line S00203 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01556 M01S00203.ns22000 +++|*
01557 M01S00204.ns22000 +++|* MACROS READ, READS, READW, RECALL, WRITEW.
01558 M00S01161.submit +++|
01559 M00S01162.submit +++|
Line S01163 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01560 M01S01163.ns22000 ---| RTM READ R,R
Line S00205 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01561 M01S00205.ns22000 +++| RTM BSS 0 ENTRY
01562 M01S00206.ns22000 +++| RTM0 READ R,R READ NEXT BUFFER LOAD
01563 M00S01164.submit +++| RECALL F
01564 M00S01165.submit +++| RTM1 SA1 R+3 SAVE OUTPTR(R)
01565 M00S01166.submit +++| BX6 X1
01566 M00S01167.submit +++| SA6 OPTR2
01567 M00S01168.submit +++| SA1 X6 CHECK FOR END OF LINE BYTE
01568 M00S01169.submit +++| MX7 -12
01569 M00S01170.submit +++| BX7 -X7*X1
Line S01171 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01570 M01S01171.v23l617 ---| NZ X7,RTM5 IF NOT A POSSIBLE SPECIAL FORMAT CARD
Line S00099 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01571 M01S00099.v23l617 +++| NZ X7,RTM5 IF NOT A POSSIBLE SPECIAL FORMAT DIRECTIVE
01572 M00S01172.submit +++| READS R,BUF,BUFL READ UNIT RECORD FROM READ FILE
01573 M00S01173.submit +++| ZR X1,RTM2 IF NO EOF/EOI
01574 M00S01174.submit +++| SX0 B1 READ FILE
01575 M00S01175.submit +++| SX7 B0 NO PARTIAL RECORD
01576 M00S01176.submit +++| SX5 READ11 RETURN ADDRESS ON EOF
01577 M00S01177.submit +++| RJ SUBEO
Line S01178 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01578 M01S01178.ns22000 ---| EQ RTM RETURN ADDRESS FOR EOR
Line S00207 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01579 M01S00207.ns22000 +++| EQ RTM0 READ NEXT BUFFER LOAD
01580 M00S01179.submit +++|
Line S01180 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01581 M01S01180.ns22000 ---| RTM2 SA1 BUF SET STARTING ADDRESS
01582 M01S01181.ns22000 ---| RJ CSF CHECK SPECIAL FORMAT WITH NO SEQUENCE
01583 M01S01182.ns22000 ---| NUMBER STRIPPING
Line S00208 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01584 M01S00208.ns22000 +++| RTM2 SA1 LCNT INCREMENT LINE COUNT
01585 M01S00209.ns22000 +++| SX6 X1+B1
01586 M01S00210.ns22000 +++| SA6 A1
01587 M01S00211.ns22000 +++| SA1 BUF SET STARTING ADDRESS
01588 M01S00212.ns22000 +++| RJ CSF CHECK SPECIAL FORMAT (BEFORE STRIPPING)
01589 M00S01183.submit +++| NZ B2,RTM4 IF SPECIAL FORMAT
01590 M00S01184.submit +++| RJ SSN STRIP SEQUENCE NUMBER
01591 M00S01185.submit +++| SB6 A1 SAVE BEGINNING ADDRESS AFTER STRIPPING
01592 M00S01186.submit +++| SB3 B2 SAVE BEGINNING ADDRESS BEFORE STRIPPING
Line S01187 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01593 M01S01187.ns22000 ---| RJ CSF CHECK SPECIAL FORMAT
Line S00213 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01594 M01S00213.ns22000 +++| RJ CSF CHECK SPECIAL FORMAT (AFTER STRIPPING)
01595 M00S01188.submit +++| ZR B2,RTM5 IF NOT SPECIAL FORMAT
01596 M00S01189.submit +++| RTM4 SX7 RTM1 SAVE RETURN ADDRESS
01597 M00S01190.submit +++| SA7 RJ
01598 M00S01191.submit +++| JP B2 PROCESS SPECIAL FORMAT
01599 M00S01192.submit +++|
01600 M00S01193.submit +++| RTM5 SA2 FLAGS TEST FOR TRANS BIT SET
01601 M00S01194.submit +++| LX2 12D
01602 M00S01195.submit +++| SA3 OPTR2 RESTORE OUT POINTER
01603 M00S01196.submit +++| BX6 X3
01604 M00S01197.submit +++| SA6 R+3
01605 M00S01198.submit +++| PL X2,RNM1 IF NOT SET, SWITCH TO NON-TRANSPARENT MODE
01606 M00S01199.submit +++| RTM6 READW R,BUF,BUFL
01607 M00S01200.submit +++| RJ SUBUFS SET BUF LENGTH
01608 M00S01201.submit +++| ZR X1,RTM7 IF NO EOR/EOF/EOI
01609 M00S01202.submit +++| SX0 B1 READ FILE
01610 M00S01203.submit +++| SX7 B1 PARTIAL RECORD
01611 M00S01204.submit +++| SX5 READ11 SET RETURN ON EOI OR EOF
01612 M00S01205.submit +++| RJ SUBEO
Line S01206 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01613 M01S01206.ns22000 ---| EQ RTM
Line S00214 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01614 M01S00214.ns22000 +++| EQ RTM0 READ NEXT BUFFER LOAD
01615 M00S01207.submit +++|
01616 M00S01208.submit +++| RTM7 WRITEW F,BUF,BUFL
01617 M00S01209.submit +++| RJ SUBUFR RESET BUF LENGTH TO 0
01618 M00S01210.submit +++| EQ RTM6 LOOP
Line S01211 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01619 M01S01211.ns22000 ---| ESCAPE SPACE 4
Line S00215 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01620 M01S00215.ns22000 +++| ESCAPE SPACE 4,10
01621 M00S01212.submit +++|** ESCAPE - PROCESS NEW ESCAPE CODE.
01622 M00S01213.submit +++|
01623 M00S01214.submit +++|
01624 M00S01215.submit +++| ESCAPE BSS 0
01625 M00S01216.submit +++| SA1 A2 PICK UP NEW ESCAPE CODE
01626 M00S01217.submit +++| LX1 54D
01627 M00S01218.submit +++| SA2 TCCF
01628 M00S01219.submit +++| MX3 -54
01629 M00S01220.submit +++| ESCAPE1 BX2 -X3*X2
01630 M00S01221.submit +++| IX7 X2+X1 PLANT NEW ESCAPE CODE
01631 M00S01222.submit +++| SA7 A2
01632 M00S01223.submit +++| SA2 A2+B1
01633 M00S01224.submit +++| NZ X2,ESCAPE1
01634 M00S01225.submit +++| SA2 RJ
01635 M00S01226.submit +++| SB2 X2
Line S01227 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01636 M01S01227.ns22000 ---| JP B2
01637 M01S01228.ns22000 ---| TCCF TITLE TABLES.
Line S00216 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01638 M01S00216.ns22000 +++| JP B2 RETURN
01639 M01S00217.ns22000 +++| TITLE TABLES.
01640 M01S00218.ns22000 +++| TCCF SPACE 4,10
Line S01229 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01641 M01S01229.v23l617 ---|** TCCF - TABLE OF CONTROL CARD FORMATS.
Line S00100 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01642 M01S00100.v23l617 +++|** TCCF - TABLE OF DIRECTIVE FORMATS.
01643 M00S01230.submit +++|
01644 M00S01231.submit +++|
01645 M00S01232.submit +++| TCCF BSS 0
01646 M00S01233.submit +++|
01647 M00S01234.submit +++| CON 4L/JOB+JOB
Line S00101 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01648 M01S00101.v23l617 +++| CON 7L/CHARGE+CHARGE
01649 M00S01235.submit +++| CON 4L/EOF+EOF
01650 M00S01236.submit +++| CON 4L/EOR+EOR
01651 M00S01237.submit +++| CON 6L/NOSEQ+NOSEQ
01652 M00S01238.submit +++| CON 4L/SEQ+SEQ
01653 M00S01239.submit +++| CON 6L/TRANS+TRANS
01654 M00S01240.submit +++| CON 8L/NOTRANS+NOTRANS
01655 M00S01241.submit +++| CON 7L/NOPACK+NOPACK
01656 M00S01242.submit +++| CON 5L/PACK+PACK
01657 M00S01243.submit +++| CON 5L/USER+USER
01658 M00S01244.submit +++| TCCFR CON 5L/READ+READ
01659 M00S01245.submit +++| TCCFW CON 7L/REWIND+REWIND
01660 M00S01246.submit +++| TCCFE CON 4L/EC=+ESCAPE
01661 M00S01247.submit +++|
01662 M00S01248.submit +++| CON 0
01663 M00S01249.submit +++|
01664 M00S01250.submit +++| NOFIL DATA 20H NO READ FILE FOUND-
01665 M00S01251.submit +++| DATA 0
01666 M00S01252.submit +++| BSFIL DATA 20H READ FILE BUSY-
01667 M00S01253.submit +++| DATA 0
Line S01254 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01668 M01S01254.ns22000 ---| SPACE 4
Line S00219 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01669 M01S00219.ns22000 +++| SPACE 4,10
01670 M00S01255.submit +++| TCCFL DATA 74000000000000000044B /JOB LENGTH
Line S00102 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01671 M01S00102.v23l617 +++| DATA 77400000000000000022B /CHARGE LENGTH
01672 M00S01256.submit +++| DATA 74000000000000000044B /EOF LENGTH
01673 M00S01257.submit +++| DATA 74000000000000000044B /EOR LENGTH
01674 M00S01258.submit +++| DATA 77000000000000000030B /NOSEQ LENGTH
01675 M00S01259.submit +++| DATA 74000000000000000044B /SEQ LENGTH
01676 M00S01260.submit +++| DATA 77000000000000000030B /TRANS LENGTH
01677 M00S01261.submit +++| DATA 77600000000000000014B /NOTRANS LENGTH
01678 M00S01262.submit +++| DATA 77400000000000000022B /NOPACK LENGTH
01679 M00S01263.submit +++| DATA 76000000000000000036B /PACK LENGTH
01680 M00S01264.submit +++| DATA 76000000000000000036B /USER LENGTH
01681 M00S01265.submit +++| DATA 76000000000000000036B /READ LENGTH
01682 M00S01266.submit +++| DATA 77400000000000000022B /REWIND LENGTH
01683 M00S01267.submit +++| DATA 74000000000000000044B /EC= LENGTH
01684 M00S01268.submit +++| CON 0
01685 M00S01269.submit +++| TITLE COMMON DECKS.
01686 M00S01270.submit +++|* COMMON DECKS.
01687 M00S01271.submit +++|
01688 M00S01272.submit +++|
01689 M00S01273.submit +++|*CALL COMCCIO
01690 M00S01274.submit +++|*CALL COMCCPM
01691 M00S01275.submit +++|*CALL COMCLFM
01692 M00S01276.submit +++|*CALL COMCPFM
01693 M00S01277.submit +++|*CALL COMCRDS
01694 M00S01278.submit +++|*CALL COMCRDW
01695 M00S01279.submit +++|*CALL COMCSNM
01696 M00S01280.submit +++|*CALL COMCSFM
01697 M00S01281.submit +++|*CALL COMCSSN
01698 M00S01282.submit +++|*CALL COMCSYS
01699 M00S01283.submit +++|*CALL COMCWTC
01700 M00S01284.submit +++|*CALL COMCWTS
01701 M00S01285.submit +++|*CALL COMCWTW
01702 M00S01286.submit +++|*CALL COMSPFM
01703 M00S01287.submit +++|*CALL COMSPRD
01704 M00S01288.submit +++|*CALL COMSSSJ
01705 M00S01289.submit +++| SSJB SPACE 4,10
Line S01290 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01706 M01S01290.ns22000 ---|
01707 M00S01291.submit +++|* SPECIAL SYSTEM JOB PARAMETER AREA.
01708 M00S01292.submit +++|
01709 M00S01293.submit +++| SSJ= EQU 0
Line S01294 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01710 M01S01294.ns22000 ---|
01711 M01S01295.ns22000 ---| GJSB SPACE 4,10
Line S00220 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01712 M01S00220.ns22000 +++| PFPB SPACE 4,10
Line S01296 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01713 M01S01296.ns22000 ---|** *GETJSI* PARAMETER BLOCK.
01714 M01S01297.ns22000 ---|*
01715 M01S01298.ns22000 ---|
01716 M01S01299.ns22000 ---|*T GJSB 42/USER NUMBER, 18/USER INDEX
Figure
GJSB
0 17 18 29 USER INDEX USER NUMBER 30 59 USER NUMBER
01717 M01S01300.ns22000 ---|*T, 42/PASSWORD, 18/0
Figure
0 17 18 29 0 PASSWORD 30 59 PASSWORD
01718 M01S01301.ns22000 ---|*T, 42/USER PROCEDURE (UP), 6/SP, 12/0
Figure
0 11 12 17 18 29 0 SP USER PROCEDURE (UP) 30 59 USER PROCEDURE (UP)
01719 M01S01302.ns22000 ---|*T, 60/PROJECT NUMBER (FIRST WORD)
Figure
0 29 PROJECT NUMBER (FIRST WORD) 30 59 PROJECT NUMBER (FIRST WORD)
01720 M01S01303.ns22000 ---|*T, 60/PROJECT NUMBER (SECOND WORD)
Figure
0 29 PROJECT NUMBER (SECOND WORD) 30 59 PROJECT NUMBER (SECOND WORD)
01721 M01S01304.ns22000 ---|*T, 60/CHARGE NUMBER
Figure
0 29 CHARGE NUMBER 30 59 CHARGE NUMBER
01722 M01S01305.ns22000 ---|
01723 M01S01306.ns22000 ---| GJSB BSSZ 6
01724 M01S01307.ns22000 ---|
01725 M01S01308.ns22000 ---|* PARAMETER BLOCK SYMBOLS.
01726 M01S01309.ns22000 ---|
01727 M01S01310.ns22000 ---| UNI EQU 0 USER NUMBER
01728 M01S01311.ns22000 ---| PSW EQU 1 PASSWORD
01729 M01S01312.ns22000 ---| PFN EQU 2 PROCEDURE FILE NAMES
01730 M01S01313.ns22000 ---| PJN EQU 3 PROJECT NUMBER (FIRST WORD)
01731 M01S01314.ns22000 ---| PJ1 EQU 4 PROJECT NUMBER (SECOND WORD)
01732 M01S01315.ns22000 ---| CRN EQU 5 CHARGE NUMBER
Line S00221 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01733 M01S00221.ns22000 +++|* PERMANENT FILE PARAMETER BLOCK.
01734 M01S00222.ns22000 +++|
01735 M01S00223.ns22000 +++| PFPB BSSZ 3
01736 M00S01316.submit +++| TITLE BUFFERS.
Line S01317 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01737 M01S01317.ns22000 ---|* BUFFERS
Line S00224 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01738 M01S00224.ns22000 +++|* BUFFERS.
01739 M00S01318.submit +++|
01740 M00S01319.submit +++|
01741 M00S01320.submit +++| USE //
01742 M00S01321.submit +++| SEG
01743 M00S01322.submit +++| BUF SPACE 4,10
01744 M00S01323.submit +++| BUF EQU *
01745 M00S01324.submit +++| IBUF EQU BUF+BUFL
01746 M00S01325.submit +++| FBUF EQU IBUF+IBUFL
01747 M00S01326.submit +++| RBUF EQU FBUF+FBUFL
Line S01327 Modification History
M01 (Removed by) ns2140
Seq # *Modification Id* Act
----------------------------+
01748 M01S01327.ns2140 ---| TBUF EQU RBUF+RBUFL
Line S00017 Modification History
M01 (Added by) ns2140
Seq # *Modification Id* Act
----------------------------+
01749 M01S00017.ns2140 +++| SBUF EQU RBUF+RBUFL
01750 M01S00018.ns2140 +++| TBUF EQU SBUF+SBUFL
01751 M00S01328.submit +++| WBUF EQU TBUF+TBUFL
01752 M00S01329.submit +++| RFL= EQU WBUF+WBUFL
01753 M00S01330.submit +++| PRS TITLE PRESET.
Line S00225 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01754 M01S00225.ns22000 +++| PRS SPACE 4,10
01755 M00S01331.submit +++|** PRS - PRESET PROGRAM.
01756 M00S01332.submit +++|
01757 M00S01333.submit +++|
01758 M00S01334.submit +++| ORG BUF
01759 M00S01335.submit +++| PRS SUBR ENTRY/EXIT
Line S01336 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01760 M01S01336.ns22000 ---| USERNUM PRSH SET USER NUMBER IN *GETJSI* BLOCK
01761 M01S01337.ns22000 ---| SA1 PRSH
01762 M01S01338.ns22000 ---| MX0 42
01763 M01S01339.ns22000 ---| BX6 X0*X1
01764 M01S01340.ns22000 ---| SA6 GJSB+UNI
01765 M01S01341.ns22000 ---| GETJSI GJSB
01766 M01S01342.ns22000 ---| SA1 GJSB+UNI CHECK INVALID BLOCK
01767 M01S01343.ns22000 ---| MX0 42
01768 M01S01344.ns22000 ---| BX2 -X0*X1
01769 M01S01345.ns22000 ---| NZ X2,PRS0 IF ACCOUNTING INFORMATION RETURNED
01770 M01S01346.ns22000 ---| SX6 1
01771 M01S01347.ns22000 ---| SA6 USEB
01772 M01S01348.ns22000 ---|
01773 M01S01349.ns22000 ---| PRS0 DISSJ PRSG DISABLE SSJ=
Line S00226 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01774 M01S00226.ns22000 +++| GETPFP PFPB GET PERMANENT FILE PARAMETERS
01775 M00S01350.submit +++| SX6 RBUF SET *PFM* ERROR MESSAGE ADDRESS
01776 M00S01351.submit +++| SA6 RR+CFPW
01777 M00S01352.submit +++| RJ SCC SET CONTROL CHARACTER
01778 M00S01353.submit +++| SA1 FWPR
01779 M00S01354.submit +++| MX2 -6
01780 M00S01355.submit +++| AX1 24
01781 M00S01356.submit +++| BX2 -X2*X1
Line S01357 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01782 M01S01357.ns22000 ---| SX6 X2-TXOT
Line S00227 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01783 M01S00227.ns22000 +++| SX6 X2-IAOT
01784 M00S01358.submit +++| SB7 B0 INITIALIZE QUEUE FLAG
Line S01359 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01785 M01S01359.ns22000 ---| NZ X6,PRS1 IF NOT TELEX
Line S00228 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01786 M01S00228.ns22000 +++| NZ X6,PRS1 IF NOT INTERACTIVE
01787 M00S01360.submit +++| SA1 TPAR+PRSF CHANGE DEFAULT QUEUE
01788 M00S01361.submit +++| BX6 X1
01789 M00S01362.submit +++| SA6 PRSE
01790 M00S01363.submit +++| PRS1 SA1 ACTR CHECK ARGUMENT COUNT
01791 M00S01364.submit +++| SA4 ARGR
01792 M00S01365.submit +++| MX0 42
01793 M00S01366.submit +++| SB4 X1
01794 M00S01367.submit +++| NZ B4,PRS2 IF ARGUMENTS PRESENT
Line S01368 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
01795 M01S01368.271l716 ---| PRS1.1 SX0 PRSA *NO SOURCE FILE SPECIFIED.*
Line S00012 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
01796 M01S00012.271l716 +++| PRS1.1 SX0 PRSA * NO SOURCE FILE SPECIFIED.*
01797 M00S01369.submit +++| EQ ABT ABORT JOB
01798 M00S01370.submit +++|
01799 M00S01371.submit +++| PRS2 SX2 B1 SET SOURCE FILE NAME
01800 M00S01372.submit +++| BX4 X0*X4
01801 M00S01373.submit +++| ZR X4,PRS1.1 IF EMPTY FILE NAME
Line S01374 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
01802 M01S01374.271l716 ---| SX0 PRSC *TOO MANY ARGUMENTS.*
Line S00013 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
01803 M01S00013.271l716 +++| SX0 PRSC * TOO MANY ARGUMENTS.*
Line S01375 Modification History
M01 (Removed by) submit2
Seq # *Modification Id* Act
----------------------------+
01804 M01S01375.submit2 ---| SB3 B4-3
01805 M01S01376.submit2 ---| GT B3,ABT IF .GT. 3 ARGUMENTS
Line S00009 Modification History
M01 (Added by) submit2
Seq # *Modification Id* Act
----------------------------+
01806 M01S00009.submit2 +++| SB3 B4-4
01807 M01S00010.submit2 +++| GT B3,ABT IF TOO MANY ARGUMENTS
01808 M00S01377.submit +++| BX6 X4+X2
01809 M00S01378.submit +++| SB4 B4-B1
01810 M00S01379.submit +++| SA6 I
01811 M00S01380.submit +++| PRS2.1 ZR B4,PRS4 IF END OF ARGUMENTS
01812 M00S01381.submit +++| SA1 TPAR
01813 M00S01382.submit +++| SA4 A4+1 CHECK QUEUE TYPE
01814 M00S01383.submit +++| MX0 12
01815 M00S01384.submit +++| BX6 X0*X4
01816 M00S01385.submit +++| PRS3 BX2 X0*X1
01817 M00S01386.submit +++| BX2 X6-X2
01818 M00S01387.submit +++| ZR X2,PRS3.1 IF MATCH FOUND
01819 M00S01388.submit +++| SA1 A1+1
01820 M00S01389.submit +++| NZ X1,PRS3 IF NOT END OF TABLE
Line S01390 Modification History
M01 (Removed by) submi7
Seq # *Modification Id* Act
----------------------------+
01821 M01S01390.submi7 ---| LX4 2*6
01822 M01S01391.submi7 ---| SX7 X4-2RNR
Line S00001 Modification History
M01 (Added by) submi7
Seq # *Modification Id* Act
----------------------------+
01823 M01S00001.submi7 +++| LX6 12
01824 M01S00002.submi7 +++| SX7 X6-2RNR
01825 M00S01392.submit +++| SB4 B4-B1
01826 M00S01393.submit +++| SA7 NRFLG SET NO REWIND FLAG
01827 M00S01394.submit +++| ZR X7,PRS3.2 IF *NR* OPTION
Line S01395 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
01828 M01S01395.271l716 ---| SX0 PRSB
Line S00014 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
01829 M01S00014.271l716 +++| SX0 PRSB * INCORRECT QUEUE SPECIFIED.*
01830 M00S01396.submit +++| ZR X6,PRS2.1 IF NO PARAMETER PRESENT
01831 M00S01397.submit +++| EQ ABT ABORT JOB
01832 M00S01398.submit +++|
Line S01399 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
01833 M01S01399.271l716 ---| PRS3.1 SX0 PRSD *CONFLICTING PARAMETERS.*
Line S00015 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
01834 M01S00015.271l716 +++| PRS3.1 SX0 PRSD * CONFLICTING PARAMETERS.*
01835 M00S01400.submit +++| NZ B7,ABT IF QUEUE ALREADY SELECTED
01836 M00S01401.submit +++| SB7 B1
01837 M00S01402.submit +++| SB4 B4-B1
01838 M00S01403.submit +++| BX7 X1
Line S00011 Modification History
M01 (Added by) submit2
Seq # *Modification Id* Act
----------------------------+
01839 M01S00011.submit2 +++| MX0 -6
01840 M00S01404.submit +++| SA7 PRSE
Line S00012 Modification History
M01 (Added by) submit2
Seq # *Modification Id* Act
----------------------------+
01841 M01S00012.submit2 +++| LX1 59-18 CHECK FOR REMOTE QUEUE
01842 M01S00013.submit2 +++| BX7 -X0*X4
01843 M01S00014.submit2 +++| PL X1,PRS2.1 IF NOT REMOTE QUEUE
01844 M01S00015.submit2 +++| MX6 24 SET TID FIELD
01845 M01S00016.submit2 +++| LX6 24
01846 M01S00017.submit2 +++| SA6 TDSP+2
01847 M01S00018.submit2 +++| SX7 X7-1R=
01848 M01S00019.submit2 +++| NZ X7,PRS2.1 IF NOT *=* SEPARATOR
01849 M01S00020.submit2 +++| SA4 A4+B1 GET USER NAME
01850 M01S00021.submit2 +++| MX0 42
01851 M01S00022.submit2 +++| BX7 X0*X4
01852 M01S00023.submit2 +++| SB4 B4-B1
01853 M01S00024.submit2 +++| SA7 TFUN+1
01854 M01S00025.submit2 +++| SX0 -TFUN RESET TID FIELD
01855 M01S00026.submit2 +++| BX6 X6*X0
01856 M01S00027.submit2 +++| SA6 A6
01857 M00S01405.submit +++| EQ PRS2.1 GET NEXT ARGUMENT
01858 M00S01406.submit +++|
Line S01407 Modification History
M01 (Removed by) 271l716
Seq # *Modification Id* Act
----------------------------+
01859 M01S01407.271l716 ---| PRS3.2 SX0 PRSC *TOO MANY ARGUMENTS.*
Line S00016 Modification History
M01 (Added by) 271l716
Seq # *Modification Id* Act
----------------------------+
01860 M01S00016.271l716 +++| PRS3.2 SX0 PRSC * TOO MANY ARGUMENTS.*
01861 M00S01408.submit +++| NZ B4,ABT IF ANOTHER ARGUMENT
Line S01409 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01862 M01S01409.ns22000 ---| PRS4 SA1 PRSE SET ORIGIN TYPE
Line S00229 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01863 M01S00229.ns22000 +++|
01864 M01S00230.ns22000 +++|* SAVE FILE ACCESS LEVEL.
01865 M01S00231.ns22000 +++|
01866 M01S00232.ns22000 +++| PRS4 SA1 I+1 SET BIT TO RETURN FILE ACCESS LEVEL
01867 M01S00233.ns22000 +++| MX0 1
01868 M01S00234.ns22000 +++| LX0 39-59
01869 M01S00235.ns22000 +++| BX6 X0+X1
01870 M01S00236.ns22000 +++| SA6 A1
01871 M01S00237.ns22000 +++| STATUS I,P
01872 M01S00238.ns22000 +++| SA1 I+CFAL GET ACCESS LEVEL
01873 M01S00239.ns22000 +++| MX0 -3
01874 M01S00240.ns22000 +++| LX1 -36
01875 M01S00241.ns22000 +++| BX6 -X0*X1
01876 M01S00242.ns22000 +++| SA6 ALVL
01877 M01S00243.ns22000 +++| SA1 PRSE SET ORIGIN TYPE
Line S01410 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01878 M01S01410.ns22000 ---| ZR X1,PRS IF NO QUEUE GIVEN AND NOT *TXOT*
Line S00244 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01879 M01S00244.ns22000 +++| ZR X1,PRSX IF NO QUEUE GIVEN AND NOT *IAOT*
01880 M00S01411.submit +++| MX0 -18
01881 M00S01412.submit +++| BX3 -X0*X1
01882 M00S01413.submit +++| SA2 TDSP+1
01883 M00S01414.submit +++| SX6 FRCS CLEAR PRESET CENTRAL SITE BIT
01884 M00S01415.submit +++| BX4 -X6*X2
01885 M00S01416.submit +++| BX7 X4+X3 ADD NEW FLAG BITS
Line S01417 Modification History
M01 (Removed by) submit2
Seq # *Modification Id* Act
----------------------------+
01886 M01S01417.submit2 ---| AX1 18
01887 M01S01418.submit2 ---| BX6 -X0*X1
01888 M01S01419.submit2 ---| SA6 A2+1 SET *TID*
01889 M00S01420.submit +++| SA7 A2 SET FLAGS
01890 M00S01421.submit +++| MX0 -12
Line S01422 Modification History
M01 (Removed by) submit2
Seq # *Modification Id* Act
----------------------------+
01891 M01S01422.submit2 ---| AX1 18
Line S00028 Modification History
M01 (Added by) submit2
Seq # *Modification Id* Act
----------------------------+
01892 M01S00028.submit2 +++| AX1 36
01893 M00S01423.submit +++| BX4 -X0*X1
Line S01424 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01894 M01S01424.ns22000 ---| ZR X4,PRS IF NO DISPOSITION CODE CHANGE
Line S00245 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01895 M01S00245.ns22000 +++| ZR X4,PRSX IF NO DISPOSITION CODE CHANGE
01896 M00S01425.submit +++| LX0 35-11
01897 M00S01426.submit +++| BX2 X0*X7
01898 M00S01427.submit +++| LX4 24
01899 M00S01428.submit +++| BX7 X2+X4
01900 M00S01429.submit +++| SA7 A7+ SET DISPOSITION CODE
Line S01430 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01901 M01S01430.ns22000 ---| EQ PRS RETURN
Line S00246 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01902 M01S00246.ns22000 +++| EQ PRSX RETURN
01903 M00S01431.submit +++|
01904 M00S01432.submit +++| PRSA DATA C* NO SOURCE FILE SPECIFIED.*
01905 M00S01433.submit +++|
Line S01434 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01906 M01S01434.v23l617 ---| PRSB DATA C* ILLEGAL QUEUE SPECIFIED.*
Line S00103 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01907 M01S00103.v23l617 +++| PRSB DATA C* INCORRECT QUEUE SPECIFIED.*
01908 M00S01435.submit +++|
01909 M00S01436.submit +++| PRSC DATA C* TOO MANY ARGUMENTS.*
01910 M00S01437.submit +++|
01911 M00S01438.submit +++| PRSD DATA C* CONFLICTING PARAMETERS.*
01912 M00S01439.submit +++|
01913 M00S01440.submit +++| PRSE CON 0
01914 M00S01441.submit +++| TPAR SPACE 4,10
01915 M00S01442.submit +++|** TPAR - PARAMETER CONVERSION TABLE.
Line S00029 Modification History
M01 (Added by) submit2
Seq # *Modification Id* Act
----------------------------+
01916 M01S00029.submit2 +++|*
01917 M01S00030.submit2 +++|*T 12/KEYWORD,12/DISP CODE,17/0,1/R,18/FLAGS
Figure
0 17 18 19 29 FLAGS R 0 30 35 36 47 48 59 0 DISP CODE KEYWORD
01918 M01S00031.submit2 +++|*
01919 M01S00032.submit2 +++|* R - SET IF REMOTE BATCH TYPE KEYWORD.
01920 M01S00033.submit2 +++|* FLAGS - FLAGS TO PRESET IN *DSP* CALL.
01921 M00S01443.submit +++|
01922 M00S01444.submit +++|
01923 M00S01445.submit +++| TPAR BSS 0
01924 M00S01446.submit +++| LOC 0
Line S01447 Modification History
M01 (Removed by) submit2
Seq # *Modification Id* Act
----------------------------+
01925 M01S01447.submit2 ---| PRSF VFD 12/0LN,12/0LNO,18/0,18/FRCS
01926 M01S01448.submit2 ---| VFD 12/0LB,12/0,18/0,18/FRCS
01927 M01S01449.submit2 ---| VFD 12/0LE,12/0,18/-0,18/FRTI
01928 M01S01450.submit2 ---| VFD 12/0LNO,12/0LNO,18/0,18/FRCS
01929 M01S01451.submit2 ---| VFD 12/0LBC,12/0,18/0,18/FRCS
01930 M01S01452.submit2 ---| VFD 12/0LRB,12/0,18/-0,18/FRTI
01931 M01S01453.submit2 ---| VFD 12/0LTO,12/0LTO,18/0,18/FRCS
Line S00034 Modification History
M01 (Added by) submit2
Seq # *Modification Id* Act
----------------------------+
01932 M01S00034.submit2 +++| PRSF VFD 12/0LN,12/0LNO,17/0,1/0,18/FRCS
01933 M01S00035.submit2 +++| VFD 12/0LB,12/0,17/0,1/0,18/FRCS
01934 M01S00036.submit2 +++| VFD 12/0LE,12/0,17/0,1/1,18/FRTI
01935 M01S00037.submit2 +++| VFD 12/0LNO,12/0LNO,17/0,1/0,18/FRCS
01936 M01S00038.submit2 +++| VFD 12/0LBC,12/0,17/0,1/0,18/FRCS
01937 M01S00039.submit2 +++| VFD 12/0LRB,12/0,17/0,1/1,18/FRTI
01938 M01S00040.submit2 +++| VFD 12/0LTO,12/0LTO,17/0,1/0,18/FRCS
01939 M00S01454.submit +++| CON 0 END OF TABLE
01940 M00S01455.submit +++| LOC *O
01941 M00S01456.submit +++|
01942 M00S01457.submit +++| PRSG BSSZ 1 *DISSJ* PARAMETER
Line S01458 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01943 M01S01458.v23l617 ---| PRSH BSS 1 USER NUMBER
Line S00104 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01944 M01S00104.v23l617 +++| PRSH BSS 1 USER NAME
Line S01459 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01945 M01S01459.ns22000 ---| SCC SPACE 4
Line S00247 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01946 M01S00247.ns22000 +++| SCC SPACE 4,10
01947 M00S01460.submit +++|** SCC - SET CONTROL CHARACTER.
01948 M00S01461.submit +++|*
01949 M00S01462.submit +++|* EXIT CONTROL CHARACTER REPLACED IN *TCCF*.
01950 M00S01463.submit +++|*
01951 M00S01464.submit +++|* USES X - 1, 2, 3, 6, 7.
01952 M00S01465.submit +++|* A - 1, 7.
01953 M00S01466.submit +++|
01954 M00S01467.submit +++|
Line S01468 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01955 M01S01468.ns22000 ---| SCC PS ENTRY/EXIT
Line S00248 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01956 M01S00248.ns22000 +++| SCC SUBR ENTRY/EXIT
Line S01469 Modification History
M01 (Removed by) v23l617
Seq # *Modification Id* Act
----------------------------+
01957 M01S01469.v23l617 ---| MX2 -6 SCAN CONTROL CARD
Line S00105 Modification History
M01 (Added by) v23l617
Seq # *Modification Id* Act
----------------------------+
01958 M01S00105.v23l617 +++| MX2 -6 SCAN DIRECTIVE
01959 M00S01470.submit +++| SA1 CCDR
01960 M00S01471.submit +++| MX3 1
01961 M00S01472.submit +++| SCC1 LX1 6
01962 M00S01473.submit +++| BX6 -X2*X1
01963 M00S01474.submit +++| SX7 X6-1R)
Line S01475 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01964 M01S01475.ns22000 ---| ZR X6,SCC RETURN IF END OF CARD
Line S00249 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01965 M01S00249.ns22000 +++| ZR X6,SCCX IF END OF LINE
01966 M00S01476.submit +++| SX6 X6-1R.
01967 M00S01477.submit +++| ZR X7,SCC2 IF *)*
01968 M00S01478.submit +++| ZR X6,SCC2 IF *.*
01969 M00S01479.submit +++| LX3 6
01970 M00S01480.submit +++| PL X3,SCC1 LOOP TO END OF WORD
01971 M00S01481.submit +++| SA1 A1+B1
01972 M00S01482.submit +++| EQ SCC1
01973 M00S01483.submit +++|
01974 M00S01484.submit +++| SCC2 LX3 6
01975 M00S01485.submit +++| PL X3,SCC3 IF NOT END OF WORD
01976 M00S01486.submit +++| SA1 A1+B1
01977 M00S01487.submit +++| SCC3 LX1 6
01978 M00S01488.submit +++| BX6 -X2*X1
01979 M00S01489.submit +++| SX7 X6-1R
Line S01490 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01980 M01S01490.ns22000 ---| ZR X6,SCC RETURN IF END OF CARD
01981 M01S01491.ns22000 ---| ZR X7,SCC RETURN IF * *
Line S00250 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01982 M01S00250.ns22000 +++| ZR X6,SCCX IF END OF LINE
01983 M01S00251.ns22000 +++| ZR X7,SCCX IF * *
01984 M00S01492.submit +++| LX6 54
Line S01493 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01985 M01S01493.ns22000 ---| SA1 TCCF REPLACE CONTROL CHARACTER
Line S00252 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01986 M01S00252.ns22000 +++| SA1 TCCF
01987 M00S01494.submit +++| MX2 -54
Line S01495 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01988 M01S01495.ns22000 ---| SCC4 BX1 -X2*X1
Line S00253 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01989 M01S00253.ns22000 +++| SCC4 BX1 -X2*X1 REPLACE CONTROL CHARACTER IN TABLE
01990 M00S01496.submit +++| IX7 X1+X6
01991 M00S01497.submit +++| SA7 A1
Line S01498 Modification History
M01 (Removed by) ns22000
Seq # *Modification Id* Act
----------------------------+
01992 M01S01498.ns22000 ---| SA1 A1+B1
01993 M01S01499.ns22000 ---| NZ X1,SCC4
01994 M01S01500.ns22000 ---| EQ SCC RETURN
Line S00254 Modification History
M01 (Added by) ns22000
Seq # *Modification Id* Act
----------------------------+
01995 M01S00254.ns22000 +++| SA1 A1+B1 GET NEXT TABLE ENTRY
01996 M01S00255.ns22000 +++| NZ X1,SCC4 IF NOT END OF TABLE
01997 M01S00256.ns22000 +++| EQ SCCX RETURN
01998 M00S01501.submit +++| SPACE 4
01999 M00S01502.submit +++| END