cdc:nos2.source:opl.opl871:deck:tafrec.001
Deck TAFREC Part 001
13 Modifications
Listing Sections
- Deck TAFREC Start
- Deck TAFREC Part 1 (Line 1312)
- Deck TAFREC Part 2 (Line 3061)
- Deck TAFREC Part 3 (Line 4365)
Source
Seq # *Modification Id* Act ----------------------------+ 01312 M01S01118.tafrec +++| SB5 BDRG 01313 M01S01119.tafrec +++| SA1 CUFN CURRENT FILE NAME 01314 M01S01120.tafrec +++| RJ SNM 01315 M01S01121.tafrec +++| EQ ERR PROCESS ERROR 01316 M01S01122.tafrec +++| 01317 M01S01123.tafrec +++| BDR4 SA2 TRBUF+TRUNW RECOVERY UNIT NAME 01318 M01S01124.tafrec +++| BX6 X2 01319 M01S01125.tafrec +++| SA6 BDRH+2 01320 M01S01126.tafrec +++| SA1 HTST HIGHEST TST ORDINAL 01321 M01S01127.tafrec +++| SA3 LTST LOWEST TST ORDINAL 01322 M01S01128.tafrec +++| SB2 X1 01323 M01S01129.tafrec +++| SB3 X3 01324 M01S01130.tafrec +++| MX0 TSTNN 01325 M01S01131.tafrec +++| BDR5 SA3 B3+B1 SEARCH TST FOR TERMINAL NAME 01326 M01S01132.tafrec +++| BX6 X0*X3 01327 M01S01133.tafrec +++| BX6 X6-X2 01328 M01S01134.tafrec +++| ZR X6,BDR6 IF FOUND 01329 M01S01135.tafrec +++| SB3 B3+TSTLLE 01330 M01S01136.tafrec +++| SB4 B2-B3 01331 M01S01137.tafrec +++| GE B4,BDR5 IF NOT END OF TST 01332 M01S01138.tafrec +++| 01333 M01S01139.tafrec +++|* A TERMINAL HAS BEEN DELETED FROM THE NETWORK FILE. 01334 M01S01140.tafrec +++|* IF TERMINAL LAST RAN A NON RECOVERABLE TRANSACTION, DELETE 01335 M01S01141.tafrec +++|* RECOVERY UNIT. OTHERWISE REPORT ERROR. 01336 M01S01142.tafrec +++| 01337 M01S01143.tafrec +++| SA2 TRBUF+TRCSW STEP WORD 01338 M01S01144.tafrec +++| MX0 -TRCSN 01339 M01S01145.tafrec +++| BX4 -X0*X2 01340 M01S01146.tafrec +++| SX6 B1 SET REFORMAT FLAG 01341 M01S01147.tafrec +++| SA6 BDRE 01342 M01S01148.tafrec +++| SA1 NMRU 01343 M01S01149.tafrec +++| SX6 X1-1 DECREMENT NUMBER OF RECOVERY UNITS 01344 M01S01150.tafrec +++| SA6 A1 01345 M01S01151.tafrec +++| SA1 TDEL 01346 M01S01152.tafrec +++| SX6 X1+B1 INCREMENT COUNT OF DELETED RECOVERY UNITS 01347 M01S01153.tafrec +++| SA6 A1+ 01348 M01S01154.tafrec +++| ZR X4,BDR11 IF NON RECOVERABLE TRANSACTION 01349 M01S01155.tafrec +++| SB2 1RX ERROR - ACTIVE RECOVERY UNIT(S) DELETED. 01350 M01S01156.tafrec +++| SB5 -BDRF 01351 M01S01157.tafrec +++| SB3 BDRI 01352 M01S01158.tafrec +++| SA1 BDRH+2 RECOVERY UNIT NAME 01353 M01S01159.tafrec +++| RJ SNM SET NAME IN MESSAGE 01354 M01S01160.tafrec +++| MESSAGE BDRI,0,R 01355 M01S01161.tafrec +++| WRITEW R,BDRI,5 * ACTIVE RECOVERY UNIT(S) DELETED.* 01356 M01S01162.tafrec +++| EQ BDR11 CONTINUE PROCESSING NEXT UNIT 01357 M01S01163.tafrec +++| 01358 M01S01164.tafrec +++|* RECOVER TERMINAL. INDICATE RECOVERY PROCESSING NEEDED 01359 M01S01165.tafrec +++|* FOR TERMINAL IN TST. 01360 M01S01166.tafrec +++| 01361 M01S01167.tafrec +++| BDR6 MESSAGE BDRH,B1 *B-DISPLAY* MESSAGE 01362 M01S01168.tafrec +++| SA2 TRBUF+TRCSW STEP WORD 01363 M01S01169.tafrec +++| MX0 -TRCSN 01364 M01S01170.tafrec +++| BX2 -X0*X2 01365 M01S01171.tafrec +++| SB5 X2-CSCD 01366 M01S01172.tafrec +++| ZR B5,BDR7 IF *CDCS* DOWN 01367 M01S01173.tafrec +++| SB5 X2-CSTI 01368 M01S01174.tafrec +++| ZR B5,BDR7 IF RECOVERABLE TRANSACTION/JOB INPUT 01369 M01S01175.tafrec +++| SB5 X2-CSBC 01370 M01S01176.tafrec +++| ZR B5,BDR7 IF BEGIN/COMMIT ID-S LOGGED 01371 M01S01177.tafrec +++| SB5 X2-CSND 01372 M01S01178.tafrec +++| ZR B5,BDR7 IF NAM DOWN 01373 M01S01179.tafrec +++| EQ BDR8 RECOVERY BIT NOT SET 01374 M01S01180.tafrec +++| 01375 M01S01181.tafrec +++|* SET AUTOMATIC RECOVERY BIT. 01376 M01S01182.tafrec +++| 01377 M01S01183.tafrec +++| BDR7 SA3 A3-TSTNW+TSARW 01378 M01S01184.tafrec +++| MX6 TSARN 01379 M01S01185.tafrec +++| LX6 TSARS-59 01380 M01S01186.tafrec +++| BX6 X3+X6 SET AUTO RECOVERY BIT 01381 M01S01187.tafrec +++| SA6 A3 01382 M01S01188.tafrec +++| 01383 M01S01189.tafrec +++|* BUILD DIRECTORY ENTRY. 01384 M01S01190.tafrec +++| 01385 M01S01191.tafrec +++| BDR8 SA1 BDRD 01386 M01S01192.tafrec +++| SA2 BDRH+2 TERMINAL NAME 01387 M01S01193.tafrec +++| BX6 X2 01388 M01S01194.tafrec +++| SA2 TRBUF+TRCNW 01389 M01S01195.tafrec +++| MX0 -TRCNN 01390 M01S01196.tafrec +++| BX7 -X0*X2 TRANSACTION SEQUENCE NUMBER 01391 M01S01197.tafrec +++| LX7 30 01392 M01S01198.tafrec +++| SA2 BDRC DISK ADDRESS 01393 M01S01199.tafrec +++| BX7 X7+X2 01394 M01S01200.tafrec +++| SA3 TRBUF+TRCSW 01395 M01S01201.tafrec +++| MX0 -TRCSN 01396 M01S01202.tafrec +++| BX4 -X0*X3 CURRENT TRANSACTION STEP 01397 M01S01203.tafrec +++| SX0 X4-TSTPL 01398 M01S01204.tafrec +++| PL X0,BDR2 IF TRANSACTION STEP NOT IN TABLE 01399 M01S01205.tafrec +++| NZ X4,BDR9 IF NOT NONRECOVERABLE TRANSACTION 01400 M01S01206.tafrec +++| MX2 1 01401 M01S01207.tafrec +++| BX7 X7+X2 ADD INACTIVE FLAG 01402 M01S01208.tafrec +++| BDR9 BX6 X6+X4 ADD STEP TO DIRECTORY 01403 M01S01209.tafrec +++| LX3 TRTYN-TRTYS-1 01404 M01S01210.tafrec +++| MX0 -TRTYN 01405 M01S01211.tafrec +++| BX4 -X0*X3 01406 M01S01212.tafrec +++| SA3 TNRC+X4 01407 M01S01213.tafrec +++| SX0 X4-TTYPL-1 01408 M01S01214.tafrec +++| PL X0,BDR2 IF TRANSACTION TYPE NOT IN TABLE 01409 M01S01215.tafrec +++| LX4 17-5 01410 M01S01216.tafrec +++| BX6 X6+X4 ADD TYPE TO DIRECTORY 01411 M01S01217.tafrec +++| SA6 X1 01412 M01S01218.tafrec +++| SA7 A6+B1 01413 M01S01219.tafrec +++| SX6 X3+B1 INCREMENT COUNT OF RECOVERED TYPES 01414 M01S01220.tafrec +++| SA6 A3 01415 M01S01221.tafrec +++| SA3 TRBUF+TRCDW DATE 01416 M01S01222.tafrec +++| SA4 TRBUF+TRCTW TIME 01417 M01S01223.tafrec +++| BX6 X3 01418 M01S01224.tafrec +++| BX7 X4 01419 M01S01225.tafrec +++| SA6 A7+B1 01420 M01S01226.tafrec +++| SA7 A6+B1 01421 M01S01227.tafrec +++| 01422 M01S01228.tafrec +++|* READ ALL MESSAGES FOR RECOVERY UNIT TO HELP AVOID I/O 01423 M01S01229.tafrec +++|* ERRORS DURING TRANSACTION PROCESSING. 01424 M01S01230.tafrec +++| 01425 M01S01231.tafrec +++| SA2 BDRB WORDS IN ALL MESSAGES 01426 M01S01232.tafrec +++| RJ RMR READ MESSAGE RECORDS 01427 M01S01233.tafrec +++| SA2 BDRD 01428 M01S01234.tafrec +++| ZR X1,BDR10 IF NO ERROR 01429 M01S01235.tafrec +++| 01430 M01S01236.tafrec +++|* AN I/O ERROR OCCURRED ON A MESSAGE RECORD IN THE 01431 M01S01237.tafrec +++|* RECOVERY UNIT. IF NO ERROR OVERRIDE, REPORT ERROR ON 01432 M01S01238.tafrec +++|* RECOVERY REPORT AND ABORT *TAFREC*. OTHERWISE, REFORMAT
| Line S01239 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01433 M02S01239.ns2023 ---|* THE TRF AND INDICATE RECOVERY IS NO LONGER AVAILABLE 01434 M01S00142.ns2023 +++|* THE *CRF* AND INDICATE THAT RECOVERY IS NO LONGER AVAILABLE 01435 M01S01240.tafrec +++|* FOR RECOVERY UNIT. 01436 M01S01241.tafrec +++| 01437 M01S01242.tafrec +++| SA1 OVRD 01438 M01S01243.tafrec +++| ZR X1,BDR3 IF ERROR OVERRIDE NOT SET 01439 M01S01244.tafrec +++| SA1 X2+B1 01440 M01S01245.tafrec +++| MX3 1 01441 M01S01246.tafrec +++| LX3 -1 01442 M01S01247.tafrec +++| BX6 X1+X3 SET ERROR BIT 01443 M01S01248.tafrec +++| SA6 A1 01444 M01S01249.tafrec +++| SA1 TERR 01445 M01S01250.tafrec +++| SX6 X1+B1 INCREMENT ERROR COUNT 01446 M01S01251.tafrec +++| SA6 A1+ 01447 M01S01252.tafrec +++| SA6 BDRE INDICATE REFORMAT NECESSARY 01448 M01S01253.tafrec +++| BDR10 SX6 X2+RUDL UPDATE DIRECTORY ADDRESS 01449 M01S01254.tafrec +++| SA6 BDRD 01450 M01S01255.tafrec +++| BDR11 SA0 A0-B1 NUMBER OF RECOVERY UNITS LEFT 01451 M01S01256.tafrec +++| SA2 BDRC UPDATE PRU ADDRESS OF NEXT RECOVERY UNIT 01452 M01S01257.tafrec +++| SX7 A0 01453 M01S01258.tafrec +++| SA3 BDRA INCREMENT 01454 M01S01259.tafrec +++| IX6 X2+X3 01455 M01S01260.tafrec +++| SA6 A2 01456 M01S01261.tafrec +++| NZ X7,BDR1 IF MORE RECOVERY UNITS 01457 M01S01262.tafrec +++| 01458 M01S01263.tafrec +++|* SORT DIRECTORY OF RECOVERY UNITS BY TERMINAL NAME. 01459 M01S01264.tafrec +++| 01460 M01S01265.tafrec +++| SA1 BDRD 01461 M01S01266.tafrec +++| SX1 X1-DIR DIRECTORY LENGTH 01462 M01S01267.tafrec +++| SB3 DIR FWA OF DIRECTORY 01463 M01S01268.tafrec +++| SB4 RUDL DIRECTORY ENTRY LENGTH 01464 M01S01269.tafrec +++| RJ SDR SORT DIRECTORY 01465 M01S01270.tafrec +++|
| Line S01271 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01466 M02S01271.ns2023 ---|* REFORMAT TRF IF NUMBER OF TERMINALS CHANGED, OR IF 01467 M01S00143.ns2023 +++|* REFORMAT *CRF* IF NUMBER OF TERMINALS CHANGED, OR IF 01468 M01S01272.tafrec +++|* NUMBER OF USER MESSAGES OR MESSAGE SIZE INCREASED, OR 01469 M01S01273.tafrec +++|* IF I/O OR DATA ERROR OCCURRED. 01470 M01S01274.tafrec +++| 01471 M01S01275.tafrec +++| SA1 BDRE ERROR INDICATOR 01472 M01S01276.tafrec +++| BX6 X1 01473 M01S01277.tafrec +++| NZ X6,BDRX IF REFORMAT NECESSARY 01474 M01S01278.tafrec +++| SA2 NMRU NUMBER OF RECOVERY UNITS 01475 M01S01279.tafrec +++| SA3 HTST 01476 M01S01280.tafrec +++| SA4 LTST 01477 M01S01281.tafrec +++| IX3 X3-X4 01478 M01S01282.tafrec +++| SX4 TSTLLE 01479 M01S01283.tafrec +++| IX3 X3/X4 01480 M01S01284.tafrec +++| SX3 X3+B1 NUMBER OF TST ENTRIES 01481 M01S01285.tafrec +++| IX6 X3-X2 01482 M01S01286.tafrec +++| NZ X6,BDRX IF REFORMAT NECESSARY 01483 M01S01287.tafrec +++| SA1 CUID CURRENT ID 01484 M01S01288.tafrec +++| SA1 TREC+X1 01485 M01S01289.tafrec +++| MX0 12 01486 M01S01290.tafrec +++| LX0 36 01487 M01S01291.tafrec +++| BX6 X0*X1 NUMBER MESSAGES ON *RECOVER* DIRECTIVE 01488 M01S01292.tafrec +++| LX6 -24
| Line S01293 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01489 M02S01293.ns2023 ---| SA2 NUMO NUMBER USER MESSAGES ON OLD TRF 01490 M01S00144.ns2023 +++| SA2 NUMO NUMBER USER MESSAGES ON OLD *CRF* 01491 M01S01294.tafrec +++| IX6 X6-X2 01492 M01S01295.tafrec +++| NZ X6,BDRX IF REFORMAT NECESSARY 01493 M01S01296.tafrec +++| LX0 12 01494 M01S01297.tafrec +++| BX6 X0*X1 01495 M01S01298.tafrec +++| LX6 -36 PRU-S PER USER MESSAGE FROM *RECOVER*
| Line S01299 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01496 M02S01299.ns2023 ---| SA2 PPMO PRU-S PER USER MESSAGE ON OLD TRF 01497 M01S00145.ns2023 +++| SA2 PPMO PRU-S PER USER MESSAGE ON OLD *CRF* 01498 M01S01300.tafrec +++| IX6 X6-X2 01499 M01S01301.tafrec +++| EQ BDRX RETURN 01500 M01S01302.tafrec +++| 01501 M01S01303.tafrec +++| BDRA CON 0 PRU-S PER RECOVERY UNIT 01502 M01S01304.tafrec +++| BDRB CON 0 WORDS IN ALL MESSAGE RECORDS 01503 M01S01305.tafrec +++| BDRC CON 0 CURRENT DISK ADDRESS 01504 M01S01306.tafrec +++| BDRD CON 0 CURRENT DIRECTORY ADDRESS
| Line S01307 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01505 M02S01307.ns2023 ---| BDRE CON 0 TRF REFORMAT FLAG 01506 M01S00146.ns2023 +++| BDRE CON 0 *CRF* REFORMAT FLAG 01507 M01S01308.tafrec +++| BDRF DATA C* RECOVERABLE RUN UNIT DELETED - XXXXXXX.*
| Line S01309 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01508 M02S01309.v23l617 ---| BDRG DATA C* CRF RECOVERY UNIT ERROR - XXXXXXX.* 01509 M01S00010.v23l617 +++| BDRG DATA C* CRF RUN UNIT ERROR - XXXXXXX.* 01510 M01S01310.tafrec +++| BDRH DATA 30H RECOVERING - XXXXXXX. 01511 M01S01311.tafrec +++| BDRI BSSZ 5 01512 M01S01312.tafrec +++| RMR SPACE 4,20 01513 M01S01313.tafrec +++|** RMR - READ MESSAGE RECORDS. 01514 M01S01314.tafrec +++|* 01515 M01S01315.tafrec +++|* READ MESSAGE RECORDS IN A RECOVERY UNIT TO CHECK FOR 01516 M01S01316.tafrec +++|* I/O ERRORS. 01517 M01S01317.tafrec +++|* 01518 M01S01318.tafrec +++|* ENTRY (X2) = NUMBER OF WORDS IN ALL MESSAGE RECORDS. 01519 M01S01319.tafrec +++|* (X5) = FET ADDRESS. 01520 M01S01320.tafrec +++|* 01521 M01S01321.tafrec +++|* EXIT (X1) = 0 IF NO ERRORS ENCOUNTERED. 01522 M01S01322.tafrec +++|* 01523 M01S01323.tafrec +++|* USES X - 1, 2, 6, 7. 01524 M01S01324.tafrec +++|* A - 2, 7. 01525 M01S01325.tafrec +++|* 01526 M01S01326.tafrec +++|* CALLS CES, FIO. 01527 M01S01327.tafrec +++|* 01528 M01S01328.tafrec +++|* MACROS RECALL. 01529 M01S01329.tafrec +++| 01530 M01S01330.tafrec +++| 01531 M01S01331.tafrec +++| RMR SUBR ENTRY/EXIT 01532 M01S01332.tafrec +++| SX7 X2-TRBUFL/100B*100B 01533 M01S01333.tafrec +++| SA7 RMRA 01534 M01S01334.tafrec +++| AX2 6 CONVERT TO PRU-S 01535 M01S01335.tafrec +++| NG X7,RMR1 IF LESS THAN A BUFFER SIZE 01536 M01S01336.tafrec +++| NZ X7,RMR2 IF NOT SAME AS BUFFER SIZE 01537 M01S01337.tafrec +++| RMR1 SX6 B0 01538 M01S01338.tafrec +++| SX1 CIORD 01539 M01S01339.tafrec +++| RJ FIO READ MESSAGE RECORDS 01540 M01S01340.tafrec +++| RECALL X5 WAIT I/O 01541 M01S01341.tafrec +++| RJ CES CHECK ERROR STATUS 01542 M01S01342.tafrec +++| EQ RMRX RETURN 01543 M01S01343.tafrec +++| 01544 M01S01344.tafrec +++| RMR2 SX6 B0+ 01545 M01S01345.tafrec +++| SX1 CIORD 01546 M01S01346.tafrec +++| SX2 TRBUFL/100B 01547 M01S01347.tafrec +++| RJ FIO 01548 M01S01348.tafrec +++| RECALL X5 WAIT I/O 01549 M01S01349.tafrec +++| RJ CES CHECK ERROR STATUS 01550 M01S01350.tafrec +++| NZ X1,RMRX IF ERROR 01551 M01S01351.tafrec +++| SA2 RMRA 01552 M01S01352.tafrec +++| SX7 X2-TRBUFL/100B*100B 01553 M01S01353.tafrec +++| AX2 6 PRU-S 01554 M01S01354.tafrec +++| NG X7,RMR1 IF LESS THAN A BUFFER FULL 01555 M01S01355.tafrec +++| ZR X7,RMR1 IF EXACTLY A BUFFER FULL 01556 M01S01356.tafrec +++| SA7 A2 01557 M01S01357.tafrec +++| EQ RMR2 READ MORE MESSAGE RECORDS 01558 M01S01358.tafrec +++| 01559 M01S01359.tafrec +++| RMRA CON 0 WORDS IN ALL MESSAGE RECORDS 01560 M01S01360.tafrec +++| FRL SPACE 4,20 01561 M01S01361.tafrec +++|** FRL - FORMAT REPORT LINE. 01562 M01S01362.tafrec +++|* 01563 M01S01363.tafrec +++|* EXTRACT INFORMATION FROM THE DIRECTORY ENTRY AND FORMAT 01564 M01S01364.tafrec +++|* A PRINT LINE FOR THE REPORT FILE. 01565 M01S01365.tafrec +++|* 01566 M01S01366.tafrec +++|* ENTRY (X5) = ADDRESS OF THE DIRECTORY ENTRY. 01567 M01S01367.tafrec +++|* (A0) = COMMENT INDEX. 01568 M01S01368.tafrec +++|* 01569 M01S01369.tafrec +++|* EXIT LINE WRITTEN TO REPORT FILE. 01570 M01S01370.tafrec +++|* 01571 M01S01371.tafrec +++|* USES X - 0, 1, 2, 6, 7. 01572 M01S01372.tafrec +++|* A - 1, 2, 6, 7. 01573 M01S01373.tafrec +++|* B - 2. 01574 M01S01374.tafrec +++|* 01575 M01S01375.tafrec +++|* CALLS ALC, CDD, SFN. 01576 M01S01376.tafrec +++|* 01577 M01S01377.tafrec +++|* MACROS WRITEW. 01578 M01S01378.tafrec +++| 01579 M01S01379.tafrec +++| 01580 M01S01380.tafrec +++| FRL SUBR ENTRY/EXIT 01581 M01S01381.tafrec +++| MX0 42 01582 M01S01382.tafrec +++| SA1 X5 01583 M01S01383.tafrec +++| BX1 X0*X1 TERMINAL NAME 01584 M01S01384.tafrec +++| RJ SFN SPACE FILL NAME 01585 M01S01385.tafrec +++| LX6 53-59 USE BLANK FOR PRINTER CONTROL 01586 M01S01386.tafrec +++| SA6 RWSA 01587 M01S01387.tafrec +++| MX0 24 01588 M01S01388.tafrec +++| LX0 53-59 01589 M01S01389.tafrec +++| SA1 X5+B1 01590 M01S01390.tafrec +++| BX1 X0*X1 01591 M01S01391.tafrec +++| LX1 23-53 01592 M01S01392.tafrec +++| NZ X1,FRL1 IF TRANSACTION SEQUENCE NUMBER PRESENT 01593 M01S01393.tafrec +++| SA1 BLNK 01594 M01S01394.tafrec +++| BX6 X1 01595 M01S01395.tafrec +++| SA6 RWSA+1 01596 M01S01396.tafrec +++| SA6 A6+B1 01597 M01S01397.tafrec +++| SA6 A6+B1 01598 M01S01398.tafrec +++| SA6 A6+B1 01599 M01S01399.tafrec +++| SA6 A6+B1 01600 M01S01400.tafrec +++| EQ FRL2 PRINT COMMENT 01601 M01S01401.tafrec +++| 01602 M01S01402.tafrec +++| FRL1 RJ COD CONVERT TO DISPLAY 01603 M01S01403.tafrec +++| LX6 12 01604 M01S01404.tafrec +++| MX0 48 01605 M01S01405.tafrec +++| SX2 2RB 01606 M01S01406.tafrec +++| BX6 X0*X6 01607 M01S01407.tafrec +++| BX6 X6+X2 01608 M01S01408.tafrec +++| SA6 RWSA+1 01609 M01S01409.tafrec +++| MX0 6 01610 M01S01410.tafrec +++| LX0 18 01611 M01S01411.tafrec +++| SA1 X5 01612 M01S01412.tafrec +++| BX2 X0*X1 01613 M01S01413.tafrec +++| LX2 -12 TRANSACTION TYPE 01614 M01S01414.tafrec +++| SA2 TTYP+X2 01615 M01S01415.tafrec +++| BX6 X2 01616 M01S01416.tafrec +++| SA6 A6+B1 01617 M01S01417.tafrec +++| MX0 12 01618 M01S01418.tafrec +++| LX0 12 01619 M01S01419.tafrec +++| BX2 X0*X1 TRANSACTION STEP 01620 M01S01420.tafrec +++| SA2 TSTP+X2 01621 M01S01421.tafrec +++| BX6 X2 01622 M01S01422.tafrec +++| SA6 A6+B1 01623 M01S01423.tafrec +++| SA1 X5+2 DATE 01624 M01S01424.tafrec +++| SA2 A1+B1 TIME 01625 M01S01425.tafrec +++| BX7 X1 01626 M01S01426.tafrec +++| BX6 X2 01627 M01S01427.tafrec +++| SA7 A6+B1 01628 M01S01428.tafrec +++| SA6 A7+B1 01629 M01S01429.tafrec +++| FRL2 SA1 FRLA+A0 GET COMMENT 01630 M01S01430.tafrec +++| SA2 A1+B1 01631 M01S01431.tafrec +++| BX6 X1 01632 M01S01432.tafrec +++| BX7 X2 01633 M01S01433.tafrec +++| SA6 A6+B1 01634 M01S01434.tafrec +++| SA7 A6+B1 01635 M01S01435.tafrec +++| SB2 B1 01636 M01S01436.tafrec +++| RJ ALC ADVANCE LINE COUNT 01637 M01S01437.tafrec +++| WRITEW R,RWSA,RWSAL 01638 M01S01438.tafrec +++| EQ FRLX RETURN 01639 M01S01439.tafrec +++| 01640 M01S01440.tafrec +++|* TABLE OF COMMENTS FOR REPORT FILE (12 CHARACTERS MAXIMUM). 01641 M01S01441.tafrec +++| 01642 M01S01442.tafrec +++| FRLA BSS 0 01643 M01S01443.tafrec +++| LOC 0 01644 M01S01444.tafrec +++| DATA C*RECOVERED* 01645 M01S01445.tafrec +++| DATA C*INITIALIZED* 01646 M01S01446.tafrec +++| LOC *O 01647 M01S01447.tafrec +++| STN SPACE 4,20 01648 M01S01448.tafrec +++|** STN - SEARCH TERMINAL NAME. 01649 M01S01449.tafrec +++|* 01650 M01S01450.tafrec +++|* SEARCH A TABLE FOR THE REQUIRED TERMINAL NAME. 01651 M01S01451.tafrec +++|* 01652 M01S01452.tafrec +++|* ENTRY (X1) = TERMINAL NAME. 01653 M01S01453.tafrec +++|* (B3) = FWA OF TABLE. 01654 M01S01454.tafrec +++|* (B4) = LENGTH OF ENTRY. 01655 M01S01455.tafrec +++|* (B5) = LWA OF TABLE + 1. 01656 M01S01456.tafrec +++|* 01657 M01S01457.tafrec +++|* EXIT (X5) = ADDRESS OF ENTRY. 01658 M01S01458.tafrec +++|* = 0 IF TERMINAL NOT FOUND. 01659 M01S01459.tafrec +++|* (X1) = TERMINAL NAME. 01660 M01S01460.tafrec +++|* 01661 M01S01461.tafrec +++|* USES X - 0, 1, 2, 4, 5, 6, 7. 01662 M01S01462.tafrec +++|* A - 2. 01663 M01S01463.tafrec +++|* B - 3, 5. 01664 M01S01464.tafrec +++| 01665 M01S01465.tafrec +++| 01666 M01S01466.tafrec +++| STN SUBR ENTRY/EXIT 01667 M01S01467.tafrec +++| LX1 59-17 01668 M01S01468.tafrec +++| MX0 42 MASK FOR TERMINAL NAME 01669 M01S01469.tafrec +++| BX5 X5-X5 01670 M01S01470.tafrec +++| EQ STN2 ENTER LOOP 01671 M01S01471.tafrec +++| 01672 M01S01472.tafrec +++|* USE BINARY SEARCH TO FIND TERMINAL. 01673 M01S01473.tafrec +++| 01674 M01S01474.tafrec +++| STN1 SB3 A2+B4 SET NEW LOW LIMIT 01675 M01S01475.tafrec +++| STN2 SX7 B5-B3 FIND MIDDLE 01676 M01S01476.tafrec +++| SX4 B4 01677 M01S01477.tafrec +++| IX7 X7/X4 01678 M01S01478.tafrec +++| AX7 1 01679 M01S01479.tafrec +++| SX4 B4 01680 M01S01480.tafrec +++| IX7 X4*X7 01681 M01S01481.tafrec +++| SA2 B3+X7 READ AN ENTRY 01682 M01S01482.tafrec +++| BX4 X0*X2 01683 M01S01483.tafrec +++| LX4 42 01684 M01S01484.tafrec +++| IX6 X4-X1 01685 M01S01485.tafrec +++| ZR X6,STN3 IF ENTRY FOUND 01686 M01S01486.tafrec +++| ZR X7,STN4 IF END OF SEARCH 01687 M01S01487.tafrec +++| NG X6,STN1 IF TOO LOW IN TABLE 01688 M01S01488.tafrec +++| SB5 A2 SET NEW UPPER LIMIT 01689 M01S01489.tafrec +++| EQ STN2 NEXT ENTRY 01690 M01S01490.tafrec +++| 01691 M01S01491.tafrec +++| STN3 SX5 A2 ADDRESS OF ENTRY 01692 M01S01492.tafrec +++| STN4 LX1 17-59 REPOSITION TERMINAL NAME 01693 M01S01493.tafrec +++| EQ STNX RETURN 01694 M01S01494.tafrec +++| SDR SPACE 4,15 01695 M01S01495.tafrec +++|** SDR - SORT DIRECTORY OF RECOVERY UNITS. 01696 M01S01496.tafrec +++|* 01697 M01S01497.tafrec +++|* ENTRY (B3) = FWA OF TABLE. 01698 M01S01498.tafrec +++|* (B4) = LENGTH OF ENTRY. 01699 M01S01499.tafrec +++|* (X1) = LENGTH OF TABLE. 01700 M01S01500.tafrec +++|* 01701 M01S01501.tafrec +++|* EXIT DIRECTORY SORTED BY TERMINAL NAME. 01702 M01S01502.tafrec +++|* 01703 M01S01503.tafrec +++|* USES X - ALL. 01704 M01S01504.tafrec +++|* A - 3, 6. 01705 M01S01505.tafrec +++|* B - 2, 4, 6, 7. 01706 M01S01506.tafrec +++| 01707 M01S01507.tafrec +++| 01708 M01S01508.tafrec +++| SDR SUBR ENTRY/EXIT 01709 M01S01509.tafrec +++| MX0 42 01710 M01S01510.tafrec +++| SX2 B4 01711 M01S01511.tafrec +++| MX4 12 01712 M01S01512.tafrec +++| BX3 X1 01713 M01S01513.tafrec +++| IX3 X3/X2 NUMBER OF ENTRIES 01714 M01S01514.tafrec +++| SX2 B4 01715 M01S01515.tafrec +++| NX6,B2 X3 01716 M01S01516.tafrec +++| AX4 X4,B2 01717 M01S01517.tafrec +++| SX1 B3+X1 01718 M01S01518.tafrec +++| BX5 X5-X5 01719 M01S01519.tafrec +++| EQ SDR7 ENTER SORT LOOP 01720 M01S01520.tafrec +++| 01721 M01S01521.tafrec +++| SDR1 PL X5,SDR3 IF NO SWAP 01722 M01S01522.tafrec +++| SB7 X2 NUMBER OF WORDS TO MOVE 01723 M01S01523.tafrec +++| SB6 B6+B2 01724 M01S01524.tafrec +++| SDR2 SB7 B7-B1 DECREMENT INDEX 01725 M01S01525.tafrec +++| SA3 SDRA+B7 01726 M01S01526.tafrec +++| BX6 X3 01727 M01S01527.tafrec +++| SA6 B6+B7 01728 M01S01528.tafrec +++| NZ B7,SDR2 IF NOT END OF ENTRY 01729 M01S01529.tafrec +++| SDR3 SB4 B4+X2 01730 M01S01530.tafrec +++| SX3 B4+ 01731 M01S01531.tafrec +++| IX3 X3-X1 01732 M01S01532.tafrec +++| BX5 X5-X5 01733 M01S01533.tafrec +++| ZR X3,SDR7 IF END OF TABLE 01734 M01S01534.tafrec +++| SB7 X2 NUMBER OF WORDS TO SAVE 01735 M01S01535.tafrec +++| SDR4 SB7 B7-B1 01736 M01S01536.tafrec +++| SA3 B4+B7 01737 M01S01537.tafrec +++| BX6 X3 01738 M01S01538.tafrec +++| SA6 SDRA+B7 01739 M01S01539.tafrec +++| NZ B7,SDR4 IF NOT END OF ENTRY 01740 M01S01540.tafrec +++| SB6 B4-B2 01741 M01S01541.tafrec +++| BX7 X0*X3 01742 M01S01542.tafrec +++| LX7 42 SHIFT SO NO SIGN BIT 01743 M01S01543.tafrec +++| SDR5 SA3 B6+ 01744 M01S01544.tafrec +++| BX6 X0*X3 01745 M01S01545.tafrec +++| LX6 42 SHIFT SO NO SIGN BIT 01746 M01S01546.tafrec +++| IX6 X7-X6 01747 M01S01547.tafrec +++| PL X6,SDR1 IF IN ORDER 01748 M01S01548.tafrec +++| SB7 X2 01749 M01S01549.tafrec +++| SX5 B6+B2 01750 M01S01550.tafrec +++| SDR6 SB7 B7-B1 01751 M01S01551.tafrec +++| SA3 B6+B7 01752 M01S01552.tafrec +++| BX6 X3 01753 M01S01553.tafrec +++| SA6 X5+B7 01754 M01S01554.tafrec +++| NZ B7,SDR6 IF NOT END OF ENTRY 01755 M01S01555.tafrec +++| MX5 1 INDICATE ENTRY REPLACED 01756 M01S01556.tafrec +++| SB6 B6-B2 01757 M01S01557.tafrec +++| GE B6,B3,SDR5 IF IN BOUNDS 01758 M01S01558.tafrec +++| EQ SDR1 SELECT NEXT ENTRY 01759 M01S01559.tafrec +++| 01760 M01S01560.tafrec +++| SDR7 AX4 1 01761 M01S01561.tafrec +++| BX3 -X4 01762 M01S01562.tafrec +++| IX7 X2*X3 01763 M01S01563.tafrec +++| SB2 X7 01764 M01S01564.tafrec +++| SB7 X2 01765 M01S01565.tafrec +++| SB4 B3+X7 01766 M01S01566.tafrec +++| NZ X4,SDR4 IF MORE TO SORT 01767 M01S01567.tafrec +++| EQ SDRX RETURN 01768 M01S01568.tafrec +++| 01769 M01S01569.tafrec +++| SDRA BSSZ RUDL TEMPORARY STORAGE 01770 M01S01570.tafrec +++| GHL SPACE 4,15 01771 M01S01571.tafrec +++|** GHL - GET HIGHEST/LOWEST TST ENTRY ADDRESSES. 01772 M01S01572.tafrec +++|* 01773 M01S01573.tafrec +++|* CALCULATE THE HIGHEST AND LOWEST TST ADDRESSES FOR 01774 M01S01574.tafrec +++|* THE REQUIRED NETWORK FILE. 01775 M01S01575.tafrec +++|* 01776 M01S01576.tafrec +++|* ENTRY (CUID) = CURRENT ID. 01777 M01S01577.tafrec +++|* 01778 M01S01578.tafrec +++|* EXIT (X6) = HIGHEST ADDRESS. 01779 M01S01579.tafrec +++|* (X7) = LOWEST ADDRESS. 01780 M01S01580.tafrec +++|* 01781 M01S01581.tafrec +++|* USES X - 0, 1, 2, 3, 4, 6, 7. 01782 M01S01582.tafrec +++|* A - 1, 3. 01783 M01S01583.tafrec +++| 01784 M01S01584.tafrec +++| 01785 M01S01585.tafrec +++| GHL SUBR ENTRY/EXIT 01786 M01S01586.tafrec +++| SA1 CUID 01787 M01S01587.tafrec +++| SX3 TTFTE LENGTH OF TST HEADING ENTRY 01788 M01S01588.tafrec +++| IX3 X3*X1 01789 M01S01589.tafrec +++| SA3 TSTHD+X3 GET HIGHEST TST ORDINAL FOR ID 01790 M01S01590.tafrec +++| MX0 -TFHON 01791 M01S01591.tafrec +++| LX3 TFHON-1-TFHOS RIGHT JUSTIFY HIGHEST ORDINAL 01792 M01S01592.tafrec +++| BX2 -X0*X3 HIGHEST ORDINAL 01793 M01S01593.tafrec +++| SX4 B1+ 01794 M01S01594.tafrec +++| GHL1 SX1 X1-1 01795 M01S01595.tafrec +++| NG X1,GHL2 IF START OF TST HEADER REACHED 01796 M01S01596.tafrec +++| SA3 A3-TTFTE 01797 M01S01597.tafrec +++| ZR X3,GHL1 IF NO NETWORK FILE FOR THIS ID 01798 M01S01598.tafrec +++| LX3 TFHON-1-TFHOS RIGHT JUSTIFY HIGHEST ORDINAL 01799 M01S01599.tafrec +++| BX4 -X0*X3 HIGHEST ORDINAL OF PREVIOUS NETWORK FILE 01800 M01S01600.tafrec +++| SX4 X4+1 LOWEST ORDINAL FOR THIS NETWORK FILE 01801 M01S01601.tafrec +++| GHL2 SX0 TSTLLE 01802 M01S01602.tafrec +++| IX2 X0*X2 CONVERT TO OFFSET 01803 M01S01603.tafrec +++| IX4 X0*X4 01804 M01S01604.tafrec +++| SX0 TST 01805 M01S01605.tafrec +++| IX6 X0+X2 CONVERT TO ABSOLUTE ADDRESS 01806 M01S01606.tafrec +++| IX7 X0+X4 01807 M01S01607.tafrec +++| EQ GHLX RETURN 01808 M01S01608.tafrec +++| ZFB SPACE 4,10 01809 M01S01609.tafrec +++|** ZFB - ZERO FILL BUFFER. 01810 M01S01610.tafrec +++|* 01811 M01S01611.tafrec +++|* ENTRY (B5) = FWA OF BUFFER. 01812 M01S01612.tafrec +++|* (B6) = NUMBER OF WORDS. 01813 M01S01613.tafrec +++|* 01814 M01S01614.tafrec +++|* USES X - 6. 01815 M01S01615.tafrec +++|* A - 6. 01816 M01S01616.tafrec +++|* B - 5, 6. 01817 M01S01617.tafrec +++| 01818 M01S01618.tafrec +++| 01819 M01S01619.tafrec +++| ZFB SUBR ENTRY/EXIT 01820 M01S01620.tafrec +++| EQ B6,ZFBX IF NONE 01821 M01S01621.tafrec +++| SX6 B0+ 01822 M01S01622.tafrec +++| ZFB1 SA6 B5 01823 M01S01623.tafrec +++| SB5 B5+B1 01824 M01S01624.tafrec +++| SB6 B6-B1 01825 M01S01625.tafrec +++| NE B6,ZFB1 IF MORE TO DO 01826 M01S01626.tafrec +++| EQ ZFBX RETURN 01827 M01S01627.tafrec +++| ALC SPACE 4,15 01828 M01S01628.tafrec +++|** ALC - ADVANCE LINE COUNT. 01829 M01S01629.tafrec +++|* 01830 M01S01630.tafrec +++|* ADVANCE THE LINE COUNT OF THE REPORT FILE AND IF 01831 M01S01631.tafrec +++|* NECESSARY, PRINT THE HEADING AND SUBHEADING ON A NEW PAGE. 01832 M01S01632.tafrec +++|* 01833 M01S01633.tafrec +++|* ENTRY (B2) = NUMBER OF LINES TO ADVANCE. 01834 M01S01634.tafrec +++|* 01835 M01S01635.tafrec +++|* USES X - 1, 2, 6, 7. 01836 M01S01636.tafrec +++|* A - 1, 2, 6. 01837 M01S01637.tafrec +++|* 01838 M01S01638.tafrec +++|* CALLS CDD. 01839 M01S01639.tafrec +++|* 01840 M01S01640.tafrec +++|* MACROS WRITEW. 01841 M01S01641.tafrec +++| 01842 M01S01642.tafrec +++| 01843 M01S01643.tafrec +++| ALC SUBR ENTRY/EXIT 01844 M01S01644.tafrec +++| SA1 LCNT CURRENT LINE COUNT 01845 M01S01645.tafrec +++| SX6 X1+B2 01846 M01S01646.tafrec +++| SX7 X6-LINP 01847 M01S01647.tafrec +++| PL X7,ALC1 IF PAGE FULL 01848 M01S01648.tafrec +++| SA6 A1 01849 M01S01649.tafrec +++| EQ ALCX RETURN 01850 M01S01650.tafrec +++| 01851 M01S01651.tafrec +++| ALC1 SX6 B2+5 LINE COUNT PLUS HEADING 01852 M01S01652.tafrec +++| SA2 SBHD+2 01853 M01S01653.tafrec +++| IX6 X6+X2 INCLUDE SUBHEADING LINE COUNT 01854 M01S01654.tafrec +++| SA6 A1 01855 M01S01655.tafrec +++| SA1 PCNT 01856 M01S01656.tafrec +++| SX1 X1+B1 INCREMENT PAGE COUNT 01857 M01S01657.tafrec +++| BX6 X1 01858 M01S01658.tafrec +++| SA6 A1+ 01859 M01S01659.tafrec +++| RJ CDD CONVERT TO DISPLAY CODE 01860 M01S01660.tafrec +++| BX6 X4 01861 M01S01661.tafrec +++| SA6 HEAD1 01862 M01S01662.tafrec +++| WRITEW R,HEAD,HEADL WRITE NEW HEADING 01863 M01S01663.tafrec +++| SA1 SBHD SUBHEADING ADDRESS 01864 M01S01664.tafrec +++| SA2 A1+B1 LENGTH 01865 M01S01665.tafrec +++| WRITEW R,X1,X2 01866 M01S01666.tafrec +++| EQ ALCX RETURN 01867 M01S01667.tafrec +++| ERR SPACE 4,10 01868 M01S01668.tafrec +++|** ERR - ERROR PROCESSOR. 01869 M01S01669.tafrec +++|* 01870 M01S01670.tafrec +++|* ISSUE A DAYFILE ERROR MESSAGE AND ABORT *TAFREC*. 01871 M01S01671.tafrec +++|* 01872 M01S01672.tafrec +++|* ENTRY (B5) = FWA OF ERROR MESSAGE. 01873 M01S01673.tafrec +++|*
| Line S01674 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01874 M02S01674.ns22000 ---|* MACROS ABORT, MESSAGE, ENFAM, SETUI, WRITER. 01875 M01S00033.ns22000 +++|* MACROS ABORT, MESSAGE, SETPFP, WRITER. 01876 M01S01675.tafrec +++| 01877 M01S01676.tafrec +++| 01878 M01S01677.tafrec +++| ERR MESSAGE B5,0,R ISSUE SPECIFIC ERROR MESSAGE 01879 M01S01678.tafrec +++| MESSAGE ERRA,0,R
| Line S01679 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01880 M02S01679.ns22000 ---| ENFAM DFFM RESET TO DEFAULT FAMILY 01881 M01S00034.ns22000 +++| SA1 DFFM DEFAULT FAMILY 01882 M01S00035.ns22000 +++| SX0 10B *SETPFP* FLAGS 01883 M01S00036.ns22000 +++| BX6 X0+X1 01884 M01S00037.ns22000 +++| SA6 PFPA *SETPFP* CALL BLOCK 01885 M01S00038.ns22000 +++| SETPFP PFPA RESET TO DEFAULT FAMILY 01886 M01S01680.tafrec +++| WRITER R,R FLUSH REPORT FILE BUFFER
| Line S01681 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01887 M02S01681.ns22000 ---| SETUI 0 01888 M01S01682.tafrec +++| ABORT 01889 M01S01683.tafrec +++| 01890 M01S01684.tafrec +++| ERRA DATA C* CRF RECOVERY/INITIALIZATION ABORTED.* 01891 M01S01685.tafrec +++| SPACE 4,10 01892 M01S01686.tafrec +++|* COMMON DECKS. 01893 M01S01687.tafrec +++| 01894 M01S01688.tafrec +++| LIST X 01895 M01S01689.tafrec +++|*CALL COMKFIO 01896 M01S01690.tafrec +++| LIST -X 01897 M01S01691.tafrec +++| SPACE 4,10 01898 M01S01692.tafrec +++|*CALL COMCCDD 01899 M01S01693.tafrec +++|*CALL COMCCIO 01900 M01S01694.tafrec +++|*CALL COMCCOD 01901 M01S01695.tafrec +++|*CALL COMCCPM 01902 M01S01696.tafrec +++|*CALL COMCDXB 01903 M01S01697.tafrec +++|*CALL COMCLFM 01904 M01S01698.tafrec +++|*CALL COMCPFM 01905 M01S01699.tafrec +++|*CALL COMCRDW 01906 M01S01700.tafrec +++|*CALL COMCSFN 01907 M01S01701.tafrec +++|*CALL COMCSNM 01908 M01S01702.tafrec +++|*CALL COMCSYS 01909 M01S01703.tafrec +++|*CALL COMCWTC 01910 M01S01704.tafrec +++|*CALL COMCWTW 01911 M01S00002.241l630 +++|*CALL COMCZTB 01912 M01S01705.tafrec +++| TITLE *TAFREC* PRESET ROUTINES. 01913 M01S01706.tafrec +++| PRS SPACE 4,10 01914 M01S01707.tafrec +++|** PRS - PRESET *TAFREC*. 01915 M01S01708.tafrec +++|* 01916 M01S01709.tafrec +++|* PERFORM PRESET PROCESSING FOR *TAFREC*. 01917 M01S01710.tafrec +++|* PRESET CONSISTS OF - 01918 M01S01711.tafrec +++|* 01919 M01S01712.tafrec +++|* PROCESSING THE TCF. 01920 M01S01713.tafrec +++|* SETTING THE *K-DISPLAY*. 01921 M01S01714.tafrec +++|* PROCESSING THE NETWORK FILE(S).
| Line S01715 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01922 M02S01715.ns2023 ---|* ATTACHING OR DEFINING THE TRF(S). 01923 M01S00147.ns2023 +++|* ATTACHING OR DEFINING THE CRF(S). 01924 M01S00003.241l630 +++|* 01925 M01S00004.241l630 +++|* CALLS CDD, COD, IIM, PNF, PRK, PTF, RKD, SKD, 01926 M01S00005.241l630 +++|* SRS, ZFB. 01927 M01S00006.241l630 +++|*
| Line S01716 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01928 M02S01716.ns22000 ---|* MACROS CLOCK, DATE, ENFAM, READ, READW, REWIND, SETUI, 01929 M01S00039.ns22000 +++|* MACROS CLOCK, DATE, GETPFP, READ, READW, REWIND, 01930 M01S01717.tafrec +++|* STATUS, WRITEW. 01931 M01S01718.tafrec +++| 01932 M01S01719.tafrec +++| 01933 M01S01720.tafrec +++| PRS SUBR 01934 M01S01721.tafrec +++| SB1 1 01935 M01S01722.tafrec +++| SX7 B0+ 01936 M01S00001.tafrc1 +++| SA7 VECSC CLEAR CURRENT ECS ADDRESS 01937 M01S01723.tafrec +++| SA7 VTST SET *O-DISPLAY* INACTIVE
| Line S01724 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01938 M02S01724.ns22000 ---| SETUI TRUI SET *TAF* USER INDEX 01939 M01S01725.tafrec +++| DATE DATE 01940 M01S01726.tafrec +++| CLOCK TIME
| Line S01727 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01941 M02S01727.ns22000 ---| ENFAM FM GET DEFAULT FAMILY
| Line S01728 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01942 M02S01728.ns22000 ---| SA1 FM SAVE DEFAULT FAMILY 01943 M01S00040.ns22000 +++| GETPFP PFPA GET PERMANENT FILE PARAMETERS 01944 M01S00041.ns22000 +++| SA1 PFPA 01945 M01S01729.tafrec +++| BX6 X1 01946 M01S01730.tafrec +++| SA6 DFFM
| Line S01731 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01947 M02S01731.ns22000 ---| ENFAM FM RESTORE DEFAULT FAMILY 01948 M01S01732.tafrec +++| SX7 TTFTL 01949 M01S01733.tafrec +++| SA7 TSTLW PRESET TST LENGTH 01950 M01S01734.tafrec +++| SA1 DATE 01951 M01S01735.tafrec +++| SA2 TIME 01952 M01S01736.tafrec +++| BX6 X1 01953 M01S01737.tafrec +++| BX7 X2 01954 M01S01738.tafrec +++| SA6 PRSC 01955 M01S01739.tafrec +++| SA7 A6+B1 01956 M01S01740.tafrec +++| WRITEW R,PRSB,PRSBL WRITE REPORT FILE BANNER 01957 M01S01741.tafrec +++| SX7 PMSG ADDRESS OF *PFM* ERROR MESSAGES
| Line S01742 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01958 M02S01742.ns2023 ---| SA7 TRF+CFPW
| Line S01743 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 01959 M02S01743.ns2023 ---| SA7 TRFA+CFPW 01960 M01S00148.ns2023 +++| SA7 CRF+CFPW 01961 M01S00149.ns2023 +++| SA7 CRFA+CFPW 01962 M01S01744.tafrec +++| SA7 TCF+CFPW 01963 M01S01745.tafrec +++| SA7 N+CFPW 01964 M01S01746.tafrec +++| SB5 TSTHD FWA OF TST HEADER 01965 M01S01747.tafrec +++| SB6 TTFTL+TSTLLE HEADER LENGTH + FIRST TST ENTRY 01966 M01S01748.tafrec +++| RJ ZFB ZERO FILL BUFFER 01967 M01S01749.tafrec +++| 01968 M01S01750.tafrec +++|* DETERMINE IF RESTART. 01969 M01S01751.tafrec +++| 01970 M01S01752.tafrec +++| SA1 B0 POSITION TO SENSE SWITCH 3 01971 M01S01753.tafrec +++| LX1 59-8 01972 M01S01754.tafrec +++| PL X1,PRS1 IF RECOVERY MODE NOT SELECTED 01973 M01S01755.tafrec +++| REWIND TIF,R 01974 M01S01756.tafrec +++| READ TIF 01975 M01S01757.tafrec +++| READW TIF,PRSA,1 READ WORD ONE INTO TEMPORARY LOCATION 01976 M01S01758.tafrec +++| SX6 B1 SET RESTART FLAG 01977 M01S01759.tafrec +++| LX6 TIRFS-0 01978 M01S01760.tafrec +++| SA6 PRSA 01979 M01S01761.tafrec +++| READW TIF,VLOCS,VLOCL RESTORE POINTERS 01980 M01S01762.tafrec +++| SX7 B0+ 01981 M01S01763.tafrec +++| SA7 VTST SET *O-DISPLAY* INACTIVE 01982 M01S01764.tafrec +++| SA7 VTOT CLEAR *TOTAL* LOAD FLAG
| Line S01765 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | tafrc1 |
M03 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 01983 M03S01765.v23l617 ---| SA7 VECSC CLEAR CURRENT ECS ADDRESS 01984 M01S00011.v23l617 +++| SA7 VECSC CLEAR CURRENT EXTENDED MEMORY ADDRESS 01985 M01S01766.tafrec +++| REWIND TIF 01986 M01S01767.tafrec +++| SA7 VINT CLEAR *TAFXXX1* COMPLETE FLAG 01987 M01S01768.tafrec +++| SA1 PRSE INDICATE RESTART 01988 M01S01769.tafrec +++| BX6 X1 01989 M01S01770.tafrec +++| SA6 HEAD2 01990 M01S01771.tafrec +++| RJ RKD SET UP RESTART *K-DISPLAY* 01991 M01S01772.tafrec +++| EQ PRS2 PROCESS TCF 01992 M01S01773.tafrec +++| 01993 M01S01774.tafrec +++|* SET UP INITIAL *TAFREC* VALUES. 01994 M01S01775.tafrec +++| 01995 M01S01776.tafrec +++| PRS1 BX7 X7-X7 CLEAR *TAFXXX1* COMPLETE FLAG 01996 M01S01777.tafrec +++| SA7 VINT 01997 M01S01778.tafrec +++| SX6 NSCP 01998 M01S01779.tafrec +++| SX7 NCMB 01999 M01S01780.tafrec +++| LX6 41-17 02000 M01S01781.tafrec +++| LX7 41-17 02001 M01S01782.tafrec +++| SA6 VNSCP NUMBER OF SUBCONTROL POINTS 02002 M01S01783.tafrec +++| SA7 VNCMB NUMBER OF COMMUNICATION BLOCKS 02003 M01S01784.tafrec +++| SX7 SCMFL 02004 M01S01785.tafrec +++| SA7 VMFL MAXIMUM FL FOR SUBCONTROL POINTS
| Line S01786 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02005 M02S01786.v23l617 ---| SX7 ECSFL MAXIMUM ECS FOR *TAF* 02006 M01S00012.v23l617 +++| SX7 ECSFL MAXIMUM EXTENDED MEMORY FOR *TAF*
| Line S01787 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | tafrc2 |
Seq # *Modification Id* Act ----------------------------+ 02007 M02S01787.tafrc2 ---| SA7 VECS 02008 M01S01788.tafrec +++| SX6 RECDF 02009 M01S01789.tafrec +++| SA6 VREC USER RECOVERY FLAG DEFAULT VALUE 02010 M01S01790.tafrec +++| SA1 PRSD 02011 M01S01791.tafrec +++| BX6 X1 02012 M01S00001.tafrc2 +++| LX7 9 CORRECTLY POSITION *ECSFL* 02013 M01S00002.tafrc2 +++| SA7 VECS 02014 M01S01792.tafrec +++| SA6 VTFL SYSTEM TASK LIBRARY FILE NAME 02015 M01S01793.tafrec +++| SX1 CMMBFL BASE FL FOR CMM 02016 M01S01794.tafrec +++| SX6 CMMEFL EXPANDABLE FL FOR CMM 02017 M01S01795.tafrec +++| LX6 18 02018 M01S01796.tafrec +++| BX7 X1+X6 02019 M01S00001.ns2157 +++| SX1 CMMTFL TARGET FL FOR CMM 02020 M01S00002.ns2157 +++| LX1 36 02021 M01S00003.ns2157 +++| BX7 X1+X7 02022 M01S01797.tafrec +++| SA7 VCMM SAVE CMM FL 02023 M01S01798.tafrec +++| 02024 M01S01799.tafrec +++|* SAVE INITIAL *TIF* VALUES IN CASE OF ABORT. 02025 M01S01800.tafrec +++| 02026 M01S01801.tafrec +++| REWIND TIF,R 02027 M01S01802.tafrec +++| WRITEW TIF,PRSA,1 STATUS WORD 02028 M01S01803.tafrec +++| WRITEW TIF,VLOCS,VLOCL LOW CORE SYMBOLS 02029 M01S01804.tafrec +++| WRITER TIF,R FLUSH BUFFER 02030 M01S01805.tafrec +++| 02031 M01S01806.tafrec +++|* PROCESS *TAF* CONFIGURATION PARAMETERS. 02032 M01S01807.tafrec +++| 02033 M01S01808.tafrec +++| PRS2 RJ PTF PROCESS TAF CONFIGURATION FILE 02034 M01S01809.tafrec +++| ZR X2,PRS3 IF *K-DISPLAY* NOT REQUESTED 02035 M01S00007.241l630 +++| SX3 KPRS 02036 M01S00008.241l630 +++| RJ PRK PRESET K-DISPLAY BUFFER 02037 M01S01810.tafrec +++| RJ SKD SET *K-DISPLAY* 02038 M01S01811.tafrec +++| 02039 M01S01812.tafrec +++|* COMPUTE NUMBER OF C.B.-S RESERVED FOR SMALL INPUT. 02040 M01S01813.tafrec +++| 02041 M01S01814.tafrec +++| PRS3 SB5 -NLIN*NCBC NUMBER OF C.B. FOR LARGE INPUT 02042 M01S01815.tafrec +++| SA2 VNCMB NUMBER OF C.B.-S 02043 M01S01816.tafrec +++| LX2 17-41 02044 M01S01817.tafrec +++| SX6 X2+B5 COMPUTE *VNSIN* 02045 M01S01818.tafrec +++| SX6 X6-RSCMB 02046 M01S01819.tafrec +++| LX6 41-17 02047 M01S01820.tafrec +++| SB5 PRSG 02048 M01S01821.tafrec +++| NG X6,ERR IF NOT ENOUGH C.B.-S 02049 M01S01822.tafrec +++| SA6 VNSIN 02050 M01S01823.tafrec +++| 02051 M01S01824.tafrec +++|* PROCESS NETWORK FILES. 02052 M01S01825.tafrec +++| 02053 M01S01826.tafrec +++| SA1 CUID 02054 M01S01827.tafrec +++| SX2 MAXNF 02055 M01S01828.tafrec +++| SX1 X1+B1 NEXT ID 02056 M01S01829.tafrec +++| IX2 X2-X1 02057 M01S01830.tafrec +++| ZR X2,PRS4 IF ALL ID-S PROCESSED 02058 M01S01831.tafrec +++| SX2 2 02059 M01S01832.tafrec +++| IX5 X2*X1 02060 M01S01833.tafrec +++| BX6 X1 02061 M01S01834.tafrec +++| SA6 A1 02062 M01S01835.tafrec +++| SA1 TFAM+X5+1 02063 M01S01836.tafrec +++| ZR X1,PRS3 IF NO NETWORK FILE 02064 M01S01837.tafrec +++| RJ PNF PROCESS NETWORK FILE 02065 M01S01838.tafrec +++| SX1 IPTAR 02066 M01S01839.tafrec +++| ZR X1,PRS3 IF AUTO RECOVERY DISABLED 02067 M01S01840.tafrec +++| RJ SRS SET RECOVERY STATUS 02068 M01S01841.tafrec +++| EQ PRS3 NEXT ID 02069 M01S01842.tafrec +++| 02070 M01S01843.tafrec +++|* WRITE LOW CORE POINTERS. 02071 M01S01844.tafrec +++| 02072 M01S01845.tafrec +++| PRS4 REWIND TIF,R 02073 M01S01846.tafrec +++| WRITEW TIF,PRSA,1 FALGS FOR *TAF1* 02074 M01S01847.tafrec +++| WRITEW TIF,VLOCS,VLOCL WRITE LOW CM POINTERS 02075 M01S01848.tafrec +++| 02076 M01S01849.tafrec +++|* ISSUE DAYFILE MESSAGES. 02077 M01S01850.tafrec +++| 02078 M01S01851.tafrec +++| PRS6 MESSAGE IIMA * INITIALIZATION OPTIONS.* 02079 M01S01852.tafrec +++| SA1 VNCMB NUMBER OF COMMUNICATION BLOCKS 02080 M01S01853.tafrec +++| LX1 -24 02081 M01S01854.tafrec +++| RJ CDD CONSTANT TO DECIMAL DISPLAY 02082 M01S01855.tafrec +++| SB5 IIMB * K.CMB=XX.* 02083 M01S01856.tafrec +++| BX1 X6 02084 M01S01857.tafrec +++| LX1 48 02085 M01S01858.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE
| Line S01859 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02086 M02S01859.v23l617 ---| SA1 VECS ECS FL 02087 M01S00013.v23l617 +++| SA1 VECS EXTENDED MEMORY FL 02088 M01S01860.tafrec +++| LX1 -9 02089 M01S01861.tafrec +++| RJ COD CONSTANT TO OCTAL DISPLAY 02090 M01S01862.tafrec +++| BX1 X6 02091 M01S01863.tafrec +++| LX1 42 02092 M01S01864.tafrec +++| SB5 IIMC * K.ECS=XXXK.* 02093 M01S01865.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02094 M01S01866.tafrec +++| SA1 VMFL TAF MAXIMUM FL 02095 M01S01867.tafrec +++| RJ COD CONSTANT TO OCTAL DISPLAY 02096 M01S01868.tafrec +++| BX1 X6 02097 M01S01869.tafrec +++| LX1 24 02098 M01S01870.tafrec +++| SB5 IIME * K.MFL=XXXXXXB.* 02099 M01S01871.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02100 M01S01872.tafrec +++| SA2 VREC GET RECOVERY FLAG 02101 M01S01873.tafrec +++| SX1 3L NO 02102 M01S01874.tafrec +++| LX1 42 02103 M01S01875.tafrec +++| ZR X2,PRS7 IF USER RECOVERY NOT SET 02104 M01S01876.tafrec +++| SX1 3LYES 02105 M01S01877.tafrec +++| LX1 42 02106 M01S01878.tafrec +++| SX2 X2 02107 M01S01879.tafrec +++| NZ X2,PRS7 IF USER RECOVERY SET 02108 M01S01880.tafrec +++| SX1 3LCRM 02109 M01S01881.tafrec +++| LX1 42 02110 M01S01882.tafrec +++| PRS7 SB5 IIMF * K.REC=XXX.* 02111 M01S01883.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02112 M01S01884.tafrec +++| SA1 VNSCP NUMBER OF SUBCONTROL POINTS 02113 M01S01885.tafrec +++| LX1 -24 02114 M01S01886.tafrec +++| RJ CDD CONSTANT TO DECIMAL DISPLAY 02115 M01S01887.tafrec +++| BX1 X6 02116 M01S01888.tafrec +++| LX1 48 02117 M01S01889.tafrec +++| SB5 IIMG * K.SCP=XX.* 02118 M01S01890.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02119 M01S01891.tafrec +++| SA1 VTFL NAME OF SYSTEM TASK LIBRARY 02120 M01S01892.tafrec +++| AX1 18 02121 M01S01893.tafrec +++| LX1 18 02122 M01S01894.tafrec +++| SB5 IIMH * K.TLF=XXXXXXX.* 02123 M01S01895.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE
| Line S01896 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02124 M02S01896.ns2023 ---| SA1 INTG TRF INTIALIZATION OPTION
| Line S01897 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02125 M02S01897.ns2023 ---| SB5 IIMI * K.INT=TRF,XXXXXXX.* 02126 M01S00150.ns2023 +++| SA1 INTG *CRF* INTIALIZATION OPTION 02127 M01S00151.ns2023 +++| SB5 IIMI * K.INT=CRF,XXXXXXX.* 02128 M01S01898.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02129 M01S01899.tafrec +++| SA2 PRSA 02130 M01S01900.tafrec +++| LX2 59-TICRS *CRM* INITIALIZATION OPTION 02131 M01S01901.tafrec +++| SA1 PRSF 02132 M01S01902.tafrec +++| PL X2,PRS8 IF NOT *ALL* 02133 M01S01903.tafrec +++| SX1 3LALL 02134 M01S01904.tafrec +++| LX1 42 02135 M01S01905.tafrec +++| PRS8 SB5 IIMJ * K.INT=CRM,XXXX.* 02136 M01S01906.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE
| Line S01907 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02137 M02S01907.ns2023 ---| SA2 OVRD TRF ERROR OVERRIDE OPTION 02138 M01S00152.ns2023 +++| SA2 OVRD *CRF* ERROR OVERRIDE OPTION 02139 M01S01908.tafrec +++| SX1 3L NO 02140 M01S01909.tafrec +++| LX1 42 02141 M01S01910.tafrec +++| ZR X2,PRS9 IF NOT ERROR OVERRIDE 02142 M01S01911.tafrec +++| SX1 3LYES 02143 M01S01912.tafrec +++| LX1 42
| Line S01913 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02144 M02S01913.ns2023 ---| PRS9 SB5 IIMK * K.ERO=TRF,XXX.* 02145 M01S00153.ns2023 +++| PRS9 SB5 IIMK * K.ERO=CRF,XXX.* 02146 M01S01914.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02147 M01S01915.tafrec +++| SA2 VCMM CMM FL 02148 M01S01916.tafrec +++| SX1 X2 CMM BASE FL 02149 M01S01917.tafrec +++| RJ COD CONVERT OCTAL TO DISPLAY 02150 M01S01918.tafrec +++| BX1 X4 02151 M01S01919.tafrec +++| SB5 IIML * K.BFL=XXXXXXB.* 02152 M01S01920.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02153 M01S01921.tafrec +++| SA1 VCMM 02154 M01S01922.tafrec +++| AX1 18 CMM EXPANDABLE FL 02155 M01S00004.ns2157 +++| SX1 X1 02156 M01S01923.tafrec +++| RJ COD CONVERT OCTAL TO DISPLAY 02157 M01S01924.tafrec +++| BX1 X4 02158 M01S01925.tafrec +++| SB5 IIMM * K.EFL=XXXXXXB.* 02159 M01S01926.tafrec +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02160 M01S00005.ns2157 +++| SA1 VCMM 02161 M01S00006.ns2157 +++| AX1 36 02162 M01S00007.ns2157 +++| RJ COD CONVERT OCTAL TO DISPLAY 02163 M01S00008.ns2157 +++| BX1 X4 02164 M01S00009.ns2157 +++| SB5 IIMN * K.TFL=XXXXXXB.* 02165 M01S00010.ns2157 +++| RJ IIM ISSUE INITIALIZATION MESSAGE 02166 M01S01927.tafrec +++| EQ PRSX RETURN 02167 M01S01928.tafrec +++| 02168 M01S01929.tafrec +++| PRSA CON 0 FLAG WORD 02169 M01S01930.tafrec +++| 02170 M01S01931.tafrec +++|* REPORT FILE BANNER 02171 M01S01932.tafrec +++| 02172 M01S01933.tafrec +++| PRSB DATA C/1**************************************************** 02173 M01S01934.tafrec +++|,*****************/ 02174 M01S01935.tafrec +++| DATA 1L 02175 M01S01936.tafrec +++| DATA 1L 02176 M01S01937.tafrec +++| DATA 10H 02177 M01S01938.tafrec +++| DATA C* TAF INITIALIZATION AND RECOVERY REPORT* 02178 M01S01939.tafrec +++| DATA 1L 02179 M01S01940.tafrec +++| DATA 20H 02180 M01S01941.tafrec +++| DATA C*GIVE TO TAF ADMINISTRATOR* 02181 M01S01942.tafrec +++| DATA 1L 02182 M01S01943.tafrec +++| DATA 20H 02183 M01S01944.tafrec +++| PRSC BSS 2 DATE/TIME 02184 M01S01945.tafrec +++| DATA 1L 02185 M01S01946.tafrec +++| DATA 1L 02186 M01S01947.tafrec +++| DATA C/ **************************************************** 02187 M01S01948.tafrec +++|,*****************/ 02188 M01S01949.tafrec +++| PRSBL EQU *-PRSB 02189 M01S01950.tafrec +++| 02190 M01S01951.tafrec +++| PRSD VFD 42/0L"TLFM",18/1 02191 M01S01952.tafrec +++| PRSE DATA 10H RESTART 02192 M01S01953.tafrec +++| PRSF DATA 4LNONE 02193 M01S01954.tafrec +++| PRSG DATA C* NOT ENOUGH COMMUNICATION BLOCKS DEFINED.* 02194 M01S01955.tafrec +++| IIM SPACE 4,10 02195 M01S01956.tafrec +++|** IIM - ISSUE INITIALIZATION MESSAGE. 02196 M01S01957.tafrec +++|* 02197 M01S01958.tafrec +++|* ENTRY (B5) = FWA OF MESSAGE. 02198 M01S01959.tafrec +++|* (X1) = VALUE TO BE PUT IN MESSAGE. 02199 M01S01960.tafrec +++|* 02200 M01S01961.tafrec +++|* USES B - 2, 3, 5. 02201 M01S01962.tafrec +++|* 02202 M01S01963.tafrec +++|* CALLS SNM. 02203 M01S01964.tafrec +++| 02204 M01S01965.tafrec +++| 02205 M01S01966.tafrec +++| IIM SUBR ENTRY/EXIT 02206 M01S01967.tafrec +++| SB2 1RX SET REPLACEMENT CHARACTER 02207 M01S01968.tafrec +++| SB3 DAYB ALTERNATE ASSEMBLY AREA 02208 M01S01969.tafrec +++| SB5 -B5 02209 M01S01970.tafrec +++| RJ SNM SET NAME IN MESSAGE 02210 M01S01971.tafrec +++| MESSAGE DAYB ISSUE MESSAGE TO DAYFILE 02211 M01S01972.tafrec +++| EQ IIMX RETURN 02212 M01S01973.tafrec +++| 02213 M01S01974.tafrec +++| IIMA DATA C* INITIALIZATION OPTIONS.* 02214 M01S01975.tafrec +++| IIMB DATA C* K.CMB=XX.* 02215 M01S01976.tafrec +++| IIMC DATA C* K.ECS=XXXK.* 02216 M01S01977.tafrec +++| IIME DATA C* K.MFL=XXXXXXB.* 02217 M01S01978.tafrec +++| IIMF DATA C* K.REC=XXX.* 02218 M01S01979.tafrec +++| IIMG DATA C* K.SCP=XX.* 02219 M01S01980.tafrec +++| IIMH DATA C* K.TLF=XXXXXXX.* 02220 M01S01981.tafrec +++| IIMI DATA C* K.INT=CRF,XXXXXXX.* 02221 M01S01982.tafrec +++| IIMJ DATA C* K.INT=CRM,XXXX.* 02222 M01S01983.tafrec +++| IIMK DATA C* K.ERO=CRF,XXX.* 02223 M01S01984.tafrec +++| IIML DATA C* K.BFL=XXXXXXB.* 02224 M01S01985.tafrec +++| IIMM DATA C* K.EFL=XXXXXXB.* 02225 M01S00011.ns2157 +++| IIMN DATA C* K.TFL=XXXXXXB.* 02226 M01S01986.tafrec +++| PTF SPACE 4,40 02227 M01S01987.tafrec +++|** PTF - PROCESS *TAF* CONFIGURATION FILE. 02228 M01S01988.tafrec +++|* 02229 M01S01989.tafrec +++|* READ DIRECTIVES FROM THE TCF AND VALIDATE THE 02230 M01S01990.tafrec +++|* PARAMETERS. ALL DIRECTIVES ARE VALIDATED BUT ONLY A SUBSET 02231 M01S01991.tafrec +++|* OF THEM ARE FULLY PROCESSED WITHIN *TAFREC*. THE OTHERS 02232 M01S01992.tafrec +++|* RECEIVE FINAL PROCESSING IN *TAFNAM1*. 02233 M01S01993.tafrec +++|* 02234 M01S01994.tafrec +++|* VALID DIRECTIVES ARE - 02235 M01S01995.tafrec +++|* 02236 M01S01996.tafrec +++|* * DISPLAY(DSTAT) 02237 M01S01997.tafrec +++|* * K.COMMAND. 02238 M01S01998.tafrec +++|* * NETWORK(ID=I,FM=FAMILY,UN=USERNAM) 02239 M01S01999.tafrec +++|* * RECOVER(ID=I,NM=NMSG,MS=MSIZE) 02240 M01S02000.tafrec +++|* DMS(DM,SW,DB1,DB2,...,DBN) 02241 M01S02001.tafrec +++|* 02242 M01S02002.tafrec +++|* WHERE DSTAT = *ON* OR *OFF* DEFINES IF K-DISPLAY IS USED. 02243 M01S02003.tafrec +++|* COMMAND = INITIALIZATION OPTIONS, STOP, END OR GO.
| Line S02004 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02244 M02S02004.ns2023 ---|* I = NETWORK FILE AND TRF ID (0-7).
| Line S02005 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02245 M02S02005.ns2023 ---|* FAMILY = FAMILY WHERE NETWORK FILE AND TRF RESIDE.
| Line S02006 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02246 M02S02006.ns2023 ---|* USERNAM = USER NAME OF NETWORK FILE AND TRF.
| Line S02007 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2023 |
Seq # *Modification Id* Act ----------------------------+ 02247 M02S02007.ns2023 ---|* NMSG = NUMBER OF USER MESSAGES/TERMINAL ON TRF. 02248 M01S00154.ns2023 +++|* I = NETWORK FILE AND *CRF* ID (0-7). 02249 M01S00155.ns2023 +++|* FAMILY = FAMILY WHERE NETWORK FILE AND *CRF* RESIDE. 02250 M01S00156.ns2023 +++|* USERNAM = USER NAME OF NETWORK FILE AND *CRF*. 02251 M01S00157.ns2023 +++|* NMSG = NUMBER OF USER MESSAGES/TERMINAL ON *CRF*. 02252 M01S02008.tafrec +++|* MSIZE = MAXIMUM USER MESSAGE SIZE. 02253 M01S02009.tafrec +++|* DM = DATA MANAGER (*TAF*,*CRM*,*TOTAL*,*OTHER*). 02254 M01S02010.tafrec +++|* SW = *ON* OR *OFF*. 02255 M01S02011.tafrec +++|* DBI = DATA BASE NAMES. 02256 M01S02012.tafrec +++|* 02257 M01S02013.tafrec +++|* DIRECTIVES FLAGGED BY * ARE FULLY PROCESSED IN *TAFREC*. 02258 M01S02014.tafrec +++|* 02259 M01S02015.tafrec +++|* EXIT (X2) .NE. 0 IF K-DISPLAY TO BE SET. 02260 M01S02016.tafrec +++|* *TCF* PROCESSED. 02261 M01S02017.tafrec +++|* (B5) = FWA OF ERROR MESSAGE IF ERROR. 02262 M01S02018.tafrec +++|* TO *SKD* IF ERRORS IN *TCF*. 02263 M01S02019.tafrec +++|* TO *ERR* IF *TCF* NOT FOUND, OTHER THAN 02264 M01S02020.tafrec +++|* *K.COMMAND* ERRORS OR OPERATOR TERMINATION. 02265 M01S02021.tafrec +++|* 02266 M01S02022.tafrec +++|* USES X - ALL. 02267 M01S02023.tafrec +++|* A - ALL. 02268 M01S02024.tafrec +++|* B - 2, 3, 4, 5, 7. 02269 M01S02025.tafrec +++|* 02270 M01S02026.tafrec +++|* CALLS ALC, DMS, DSP, DXB, NET, PKC, RCV, SKD, UPC. 02271 M01S02027.tafrec +++|* 02272 M01S02028.tafrec +++|* MACROS GET, MESSAGE, READ, READC, REWIND, STATUS, WRITEC, 02273 M01S02029.tafrec +++|* WRITEW. 02274 M01S02030.tafrec +++|*
| Line S02031 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02275 M02S02031.v23l617 ---|* NOTES *K-DISPLAY* WILL BE SET IN CASE OF INVALID DIRECTIVES. 02276 M01S00014.v23l617 +++|* NOTES *K-DISPLAY* WILL BE SET IN CASE OF INCORRECT 02277 M01S00015.v23l617 +++|* DIRECTIVES. 02278 M01S02032.tafrec +++| 02279 M01S02033.tafrec +++| 02280 M01S02034.tafrec +++| PTF SUBR ENTRY/EXIT 02281 M01S02035.tafrec +++| SX6 PTFQ 02282 M01S02036.tafrec +++| SX7 PTFQL 02283 M01S02037.tafrec +++| SA6 SBHD SET SUB HEADING ADDRESS 02284 M01S02038.tafrec +++| SA7 A6+B1 LENGTH 02285 M01S02039.tafrec +++| SX6 B1+B1 SUBHEADING LINE COUNT 02286 M01S02040.tafrec +++| SA6 A7+B1 02287 M01S02041.tafrec +++| 02288 M01S02042.tafrec +++|* IF TCF IS LOCAL, USE IT, OTHERWISE GET TCF 02289 M01S02043.tafrec +++|* FROM *TAF-S* USER INDEX. 02290 M01S02044.tafrec +++| 02291 M01S02045.tafrec +++| STATUS TCF SEE IF TCF IS LOCAL 02292 M01S02046.tafrec +++| SA1 X2 02293 M01S02047.tafrec +++| MX0 11 02294 M01S02048.tafrec +++| LX1 59-11 02295 M01S02049.tafrec +++| BX1 X0*X1 02296 M01S02050.tafrec +++| NZ X1,PTF1 IF TCF LOCAL 02297 M01S02051.tafrec +++| GET TCF 02298 M01S02052.tafrec +++| MX0 8 02299 M01S02053.tafrec +++| SA1 TCF 02300 M01S02054.tafrec +++| LX1 59-17 02301 M01S02055.tafrec +++| BX1 X0*X1 02302 M01S02056.tafrec +++| ZR X1,PTF1 IF TCF FOUND 02303 M01S02057.tafrec +++| SB5 PTFD 02304 M01S02058.tafrec +++| EQ ERR ERROR - FILE TCF NOT FOUND 02305 M01S02059.tafrec +++| 02306 M01S02060.tafrec +++| PTF1 REWIND TCF,R LOCAL TCF MUST BE REWOUND IF RESTART 02307 M01S02061.tafrec +++| READ TCF,R 02308 M01S02062.tafrec +++| SA1 TCF+2 IN 02309 M01S02063.tafrec +++| SA2 A1+B1 OUT 02310 M01S02064.tafrec +++| IX3 X1-X2 IN-OUT 02311 M01S02065.tafrec +++| NZ X3,PTF2 IF TCF FILE NOT EMPTY 02312 M01S02066.tafrec +++| SB5 PTFE 02313 M01S02067.tafrec +++| EQ ERR ERROR - TCF FILE EMPTY 02314 M01S02068.tafrec +++| 02315 M01S02069.tafrec +++|* SET DEFAULT *TAF* CONFIGURATION VALUES. 02316 M01S02070.tafrec +++| 02317 M01S02071.tafrec +++| PTF2 SX6 B0+ 02318 M01S02072.tafrec +++| SA1 DFNM DEFAULT *NM* 02319 M01S02073.tafrec +++| SA2 DFMS DEFAULT *MS* 02320 M01S02074.tafrec +++| SA6 ID CLEAR *ID* 02321 M01S02075.tafrec +++| BX6 X1 02322 M01S02076.tafrec +++| BX7 X2 02323 M01S02077.tafrec +++| SA6 A6+B1 02324 M01S02078.tafrec +++| SA7 A6+B1
| Line S02079 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02325 M02S02079.ns2094 ---| SA1 DFFM DEFAULT FAMILY
| Line S02080 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02326 M02S02080.ns2094 ---| SA2 DFUN DEFAULT USER NUMBER
| Line S02081 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02327 M02S02081.ns2094 ---| BX6 X1
| Line S02082 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02328 M02S02082.ns2094 ---| BX7 X2
| Line S02083 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02329 M02S02083.ns2094 ---| SA7 UN
| Line S02084 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02330 M02S02084.ns2094 ---| SA6 FM DEFAULT FAMILY 02331 M01S02085.tafrec +++| READC TCF,PTFB,16 READ DIRECTIVE IMAGE 02332 M01S02086.tafrec +++| NZ X1,PTF6 IF NO MORE ENTRIES 02333 M01S02087.tafrec +++| SB2 B1 02334 M01S02088.tafrec +++| RJ ALC ADVANCE LINE COUNT 02335 M01S02089.tafrec +++| WRITEW R,BLNK,2 02336 M01S02090.tafrec +++| WRITEC R,PTFB WRITE DIRECTIVE TO REPORT FILE 02337 M01S02091.tafrec +++| SB7 PTFC FWA TO UNPACK INTO 02338 M01S02092.tafrec +++| SA5 PTFB FIRST WORD TO UNPACK 02339 M01S02093.tafrec +++| RJ UPC UNPACK DIRECTIVE IMAGE 02340 M01S02094.tafrec +++| ZR X6,PTF3 IF NO UNPACK ERRORS
| Line S02095 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02341 M02S02095.v23l617 ---| SA0 PTFF * INVALID TCF ENTRIES* 02342 M01S00016.v23l617 +++| SA0 PTFF * INCORRECT TCF ENTRIES* 02343 M01S02096.tafrec +++| EQ PTF5 REPORT ERROR 02344 M01S02097.tafrec +++| 02345 M01S02098.tafrec +++| PTF3 MX0 42 02346 M01S02099.tafrec +++| SA1 PTFC 02347 M01S02100.tafrec +++| SA4 PTFA FWA OF KEYWORD TABLE 02348 M01S02101.tafrec +++| SA0 PTFH
| Line S02102 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02349 M02S02102.v23l617 ---| PTF4 ZR X4,PTF5 IF INVALID KEYWORD 02350 M01S00017.v23l617 +++| PTF4 ZR X4,PTF5 IF INCORRECT KEYWORD 02351 M01S02103.tafrec +++| BX5 X1-X4 02352 M01S02104.tafrec +++| BX2 X0*X5 02353 M01S02105.tafrec +++| SB3 X4 02354 M01S02106.tafrec +++| SA4 A4+B1 02355 M01S02107.tafrec +++| NZ X2,PTF4 IF NO MATCH 02356 M01S02108.tafrec +++| JP B3 PROCESS KEYWORD 02357 M01S02109.tafrec +++| 02358 M01S02110.tafrec +++|* ENTRY FROM *SKD*. 02359 M01S02111.tafrec +++|* WRITE ERROR MESSAGE TO RECOVERY REPORT. 02360 M01S02112.tafrec +++| 02361 M01S02113.tafrec +++| PTF5 WRITEW R,PTFG,PTFGL WRITE GENERAL ERROR MESSAGE 02362 M01S02114.tafrec +++| WRITEC R,A0 WRITE DETAILED ERROR MESSAGE
| Line S02115 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02363 M02S02115.v23l617 ---| MESSAGE PTFB,3 WRITE STATEMENT IN ERROR 02364 M01S00018.v23l617 +++| MESSAGE PTFB,3 WRITE STATEMENT IN ERROR 02365 M01S02116.tafrec +++| MESSAGE A0,3 WRITE ERROR MESSAGE 02366 M01S02117.tafrec +++| SA1 PTFN 02367 M01S02118.tafrec +++| SX6 X1+B1 INCREMENT NUMBER OF ERRORS 02368 M01S02119.tafrec +++| SA6 A1 02369 M01S02120.tafrec +++| EQ PTF2 PROCESS NEXT DIRECTIVE 02370 M01S02121.tafrec +++| 02371 M01S02122.tafrec +++| PTF6 SX6 B0 CLEAR TCF ORIGIN 02372 M01S02123.tafrec +++| SA6 KCOF 02373 M01S02124.tafrec +++| SA1 PTFZ *K.* ERROR COUNT 02374 M01S02125.tafrec +++| SA3 PTFN TOTAL ERROR COUNT 02375 M01S02126.tafrec +++| IX6 X3-X1 GET FATAL ERROR COUNT 02376 M01S02127.tafrec +++| SA6 PTFN 02377 M01S02128.tafrec +++| NZ X6,PTF7 IF FATAL ERRORS 02378 M01S02129.tafrec +++| ZR X1,PTF7 IF NO *K.* ERRORS 02379 M01S02130.tafrec +++| SA6 PTFU CLEAR *K-DISPLAY* STATUS FLAG 02380 M01S02131.tafrec +++| RJ SKD DISPLAY 02381 M01S02132.tafrec +++| PTF7 WRITEW R,PTFY,B1 BLANK LINE 02382 M01S02133.tafrec +++| SA3 PTFN ERROR COUNT
| Line S02134 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02383 M02S02134.ns2094 ---| SA2 PTFU *K-DISPLAY* STATUS 02384 M01S00001.ns2094 +++| SA2 PTFAA MUST HAVE A *USER* COMMAND 02385 M01S02135.tafrec +++| SA4 PTFO CHECK MATCH OF *NETWORK* AND *RECOVER* 02386 M01S02136.tafrec +++| IX6 X4+X3 02387 M01S00002.ns2094 +++| IX6 X6+X2 02388 M01S00003.ns2094 +++| SA2 PTFU 02389 M01S02137.tafrec +++| SA1 PTFR *TAFNAM* MUST HAVE A *NETWORK* DIRECTIVE 02390 M01S02138.tafrec +++| IX6 X6+X1 02391 M01S02139.tafrec +++| SA5 PTFS RECOVERY MUST HAVE A *RECOVER* DIRECTIVE 02392 M01S02140.tafrec +++| IX6 X6+X5 02393 M01S02141.tafrec +++| ZR X6,PTFX IF NO ERRORS 02394 M01S02142.tafrec +++| ZR X1,PTF8 IF *NETWORK* DIRECTIVE PRESENT 02395 M01S02143.tafrec +++| SA0 X4 SAVE X4 02396 M01S02144.tafrec +++| SB2 B1+B1 02397 M01S02145.tafrec +++| RJ ALC ADVANCE LINE COUNT 02398 M01S02146.tafrec +++| WRITEC R,PTFV *NETWORK* DIRECTIVE(S) REQUIRED 02399 M01S02147.tafrec +++| SX4 A0 RESTORE X4
| Line S02148 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02400 M02S02148.ns2094 ---| PTF8 ZR X5,PTF9 IF *RECOVER* DIRECTIVE PRESENT 02401 M01S00004.ns2094 +++| PTF8 ZR X5,PTF8.1 IF *RECOVER* DIRECTIVE PRESENT 02402 M01S02149.tafrec +++| BX5 X4 SAVE X4 02403 M01S02150.tafrec +++| SB2 B1+B1 02404 M01S02151.tafrec +++| RJ ALC ADVANCE LINE COUNT 02405 M01S02152.tafrec +++| WRITEC R,PTFW *RECOVER* DIRECTIVE(S) REQUIRED 02406 M01S02153.tafrec +++| BX4 X5 RESTORE X4 02407 M01S00005.ns2094 +++| PTF8.1 SA2 PTFAA 02408 M01S00006.ns2094 +++| ZR X2,PTF9 IF *USER* COMMAND PRESENT 02409 M01S00007.ns2094 +++| BX5 X4 SAVE *PTFO* FLAGS FOR *NETWORK/RECOVER* 02410 M01S00008.ns2094 +++| SB2 B1+B1 02411 M01S00009.ns2094 +++| RJ ALC ADVANCE LINE COUNT 02412 M01S00010.ns2094 +++| WRITEC R,PTFAC * USER COMMAND REQUIRED.* 02413 M01S00011.ns2094 +++| BX4 X5 RESTORE *PTFO* FLAGS FOR *NETWORK/RECOVER* 02414 M01S02154.tafrec +++| PTF9 ZR X4,PTF10 IF *RECOVER* AND *NETWORK* ID-S MATCH 02415 M01S02155.tafrec +++| SB2 B1+B1 02416 M01S02156.tafrec +++| RJ ALC ADVANCE LINE COUNT 02417 M01S02157.tafrec +++| WRITEC R,PTFP *RECOVER* AND *NETWORK* ID-S DO NOT MATCH 02418 M01S02158.tafrec +++| 02419 M01S02159.tafrec +++| 02420 M01S02160.tafrec +++| PTF10 SB5 PTFF
| Line S02161 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02421 M02S02161.v23l617 ---| EQ ERR ERROR - INVALID TCF ENTRIES 02422 M01S00019.v23l617 +++| EQ ERR ERROR - INCORRECT TCF ENTRIES 02423 M01S02162.tafrec +++| 02424 M01S02163.tafrec +++|* PROCESS *DISPLAY*. 02425 M01S02164.tafrec +++| 02426 M01S02165.tafrec +++| PTF11 SA1 PTFC+1 GET PARAMETER 02427 M01S02166.tafrec +++| RJ DSP PROCESS *DISPLAY* DIRECTIVE 02428 M01S02167.tafrec +++| SA0 PTFI 02429 M01S02168.tafrec +++| NZ X3,PTF5 IF ERROR IN DIRECTIVE 02430 M01S02169.tafrec +++| SA6 PTFU INDICATE *K-DISPLAY* STATUS 02431 M01S02170.tafrec +++| MX6 12 02432 M01S02171.tafrec +++| SA6 PTFA INHIBIT MORE *DISPLAY* DIRECTIVES 02433 M01S02172.tafrec +++| EQ PTF2 PROCESS NEXT DIRECTIVE 02434 M01S02173.tafrec +++| 02435 M01S02174.tafrec +++|* PROCESS *NETWORK*. 02436 M01S02175.tafrec +++| 02437 M01S02176.tafrec +++| PTF12 SB4 B6-1 ARGUMENT COUNT 02438 M01S02177.tafrec +++| SA4 PTFC+1 FIRST ARGUMENT 02439 M01S02178.tafrec +++| RJ NET PROCESS *NETWORK* DIRECTIVE 02440 M01S02179.tafrec +++| SB4 A0 02441 M01S02180.tafrec +++| NE B4,PTF5 IF DIRECTIVE ERROR 02442 M01S02181.tafrec +++| BX6 X6-X6 02443 M01S02182.tafrec +++| SA6 PTFR INDICATE *NETWORK* DIRECTIVE PRESENT 02444 M01S02183.tafrec +++| SX1 IPTAR 02445 M01S02184.tafrec +++| ZR X1,PTF2 IF AUTO RECOVERY NOT ENABLED 02446 M01S02185.tafrec +++| SA1 PTFO 02447 M01S02186.tafrec +++| SX2 B1 02448 M01S02187.tafrec +++| LX2 X2,B5 02449 M01S02188.tafrec +++| BX6 X1-X2 SET/CLEAR BIT FOR THIS *ID* 02450 M01S02189.tafrec +++| SA6 A1 02451 M01S02190.tafrec +++| EQ PTF2 PROCESS NEXT DIRECTIVE 02452 M01S02191.tafrec +++| 02453 M01S02192.tafrec +++|* PROCESS *RECOVER*. 02454 M01S02193.tafrec +++| 02455 M01S02194.tafrec +++| PTF13 SX1 IPTAR-1 02456 M01S02195.tafrec +++| SA0 PTFK * RECOVERY DISABLED.*
| Line S02196 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02457 M02S02196.v23l617 ---| NZ X1,PTF5 IF *RECOVER* INVALID 02458 M01S00020.v23l617 +++| NZ X1,PTF5 IF *RECOVER* INCORRECT 02459 M01S02197.tafrec +++| SA4 PTFC+1 FIRST ARGUMENT 02460 M01S02198.tafrec +++| SB4 B6-1 ARGUMENT COUNT 02461 M01S02199.tafrec +++| RJ RCV PROCESS *RECOVER* DIRECTIVE 02462 M01S02200.tafrec +++| SB4 A0+ 02463 M01S02201.tafrec +++| NE B4,PTF5 IF DIRECTIVE ERROR 02464 M01S02202.tafrec +++| SA1 PTFO 02465 M01S02203.tafrec +++| SX2 B1 02466 M01S02204.tafrec +++| LX2 X2,B6 02467 M01S02205.tafrec +++| BX6 X1-X2 SET/CLEAR BIT FOR THIS ID 02468 M01S02206.tafrec +++| SA6 A1 02469 M01S02207.tafrec +++| SX6 B0+ 02470 M01S02208.tafrec +++| SA6 PTFS INDICATE *RECOVER* DIRECTIVE PRESENT 02471 M01S02209.tafrec +++| EQ PTF2 PROCESS NEXT DIRECTIVE 02472 M01S02210.tafrec +++| 02473 M01S02211.tafrec +++|* PROCESS *DMS*. 02474 M01S02212.tafrec +++| 02475 M01S02213.tafrec +++| PTF14 SA1 PTFC FWA OF UNPACKED DIRECTIVE BUFFER 02476 M01S02214.tafrec +++| RJ DMS PROCESS *DMS* 02477 M01S02215.tafrec +++| SA0 PTFI * PARAMETER ERROR.* 02478 M01S02216.tafrec +++| NZ X5,PTF5 IF ERROR 02479 M01S02217.tafrec +++| EQ PTF2 PROCESS NEXT DIRECTIVE 02480 M01S02218.tafrec +++| 02481 M01S02219.tafrec +++|* PROCESS BATCH CONCURRENCY COMMAND *TBCON,N.* 02482 M01S02220.tafrec +++| 02483 M01S02221.tafrec +++| PTF15 SA5 PTFC+B1 NUMBER OF BATCH CONCURRENCY JOBS 02484 M01S02222.tafrec +++| SA0 PTFI *PARAMETER ERROR* 02485 M01S02223.tafrec +++| RJ DXB CONVERT NUMBER 02486 M01S02224.tafrec +++| NZ X4,PTF5 IF CONVERSION ERROR 02487 M01S02225.tafrec +++| EQ PTF2 PROCESS NEXT DIRECTIVE 02488 M01S02226.tafrec +++| 02489 M01S02227.tafrec +++|* PROCESS *K.COMMAND* 02490 M01S02228.tafrec +++| 02491 M01S02229.tafrec +++| PTF16 SA1 B0 02492 M01S02230.tafrec +++| LX1 59-8 POSITION TO SENSE SWITCH 3 02493 M01S02231.tafrec +++| NG X1,PTF2 IF RECOVERY MODE SELECTED 02494 M01S02232.tafrec +++| SA1 PTFB FIRST PARAMETER 02495 M01S02233.tafrec +++| SX6 B1 SET *K.COMMAND* MODE 02496 M01S02234.tafrec +++| SA6 KCOF 02497 M01S02235.tafrec +++| RJ SKD PROCESS *K.COMMAND* 02498 M01S02236.tafrec +++| 02499 M01S02237.tafrec +++|* ENTRY POINT FROM *SKD*. 02500 M01S02238.tafrec +++| 02501 M01S02239.tafrec +++| PTF17 ZR X2,PTF2 IF NO ERROR 02502 M01S02240.tafrec +++| SA1 PTFZ *K.* ERROR COUNT 02503 M01S02241.tafrec +++| SX6 X1+B1 INCREMENT ERROR COUNT 02504 M01S02242.tafrec +++| SA6 A1 02505 M01S02243.tafrec +++| EQ PTF5 RECORD COUNT ERROR IN REPORT 02506 M01S00012.ns2094 +++| 02507 M01S00013.ns2094 +++|* PROCESS *USER* COMMAND. 02508 M01S00014.ns2094 +++| 02509 M01S00015.ns2094 +++| PTF18 SA5 PTFAA MUST HAVE ONLY ONE *USER* COMMAND 02510 M01S00016.ns2094 +++| SA0 PTFAD 02511 M01S00017.ns2094 +++| SB2 X5 02512 M01S00018.ns2094 +++| NE B1,B2,PTF5 IF NOT FIRST *USER* COMMAND 02513 M01S00019.ns2094 +++| SX6 B0 INDICATE AT LEAST ONE *USER* COMMAND 02514 M01S00020.ns2094 +++| SA6 A5 02515 M01S00021.ns2094 +++| RJ USR PROCESS *USER* COMMAND 02516 M01S00022.ns2094 +++| SX6 A0 02517 M01S00023.ns2094 +++| NZ X6,PTF5 IF ERROR OCCURRED 02518 M01S00024.ns2094 +++| EQ PTF2 PROCESS NEXT COMMAND 02519 M01S02244.tafrec +++| 02520 M01S02245.tafrec +++|* TABLE OF VALID DIRECTIVE KEYWORDS. 02521 M01S02246.tafrec +++| 02522 M01S02247.tafrec +++| PTFA VFD 42/0LDISPLAY,18/PTF11 02523 M01S02248.tafrec +++| VFD 42/0LNETWORK,18/PTF12 02524 M01S02249.tafrec +++| VFD 42/0LRECOVER,18/PTF13 02525 M01S02250.tafrec +++| VFD 42/0LDMS,18/PTF14 02526 M01S02251.tafrec +++| VFD 42/0LK,18/PTF16 02527 M01S02252.tafrec +++| VFD 42/0LTBCON,18/PTF15 02528 M01S00025.ns2094 +++| VFD 42/0LACCOUNT,18/PTF18 *ACCOUNT* COMMAND 02529 M01S00026.ns2094 +++| VFD 42/0LUSER,18/PTF18 *USER* COMMAND 02530 M01S02253.tafrec +++| CON 0 TABLE TERMINATOR 02531 M01S02254.tafrec +++| 02532 M01S02255.tafrec +++| PTFB BSSZ 16 BUFFER FOR DIRECTIVE IMAGE 02533 M01S02256.tafrec +++| PTFC BSSZ 80 BUFFER FOR UNPACKED DIRECTIVE 02534 M01S02257.tafrec +++| 02535 M01S02258.tafrec +++| PTFD DATA C* FILE TCF NOT FOUND.* 02536 M01S02259.tafrec +++| PTFE DATA C* TCF FILE EMPTY.*
| Line S02260 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02537 M02S02260.v23l617 ---| PTFF DATA C* INVALID TCF ENTRY.* 02538 M01S00021.v23l617 +++| PTFF DATA C* INCORRECT TCF ENTRY.* 02539 M01S02261.tafrec +++| 02540 M01S02262.tafrec +++| PTFG DATA 40H *** ERROR IN ABOVE DIRECTIVE *** 02541 M01S02263.tafrec +++| PTFGL EQU *-PTFG 02542 M01S02264.tafrec +++| PTFH DATA C* UNKNOWN DIRECTIVE.* 02543 M01S02265.tafrec +++| PTFI DATA C* PARAMETER ERROR.* 02544 M01S02266.tafrec +++| PTFK DATA C* RECOVERY DISABLED.* 02545 M01S02267.tafrec +++| PTFL DATA C* DUPLICATE RECOVER ID.* 02546 M01S02268.tafrec +++| PTFM DATA C* DUPLICATE NETWORK ID.* 02547 M01S02269.tafrec +++| 02548 M01S02270.tafrec +++| PTFN CON 0 NUMBER OF DIRECTIVE ERRORS 02549 M01S02271.tafrec +++| PTFO CON 0 FLAGS FOR *NETWORK*/*RECOVER* DIRECTIVES 02550 M01S02272.tafrec +++| PTFP DATA 10H 02551 M01S02273.tafrec +++| DATA C* NONMATCHING NETWORK AND RECOVER ID-S* 02552 M01S02274.tafrec +++| PTFQ DATA 20H 02553 M01S02275.tafrec +++| DATA C*TAF CONFIGURATION FILE* 02554 M01S02276.tafrec +++| DATA 1L 02555 M01S02277.tafrec +++| PTFQL EQU *-PTFQ
| Line S02278 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02556 M02S02278.ns2094 ---| .A IFC EQ,/"PROD"/TAFNAM/ 02557 M01S02279.tafrec +++| PTFR CON 1 MUST BE AT LEAST ONE *NETWORK* DIRECTIVE
| Line S02280 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02558 M02S02280.ns2094 ---| .A ELSE
| Line S02281 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02559 M02S02281.ns2094 ---| PTFR CON 0 NO *NETWORK* DIRECTIVES FOR TAFTS
| Line S02282 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02560 M02S02282.ns2094 ---| .A ENDIF 02561 M01S02283.tafrec +++| .A IFEQ IPTAR,1 02562 M01S02284.tafrec +++| PTFS CON 1 MUST BE AT LEAST ONE *RECOVER* DIRECTIVE 02563 M01S02285.tafrec +++| .A ELSE 02564 M01S02286.tafrec +++| PTFS CON 0 NO *RECOVER* DIRECTIVES 02565 M01S02287.tafrec +++| .A ENDIF 02566 M01S02288.tafrec +++| PTFU CON 0 SET *K-DISPLAY* IF NONZERO 02567 M01S02289.tafrec +++| PTFV DATA 10H 02568 M01S02290.tafrec +++| DATA C* NETWORK DIRECTIVE(S) REQUIRED.* 02569 M01S02291.tafrec +++| PTFW DATA 10H 02570 M01S02292.tafrec +++| DATA C* RECOVER DIRECTIVE(S) REQUIRED.* 02571 M01S02293.tafrec +++| PTFY DATA 1L 02572 M01S02294.tafrec +++| PTFZ CON 0 *K-COMMAND* ERROR COUNT 02573 M01S00027.ns2094 +++| PTFAA CON 1 MUST BE ONLY ONE *USER* COMMAND 02574 M01S00028.ns2094 +++| PTFAB DATA C* USER COMMAND NOT VALID ON FAMILY.* 02575 M01S00029.ns2094 +++| PTFAC DATA C* USER COMMAND DOES NOT APPEAR IN TCF.* 02576 M01S00030.ns2094 +++| PTFAD DATA C* MORE THAN ONE USER COMMAND IN TCF.* 02577 M01S02295.tafrec +++| DSP SPACE 4,10 02578 M01S02296.tafrec +++|** DSP - PROCESS *DISPLAY* DIRECTIVE. 02579 M01S02297.tafrec +++|* 02580 M01S02298.tafrec +++|* ENTRY (X1) = DISPLAY STATUS. 02581 M01S02299.tafrec +++|* 02582 M01S02300.tafrec +++|* EXIT (X6) = NONZERO IF *K-DISPLAY* TO BE SET. 02583 M01S02301.tafrec +++|* (X3) = 0 IF NO ERROR IN DIRECTIVE. 02584 M01S02302.tafrec +++|* 02585 M01S02303.tafrec +++|* USES X - 2, 3, 6. 02586 M01S02304.tafrec +++|* A - 2. 02587 M01S02305.tafrec +++| 02588 M01S02306.tafrec +++| 02589 M01S02307.tafrec +++| DSP SUBR ENTRY/EXIT 02590 M01S02308.tafrec +++| BX6 X6-X6 PRESET DISPLAY OFF 02591 M01S02309.tafrec +++| SA2 DSPA 02592 M01S02310.tafrec +++| BX3 X2-X1 02593 M01S02311.tafrec +++| ZR X3,DSPX IF *OFF* 02594 M01S02312.tafrec +++| SA2 A2+B1 02595 M01S02313.tafrec +++| BX3 X2-X1 02596 M01S02314.tafrec +++| NZ X3,DSPX IF NOT *ON* 02597 M01S02315.tafrec +++| SX6 DSP 02598 M01S02316.tafrec +++| EQ DSPX RETURN 02599 M01S02317.tafrec +++| 02600 M01S02318.tafrec +++|* TABLE OF VALID DISPLAY STATUSES. 02601 M01S02319.tafrec +++| 02602 M01S02320.tafrec +++| DSPA VFD 42/0LOFF,18/0 02603 M01S02321.tafrec +++| VFD 42/0LON,18/0 02604 M01S02322.tafrec +++| DSP SPACE 4,20 02605 M01S02323.tafrec +++|** NET - PROCESS *NETWORK* DIRECTIVE. 02606 M01S02324.tafrec +++|* 02607 M01S02325.tafrec +++|* ENTRY (A4) = ADDRESS OF FIRST ARGUMENT. 02608 M01S02326.tafrec +++|* (B4) = ARGUMENT COUNT. 02609 M01S02327.tafrec +++|* 02610 M01S02328.tafrec +++|* EXIT (A0) = FWA OF ERROR MESSAGE IF ERROR. 02611 M01S02329.tafrec +++|* = 0 IF NO ERROR. 02612 M01S02330.tafrec +++|* (B5) = NETWORK ID. 02613 M01S02331.tafrec +++|* 02614 M01S02332.tafrec +++|* USES X - 1, 2, 5, 6, 7. 02615 M01S02333.tafrec +++|* A - 0, 1, 2, 5, 7. 02616 M01S02334.tafrec +++|* B - 5, 6, 7. 02617 M01S02335.tafrec +++|* 02618 M01S02336.tafrec +++|* CALLS ARG, DXB. 02619 M01S02337.tafrec +++|* 02620 M01S02338.tafrec +++|* MACROS SYSTEM. 02621 M01S02339.tafrec +++| 02622 M01S02340.tafrec +++| 02623 M01S02341.tafrec +++| NET SUBR ENTRY/EXIT 02624 M01S02342.tafrec +++| SA0 PTFI * PARAMETER ERROR.* 02625 M01S02343.tafrec +++| SB5 NETA ARGUMENT TABLE 02626 M01S02344.tafrec +++| RJ ARG PROCESS ARGUMENTS 02627 M01S02345.tafrec +++| NZ X1,NETX IF ERRORS 02628 M01S02346.tafrec +++| SA5 ID 02629 M01S02347.tafrec +++| SB7 B1+ 02630 M01S02348.tafrec +++| RJ DXB DISPLAY TO BINARY
| Line S02349 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02631 M02S02349.v23l617 ---| NZ X4,NETX IF INVALID ID 02632 M01S00022.v23l617 +++| NZ X4,NETX IF INCORRECT ID 02633 M01S02350.tafrec +++| SX7 X6-MAXNF
| Line S02351 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02634 M02S02351.v23l617 ---| PL X7,NETX IF INVALID ID 02635 M01S00023.v23l617 +++| PL X7,NETX IF INCORRECT ID 02636 M01S02352.tafrec +++| SB5 X6 02637 M01S02353.tafrec +++| SX7 B1+B1 02638 M01S02354.tafrec +++| IX6 X7*X6 02639 M01S02355.tafrec +++| SA1 TFAM+X6+1 02640 M01S02356.tafrec +++| SA0 PTFM * DUPLICATE NETWORK ID.* 02641 M01S02357.tafrec +++| NZ X1,NETX IF ID ALREADY USED 02642 M01S02358.tafrec +++| SB6 X6+
| Line S02359 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns21000 |
Seq # *Modification Id* Act ----------------------------+ 02643 M02S02359.ns21000 ---| SYSTEM CPM,R,UN,56B*100B VALIDATE FAMILY/USER NAME 02644 M01S00009.ns21000 +++| SYSTEM CPM,R,FM,56B*100B VALIDATE FAMILY/USER NAME 02645 M01S02360.tafrec +++| SA1 UN
| Line S02361 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns2094 |
Seq # *Modification Id* Act ----------------------------+ 02646 M02S02361.ns2094 ---| SA0 PTFI * PARAMETER ERROR.* 02647 M01S00031.ns2094 +++| SA0 PTFAB * USER NOT VALID ON FAMILY.*
| Line S02362 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02648 M02S02362.ns22000 ---| SX1 X1+
| Line S02363 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02649 M02S02363.ns22000 ---| ZR X1,NETX IF INVALID FAMILY/USER NAME 02650 M01S00042.ns22000 +++| SX6 X1+
| Line S00043 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02651 M02S00043.v23l617 ---| ZR X6,NETX IF INVALID FAMILY/ USER NAME 02652 M01S00024.v23l617 +++| ZR X6,NETX IF INCORRECT FAMILY/ USER NAME 02653 M01S02364.tafrec +++| SA2 FM SAVE FAMILY NAME 02654 M01S02365.tafrec +++| BX7 X2 02655 M01S02366.tafrec +++| SA0 B0 INDICATE NO ERROR 02656 M01S02367.tafrec +++| SA7 TFAM+B6
| Line S02368 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02657 M02S02368.ns22000 ---| SX7 X1+ 02658 M01S00044.ns22000 +++| BX7 X1 02659 M01S02369.tafrec +++| SA7 A7+1 SAVE USER INDEX 02660 M01S02370.tafrec +++| EQ NETX RETURN 02661 M01S02371.tafrec +++| 02662 M01S02372.tafrec +++|* ARGUMENT TABLE FOR *NETWORK* DIRECTIVE. 02663 M01S02373.tafrec +++| 02664 M01S02374.tafrec +++| NETA BSS 0 02665 M01S02375.tafrec +++| ID ARG NETB,ID,400B 02666 M01S02376.tafrec +++| FM ARG NETB,FM 02667 M01S02377.tafrec +++| UN ARG NETB,UN 02668 M01S02378.tafrec +++| CON 0 TABLE TERMINATOR 02669 M01S02379.tafrec +++| 02670 M01S02380.tafrec +++| NETB CON 0 FLAG NONEQUIVALENCED PARAMETERS 02671 M01S02381.tafrec +++| RCV SPACE 4,15 02672 M01S02382.tafrec +++|** RCV - PROCESS *RECOVER* DIRECTIVE. 02673 M01S02383.tafrec +++|* 02674 M01S02384.tafrec +++|* ENTRY (A4) = ADDRESS OF FIRST ARGUMENT. 02675 M01S02385.tafrec +++|* (B4) = ARGUMENT COUNT. 02676 M01S02386.tafrec +++|* 02677 M01S02387.tafrec +++|* EXIT (A0) = FWA OF ERROR MESSAGE IF ERROR. 02678 M01S02388.tafrec +++|* = 0 IF NO ERROR. 02679 M01S02389.tafrec +++|* (B6) = RECOVER ID. 02680 M01S02390.tafrec +++|* 02681 M01S02391.tafrec +++|* USES X - 1, 4, 5, 6, 7. 02682 M01S02392.tafrec +++|* A - 0, 1, 5, 6. 02683 M01S02393.tafrec +++|* B - 5, 6, 7. 02684 M01S02394.tafrec +++|* 02685 M01S02395.tafrec +++|* CALLS ARG, DXB. 02686 M01S02396.tafrec +++| 02687 M01S02397.tafrec +++| 02688 M01S02398.tafrec +++| RCV SUBR ENTRY/EXIT 02689 M01S02399.tafrec +++| SA0 PTFI * PARAMETER ERROR.* 02690 M01S02400.tafrec +++| SB5 RCVA ARGUMENT TABLE 02691 M01S02401.tafrec +++| RJ ARG PROCESS ARGUMENTS 02692 M01S02402.tafrec +++| NZ X1,RCVX IF ERRORS 02693 M01S02403.tafrec +++| SA5 ID 02694 M01S02404.tafrec +++| SB7 B1 02695 M01S02405.tafrec +++| RJ DXB DISPLAY TO BINARY 02696 M01S02406.tafrec +++| SB6 X6
| Line S02407 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02697 M02S02407.v23l617 ---| NZ X4,RCVX IF INVALID ID 02698 M01S00025.v23l617 +++| NZ X4,RCVX IF INCORRECT ID 02699 M01S02408.tafrec +++| SX7 X6-MAXRC
| Line S02409 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02700 M02S02409.v23l617 ---| PL X7,RCVX IF INVALID ID 02701 M01S00026.v23l617 +++| PL X7,RCVX IF INCORRECT ID 02702 M01S02410.tafrec +++| SA5 NM 02703 M01S02411.tafrec +++| RJ DXB DISPLAY TO BINARY
| Line S02412 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02704 M02S02412.v23l617 ---| NZ X4,RCVX IF INVALID *NM* 02705 M01S00027.v23l617 +++| NZ X4,RCVX IF INCORRECT *NM* 02706 M01S02413.tafrec +++| SX7 X6-TRMM-1
| Line S02414 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02707 M02S02414.v23l617 ---| PL X7,RCVX IF INVALID *NM* 02708 M01S00028.v23l617 +++| PL X7,RCVX IF INCORRECT *NM* 02709 M01S02415.tafrec +++| SA1 TREC+B6 02710 M01S02416.tafrec +++| SA0 PTFL * DUPLICATE RECOVER ID.* 02711 M01S02417.tafrec +++| NZ X1,RCVX IF ID ALREADY USED 02712 M01S02418.tafrec +++| LX6 24 02713 M01S02419.tafrec +++| BX6 X6+X1 02714 M01S02420.tafrec +++| SA6 A1+ SAVE NUMBER OF USER MESSAGES 02715 M01S02421.tafrec +++| SA5 MS 02716 M01S02422.tafrec +++| RJ DXB DISPLAY TO BINARY 02717 M01S02423.tafrec +++| SA0 PTFI * PARAMETER ERROR.*
| Line S02424 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02718 M02S02424.v23l617 ---| NZ X4,RCVX IF INVALID *MS* 02719 M01S00029.v23l617 +++| NZ X4,RCVX IF INCORRECT *MS* 02720 M01S02425.tafrec +++| SX7 X6-MAXMS
| Line S02426 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02721 M02S02426.v23l617 ---| PL X7,RCVX IF INVALID *MS* 02722 M01S00030.v23l617 +++| PL X7,RCVX IF INCORRECT *MS* 02723 M01S02427.tafrec +++| SA1 TREC+B6 02724 M01S02428.tafrec +++| SX4 X6+TRMWL+77B 02725 M01S02429.tafrec +++| AX4 6 PRU-S PER MESSAGE RECORD 02726 M01S02430.tafrec +++| LX4 36 02727 M01S02431.tafrec +++| LX6 12 02728 M01S02432.tafrec +++| BX6 X6+X1 02729 M01S02433.tafrec +++| BX6 X6+X4 02730 M01S02434.tafrec +++| SA6 A1 SAVE MAXIMUM MESSAGE SIZE 02731 M01S02435.tafrec +++| SA0 B0+ SET NO ERROR 02732 M01S02436.tafrec +++| EQ RCVX RETURN 02733 M01S02437.tafrec +++| 02734 M01S02438.tafrec +++|* ARGUMENT TABLE FOR *RECOVER* DIRECTIVE. 02735 M01S02439.tafrec +++| 02736 M01S02440.tafrec +++| RCVA BSS 0 02737 M01S02441.tafrec +++| ID ARG RCVB,ID,400B 02738 M01S02442.tafrec +++| NM ARG RCVB,NM 02739 M01S02443.tafrec +++| MS ARG RCVB,MS 02740 M01S02444.tafrec +++| CON 0 TABLE TERMINATOR 02741 M01S02445.tafrec +++| 02742 M01S02446.tafrec +++| RCVB CON 0 FLAG NON EQUIVALENCED PARAMETERS 02743 M01S02447.tafrec +++| DMS SPACE 4,10 02744 M01S02448.tafrec +++|** DMS - PROCESS *DMS* DIRECTIVE. 02745 M01S02449.tafrec +++|* 02746 M01S02450.tafrec +++|* ENTRY (A1) = FWA OF UNPACKED DIRECTIVE BUFFER. 02747 M01S02451.tafrec +++|* 02748 M01S02452.tafrec +++|* EXIT (X5) = 0 IF NO ERROR. 02749 M01S02453.tafrec +++|* TO *ERR* IF DB-NAME ERROR. 02750 M01S02454.tafrec +++|* 02751 M01S02455.tafrec +++|* USES X - 0, 1, 2, 4, 5. 02752 M01S02456.tafrec +++|* A - 1, 2. 02753 M01S02457.tafrec +++|* B - 5. 02754 M01S02458.tafrec +++| 02755 M01S02459.tafrec +++| 02756 M01S02460.tafrec +++| DMS SUBR ENTRY/EXIT 02757 M01S02461.tafrec +++| MX0 42 MASK FOR PARAMETERS 02758 M01S02462.tafrec +++| SA1 A1+B1 02759 M01S02463.tafrec +++| SA2 DMSA
| Line S02464 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02760 M02S02464.v23l617 ---| DMS1 ZR X2,DMSX IF INVALID DATA MANAGER 02761 M01S00031.v23l617 +++| DMS1 ZR X2,DMSX IF INCORRECT DATA MANAGER 02762 M01S02465.tafrec +++| BX4 X1-X2 02763 M01S02466.tafrec +++| SA2 A2+B1 02764 M01S02467.tafrec +++| BX5 X0*X4 02765 M01S02468.tafrec +++| NZ X5,DMS1 IF NO MATCH 02766 M01S02469.tafrec +++| SA1 A1+B1 SECOND ARGUMENT (DATA MANAGER STATUS) 02767 M01S02470.tafrec +++| SA2 DMSB
| Line S02471 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02768 M02S02471.v23l617 ---| DMS2 ZR X2,DMSX IF INVALID STATUS 02769 M01S00032.v23l617 +++| DMS2 ZR X2,DMSX IF INCORRECT STATUS 02770 M01S02472.tafrec +++| BX4 X1-X2 02771 M01S02473.tafrec +++| SA2 A2+B1 02772 M01S02474.tafrec +++| BX5 X0*X4 02773 M01S02475.tafrec +++| NZ X5,DMS2 IF NO MATCH 02774 M01S02476.tafrec +++| MX0 6 02775 M01S02477.tafrec +++| SX2 1RZ 02776 M01S02478.tafrec +++| LX2 -6 02777 M01S02479.tafrec +++| DMS3 SA1 A1+B1 02778 M01S02480.tafrec +++| SX5 B0 02779 M01S02481.tafrec +++| ZR X1,DMSX IF END OF STATEMENT 02780 M01S02482.tafrec +++| BX4 X0*X1 02781 M01S02483.tafrec +++| BX5 X4-X2 02782 M01S02484.tafrec +++| NZ X5,DMS3 IF *DB-NAME* DOES NOT START WITH *Z* 02783 M01S02485.tafrec +++| SB5 MZDB ISSUE ERROR MESSAGE 02784 M01S02486.tafrec +++| EQ ERR PROCESS ERROR 02785 M01S02487.tafrec +++| 02786 M01S02488.tafrec +++|* TABLE OF VALID DATA MANAGERS. 02787 M01S02489.tafrec +++| 02788 M01S02490.tafrec +++| DMSA VFD 42/0LCRM,18/0 02789 M01S02491.tafrec +++| VFD 42/0LTOTAL,18/0 02790 M01S02492.tafrec +++| VFD 42/0LOTHER,18/0 02791 M01S02493.tafrec +++| CON 0 TABLE TERMINATOR 02792 M01S02494.tafrec +++| 02793 M01S02495.tafrec +++|* TABLE OF VALID STATUS SWITCHES. 02794 M01S02496.tafrec +++| 02795 M01S02497.tafrec +++| DMSB VFD 42/0LOFF,18/0 02796 M01S02498.tafrec +++| VFD 42/0LON,18/0 02797 M01S02499.tafrec +++| CON 0 TABLE TERMINATOR 02798 M01S00032.ns2094 +++| USR SPACE 4,25 02799 M01S00033.ns2094 +++|** USR - PROCESS *USER* COMMAND. 02800 M01S00034.ns2094 +++|* 02801 M01S00035.ns2094 +++|* THE *USER* COMMAND IS USED TO INDICATE WHICH USER NAME 02802 M01S00036.ns2094 +++|* TAF IS TO RUN UNDER. THIS USER NAME MUST BE ASSIGNED THE 02803 M01S00037.ns2094 +++|* USER INDEX SPECIFIED BY *TRUI*. 02804 M01S00038.ns2094 +++|* 02805 M01S00039.ns2094 +++|* USER(UN,PW,FM) 02806 M01S00040.ns2094 +++|* ACCOUNT(UN,PW,FM) 02807 M01S00041.ns2094 +++|* 02808 M01S00042.ns2094 +++|* WHERE UN = USER NAME. 02809 M01S00043.ns2094 +++|* PW = PASSWORD. 02810 M01S00044.ns2094 +++|* FM = FAMILY. 02811 M01S00045.ns2094 +++|* 02812 M01S00046.ns2094 +++|* ENTRY (A1) = FWA OF PARAMETER TO CHECK. 02813 M01S00047.ns2094 +++|* 02814 M01S00048.ns2094 +++|* EXIT (A0) = 0, IF NO ERROR. 02815 M01S00049.ns2094 +++|* = FWA OF ERROR MESSAGE, IF ERROR. 02816 M01S00050.ns2094 +++|* 02817 M01S00051.ns2094 +++|* USES X - 1, 3, 7. 02818 M01S00052.ns2094 +++|* A - 0, 1, 7. 02819 M01S00053.ns2094 +++|* B - 3, 4. 02820 M01S00054.ns2094 +++|*
| Line S00055 Modification History | |
|---|---|
M01 (Added by) | ns2094 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02821 M02S00055.ns22000 ---|* MACROS ENFAM, SYSTEM. 02822 M01S00045.ns22000 +++|* MACROS SETPFP, SYSTEM. 02823 M01S00056.ns2094 +++| 02824 M01S00057.ns2094 +++| 02825 M01S00058.ns2094 +++| USR SUBR ENTRY/EXIT 02826 M01S00059.ns2094 +++| MX3 42 MASK FOR PARAMETER
| Line S00060 Modification History | |
|---|---|
M01 (Added by) | ns2094 |
M02 (Updated by) | ns2614 |
Seq # *Modification Id* Act ----------------------------+ 02827 M02S00060.ns2614 ---| SA1 A1+B1 USER NAME 02828 M01S00001.ns2614 +++| SA1 A1+1 USER NAME 02829 M01S00061.ns2094 +++| BX7 X3*X1 02830 M01S00062.ns2094 +++| SA7 VUSN 02831 M01S00063.ns2094 +++| SA7 USRC 02832 M01S00064.ns2094 +++| SA7 UN 02833 M01S00065.ns2094 +++| SA1 A1+B1 PASSWORD 02834 M01S00066.ns2094 +++| BX7 X3*X1
| Line S00067 Modification History | |
|---|---|
M01 (Added by) | ns2094 |
M02 (Updated by) | ns2614 |
Seq # *Modification Id* Act ----------------------------+ 02835 M02S00067.ns2614 ---| SA7 VPWD 02836 M01S00068.ns2094 +++| SA7 USRB
| Line S00069 Modification History | |
|---|---|
M01 (Added by) | ns2094 |
M02 (Updated by) | ns2614 |
Seq # *Modification Id* Act ----------------------------+ 02837 M02S00069.ns2614 ---| SA1 A1+1 FAMILY NAME 02838 M01S00002.ns2614 +++| SA1 A1+B1 FAMILY NAME 02839 M01S00070.ns2094 +++| BX7 X3*X1 02840 M01S00071.ns2094 +++| SA7 VFMN 02841 M01S00072.ns2094 +++| SA7 USRA 02842 M01S00073.ns2094 +++| SA7 FM 02843 M01S00074.ns2094 +++| 02844 M01S00075.ns2094 +++|* VALIDATE USER. 02845 M01S00076.ns2094 +++| 02846 M01S00077.ns2094 +++| SYSTEM CPM,R,USRA,56B*100B VALIDATE USER NAME 02847 M01S00078.ns2094 +++| SA1 USRC GET USER INDEX 02848 M01S00079.ns2094 +++| SB3 X1+ 02849 M01S00080.ns2094 +++| SB4 TRUI USER INDEX TAF MUST RUN UNDER 02850 M01S00081.ns2094 +++| SA0 PTFAB *USER* NOT VALID ON FAMILY
| Line S00082 Modification History | |
|---|---|
M01 (Added by) | ns2094 |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02851 M02S00082.v23l617 ---| ZR B3,USRX IF INVALID USER 02852 M01S00033.v23l617 +++| ZR B3,USRX IF INCORRECT USER 02853 M01S00083.ns2094 +++| SA1 VFMN RESET FAMILY NAME 02854 M01S00084.ns2094 +++| BX7 X1 02855 M01S00085.ns2094 +++| SA7 USRA
| Line S00086 Modification History | |
|---|---|
M01 (Added by) | ns2094 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02856 M02S00086.ns22000 ---| ENFAM USRA SET FAMILY 02857 M01S00046.ns22000 +++| SX0 10B *SETPFP* FLAGS 02858 M01S00047.ns22000 +++| BX7 X0+X7 02859 M01S00048.ns22000 +++| SA7 PFPA *SETPFP* CALL BLOCK 02860 M01S00049.ns22000 +++| SETPFP PFPA SET FAMILY 02861 M01S00087.ns2094 +++| SA0 B0 NO ERRORS 02862 M01S00088.ns2094 +++| EQ USRX EXIT 02863 M01S00089.ns2094 +++| 02864 M01S00090.ns2094 +++| 02865 M01S00091.ns2094 +++| USRA VFD 42/0,18/0 FAMILY NAME 02866 M01S00092.ns2094 +++| USRB VFD 42/0,18/0 PASSWORD 02867 M01S00093.ns2094 +++| USRC VFD 42/0,18/0 USER NAME
| Line S00094 Modification History | |
|---|---|
M01 (Added by) | ns2094 |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02868 M02S00094.ns22000 ---| BSSZ 6 RETURN PARAMETERS
| Line S00050 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
M02 (Updated by) | v23l617 |
Seq # *Modification Id* Act ----------------------------+ 02869 M02S00050.v23l617 ---| BSSZ 8 PARAMETERS 02870 M01S00034.v23l617 +++| BSSZ 10 PARAMETERS 02871 M01S02500.tafrec +++| PNF SPACE 4,25 02872 M01S02501.tafrec +++|** PNF - PROCESS NETWORK FILE. 02873 M01S02502.tafrec +++|* 02874 M01S02503.tafrec +++|* READ THE NETWORK DESCRIPTION FILE AND BUILD THE TST. 02875 M01S02504.tafrec +++|* TERMINALS ENTRIES REMAIN IN THE ORDER THEY APPEAR IN THE 02876 M01S02505.tafrec +++|* NETWORK FILE. FOR MULTIPLE NETWORK FILES, THE TERMINALS 02877 M01S02506.tafrec +++|* WILL BE GROUPED BY NETWORK FILE. 02878 M01S02507.tafrec +++|* 02879 M01S02508.tafrec +++|* REFERENCE TO RECOVERY IN THIS ROUTINE DOES NOT RELATE 02880 M01S02509.tafrec +++|* TO AUTOMATIC RECOVERY, BUT RATHER TO THE *K.REC* COMMAND. 02881 M01S02510.tafrec +++|* 02882 M01S02511.tafrec +++|* ENTRY (CUID) = CURRENT ID. 02883 M01S02512.tafrec +++|* 02884 M01S02513.tafrec +++|* EXIT (B5) = FWA OF ERROR MESSAGE. 02885 M01S02514.tafrec +++|* TST BUILT FOR THE NETWORK FILE. 02886 M01S02515.tafrec +++|* TO *ERR* IF ERRORS IN TERMINAL DESCRIPTIONS. 02887 M01S02516.tafrec +++|* 02888 M01S02517.tafrec +++|* USES X - ALL. 02889 M01S02518.tafrec +++|* A - 0, 1, 2, 3, 4, 6, 7. 02890 M01S02519.tafrec +++|* B - 2, 3, 4, 5, 7. 02891 M01S02520.tafrec +++|* 02892 M01S02521.tafrec +++|* CALLS ANF, ATD, SNM, STB. 02893 M01S02522.tafrec +++|* 02894 M01S02523.tafrec +++|* MACROS MESSAGE, READ, RETURN. 02895 M01S02524.tafrec +++| 02896 M01S02525.tafrec +++| 02897 M01S02526.tafrec +++| PNF SUBR ENTRY/EXIT 02898 M01S02527.tafrec +++| RJ ANF ATTACH NETWORK FILE 02899 M01S02528.tafrec +++| BX6 X1 02900 M01S02529.tafrec +++| SA6 PNFG SAVE NETWORK FILE NAME 02901 M01S02530.tafrec +++| READ N INITIATE READ 02902 M01S02531.tafrec +++| PNF1 SX5 N FET ADDRESS 02903 M01S02532.tafrec +++| SA0 PNFA SCRATCH TABLE POINTER 02904 M01S02533.tafrec +++| RJ ATD ASSEMBLE TERMINAL DESCRIPTION 02905 M01S02534.tafrec +++| SA3 PNFF ADDRESS OF NEXT ENTRY 02906 M01S02535.tafrec +++| SA0 X3+ 02907 M01S02536.tafrec +++| ZR X1,PNF3 IF NO ERROR 02908 M01S02537.tafrec +++| NG X4,PNF6 IF EOR/EOF ENCOUNTERED 02909 M01S02538.tafrec +++| SX5 X2+ 02910 M01S02539.tafrec +++| NZ X4,PNF2 IF NOT NULL FILE 02911 M01S02540.tafrec +++| SX5 PNFC * NULL DESCRIPTION FILE.* 02912 M01S02541.tafrec +++| PNF2 SB2 1RX 02913 M01S02542.tafrec +++| SB5 PNFB * FORMAT ERROR IN NETWORK FILE.* 02914 M01S02543.tafrec +++| SA1 PNFG 02915 M01S02544.tafrec +++| RJ SNM SET NAME IN MESSAGE 02916 M01S02545.tafrec +++| MESSAGE PNFB FORMAT ERROR IN TERMINAL DESCRIPTION FILE 02917 M01S02546.tafrec +++| SB5 X5 02918 M01S02547.tafrec +++| EQ ERR PROCESS ERROR 02919 M01S02548.tafrec +++| 02920 M01S02549.tafrec +++|* BUILD TERMINAL STATUS TABLE FROM NETWORK FILE. 02921 M01S02550.tafrec +++| 02922 M01S02551.tafrec +++| PNF3 SA1 /COMCRTN/TT. TERMINAL TYPE 02923 M01S02552.tafrec +++| SA3 /COMCRTN/DB. DATA BASE NAME 02924 M01S02553.tafrec +++| SX2 1RZ 02925 M01S02554.tafrec +++| MX0 6 02926 M01S02555.tafrec +++| LX2 -6 02927 M01S02556.tafrec +++| BX4 X0*X3 02928 M01S02557.tafrec +++| BX6 X4-X2 02929 M01S02558.tafrec +++| NZ X6,PNF5 IF VALID *DB-NAME* 02930 M01S02559.tafrec +++| SB5 MZDB ISSUE ERROR MESSAGE 02931 M01S02560.tafrec +++| EQ ERR PROCESS ERROR 02932 M01S02561.tafrec +++| 02933 M01S02562.tafrec +++| PNF5 LX1 59-11 02934 M01S02563.tafrec +++| PL X1,PNF1 IF NOT A TRANSACTION TERMINAL 02935 M01S02564.tafrec +++| LX3 TSDBS-59 02936 M01S02565.tafrec +++| SA1 /COMCRTN/RS. DATA BASE READ SECURITY LEVEL 02937 M01S02566.tafrec +++| SA2 /COMCRTN/US. DATA BASE UPDATE SECURITY LEVEL 02938 M01S02567.tafrec +++| LX1 TSRSS-TSRSN+1 02939 M01S02568.tafrec +++| SA4 /COMCRTN/TN. TERMINAL NAME 02940 M01S02569.tafrec +++| BX1 X1+X3 02941 M01S02570.tafrec +++| BX6 X4 02942 M01S02571.tafrec +++| SA3 /COMCRTN/UA. USER ARGUMENTS 02943 M01S02572.tafrec +++| LX2 TSUSS-TSUSN+1 02944 M01S02573.tafrec +++| BX7 X1+X2 02945 M01S02574.tafrec +++| SA6 A0+1 SECOND WORD OF TST ENTRY 02946 M01S02575.tafrec +++| BX7 X7+X3 02947 M01S02576.tafrec +++| SA1 /COMCRTN/IS. ON/OFF 02948 M01S02577.tafrec +++| LX1 TSTOS-TSTON+1 02949 M01S02578.tafrec +++| BX7 X7+X1 02950 M01S02579.tafrec +++| SX6 A0+TSTLLE ADVANCE TST POINTER 02951 M01S02580.tafrec +++| SA6 PNFF 02952 M01S02581.tafrec +++| SA1 PRSA 02953 M01S02582.tafrec +++| SA2 VREC *K-DISPLAY* RECOVERY 02954 M01S02583.tafrec +++| MX6 -1 02955 M01S02584.tafrec +++| BX6 -X6*X2 02956 M01S02585.tafrec +++| LX6 TSRBS-0 SET USER RECOVERY BIT IN TST 02957 M01S02586.tafrec +++| BX7 X7+X6 02958 M01S02587.tafrec +++| SA7 A0+ 02959 M01S02588.tafrec +++| LX1 59-0 02960 M01S02589.tafrec +++| LX2 59-0 02961 M01S02590.tafrec +++| NG X1,PNF1 IF SENSE SWITCH 3 IS SET 02962 M01S02591.tafrec +++| NG X2,PNF1 IF RECOVERY MODE SELECTED 02963 M01S02592.tafrec +++| SA1 PNFI 02964 M01S02593.tafrec +++| SX6 X1+B1 INCREMENT NUMBER OF ENTRIES 02965 M01S02594.tafrec +++| SA6 A1 02966 M01S02595.tafrec +++| SX6 X6-IPTST-1 02967 M01S02596.tafrec +++| NG X6,PNF1 IF MAXIMUM NOT EXCEEDED 02968 M01S02597.tafrec +++| SB5 PNFJ * MAXIMUM TERMINALS EXCEEDED.* 02969 M01S02598.tafrec +++| EQ ERR PROCESS ERROR 02970 M01S02599.tafrec +++| 02971 M01S02600.tafrec +++|* SORT TST ON MUX CHANNEL/EQUIPMENT/PORT KEY FOR *TAFTS*. 02972 M01S02601.tafrec +++| 02973 M01S02602.tafrec +++| PNF6 RETURN N RETURN NETWORK FILE 02974 M01S02603.tafrec +++| SA1 PNFE 02975 M01S02604.tafrec +++| SX6 A0 02976 M01S02605.tafrec +++| SA6 A1 SET FWA OF TST FOR NEXT NETWORK FILE 02977 M01S02606.tafrec +++| IX7 X6-X1 LENGTH OF TST 02978 M01S02607.tafrec +++| SA1 TSTLW 02979 M01S02608.tafrec +++| IX6 X7+X1 02980 M01S02609.tafrec +++| SA6 A1 ADJUST CUMULATIVE LENGTH 02981 M01S02610.tafrec +++| SX2 TSTLLE 02982 M01S02611.tafrec +++| IX7 X7/X2 NUMBER OF TST ENTRIES 02983 M01S02612.tafrec +++| SA3 PNFH 02984 M01S02613.tafrec +++| IX7 X3+X7 UPDATE HIGHEST ORDINAL 02985 M01S02614.tafrec +++| SA7 A3 02986 M01S02615.tafrec +++| LX7 48 02987 M01S02616.tafrec +++| SA1 CUID ID 02988 M01S02617.tafrec +++| SX2 TTFTE 02989 M01S02618.tafrec +++| IX1 X2*X1 02990 M01S02619.tafrec +++| SA7 TSTHD+X1 02991 M01S02620.tafrec +++| SX6 B0+ 02992 M01S02621.tafrec +++| SA6 /COMCRTN/ST CLEAR COMCRTN FLAGS FOR NEXT NETWORK FILE 02993 M01S02622.tafrec +++| SA6 /COMCRTN/ATDA 02994 M01S02623.tafrec +++| NZ X7,PNFX IF TRANSACTION TERMINALS DEFINED 02995 M01S02624.tafrec +++| SB2 1RX 02996 M01S02625.tafrec +++| SB5 PNFD * NO TERMINALS IN NETWORK FILE.* 02997 M01S02626.tafrec +++| SA1 PNFG 02998 M01S02627.tafrec +++| RJ SNM SET NAME IN MESSAGE 02999 M01S02628.tafrec +++| EQ ERR PROCESS ERROR 03000 M01S02629.tafrec +++| 03001 M01S02630.tafrec +++| PNFA VFD 12/0,18/BRTNL,30/BRTN SCRATCH TABLE POINTER 03002 M01S02631.tafrec +++| PNFB DATA C* FORMAT ERROR IN NETWORK FILE - XXXXXXX.* 03003 M01S02632.tafrec +++| PNFC DATA C* NULL DESCRIPTION FILE.* 03004 M01S02633.tafrec +++| PNFD DATA C* NO TERMINALS IN NETWORK FILE - XXXXXXX.* 03005 M01S02634.tafrec +++| PNFE CON TST INITIAL TST ENTRY 03006 M01S02635.tafrec +++| PNFF CON TST+TSTLLE CURRENT TST ENTRY 03007 M01S02636.tafrec +++| PNFG CON 0 NETWORK FILE NAME 03008 M01S02637.tafrec +++| PNFH CON -1 CURRENT HIGHEST TST ORDINAL 03009 M01S02638.tafrec +++| PNFI CON 0 NUMBER OF TERMINAL ENTRIES 03010 M01S02639.tafrec +++| PNFJ DATA C* MAXIMUM TERMINALS EXCEEDED.* 03011 M01S02640.tafrec +++| PNFK DATA C* NO DATA BASE NAME TERMINAL - XXXXXXX.* 03012 M01S02641.tafrec +++| ANF SPACE 4,30 03013 M01S02642.tafrec +++|** ANF - ATTACH NETWORK DESCRIPTOR FILE. 03014 M01S02643.tafrec +++|* 03015 M01S02644.tafrec +++|* THIS ROUTINE ATTACHES THE NETWORK DESCRIPTION FILE *NCTFI* 03016 M01S02645.tafrec +++|* WHERE THE *I* WAS SPECIFIED BY THE *ID* PARAMETER ON THE 03017 M01S02646.tafrec +++|* *NETWORK* STATEMENT. THE FILE RESIDES UNDER THE FAMILY AND 03018 M01S02647.tafrec +++|* USER NAME SPECIFIED ON THIS *NETWORK* STATEMENT. 03019 M01S02648.tafrec +++|* 03020 M01S02649.tafrec +++|* ENTRY (CUID) = CURRENT ID. 03021 M01S02650.tafrec +++|* 03022 M01S02651.tafrec +++|* EXIT (X1) = NETWORK FILE NAME. 03023 M01S02652.tafrec +++|* (B5) = FWA OF ERROR MESSAGE. 03024 M01S02653.tafrec +++|* TO *ERR* IF NETWORK FILE NOT FOUND. 03025 M01S02654.tafrec +++|*
| Line S02655 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03026 M02S02655.ns22000 ---|* USES X - 1, 2, 3, 6. 03027 M01S00051.ns22000 +++|* USES X - 1, 2, 3, 5, 6. 03028 M01S02656.tafrec +++|* A - 1, 2, 3, 6. 03029 M01S02657.tafrec +++|* B - 2, 5. 03030 M01S02658.tafrec +++|* 03031 M01S02659.tafrec +++|* CALLS SNM. 03032 M01S02660.tafrec +++|*
| Line S02661 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03033 M02S02661.ns22000 ---|* MACROS ATTACH, ENFAM, MACHID, SETUI. 03034 M01S00052.ns22000 +++|* MACROS ATTACH, SETPFP. 03035 M01S02662.tafrec +++| 03036 M01S02663.tafrec +++| 03037 M01S02664.tafrec +++| ANF SUBR ENTRY/EXIT 03038 M01S02665.tafrec +++| SX2 1R0 03039 M01S02666.tafrec +++| SA1 CUID ID 03040 M01S02667.tafrec +++| IX2 X1+X2 BINARY TO DISPLAY 03041 M01S02668.tafrec +++| LX1 1 OFFSET INTO *TFAM* 03042 M01S02669.tafrec +++| SA1 TFAM+X1 FAMILY NAME 03043 M01S02670.tafrec +++| SA3 A1+B1 USER INDEX 03044 M01S02671.tafrec +++| BX6 X1 03045 M01S02672.tafrec +++| SA6 ANFG SAVE FAMILY NAME 03046 M01S00053.ns22000 +++| SX5 13B *SETPFP* FLAGS 03047 M01S00054.ns22000 +++| BX6 X5+X6 03048 M01S00055.ns22000 +++| SA6 PFPA *SETPFP* CALL BLOCK 03049 M01S00056.ns22000 +++| BX6 X3 03050 M01S00057.ns22000 +++| SA6 PFPA+2 03051 M01S02673.tafrec +++| SA1 ANFA 03052 M01S02674.tafrec +++| LX2 35-5 03053 M01S02675.tafrec +++| BX6 X1+X2 NETWORK FILE NAME 03054 M01S02676.tafrec +++| SA6 ANFF 03055 M01S02677.tafrec +++| SX2 PTRD 03056 M01S02678.tafrec +++| BX6 X6+X2 03057 M01S02679.tafrec +++| SA6 N+CFPN SET NAME IN FET
| Line S02680 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03058 M02S02680.ns22000 ---| ENFAM ANFG ENTER FAMILY
| Line S02681 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03059 M02S02681.ns22000 ---| ANF2 SETUI X3
| Line S02682 Modification History | |
|---|---|
M01 (Added by) | tafrec |
M02 (Updated by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 03060 M02S02682.ns22000 ---| ANF3 ATTACH N ATTACH NETWORK FILE
Proceed to Part 2
cdc/nos2.source/opl.opl871/deck/tafrec.001.txt · Last modified: by 127.0.0.1