Action unknown: copypageplugin__copy
cdc:nos2.source:opl.opl871:deck:dfterm.001
Deck DFTERM Part 001
10 Modifications
Listing Sections
- Deck DFTERM Start
- Deck DFTERM Part 1 (Line 1587)
Source
Seq # *Modification Id* Act ----------------------------+ 01587 M00S01433.dfterm +++| SA3 A2+B1 GET CREATION DATE AND TIME 01588 M00S01434.dfterm +++| MX6 24 01589 M00S01435.dfterm +++| BX3 -X6*X3 01590 M00S01436.dfterm +++| BX6 X6*X2 01591 M00S01437.dfterm +++| BX6 X6+X3 SAVE FILE LENGTH, DATE AND TIME 01592 M00S01438.dfterm +++| SA6 B2+B1 01593 M00S01439.dfterm +++| LX2 59-11 01594 M00S01440.dfterm +++| NG X2,EDI1 IF A DIRECT ACCESS FILE 01595 M00S01441.dfterm +++| 01596 M00S01442.dfterm +++|* SET NON-DAYFILE TYPE. 01597 M00S01443.dfterm +++| 01598 M00S01444.dfterm +++| BX6 X1 SAVE FILE NAME, DEVICE, AND 0 DAYFILE CODE 01599 M00S01445.dfterm +++| SA6 B2 01600 M00S01446.dfterm +++| BX6 X6-X6 SET NON-DAYFILE TYPE CODE 01601 M00S01447.dfterm +++| EQ EDIX 01602 M00S01448.dfterm +++| 01603 M00S01449.dfterm +++|* SET DAYFILE TYPE. 01604 M00S01450.dfterm +++| 01605 M00S01451.dfterm +++| EDI1 RJ CDN CATAGORIZE DAYFILE NAME 01606 M00S01452.dfterm +++| BX7 X1+X6 SAVE FILE NAME, DEVICE, AND DAYFILE CODE 01607 M00S01453.dfterm +++| SA7 B2 01608 M00S01454.dfterm +++| EQ EDIX 01609 M00S01455.dfterm +++| ERP SPACE 4,17
| Line S01456 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01610 M01S01456.ns2018 ---|** ERP - ERROR PROCESSOR FOR FILE MANAGER CALLS. 01611 M01S01457.ns2018 ---|* 01612 M01S01458.ns2018 ---|* ENTRY (X6) = FILE MANAGER ERROR CODE. 01613 M01S01459.ns2018 ---|* (B6) = FILE MANAGER ERROR TABLE.
| Line S00092 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01614 M01S00092.ns2018 +++|** ERP - ERROR PROCESSOR FOR *PFM* CALLS. 01615 M01S00093.ns2018 +++|* 01616 M01S00094.ns2018 +++|* ENTRY (X6) = *PFM* ERROR CODE. 01617 M00S01460.dfterm +++|* 01618 M00S01461.dfterm +++|* EXIT (X5) = *K* DISPLAY ERROR MESSAGE ADDRESS. 01619 M00S01462.dfterm +++|* = 0 IF RETRY OPERATION.
| Line S01463 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01620 M01S01463.ns2018 ---|* TO *ERR* IF *PFM* SYSTEM ERROR OR AUTOMATIC NAME 01621 M01S01464.ns2018 ---|* REASSIGNMENT IMPOSSIBLE ON *FILE ALREADY PERMANENT* 01622 M01S01465.ns2018 ---|* ERROR DURING DEFINE. TO *ERR1* IF *PFM* SYSTEM ERROR 01623 M01S01466.ns2018 ---|* ON PERMIT. 01624 M00S01467.dfterm +++|*
| Line S01468 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01625 M01S01468.ns2018 ---|* USES A - 1, 5, 6. 01626 M01S01469.ns2018 ---|* B - 6.
| Line S00095 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01627 M01S00095.ns2018 +++|* USES A - 6. 01628 M00S01470.dfterm +++|* X - 1, 5, 6. 01629 M00S01471.dfterm +++|* 01630 M00S01472.dfterm +++|* CALLS ADN.
| Line S00096 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01631 M01S00096.ns2018 +++|* 01632 M01S00097.ns2018 +++|* MACROS MESSAGE, RECALL. 01633 M00S01473.dfterm +++| 01634 M00S01474.dfterm +++| 01635 M00S01475.dfterm +++| ERP SUBR ENTRY/EXIT
| Line S01476 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01636 M01S01476.ns2018 ---| LX6 -10 GET ERROR PROCESSING ADDRESS FROM TABLE 01637 M01S01477.ns2018 ---| SA5 B6+X6 01638 M01S01478.ns2018 ---| PL X5,ERPX IF ERROR MESSAGE 01639 M01S01479.ns2018 ---| SB6 X5 JUMP TO ERROR PROCESSOR ADDRESS 01640 M01S01480.ns2018 ---| JP B6
| Line S00098 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01641 M01S00098.ns2018 +++| LX6 -10 01642 M01S00099.ns2018 +++| SX1 X6-/ERRMSG/FAP 01643 M01S00100.ns2018 +++| ZR X1,ERP1 IF FILE ALREADY PERMANENT ERROR 01644 M01S00101.ns2018 +++| SX1 X6-/ERRMSG/PFA 01645 M01S00102.ns2018 +++| ZR X1,ERP2 IF PF UTILITY ACTIVE ERROR 01646 M01S00103.ns2018 +++| SX5 MPER SET ERROR MESSAGE ADDRESS 01647 M01S00104.ns2018 +++| EQ ERPX RETURN 01648 M00S01481.dfterm +++| 01649 M00S01482.dfterm +++|* PROCESS FILE ALREADY PERMANENT ERROR. 01650 M00S01483.dfterm +++| 01651 M00S01484.dfterm +++| ERP1 RJ ADN ASSIGN DAYFILE NAME
| Line S01485 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01652 M01S01485.ns2018 ---| NZ X5,ERR IF AUTOMATIC ASSIGNMENT IMPOSSIBLE
| Line S00105 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01653 M01S00105.ns2018 +++| NZ X5,ERPX IF AUTOMATIC ASSIGNMENT IMPOSSIBLE 01654 M00S01486.dfterm +++| BX6 X2 INSERT NEW NAME IN FET 01655 M00S01487.dfterm +++| SA6 D+CFPN 01656 M00S01488.dfterm +++| EQ ERPX 01657 M00S01489.dfterm +++| 01658 M00S01490.dfterm +++|* PROCESS PF UTILITY ACTIVITY ERROR. 01659 M00S01491.dfterm +++| 01660 M00S01492.dfterm +++| ERP2 RECALL WAIT FOR END OF PF UTILITY 01661 M00S01493.dfterm +++| MESSAGE (=C* WAITING FOR PF UTILITY.*),2,R 01662 M00S01494.dfterm +++| BX5 X5-X5 01663 M00S01495.dfterm +++| EQ ERPX
| Line S01496 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01664 M01S01496.ns2018 ---| 01665 M01S01497.ns2018 ---|* PROCESS SYSTEM ERRORS FROM *PFM*. 01666 M01S01498.ns2018 ---| 01667 M01S01499.ns2018 ---| ERP3 SA1 ERPX CHECK IF DEFINE ERROR 01668 M01S01500.ns2018 ---| AX1 30 01669 M01S01501.ns2018 ---| SX6 X1-DTD3-1 01670 M01S01502.ns2018 ---| ZR X6,ERR IF DEFINE ERROR 01671 M01S01503.ns2018 ---| JP ERR1 IF PERMIT ERROR 01672 M00S01504.dfterm +++| ERR SPACE 4,3 01673 M00S01505.dfterm +++|** ERR - PROCESS ERROR EXIT. 01674 M00S01506.dfterm +++|* 01675 M00S01507.dfterm +++|* ENTRY TO *ERR1* IF STATUS OF DAYFILE IS NOT INDEFINITE.
| Line S00106 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01676 M01S00106.ns2018 +++|* 01677 M01S00107.ns2018 +++|* MACROS ABORT, ENFAM, MESSAGE, PACKNAM. 01678 M00S01508.dfterm +++| 01679 M00S01509.dfterm +++|
| Line S01510 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01680 M01S01510.ns2018 ---| ERR MESSAGE (=C* DAYFILE STATUS INDEFINITE.*)
| Line S00108 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01681 M01S00108.ns2018 +++| ERR MESSAGE TODA *DAYFILE STATUS INDEFINITE.* 01682 M00S01511.dfterm +++| ERR1 MESSAGE (=C* DFTERM ABORTED.*) 01683 M00S01512.dfterm +++| PACKNAM CPCK SET USER PACK 01684 M00S01513.dfterm +++| ENFAM CFAM SET USER FAMILY 01685 M00S01514.dfterm +++| ABORT 01686 M00S01515.dfterm +++| FDE SPACE 4,20 01687 M00S01516.dfterm +++|** FDE - FORMAT DAYFILE ENTRY. 01688 M00S01517.dfterm +++|* 01689 M00S01518.dfterm +++|* ENTRY (B6) = ADDRESS OF DAYFILE INFORMATION. 01690 M00S01519.dfterm +++|* 42/FILE NAME, 6/DN, 12/DC 01691 M00S01520.dfterm +++|* 24/LF, 18/CD, 18/CT 01692 M00S01521.dfterm +++|* 42/FAMILY OR PACK NAME, 1/F, 17/0 01693 M00S01522.dfterm +++|* DN = DEVICE NUMBER FOR FILE. 01694 M00S01523.dfterm +++|* DC = DAYFILE TYPE CODE. 01695 M00S01524.dfterm +++|* LF = LENGTH OF DAYFILE. 01696 M00S01525.dfterm +++|* CD = CREATION DATE OF FILE. 01697 M00S01526.dfterm +++|* CT = CREATION TIME OF FILE. 01698 M00S01527.dfterm +++|* F = AUXILIARY PACK FLAG 01699 M00S01528.dfterm +++|* (B7) = ADDRESS OF AREA TO RECEIVE FORMATTED OUTPUT. 01700 M00S01529.dfterm +++|* 01701 M00S01530.dfterm +++|* EXIT (B7) = ADDRESS OF FORMATTED DAYFILE INFORMATION. 01702 M00S01531.dfterm +++|* 01703 M00S01532.dfterm +++|* USES A - 1, 2, 6, 7. 01704 M00S01533.dfterm +++|* X - 0, 1, 2, 3, 6, 7. 01705 M00S01534.dfterm +++|* 01706 M00S01535.dfterm +++|* CALLS COD, SFN.
| Line S00109 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01707 M01S00109.ns2018 +++|* 01708 M01S00110.ns2018 +++|* MACROS EDATE, ETIME. 01709 M00S01536.dfterm +++| 01710 M00S01537.dfterm +++| 01711 M00S01538.dfterm +++| FDE SUBR ENTRY/EXIT 01712 M00S01539.dfterm +++| 01713 M00S01540.dfterm +++|* FORMAT FAMILY/PACK NAME. 01714 M00S01541.dfterm +++| 01715 M00S01542.dfterm +++| SA1 B6+2 GET FAMILY/PACK NAME 01716 M00S01543.dfterm +++| MX0 42 01717 M00S01544.dfterm +++| BX1 X0*X1 01718 M00S01545.dfterm +++| RJ SFN SPACE FILL NAME 01719 M00S01546.dfterm +++| LX6 30 SAVE NAME 01720 M00S01547.dfterm +++| SA6 B7+2 01721 M00S01548.dfterm +++| 01722 M00S01549.dfterm +++|* FORMAT DAYFILE TYPE AND DEVICE NUMBER. 01723 M00S01550.dfterm +++| 01724 M00S01551.dfterm +++| SA1 B6 GET DAYFILE TYPE 01725 M00S01552.dfterm +++| MX2 -3 01726 M00S01553.dfterm +++| BX2 -X2*X1 01727 M00S01554.dfterm +++| SA2 TDFT+X2 01728 M00S01555.dfterm +++| MX3 -30 01729 M00S01556.dfterm +++| BX6 -X3*X6 01730 M00S01557.dfterm +++| LX2 18 01731 M00S01558.dfterm +++| BX7 X3*X2 01732 M00S01559.dfterm +++| BX6 X7+X6 SAVE LOWER PART OF DAYFILE TYPE 01733 M00S01560.dfterm +++| SA6 B7+B1 01734 M00S01561.dfterm +++| BX6 X2 SAVE UPPER PART OF DAYFILE TYPE 01735 M00S01562.dfterm +++| LX1 -12 GET DEVICE NUMBER 01736 M00S01563.dfterm +++| SA6 B7+ 01737 M00S01564.dfterm +++| MX0 -6 01738 M00S01565.dfterm +++| BX1 -X0*X1 01739 M00S01566.dfterm +++| SX1 X1+100B FORCE TWO DIGITS 01740 M00S01567.dfterm +++| RJ COD CONVERT TO OCTAL 01741 M00S01568.dfterm +++| SA1 B7+2 MERGE WITH FAMILY/PACK NAME 01742 M00S01569.dfterm +++| MX3 -12 01743 M00S01570.dfterm +++| BX6 -X3*X6 01744 M00S01571.dfterm +++| LX3 30 01745 M00S01572.dfterm +++| LX6 30 01746 M00S01573.dfterm +++| BX1 X3*X1 01747 M00S01574.dfterm +++| BX6 X1+X6 01748 M00S01575.dfterm +++| SA6 A1 PUT DEVICE NUMBER IN OUTPUT STRING 01749 M00S01576.dfterm +++| 01750 M00S01577.dfterm +++|* FORMAT FILE NAME. 01751 M00S01578.dfterm +++| 01752 M00S01579.dfterm +++| SA1 B6 GET FILE NAME 01753 M00S01580.dfterm +++| MX6 42 01754 M00S01581.dfterm +++| BX1 X6*X1 01755 M00S01582.dfterm +++| RJ SFN SPACE FILL FILE NAME 01756 M00S01583.dfterm +++| LX6 24 01757 M00S01584.dfterm +++| SA6 B7+3 PUT LOWER PART OF FILE NAME IN OUTPUT 01758 M00S01585.dfterm +++| MX0 30 01759 M00S01586.dfterm +++| BX6 -X0*X6 01760 M00S01587.dfterm +++| SA1 A6-B1 SAVE UPPER PART OF FILE NAME 01761 M00S01588.dfterm +++| BX1 X0*X1 01762 M00S01589.dfterm +++| BX7 X1+X6 01763 M00S01590.dfterm +++| SA7 A1 01764 M00S01591.dfterm +++| 01765 M00S01592.dfterm +++|* FORMAT DATE AND TIME. 01766 M00S01593.dfterm +++| 01767 M00S01594.dfterm +++| MX6 -18 GET CREATION DATE 01768 M00S01595.dfterm +++| SA1 B6+B1 01769 M00S01596.dfterm +++| LX1 -18 01770 M00S01597.dfterm +++| BX1 -X6*X1 01771 M00S01598.dfterm +++| EDATE X1 EDIT DATE 01772 M00S01599.dfterm +++| LX6 42 01773 M00S01600.dfterm +++| SA6 B7+4 SAVE LOWER PART OF DATE IN OUTPUT 01774 M00S01601.dfterm +++| SA1 A6-B1 SAVE UPPER PART OF DATE IN OUTPUT 01775 M00S01602.dfterm +++| MX2 24 01776 M00S01603.dfterm +++| BX1 X2*X1 01777 M00S01604.dfterm +++| BX6 -X2*X6 01778 M00S01605.dfterm +++| BX6 X1+X6 01779 M00S01606.dfterm +++| SA6 A1 01780 M00S01607.dfterm +++| SA1 B6+B1 GET CREATION TIME 01781 M00S01608.dfterm +++| MX6 -18 01782 M00S01609.dfterm +++| BX1 -X6*X1 01783 M00S01610.dfterm +++| ETIME X1 EDIT TIME 01784 M00S01611.dfterm +++| LX6 48 SAVE LOWER PART OF TIME IN OUTPUT 01785 M00S01612.dfterm +++| SA6 B7+5 01786 M00S01613.dfterm +++| SA1 A6-B1 SAVE UPPER PART OF TIME IN OUTPUT 01787 M00S01614.dfterm +++| MX2 12 01788 M00S01615.dfterm +++| BX1 X2*X1 01789 M00S01616.dfterm +++| BX6 -X2*X6 01790 M00S01617.dfterm +++| BX6 X1+X6 01791 M00S01618.dfterm +++| SA6 A1 01792 M00S01619.dfterm +++| 01793 M00S01620.dfterm +++|* FORMAT FILE LENGTH. 01794 M00S01621.dfterm +++| 01795 M00S01622.dfterm +++| SA1 B6+B1 GET FILE LENGTH 01796 M00S01623.dfterm +++| LX1 -36 01797 M00S01624.dfterm +++| MX6 -24 01798 M00S01625.dfterm +++| BX1 -X6*X1 01799 M00S01626.dfterm +++| RJ COD CONVERT FILE LENGTH TO OCTAL 01800 M00S01627.dfterm +++| MX2 -42 SAVE FILE LENGTH 01801 M00S01628.dfterm +++| BX7 -X2*X6 01802 M00S01629.dfterm +++| LX7 12 01803 M00S01630.dfterm +++| MX2 6 01804 M00S01631.dfterm +++| SA1 B7+5 01805 M00S01632.dfterm +++| BX1 X2*X1 01806 M00S01633.dfterm +++| BX6 X1+X7 01807 M00S01634.dfterm +++| SA6 A1 01808 M00S01635.dfterm +++| EQ FDEX 01809 M00S01636.dfterm +++| GCD SPACE 4,14 01810 M00S01637.dfterm +++|** GCD - GET CATALOG DESCRIPTION. 01811 M00S01638.dfterm +++|* 01812 M00S01639.dfterm +++|* ENTRY (A0) = CATALOG LIST INDEX. 01813 M00S01640.dfterm +++|* (B2) = TABLE INDEX. 01814 M00S01641.dfterm +++|* 01815 M00S01642.dfterm +++|* EXIT (X1) = TABLE ENTRY. 01816 M00S01643.dfterm +++|* (A0) = CATALOG LIST INDEX. 01817 M00S01644.dfterm +++|* (B2) = TABLE INDEX. 01818 M00S01645.dfterm +++|* (APIN) = AUXILIARY PACK INFORMATION. 01819 M00S01646.dfterm +++|* (FET+14) = 42/FAMILY OR PACK, 1/F, 17/USER INDEX. 01820 M00S01647.dfterm +++|* F = AUXILIARY PACK FLAG. 01821 M00S01648.dfterm +++|* 01822 M00S01649.dfterm +++|* USES A - 1, 2, 6, 7. 01823 M00S01650.dfterm +++|* X - 1, 2, 3, 6, 7. 01824 M00S01651.dfterm +++| 01825 M00S01652.dfterm +++| 01826 M00S01653.dfterm +++| GCD SUBR ENTRY/EXIT 01827 M00S01654.dfterm +++| SA1 A0+B2 GET CATALOG DESCRIPTION 01828 M00S01655.dfterm +++| MX3 1 CHECK AUXILIARY DEVICE FLAG 01829 M00S01656.dfterm +++| LX3 18 01830 M00S01657.dfterm +++| BX7 X3*X1 01831 M00S01658.dfterm +++| ZR X7,GCD1 IF FAMILY 01832 M00S01659.dfterm +++| 01833 M00S01660.dfterm +++|* GET AUXILIARY PACK INFORMATION. 01834 M00S01661.dfterm +++|
| Line S01662 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01835 M01S01662.ns22000 ---| MX3 -17 GET EQUIPMENT NUMBER
| Line S00028 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01836 M01S00028.ns22000 +++| MX3 -17 GET EST ORDINAL 01837 M00S01663.dfterm +++| BX7 -X3*X1 01838 M00S01664.dfterm +++| BX3 X3*X1 SET USER INDEX IN ENTRY 01839 M00S01665.dfterm +++| SX2 PDUI 01840 M00S01666.dfterm +++| BX1 X3+X2 01841 M00S01667.dfterm +++| SA2 TMSA+X7 SET AUXILIARY PACK INFORMATION 01842 M00S01668.dfterm +++| MX3 48 01843 M00S01669.dfterm +++| BX6 X3*X2 01844 M00S01670.dfterm +++| BX7 X7+X6 01845 M00S01671.dfterm +++| SA7 APIN 01846 M00S01672.dfterm +++| 01847 M00S01673.dfterm +++|* PUT DESCRIPTION IN FET. 01848 M00S01674.dfterm +++| 01849 M00S01675.dfterm +++| GCD1 BX6 X1 01850 M00S01676.dfterm +++| SA2 A0-B1 GET FET ADDRESS 01851 M00S01677.dfterm +++| SA6 X2+14 PUT CATALOG DESCRIPTION IN FET 01852 M00S01678.dfterm +++| EQ GCDX 01853 M00S01679.dfterm +++| RCE SPACE 4,23 01854 M00S01680.dfterm +++|** RCE - READ CATALOG ENTRY. 01855 M00S01681.dfterm +++|* 01856 M00S01682.dfterm +++|* ENTRY (X1) = 0 FOR INITIALIZATION CALL. 01857 M00S01683.dfterm +++|* .NE. 0 FOR CONTINUATION CALL. 01858 M00S01684.dfterm +++|* (X2) = FET ADDRESS. 01859 M00S01685.dfterm +++|* (B6) = ADDRESS OF AREA TO RECEIVE CATALOG ENTRY. 01860 M00S01686.dfterm +++|* (FET+14) = 42/FAMILY OR PACK NAME, 1/F, 17/USER INDEX. 01861 M00S01687.dfterm +++|* F = AUXILIARY PACK FLAG. 01862 M00S01688.dfterm +++|* 01863 M00S01689.dfterm +++|* EXIT (X2) = FET ADDRESS. 01864 M00S01690.dfterm +++|* (X1) = 0 IF CATALOG ENTRY AVAILABLE. 01865 M00S01691.dfterm +++|* .NE. 0 IF END OF CATALOG. 01866 M00S01692.dfterm +++|* (X5) = 0 IF NO ERROR. 01867 M00S01693.dfterm +++|* = *K* DISPLAY MESSAGE ADDRESS IF ERROR. 01868 M00S01694.dfterm +++|* (B7) = 0 IF ERROR. 01869 M00S01695.dfterm +++|* FAMILY/PACK NAME AND USER INDEX MAY BE CHANGED IN 01870 M00S01696.dfterm +++|* CONTROL POINT AREA. 01871 M00S01697.dfterm +++|* 01872 M00S01698.dfterm +++|* USES A - 1, 6. 01873 M00S01699.dfterm +++|* B - 7. 01874 M00S01700.dfterm +++|* X - 1, 2, 5, 6. 01875 M00S01701.dfterm +++|* 01876 M00S01702.dfterm +++|* CALLS SFD, SFN.
| Line S00111 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01877 M01S00111.ns2018 +++|* 01878 M01S00112.ns2018 +++|* MACROS CATLIST, MESSAGE, READW. 01879 M00S01703.dfterm +++| 01880 M00S01704.dfterm +++| 01881 M00S01705.dfterm +++| RCE SUBR ENTRY/EXIT 01882 M00S01706.dfterm +++| NZ X1,RCE2 IF NOT INITIALIZATION CALL 01883 M00S01707.dfterm +++| SX6 B0+ 01884 M00S01708.dfterm +++| SA6 X2+CFCN 01885 M00S01709.dfterm +++| 01886 M00S01710.dfterm +++|* READ CATALOG ENTRIES INTO BUFFER. 01887 M00S01711.dfterm +++| 01888 M00S01712.dfterm +++| RCE1 SA1 X2+B1 REWIND BUFFER POINTERS 01889 M00S01713.dfterm +++| SX6 X1 01890 M00S01714.dfterm +++| SA6 A1+B1 01891 M00S01715.dfterm +++| SA6 A6+B1 01892 M00S01716.dfterm +++| SB7 X2+ SAVE FET ADDRESS 01893 M00S01717.dfterm +++| SA1 X2+14 SET FAMILY/PACK DESCRIPTION 01894 M00S01718.dfterm +++| RJ SFD 01895 M00S01719.dfterm +++| SX2 B7 RESTORE FET ADDRESS
| Line S01720 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01896 M01S01720.ns2018 ---| CATLIST X2 LOAD BUFFER WITH CATALOG ENTRIES
| Line S00113 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01897 M01S00113.ns2018 +++| CATLIST X2,,,,,,,IE 01898 M00S01721.dfterm +++| SA1 C CHECK FOR ERROR 01899 M00S01722.dfterm +++| MX6 8 01900 M00S01723.dfterm +++| LX6 18 01901 M00S01724.dfterm +++| BX1 X6*X1 01902 M00S01725.dfterm +++| ZR X1,RCE2 IF NO ERROR 01903 M00S01726.dfterm +++| 01904 M00S01727.dfterm +++|* ISSUE ERROR MESSAGE. 01905 M00S01728.dfterm +++| 01906 M00S01729.dfterm +++| MX5 42 SET FAMILY/PACK NAME IN MESSAGE 01907 M00S01730.dfterm +++| SA1 X2+14 01908 M00S01731.dfterm +++| BX1 X5*X1 01909 M00S01732.dfterm +++| SB7 B0 01910 M00S01733.dfterm +++| RJ SFN SPACE FILL NAME 01911 M00S01734.dfterm +++| BX6 X5*X6 01912 M00S01735.dfterm +++| SA1 RCEA+3 01913 M00S01736.dfterm +++| BX1 -X5*X1 01914 M00S01737.dfterm +++| BX6 X1+X6 01915 M00S01738.dfterm +++| SA6 A1 01916 M00S01739.dfterm +++| SX5 RCEA SET MESSAGE ADDRESS 01917 M00S01740.dfterm +++| SA1 TARA+ARFC ISSUE DAYFILE MESSAGE ON *DFLIST*
| Line S01741 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01918 M01S01741.ns2018 ---| PL X1,RCEX IF NO *NK* PARAMETER
| Line S00114 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01919 M01S00114.ns2018 +++| PL X1,RCEX IF NO *PO=N* PARAMETER 01920 M00S01742.dfterm +++| SX6 X1-2 01921 M00S01743.dfterm +++| NZ X6,RCEX IF NOT LIST 01922 M00S01744.dfterm +++| MESSAGE X5 01923 M00S01745.dfterm +++| EQ RCEX 01924 M00S01746.dfterm +++| 01925 M00S01747.dfterm +++|* READ ONE CATALOG ENTRY. 01926 M00S01748.dfterm +++| 01927 M00S01749.dfterm +++| RCE2 READW X2,B6,NWCE READ A CATALOG ENTRY 01928 M00S01750.dfterm +++| BX5 X5-X5 CLEAR ERROR FLAG 01929 M00S01751.dfterm +++| ZR X1,RCEX IF CATALOG ENTRY TRANSFERRED 01930 M00S01752.dfterm +++| SX1 X1+B1 01931 M00S01753.dfterm +++| ZR X1,RCE1 IF NOT END OF CATALOG 01932 M00S01754.dfterm +++| EQ RCEX 01933 M00S01755.dfterm +++| 01934 M00S01756.dfterm +++| RCEA DATA C* CANNOT CATLIST FAMILY/PACK - .* 01935 M00S01757.dfterm +++| SAD SPACE 4,12 01936 M00S01758.dfterm +++|** SAD - SEARCH FOR ACTIVE DAYFILE. 01937 M00S01759.dfterm +++|* 01938 M00S01760.dfterm +++|* ENTRY (B3) = SHIFT COUNT FOR DAYFILE BITS IN TABLE *TEQA*. 01939 M00S01761.dfterm +++|*
| Line S01762 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01940 M01S01762.ns22000 ---|* EXIT (B2) = EQUIPMENT NUMBER OF ACTIVE DAYFILE.
| Line S00029 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01941 M01S00029.ns22000 +++|* EXIT (B2) = EST ORDINAL OF ACTIVE DAYFILE. 01942 M00S01763.dfterm +++|* (B4) = 0 IF ACTIVE DAYFILE FOUND. 01943 M00S01764.dfterm +++|* = 1 IF NOT FOUND. 01944 M00S01765.dfterm +++|* (X1) = FAMILY/PACK NAME WORD FOR ACTIVE DAYFILE. 01945 M00S01766.dfterm +++|* 01946 M00S01767.dfterm +++|* USES A - 1. 01947 M00S01768.dfterm +++|* B - 2, 4. 01948 M00S01769.dfterm +++|* X - 1, 5, 6. 01949 M00S01770.dfterm +++| 01950 M00S01771.dfterm +++| 01951 M00S01772.dfterm +++| SAD SUBR ENTRY/EXIT
| Line S01773 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01952 M01S01773.ns22000 ---| SB2 B0+ SET EQUIPMENT NUMBER
| Line S00030 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01953 M01S00030.ns22000 +++| SB2 B0+ SET EST ORDINAL 01954 M00S01774.dfterm +++| SB4 B1+ SET NO ACTIVE DAYFILE FLAG 01955 M00S01775.dfterm +++| 01956 M00S01776.dfterm +++|* SEARCH TABLE FOR ACTIVE DAYFILE OF SPECIFIED TYPE. 01957 M00S01777.dfterm +++| 01958 M00S01778.dfterm +++| SAD1 SA1 TEQA+B2 SEARCH TABLE 01959 M00S01779.dfterm +++| ZR X1,SADX IF END OF TABLE 01960 M00S01780.dfterm +++| SB2 B2+B1 ADVANCE EQUIPMENT 01961 M00S01781.dfterm +++| SX5 B1+ 01962 M00S01782.dfterm +++| IX5 X5+X1 01963 M00S01783.dfterm +++| ZR X5,SAD1 IF NOT MASS STORAGE 01964 M00S01784.dfterm +++| AX6 B3,X1 CHECK FOR ACTIVE DAYFILE 01965 M00S01785.dfterm +++| SX5 B1+B1 01966 M00S01786.dfterm +++| BX6 X5*X6 01967 M00S01787.dfterm +++| ZR X6,SAD1 IF ACTIVE DAYFILE NOT ON DEVICE 01968 M00S01788.dfterm +++|
| Line S01789 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01969 M01S01789.ns22000 ---|* SET EQUIPMENT NUMBER AND FAMILY/PACK NAME WORD.
| Line S00031 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01970 M01S00031.ns22000 +++|* SET EST ORDINAL AND FAMILY/PACK NAME WORD. 01971 M00S01790.dfterm +++|
| Line S01791 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01972 M01S01791.ns22000 ---| SB2 B2-B1 SET EQUIPMENT NUMBER
| Line S00032 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 01973 M01S00032.ns22000 +++| SB2 B2-B1 SET EST ORDINAL 01974 M00S01792.dfterm +++| SB4 B0 CLEAR FLAG 01975 M00S01793.dfterm +++| EQ SADX 01976 M00S01794.dfterm +++| SAI SPACE 4,10 01977 M00S01795.dfterm +++|** SAI - SET AUXILIARY PACK INFORMATION IN FETS. 01978 M00S01796.dfterm +++|* 01979 M00S01797.dfterm +++|* ENTRY (APIN) = 42/USER NUMBER, 6/UNITS, 12/EQUIPMENT. 01980 M00S01798.dfterm +++|* 01981 M00S01799.dfterm +++|* EXIT CATALOG (C) AND DAYFILE (D) FETS SET UP WITH DEVICE 01982 M00S01800.dfterm +++|* TYPE IN WORD 1, USER NUMBER, IF ANY, FOR PRIVATE PACK 01983 M00S01801.dfterm +++|* IN WORD 9, AND NUMBER OF PHYSICAL UNITS IN WORD 12. 01984 M00S01802.dfterm +++|* 01985 M00S01803.dfterm +++|* USES A - 1, 2, 6, 7. 01986 M00S01804.dfterm +++|* X - 0, 1, 2, 6, 7.
| Line S00115 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 01987 M01S00115.ns2018 +++|* 01988 M01S00116.ns2018 +++|* MACROS RDVT. 01989 M00S01805.dfterm +++| 01990 M00S01806.dfterm +++| 01991 M00S01807.dfterm +++| SAI SUBR ENTRY/EXIT 01992 M00S01808.dfterm +++| 01993 M00S01809.dfterm +++|* SET USER NUMBER FOR PACK IN FETS. 01994 M00S01810.dfterm +++| 01995 M00S01811.dfterm +++| SA1 APIN SET USER NUMBER 01996 M00S01812.dfterm +++| MX0 42 01997 M00S01813.dfterm +++| BX7 X0*X1 01998 M00S01814.dfterm +++| SA7 C+CFOU 01999 M00S01815.dfterm +++| SA7 D+CFOU 02000 M00S01816.dfterm +++| 02001 M00S01817.dfterm +++|* SET NUMBER OF PHYSICAL UNITS IN FETS. 02002 M00S01818.dfterm +++| 02003 M00S01819.dfterm +++| AX1 12 GET NUMBER UNITS - 1 02004 M00S01820.dfterm +++| MX0 -6 02005 M00S01821.dfterm +++| BX7 -X0*X1 02006 M00S01822.dfterm +++| SX6 X7+B1 SET UNITS 02007 M00S01823.dfterm +++| SA6 C+CFPK 02008 M00S01824.dfterm +++| SA6 D+CFPK 02009 M00S01825.dfterm +++| 02010 M00S01826.dfterm +++|* GET DEVICE TYPE. 02011 M00S01827.dfterm +++| 02012 M00S01828.dfterm +++| SA2 A1 SET EQUIPMENT 02013 M00S01829.dfterm +++| MX0 -12 02014 M00S01830.dfterm +++| BX2 -X0*X2 02015 M00S01831.dfterm +++| RDVT D,X2 02016 M00S01832.dfterm +++| SA2 D+1 SET DEVICE TYPE IN CATALOG FET 02017 M00S01833.dfterm +++| SA1 C+1
| Line S00001 Modification History | |
|---|---|
M01 (Added by) | dfterm3 |
Seq # *Modification Id* Act ----------------------------+ 02018 M01S00001.dfterm3 +++| MX0 12 02019 M00S01834.dfterm +++| BX6 X0*X2 02020 M00S01835.dfterm +++| BX1 -X0*X1 02021 M00S01836.dfterm +++| BX7 X1+X6 02022 M00S01837.dfterm +++| SA7 A1 02023 M00S01838.dfterm +++| EQ SAIX 02024 M00S01839.dfterm +++| SFD SPACE 4,16 02025 M00S01840.dfterm +++|** SFD - SET FAMILY DESCRIPTION. 02026 M00S01841.dfterm +++|* 02027 M00S01842.dfterm +++|* ENTRY (X1) = 42/FAMILY OR PACK NAME, 1/F, 17/USER INDEX. 02028 M00S01843.dfterm +++|* F = AUXILIARY PACK FLAG. 02029 M00S01844.dfterm +++|* 02030 M00S01845.dfterm +++|* EXIT FAMILY/PACK NAME AND/OR USER INDEX SET IN CONTROL 02031 M00S01846.dfterm +++|* POINT AREA IF REQUESTED VALUE WAS DIFFERENT THAN THE 02032 M00S01847.dfterm +++|* CURRENT VALUE STORED INTERNALLY TO *SFD*. ILLEGAL 02033 M00S01848.dfterm +++|* VALUES FOR CURRENT FAMILY NAME AND CURRENT USER INDEX 02034 M00S01849.dfterm +++|* ARE STORED INITIALLY TO FORCE A CALL TO *CPM* ON THE 02035 M00S01850.dfterm +++|* FIRST CALL TO *SFD*. 02036 M00S01851.dfterm +++|* AUXILIARY PACK INFORMATION IS SET IN THE FETS IF 02037 M00S01852.dfterm +++|* NECESSARY. 02038 M00S01853.dfterm +++|* 02039 M00S01854.dfterm +++|* USES A - 2, 6. 02040 M00S01855.dfterm +++|* X - 0, 2, 3, 5, 6, 7. 02041 M00S01856.dfterm +++|* 02042 M00S01857.dfterm +++|* CALLS SAI.
| Line S00117 Modification History | |
|---|---|
M01 (Added by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 02043 M01S00117.ns2018 +++|* 02044 M01S00118.ns2018 +++|* MACROS ENFAM, PACKNAM, SETUI. 02045 M00S01858.dfterm +++| 02046 M00S01859.dfterm +++| 02047 M00S01860.dfterm +++| SFD SUBR ENTRY/EXIT 02048 M00S01861.dfterm +++| 02049 M00S01862.dfterm +++|* COMPARE CURRENT AND REQUESTED FAMILY AND USER INDEX. 02050 M00S01863.dfterm +++| 02051 M00S01864.dfterm +++| MX3 -17 REQUESTED USER INDEX 02052 M00S01865.dfterm +++| BX6 -X3*X1 02053 M00S01866.dfterm +++| SA2 SFDA+2 CURRENT USER INDEX 02054 M00S01867.dfterm +++| BX5 X3*X1 REQUESTED FAMILY/PACK NAME 02055 M00S01868.dfterm +++| IX7 X2-X6 02056 M00S01869.dfterm +++| ZR X7,SFD1 IF REQUESTED USER INDEX ALREADY SET 02057 M00S01870.dfterm +++| SA6 A2 SET NEW USER INDEX 02058 M00S01871.dfterm +++| SETUI X6 02059 M00S01872.dfterm +++| 02060 M00S01873.dfterm +++|* CHECK IF FAMILY OR PACK REQUESTED. 02061 M00S01874.dfterm +++| 02062 M00S01875.dfterm +++| SFD1 SX6 X5+ CHECK AUXILIARY DEVICE FLAG 02063 M00S01876.dfterm +++| SA2 SFDA+B1 CURRENT FAMILY/PACK 02064 M00S01877.dfterm +++| NZ X6,SFD2 IF AUXILIARY PACK 02065 M00S01878.dfterm +++| 02066 M00S01879.dfterm +++|* SET FAMILY NAME IF NECESSARY. 02067 M00S01880.dfterm +++| 02068 M00S01881.dfterm +++| BX7 X5-X2 02069 M00S01882.dfterm +++| BX6 X5 SET NEW FAMILY NAME 02070 M00S01883.dfterm +++| ZR X7,SFDX IF REQUESTED FAMILY ALREADY SET 02071 M00S01884.dfterm +++| SA6 A2 02072 M00S01885.dfterm +++| SA6 A6-B1 02073 M00S01886.dfterm +++| BX6 X6-X6 CLEAR ALTERNATE USER NUMBER IN FET 02074 M00S01887.dfterm +++| SA6 C+CFOU 02075 M00S01888.dfterm +++| PACKNAM 0 CLEAR PACK NAME 02076 M00S01889.dfterm +++| ENFAM SFDA 02077 M00S01890.dfterm +++| EQ SFDX RETURN 02078 M00S01891.dfterm +++| 02079 M00S01892.dfterm +++|* SET PACK NAME IF NECESSARY. 02080 M00S01893.dfterm +++| 02081 M00S01894.dfterm +++| SFD2 SX6 B1 SET AUXILIARY PACK FLAG 02082 M00S01895.dfterm +++| MX0 42 02083 M00S01896.dfterm +++| BX5 X0*X5 02084 M00S01897.dfterm +++| BX6 X5+X6 02085 M00S01898.dfterm +++| BX7 X6-X2 02086 M00S01899.dfterm +++| ZR X7,SFDX IF REQUESTED PACK ALREADY SET 02087 M00S01900.dfterm +++| SA6 A2 02088 M00S01901.dfterm +++| BX6 X5 SET PACK NAME IN CONTROL POINT AREA 02089 M00S01902.dfterm +++| SA6 A6-B1 02090 M00S01903.dfterm +++| PACKNAM SFDA 02091 M00S01904.dfterm +++| RJ SAI SET AUXILIARY PACK INFORMATION 02092 M00S01905.dfterm +++| EQ SFDX RETURN 02093 M00S01906.dfterm +++| 02094 M00S01907.dfterm +++| SFDA BSS 1 SCRATCH AREA FOR ENFAM MACRO 02095 M00S01908.dfterm +++| VFD 42/1,18/0 CURRENT FAMILY/PACK NAME 02096 M00S01909.dfterm +++| VFD 42/0,18/0 CURRENT USER INDEX 02097 M00S01910.dfterm +++| VVD SPACE 4,26 02098 M00S01911.dfterm +++|** VVD - VERIFY VALID DEVICE FOR DAYFILE EXISTENCE. 02099 M00S01912.dfterm +++|* 02100 M00S01913.dfterm +++|* CHECK FOR AUXILIARY OR REMOVABLE DEVICES. ACTIVE 02101 M00S01914.dfterm +++|* DAYFILES MAY NOT EXIST ON REMOVABLE DEVICES. ALSO, 02102 M00S01915.dfterm +++|* NEW ACTIVE DAYFILES MAY NOT BE STARTED ON PRIVATE 02103 M00S01916.dfterm +++|* PACKS UNLESS THE USER NUMBER SPECIFIED FOR PERMITS 02104 M00S01917.dfterm +++|* MATCHES THE USER NUMBER OF THE PRIVATE PACK. 02105 M00S01918.dfterm +++|* 02106 M00S01919.dfterm +++|* ENTRY (X2) = OPTION. 02107 M00S01920.dfterm +++|* (X3) = DAYFILE TYPE.
| Line S01921 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02108 M01S01921.ns22000 ---|* (X4) = EQUIPMENT NUMBER.
| Line S00033 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02109 M01S00033.ns22000 +++|* (X4) = EST ORDINAL. 02110 M00S01922.dfterm +++|* 02111 M00S01923.dfterm +++|* EXIT (X2) = OPTION. 02112 M00S01924.dfterm +++|* (X3) = DAYFILE TYPE.
| Line S01925 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02113 M01S01925.ns22000 ---|* (X4) = EQUIPMENT NUMBER.
| Line S00034 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02114 M01S00034.ns22000 +++|* (X4) = EST ORDINAL. 02115 M00S01926.dfterm +++|* (X5) = 0 IF NO ERROR. 02116 M00S01927.dfterm +++|* = *K* DISPLAY MESSAGE ADDRESS IF ERROR. 02117 M00S01928.dfterm +++|* (X6) = FAMILY/PACK NAME FOR EQUIPMENT. 02118 M00S01929.dfterm +++|* (X7) = DAYFILE EXISTENCE BITS FOR SPECIFIED TYPE. 02119 M00S01930.dfterm +++|* (B3) = SHIFT COUNT FOR DAYFILE BITS. 02120 M00S01931.dfterm +++|* (APIN) = AUXILIARY PACK INFORMATION.
| Line S01932 Modification History | |
|---|---|
M01 (Removed by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02121 M01S01932.ns22000 ---|* 42/USER NUMBER, 6/UNITS, 12/EQUIPMENT NUMBER.
| Line S00035 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02122 M01S00035.ns22000 +++|* 42/USER NUMBER, 6/UNITS, 12/EST ORDINAL. 02123 M00S01933.dfterm +++|* 02124 M00S01934.dfterm +++|* USES A - 1, 5, 6. 02125 M00S01935.dfterm +++|* B - 2, 3. 02126 M00S01936.dfterm +++|* X - 0, 1, 5, 6, 7. 02127 M00S01937.dfterm +++| 02128 M00S01938.dfterm +++| 02129 M00S01939.dfterm +++| VVD SUBR ENTRY/EXIT 02130 M00S01940.dfterm +++| 02131 M00S01941.dfterm +++|* CHECK IF LEGAL DEVICE FOR TERMINATION. 02132 M00S01942.dfterm +++| 02133 M00S01943.dfterm +++| SA1 TEQA+X4 GET EQUIPMENT ENTRY 02134 M00S01944.dfterm +++| BX7 X7-X7 CHECK IF AUXILIARY DEVICE 02135 M00S01945.dfterm +++| LX1 59-2 02136 M00S01946.dfterm +++| PL X1,VVD1 IF NOT AUXILIARY DEVICE 02137 M00S01947.dfterm +++| SA5 TMSA+X4 SET AUXILIARY PACK INFORMATION 02138 M00S01948.dfterm +++| MX0 48 02139 M00S01949.dfterm +++| BX5 X0*X5 02140 M00S01950.dfterm +++| BX6 X5+X4 02141 M00S01951.dfterm +++| SX7 B1 SET AUXILIARY DEVICE FLAG 02142 M00S01952.dfterm +++| SA6 APIN 02143 M00S01953.dfterm +++| MX0 42 GET USER NUMBER 02144 M00S01954.dfterm +++| BX6 X0*X6 02145 M00S01955.dfterm +++| ZR X6,VVD1 IF NOT PRIVATE PACK 02146 M00S01956.dfterm +++| SA5 PUNA CHECK IF LEGAL PACK FOR TERMINATION 02147 M00S01957.dfterm +++| BX6 X5-X6 02148 M00S01958.dfterm +++| ZR X6,VVD1 IF PRIVATE PACK UN SAME AS PERMIT 02149 M00S01959.dfterm +++| SX5 =C* PRIVATE PACK/PERMIT UN CONFLICT.* 02150 M00S01960.dfterm +++| EQ VVDX 02151 M00S01961.dfterm +++| 02152 M00S01962.dfterm +++| VVD1 LX1 2-1 02153 M00S01963.dfterm +++| PL X1,VVD2 IF NOT REMOVABLE DEVICE 02154 M00S01964.dfterm +++| NZ X2,VVD3 IF ACTIVE DAYFILE TERMINATION 02155 M00S01965.dfterm +++| 02156 M00S01966.dfterm +++|* GET FAMILY/PACK NAME AND DAYFILE EXISTENCE BITS. 02157 M00S01967.dfterm +++| 02158 M00S01968.dfterm +++| VVD2 SA1 A1 GET FAMILY/PACK NAME 02159 M00S01969.dfterm +++| MX0 42 02160 M00S01970.dfterm +++| BX6 X0*X1 02161 M00S01971.dfterm +++| BX6 X6+X7 ADD AUXILIARY DEVICE FLAG 02162 M00S01972.dfterm +++| SX5 X3-1 SET SHIFT COUNT FOR DAYFILE RESIDENCE BITS 02163 M00S01973.dfterm +++| SB2 10 02164 M00S01974.dfterm +++| LX5 X5,B1 02165 M00S01975.dfterm +++| SB3 X5+ 02166 M00S01976.dfterm +++| MX0 -2 GET DAYFILE TYPE BITS FOR DEVICE 02167 M00S01977.dfterm +++| SB3 B2-B3 02168 M00S01978.dfterm +++| AX1 B3 02169 M00S01979.dfterm +++| BX7 -X0*X1 02170 M00S01980.dfterm +++| BX5 X5-X5 SET NO ERROR 02171 M00S01981.dfterm +++| EQ VVDX 02172 M00S01982.dfterm +++| 02173 M00S01983.dfterm +++| VVD3 SX5 =C* REMOVABLE DEVICE/NO ACTIVE DAYFILES.* 02174 M00S01984.dfterm +++| EQ VVDX 02175 M00S01985.dfterm +++| TITLE DAYFILE NAME TABLES. 02176 M00S01986.dfterm +++|** TDNK - TABLE OF DAYFILE NAME KEYS. 02177 M00S01987.dfterm +++|* 02178 M00S01988.dfterm +++|* INDEX INTO TABLE IS DAYFILE TYPE CODE (ZERO IF NOT A DAYFILE 02179 M00S01989.dfterm +++|* NAME). 02180 M00S01990.dfterm +++| 02181 M00S01991.dfterm +++| TDNK BSS 0 TABLE OF DAYFILE NAME KEYS 02182 M00S01992.dfterm +++| LOC 0 02183 M00S01993.dfterm +++| BSS 1 INPUT KEY (USED BY SEARCH ALGORITHM) 02184 M00S01994.dfterm +++| DATA 2LDF MASTER DAYFILE TYPE 02185 M00S01995.dfterm +++| DATA 2LAC ACCOUNT DAYFILE TYPE 02186 M00S01996.dfterm +++| DATA 2LER ERROR LOG DAYFILE TYPE 02187 M00S01997.dfterm +++| DATA 2LML MAINTENANCE LOG DAYFILE TYPE 02188 M00S01998.dfterm +++| TDNKL BSS 0 TABLE LENGTH 02189 M00S01999.dfterm +++| LOC *O 02190 M00S02000.dfterm +++| SPACE 4,3 02191 M00S02001.dfterm +++|** TDFT - TABLE OF DAYFILE TYPE NAMES. 02192 M00S02002.dfterm +++|* 02193 M00S02003.dfterm +++|* INDEX INTO TABLE IS DAYFILE TYPE CODE (ZERO IF NOT A DAYFILE). 02194 M00S02004.dfterm +++| 02195 M00S02005.dfterm +++| TDFT BSS 0 TABLE OF DAYFILE TYPES 02196 M00S02006.dfterm +++| LOC 0 02197 M00S02007.dfterm +++| DATA 10LNONE NOT DAYFILE 02198 M00S02008.dfterm +++| DATA 10LDAYFILE MASTER DAYFILE 02199 M00S02009.dfterm +++| DATA 10LACCOUNT ACCOUNT DAYFILE 02200 M00S02010.dfterm +++| DATA 10LERRLOG ERROR LOG DAYFILE 02201 M00S02011.dfterm +++| DATA 10LMAINLOG MAINTENANCE LOG DAYFILE 02202 M00S02012.dfterm +++| LOC *O 02203 M00S02013.dfterm +++| TITLE ERROR PROCESSING TABLES.
| Line S02014 Modification History | |
|---|---|
M01 (Removed by) | ns2018 |
Seq # *Modification Id* Act ----------------------------+ 02204 M01S02014.ns2018 ---|** TPEP - TABLE OF *PFM* ERROR PROCESSING. 02205 M01S02015.ns2018 ---|* 02206 M01S02016.ns2018 ---|* INDEX INTO TABLE IS *PFM* ERROR CODE. 02207 M01S02017.ns2018 ---|* QUANTITY REPRESENTS ERROR MESSAGE ADDRESS UNLESS UPPER 02208 M01S02018.ns2018 ---|* BIT IN WORD IS SET, IN WHICH CASE QUANTITY IS THE ERROR 02209 M01S02019.ns2018 ---|* PROCESSOR ADDRESS. 02210 M01S02020.ns2018 ---| 02211 M01S02021.ns2018 ---| TPEP BSS 0 TABLE OF *PFM* ERROR PROCESSING 02212 M01S02022.ns2018 ---| LOC 0 02213 M01S02023.ns2018 ---| BSS 1 02214 M01S02024.ns2018 ---| CON MPER FILE BUSY 02215 M01S02025.ns2018 ---| CON MPER FILE NOT FOUND 02216 M01S02026.ns2018 ---| CON MPER FILE EMPTY 02217 M01S02027.ns2018 ---| CON MPER FILE NOT ON MASS STORAGE 02218 M01S02028.ns2018 ---| VFD 1/1,59/ERP1 FILE ALREADY PERMANENT 02219 M01S02029.ns2018 ---| CON MPER FILE ILLEGAL FILE TYPE 02220 M01S02030.ns2018 ---| CON MPER FILE NAME ERROR 02221 M01S02031.ns2018 ---| CON MPER ILLEGAL USER ACCESS 02222 M01S02032.ns2018 ---| CON MPER ILLEGAL DEVICE REQUEST 02223 M01S02033.ns2018 ---| CON MPER FILE TOO LONG 02224 M01S02034.ns2018 ---| CON MPER PFM ILLEGAL REQUEST 02225 M01S02035.ns2018 ---| CON MPER DEVICE UNAVAILABLE 02226 M01S02036.ns2018 ---| CON MPER DIRECT ACCESS DEVICE ERROR 02227 M01S02037.ns2018 ---| VFD 1/1,59/ERP2 PF UTILITY ACTIVE 02228 M01S02038.ns2018 ---| CON MPER DATA TRANSFER ERROR 02229 M01S02039.ns2018 ---| CON MPER CATALOG OVERFLOW - FILES 02230 M01S02040.ns2018 ---| CON MPER CATALOG OVERFLOW - SIZE 02231 M01S02041.ns2018 ---| CON MPER PRUS REQUESTED NOT AVAILABLE 02232 M01S02042.ns2018 ---| CON MPER I/O SEQUENCE ERROR 02233 M01S02043.ns2018 ---| BSS 4 02234 M01S02044.ns2018 ---| VFD 1/1,59/ERP3 RESEX FAILURE 02235 M01S02045.ns2018 ---| VFD 1/1,59/ERP3 EQ TRACK LIMIT 02236 M01S02046.ns2018 ---| VFD 1/1,59/ERP3 FILE LENGTH ERROR 02237 M01S02047.ns2018 ---| VFD 1/1,59/ERP3 RANDOM INDEX ERROR 02238 M01S02048.ns2018 ---| VFD 1/1,59/ERP3 DIRECT ACCESS FILE ERROR 02239 M01S02049.ns2018 ---| VFD 1/1,59/ERP3 REPLACE ERROR 02240 M01S02050.ns2018 ---| VFD 1/1,59/ERP3 PFM ABORTED 02241 M01S02051.ns2018 ---| VFD 1/1,59/ERP3 MASS STORAGE ERROR 02242 M01S02052.ns2018 ---| LOC *O 02243 M01S02053.ns2018 ---| SPACE 4 02244 M00S02054.dfterm +++|** TSEP - TABLE OF *SFM* ERROR PROCESSING. 02245 M00S02055.dfterm +++|* 02246 M00S02056.dfterm +++|* INDEX INTO TABLE IS *SFM* ERROR CODE. 02247 M00S02057.dfterm +++|* QUANTITY REPRESENTS ERROR MESSAGE ADDRESS. 02248 M00S02058.dfterm +++| 02249 M00S02059.dfterm +++| TSEP BSS 0 TABLE OF *SFM* ERROR PROCESSING 02250 M00S02060.dfterm +++| LOC 0 02251 M00S02061.dfterm +++| BSS 1 02252 M00S02062.dfterm +++| CON MS01 FILE BUSY 02253 M00S02063.dfterm +++| CON MS02 NOT ENOUGH MASS STORAGE 02254 M00S02064.dfterm +++| CON MS03 FILE NOT FOUND 02255 M00S02065.dfterm +++| CON MS04 UNCORRECTABLE RMS ERROR 02256 M00S02066.dfterm +++| LOC *O 02257 M00S02067.dfterm +++| TITLE ERROR PROCESSING MESSAGES. 02258 M00S02068.dfterm +++|** *SFM* ERROR MESSAGES. 02259 M00S02069.dfterm +++| 02260 M00S02070.dfterm +++| MS01 DATA C* DAYFILE BUSY. * 02261 M00S02071.dfterm +++| MS02 DATA C* NOT ENOUGH MASS STORAGE. * 02262 M00S02072.dfterm +++| MS03 DATA C* INACTIVE DAYFILE NOT FOUND ON DEVICE. * 02263 M00S02073.dfterm +++| MS04 DATA C* UNCORRECTABLE RMS ERROR. * 02264 M00S02074.dfterm +++| 02265 M00S02075.dfterm +++|** *PFM* ERROR MESSAGES. 02266 M00S02076.dfterm +++| 02267 M00S02077.dfterm +++| MPER BSS 4 *PFM* ERROR MESSAGE RETURN BLOCK 02268 M00S02078.dfterm +++| TITLE COMMON DECKS.
| Line S00036 Modification History | |
|---|---|
M01 (Added by) | ns22000 |
Seq # *Modification Id* Act ----------------------------+ 02269 M01S00036.ns22000 +++| COMMON SPACE 4,10 02270 M01S00037.ns22000 +++|** COMMON DECKS. 02271 M01S00038.ns22000 +++| 02272 M01S00039.ns22000 +++| 02273 M00S02079.dfterm +++|*CALL COMCCDD 02274 M00S02080.dfterm +++|*CALL COMCCIO 02275 M00S02081.dfterm +++|*CALL COMCCOD 02276 M00S02082.dfterm +++|*CALL COMCCPM 02277 M00S02083.dfterm +++|*CALL COMCEDT 02278 M00S02084.dfterm +++|*CALL COMCLFM 02279 M00S02085.dfterm +++|*CALL COMCMVE 02280 M00S02086.dfterm +++|*CALL COMCPFM 02281 M00S02087.dfterm +++|*CALL COMCRDC 02282 M00S02088.dfterm +++|*CALL COMCRDW 02283 M00S02089.dfterm +++|*CALL COMCSFM 02284 M00S02090.dfterm +++|*CALL COMCSFN 02285 M00S02091.dfterm +++|*CALL COMCSYS 02286 M00S02092.dfterm +++|*CALL COMCWTC 02287 M00S02093.dfterm +++|*CALL COMCWTW 02288 M00S02094.dfterm +++| TITLE BUFFERS. 02289 M00S02095.dfterm +++| USE LITERALS 02290 M00S02096.dfterm +++| 02291 M00S02097.dfterm +++|* BUFFERS. 02292 M00S02098.dfterm +++| 02293 M00S02099.dfterm +++| CENB BSS NWCE CATALOG ENTRY BUFFER 02294 M00S02100.dfterm +++| PDCB BSS PDCBL PERMANENT DAYFILE LIST CONTROL BUFFER 02295 M00S02101.dfterm +++| PDLB BSS PDLBL PERMANENT DAYFILE LIST LINE BUFFER
| Line S02102 Modification History | |
|---|---|
M01 (Removed by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 02296 M01S02102.241l630 ---| KBUF VFD 12/1,48/0 *K* DISPLAY BUFFER
| Line S00007 Modification History | |
|---|---|
M01 (Added by) | 241l630 |
Seq # *Modification Id* Act ----------------------------+ 02297 M01S00007.241l630 +++| KBUF VFD 11/0,1/1,1/1,5/0,18/KTIA,24/0 K-DISPLAY BUFFER 02298 M00S02103.dfterm +++| DBUF EQU *+KBUFL TERMINATED DAYFILE BUFFER 02299 M00S02104.dfterm +++| CBUF EQU DBUF+DBUFL CATALOG BUFFER 02300 M00S02105.dfterm +++| OBUF EQU CBUF+CBUFL OUTPUT BUFFER 02301 M00S02106.dfterm +++| DSPB EQU OBUF+OBUFL *DSP* PARAMETER BLOCK 02302 M00S02107.dfterm +++| BUFFL EQU DSPB+DSPBL END OF BUFFERS 02303 M00S02108.dfterm +++| SPACE 4,10 02304 M00S02109.dfterm +++| ERRPL *-RFL IF DEFAULT FIELD LENGTH TOO SMALL 02305 M00S02110.dfterm +++| SPACE 4 02306 M00S02111.dfterm +++| END DFTERM
cdc/nos2.source/opl.opl871/deck/dfterm.001.txt · Last modified: by 127.0.0.1