Seq # *Modification Id* Act
----------------------------+
00001 M00S00001.comfds2 +++|
00002 M00S00002.comfds2 +++|# COMFDS2 - LAST SECTION OF DATA SEGMENT #
00003 M00S00003.comfds2 +++| CONTROL NOLIST;
00004 M00S00004.comfds2 +++| CONTROL IFEQ LISTCON,1;
00005 M00S00005.comfds2 +++| CONTROL LIST;
00006 M00S00006.comfds2 +++| CONTROL FI;
Line S00001 Modification History |
M01 (Added by) | 281l803 |
Seq # *Modification Id* Act
----------------------------+
00007 M01S00001.281l803 +++| #
00008 M01S00002.281l803 +++|* COPYRIGHT CONTROL DATA SYSTEMS INC. 1992.
00009 M01S00003.281l803 +++| #
00010 M00S00007.comfds2 +++| ARRAY TWOFILES [1:2];
00011 M00S00008.comfds2 +++| BEGIN
00012 M00S00009.comfds2 +++| ITEM FILEATTR; # ALL ATTRIBUTES, THIS FILE #
00013 M00S00010.comfds2 +++| ITEM FILENAM C(0,0,7)=[" "," "];
Line S00001 Modification History |
M01 (Added by) | ns2607 |
Seq # *Modification Id* Act
----------------------------+
00014 M01S00001.ns2607 +++| ITEM INITNMBR U(0,54,2);
00015 M01S00002.ns2607 +++| ITEM INITFILE U(0,54,1)=[0,0];
00016 M00S00011.comfds2 +++| ITEM NUMBERED U(0,55,1)=[0,0];
00017 M00S00012.comfds2 +++| ITEM LOCKED U(0,56,1)=[0,0];
00018 M00S00013.comfds2 +++| ITEM CHANGED U(0,57,1)=[0,0];
00019 M00S00014.comfds2 +++| ITEM ASCII U(0,58,2)=[0,0];
00020 M00S00015.comfds2 +++| END
00021 M00S00016.comfds2 +++|
00022 M00S00017.comfds2 +++| ITEM USRBRK=0; # NOTIFIES US OF INTERRUPT #
00023 M00S00018.comfds2 +++|
00024 M00S00019.comfds2 +++| ARRAY BOOLEANS [0:0] P(2); # BOOLEAN FLAGS #
00025 M00S00020.comfds2 +++| BEGIN # ARRAY BOOLEANS #
00026 M00S00021.comfds2 +++| ITEM ALLBOOLS1 U(00,00,60)=[0]; # CLEAR ALL WORD ONE FLAGS #
00027 M00S00022.comfds2 +++| ITEM FORCESINGLE B(00,00,01); # FORCE SINGLE EDITOR SOON #
00028 M00S00023.comfds2 +++| ITEM CONNECTED B(00,01,01); # HOOKING UP TO MULTI #
00029 M00S00024.comfds2 +++| ITEM FORCENULL B(00,02,01); # USED FOR MULTI DRAINALL #
00030 M00S00025.comfds2 +++| ITEM SMFINCTL B(00,03,01); # RECOVERY VERSUS NORMAL END #
00031 M00S00026.comfds2 +++| ITEM SMFVICTIM B(00,04,01); # SMFEX HAD TERRIBLE PROBLEM #
00032 M00S00027.comfds2 +++| ITEM ZEROCOLASK B(00,05,01); # THE COLON QUESTION WAS "ASKED" #
00033 M00S00028.comfds2 +++| ITEM IOWRTEOR B(00,06,01); # NEED EOR NEXT WRITE #
00034 M00S00029.comfds2 +++| ITEM IORESUMED B(00,07,01); # USE OLD WORK OR NEW INITED #
00035 M00S00030.comfds2 +++| ITEM IOACT B(00,08,01); # IO ACTIVE #
00036 M00S00031.comfds2 +++| ITEM IOREAD B(00,09,01); # ACTIVE IO IS READ #
00037 M00S00032.comfds2 +++| ITEM IOWRITE B(00,10,01); # ACTIVE IO IS WRITE #
00038 M00S00033.comfds2 +++| ITEM IOAPEND B(00,11,01); # ACTIVE IO IS APPEND #
00039 M00S00034.comfds2 +++| ITEM FOUNDOTHER B(00,12,01); # RANGE IN BOUNDS #
00040 M00S00035.comfds2 +++| ITEM UPPERSEARCH B(00,13,01); # SEARCH AS THOUGH UPPER-CASE #
00041 M00S00036.comfds2 +++| ITEM APSTRREAD B(00,14,01); # APPLICATION STRING READ #
00042 M00S00037.comfds2 +++| ITEM FORCEFIELD B(00,15,01); # USED TO PARSE TAB SPECS #
00043 M00S00038.comfds2 +++| ITEM SOFTTAB B(00,16,01); # SOFT TABCHAR KEY STRUCK #
00044 M00S00039.comfds2 +++| ITEM WORDSEARCH B(00,17,01); # WORD MODE, LOCATE/REPLACE #
00045 M00S00040.comfds2 +++| ITEM SCANBLOCK B(00,18,01); # SCANNER DETECTED "BLOCK" #
00046 M00S00041.comfds2 +++| ITEM SCANWORD B(00,19,01); # SCANNER DETECTED "WORD" #
00047 M00S00042.comfds2 +++| ITEM FORWARD B(00,20,01); # SCANNER DETECTED "NEXT" #
00048 M00S00043.comfds2 +++| ITEM BACKWARD B(00,21,01); # SCANNER DETECTED "PREVIOUS" #
00049 M00S00044.comfds2 +++| ITEM DONTPRINT B(00,22,01); # SCANNER DETECTED "QUIET" #
00050 M00S00045.comfds2 +++| ITEM FOUND B(00,23,01); # SEARCH/SCAN RESULT #
00051 M00S00046.comfds2 +++| ITEM FIELDFLG B(00,24,01); # COLUMNAR FIND/SUBST #
00052 M00S00047.comfds2 +++| ITEM LINECHANGED B(00,25,01); # LINE CHANGED ON SCREEN #
00053 M00S00048.comfds2 +++| ITEM ALIGNGOOD B(00,26,01); # ALIGN CALCULATION PRECISE #
00054 M00S00049.comfds2 +++| ITEM SHORTTITLE B(00,27,01); # SHORT TITLE FORMAT CHOSEN #
00055 M00S00050.comfds2 +++| ITEM COMPUTEDPOS B(00,28,01); # CURSOR POSITION PRE-COMPUTE #
00056 M00S00051.comfds2 +++| ITEM ELLIPSIS B(00,29,01); # LOCATE LINES WITH BOTH STRINGS #
00057 M00S00052.comfds2 +++| ITEM ESCAPE B(00,30,01); # ESCAPE TEXT PROMPTING #
00058 M00S00053.comfds2 +++| ITEM NXTESCAPE B(00,31,01); # NEXT ESCAPE TEXT PROMPTING #
00059 M00S00054.comfds2 +++| ITEM CANINTER B(00,32,01); # BREAKABLE COMMAND #
00060 M00S00055.comfds2 +++| ITEM TXTINCMD B(00,33,01); # TEXT EMBEDDED, NO PROMPT #
00061 M00S00056.comfds2 +++| ITEM CHARRANGE B(00,34,01); # CHARACTER-ORIENTED RANGES #
00062 M00S00057.comfds2 +++| ITEM ALLOWBACK B(00,35,01); # COMMAND ALLOWS BACKWARDS #
00063 M00S00058.comfds2 +++| ITEM ALLASCII B(00,36,01); # FORCE ALL FILES ASCII #
00064 M00S00059.comfds2 +++| ITEM FLOAT B(00,37,01); # DISPLAY FLOAT NUMBERS #
00065 M00S00060.comfds2 +++| ITEM AUTOINDENT B(00,38,01); # SET JUMP ENABLED #
00066 M00S00061.comfds2 +++| ITEM PAGELAST B(00,39,01); # LAST COMMAND WAS PAGE #
00067 M00S00062.comfds2 +++| ITEM DELETEDONE B(00,40,01); # FOR EXEC AND DELZ #
00068 M00S00063.comfds2 +++| ITEM SCREENMODE B(00,41,01); # SCREEN-EDIT MODE #
00069 M00S00064.comfds2 +++| ITEM FIRSTEVENT B(00,42,01); # FIRST VDT INPUT EVENT #
00070 M00S00065.comfds2 +++| ITEM SCANUPPER B(00,43,01); # "UPPER" KEYWORD SCANNED #
00071 M00S00066.comfds2 +++| ITEM AUDITOFF B(00,44,01); # "UNDO" AUDIT TRAIL DISABLED #
00072 M00S00067.comfds2 +++| ITEM NONDEFAULT B(00,45,01); # NON-TRIVIAL RANGE SCANNED #
00073 M00S00068.comfds2 +++| ITEM PROCACTIVE B(00,46,01); # SEQUENTIAL PROC FILE ACTIVE #
00074 M00S00069.comfds2 +++| ITEM SCANHOME B(00,47,01); # "HOME" PARAMETER SCANNED #
00075 M00S00070.comfds2 +++| ITEM SUBSTONCE B(00,48,01); # SUBSTITUTE ONLY ONCE/LINE #
00076 M00S00071.comfds2 +++| ITEM HARDFN B(00,49,01); # HARDWARE FN VS SIMULATE #
00077 M00S00072.comfds2 +++| ITEM PROMPTING B(00,50,01); # USED FOR SCREEN PROMPTS #
00078 M00S00073.comfds2 +++| ITEM AUDITUSED B(00,51,01); # AUDIT TRAIL RECENTLY USED #
00079 M00S00074.comfds2 +++| ITEM FIRSTRANGE B(00,52,01); # FIRST PASS OF DORANGE LOOP #
00080 M00S00075.comfds2 +++| ITEM LASTRANGE B(00,53,01); # LAST PASS OF DORANGE LOOP #
00081 M00S00076.comfds2 +++| ITEM KILLMARKS B(00,54,01); # KILL THE MARKS #
00082 M00S00077.comfds2 +++| ITEM ABORTED B(00,55,01); # SOMETHING WRONG LAST EDIT #
00083 M00S00078.comfds2 +++| ITEM EXITFLAGS U(00,56,04); # MUST COVER ALL EXIT FLAGS #
00084 M00S00079.comfds2 +++| ITEM EXITSAVE B(00,56,01); # REPLACE PFM MACRO WANTED #
00085 M00S00080.comfds2 +++| ITEM EXITQUIT B(00,57,01); # SUPPRESS REBUILD #
00086 M00S00081.comfds2 +++| ITEM EXITCMD B(00,58,01); # CURRENT COMMAND IS EXIT #
00087 M00S00082.comfds2 +++| ITEM EXITEXCST B(00,59,01); # EXECUTE NOS CONTROL STATEMENT #
00088 M00S00083.comfds2 +++|
00089 M00S00084.comfds2 +++| ITEM ALLBOOLS2 U(01,00,60)=[0]; # CLEAR ALL WORD TWO FLAGS #
00090 M00S00085.comfds2 +++| ITEM PAINTAGAIN B(01,00,01); # FORCE SCREEN PAINT #
00091 M00S00086.comfds2 +++| ITEM ZEROCOLIN B(01,01,01); # SOME 6/12 FILES HAD 00 COLON #
00092 M00S00087.comfds2 +++| # AT INITIAL FILE BUILD #
00093 M00S00088.comfds2 +++| ITEM ZEROCOLOUT B(01,02,01); # USER WANTS 00 COLONS FOR 6/12 #
00094 M00S00089.comfds2 +++| ITEM FORCEDHOME B(01,03,01); # FORCED TO PUT CURSOR AT HOME #
00095 M00S00090.comfds2 +++| ITEM SCHSTRSPEC B(01,04,01); # SEARCH STRING SPECIFIED #
00096 M00S00091.comfds2 +++| ITEM FORCEAUTOP B(01,05,01); # FORCE AUTO HALF PAGE #
00097 M00S00092.comfds2 +++| ITEM DATAKEYPRS B(01,06,01); # DATA KEY PRESSED #
00098 M00S00093.comfds2 +++| ITEM SCANSFILE B(01,07,01); # SOURCE FILE FOR COPY/MOVE SEEN #
00099 M00S00094.comfds2 +++| ITEM SCANTO B(01,08,01); # SCANNER DETECTED "TO" #
00100 M00S00095.comfds2 +++| ITEM SCNLINX B(01,09,01); # SCNLIN DETECTED "X" #
00101 M00S00096.comfds2 +++| ITEM SCNLINY B(01,10,01); # SCNLIN DETECTED "Y" #
00102 M00S00097.comfds2 +++| ITEM SCNLINZ B(01,11,01); # SCNLIN DETECTED "Z" #
00103 M00S00098.comfds2 +++| ITEM SCNONCE B(01,12,01); # ASSURE ONLY ONE RESCAN #
00104 M00S00099.comfds2 +++| ITEM CMDWASDLTE B(01,13,01); # COMMAND WAS "DELETE" #
00105 M00S00100.comfds2 +++| ITEM FORCEAUTOR B(01,14,01); # FORCE AUTO RETURN #
00106 M00S00101.comfds2 +++| ITEM SCANMARK B(01,15,01); # SCANNER DETECTED "MARK" #
Line S00001 Modification History |
M01 (Added by) | ns2503 |
Seq # *Modification Id* Act
----------------------------+
00107 M01S00001.ns2503 +++| ITEM RIGHTJUST B(01,16,01); # RIGHT JUSTIFY FOR .FILL #
Line S00002 Modification History |
M01 (Added by) | ns2503 |
M02 (Removed by) | ns2623 |
Seq # *Modification Id* Act
----------------------------+
00108 M02S00002.ns2623 ---| ITEM FUTUREUSE17 B(01,17,01); # FOR FUTURE (CDC) USE #
Line S00001 Modification History |
M01 (Added by) | ns2623 |
Seq # *Modification Id* Act
----------------------------+
00109 M01S00001.ns2623 +++| ITEM ECHOOFF B(01,18,01); # DO NOT ECHO DIRECTIVES #
Line S00003 Modification History |
M01 (Added by) | ns2503 |
Seq # *Modification Id* Act
----------------------------+
00110 M01S00003.ns2503 +++| ITEM FUTUREUSE18 B(01,18,01); # FOR FUTURE (CDC) USE #
00111 M01S00004.ns2503 +++| ITEM FUTUREUSE19 B(01,19,01); # FOR FUTURE (CDC) USE #
00112 M01S00005.ns2503 +++| ITEM FUTUREUSE20 B(01,20,01); # FOR FUTURE (CDC) USE #
00113 M01S00006.ns2503 +++| ITEM FUTUREUSE21 B(01,21,01); # FOR FUTURE (CDC) USE #
00114 M01S00007.ns2503 +++| ITEM FUTUREUSE22 B(01,22,01); # FOR FUTURE (CDC) USE #
00115 M01S00008.ns2503 +++| ITEM FUTUREUSE23 B(01,23,01); # FOR FUTURE (CDC) USE #
00116 M01S00009.ns2503 +++| ITEM FUTUREUSE24 B(01,24,01); # FOR FUTURE (CDC) USE #
00117 M01S00010.ns2503 +++| ITEM FUTUREUSE25 B(01,25,01); # FOR FUTURE (CDC) USE #
00118 M01S00011.ns2503 +++| ITEM FUTUREUSE26 B(01,26,01); # FOR FUTURE (CDC) USE #
00119 M01S00012.ns2503 +++| ITEM FUTUREUSE27 B(01,27,01); # FOR FUTURE (CDC) USE #
00120 M01S00013.ns2503 +++| ITEM FUTUREUSE28 B(01,28,01); # FOR FUTURE (CDC) USE #
00121 M01S00014.ns2503 +++| ITEM FUTUREUSE29 B(01,29,01); # FOR FUTURE (CDC) USE #
00122 M01S00015.ns2503 +++| ITEM FUTUREUSE30 B(01,30,01); # FOR FUTURE (CDC) USE #
00123 M01S00016.ns2503 +++| ITEM FUTUREUSE31 B(01,31,01); # FOR FUTURE (CDC) USE #
00124 M01S00017.ns2503 +++| ITEM FUTUREUSE32 B(01,32,01); # FOR FUTURE (CDC) USE #
00125 M01S00018.ns2503 +++| ITEM FUTUREUSE33 B(01,33,01); # FOR FUTURE (CDC) USE #
00126 M01S00019.ns2503 +++| ITEM FUTUREUSE34 B(01,34,01); # FOR FUTURE (CDC) USE #
00127 M01S00020.ns2503 +++| ITEM FUTUREUSE35 B(01,35,01); # FOR FUTURE (CDC) USE #
00128 M01S00021.ns2503 +++| ITEM FUTUREUSE36 B(01,36,01); # FOR FUTURE (CDC) USE #
00129 M01S00022.ns2503 +++| ITEM FUTUREUSE37 B(01,37,01); # FOR FUTURE (CDC) USE #
00130 M01S00023.ns2503 +++| ITEM FUTUREUSE38 B(01,38,01); # FOR FUTURE (CDC) USE #
00131 M01S00024.ns2503 +++| ITEM FUTUREUSE39 B(01,39,01); # FOR FUTURE (CDC) USE #
00132 M01S00025.ns2503 +++| ITEM FUTUREUSE40 B(01,40,01); # FOR FUTURE (CDC) USE #
00133 M01S00026.ns2503 +++| ITEM FUTUREUSE41 B(01,41,01); # FOR FUTURE (CDC) USE #
00134 M01S00027.ns2503 +++| ITEM FUTUREUSE42 B(01,42,01); # FOR FUTURE (CDC) USE #
00135 M01S00028.ns2503 +++| ITEM FUTUREUSE43 B(01,43,01); # FOR FUTURE (CDC) USE #
00136 M01S00029.ns2503 +++| ITEM FUTUREUSE44 B(01,44,01); # FOR FUTURE (CDC) USE #
00137 M01S00030.ns2503 +++| ITEM FUTUREUSE45 B(01,45,01); # FOR FUTURE (CDC) USE #
00138 M01S00031.ns2503 +++| ITEM FUTUREUSE46 B(01,46,01); # FOR FUTURE (CDC) USE #
00139 M01S00032.ns2503 +++| ITEM FUTUREUSE47 B(01,47,01); # FOR FUTURE (CDC) USE #
00140 M01S00033.ns2503 +++| ITEM FUTUREUSE48 B(01,48,01); # FOR FUTURE (CDC) USE #
00141 M01S00034.ns2503 +++| ITEM FUTUREUSE49 B(01,49,01); # FOR FUTURE (CDC) USE #
00142 M01S00035.ns2503 +++| ITEM FUTUREUSE50 B(01,50,01); # FOR FUTURE (CDC) USE #
00143 M01S00036.ns2503 +++| ITEM FUTUREUSE51 B(01,51,01); # FOR FUTURE (CDC) USE #
00144 M01S00037.ns2503 +++| ITEM FUTUREUSE52 B(01,52,01); # FOR FUTURE (CDC) USE #
00145 M01S00038.ns2503 +++| ITEM FUTUREUSE53 B(01,53,01); # FOR FUTURE (CDC) USE #
00146 M01S00039.ns2503 +++| ITEM FUTUREUSE54 B(01,54,01); # FOR FUTURE (CDC) USE #
00147 M01S00040.ns2503 +++| ITEM FUTUREUSE55 B(01,55,01); # FOR FUTURE (CDC) USE #
00148 M01S00041.ns2503 +++| ITEM FUTUREUSE56 B(01,56,01); # FOR FUTURE (CDC) USE #
00149 M01S00042.ns2503 +++| ITEM FUTUREUSE57 B(01,57,01); # FOR FUTURE (CDC) USE #
00150 M01S00043.ns2503 +++| ITEM FUTUREUSE58 B(01,58,01); # FOR FUTURE (CDC) USE #
00151 M01S00044.ns2503 +++| ITEM FUTUREUSE59 B(01,59,01); # FOR FUTURE (CDC) USE #
00152 M00S00102.comfds2 +++| END # ARRAY BOOLEANS #
00153 M00S00103.comfds2 +++|
00154 M00S00104.comfds2 +++|
00155 M00S00105.comfds2 +++| ARRAY SIZES [0:0] P(11); # WIDTHS, ETC. #
00156 M00S00106.comfds2 +++| BEGIN # ARRAY SIZES #
00157 M00S00107.comfds2 +++| ITEM BLANKS I(00)=[1]; # BLANKS AFTER SEQUENCE NO.S #
00158 M00S00108.comfds2 +++| ITEM GROUPSIZ I(01)=[9]; # LINES PRINTED BY V IN LINE #
00159 M00S00109.comfds2 +++| ITEM WIDTH I(02)=[160]; # DEFAULT LINE WIDTH FOR SVW #
00160 M00S00110.comfds2 +++| ITEM NUMWIDBLK I(03)=[6]; # SEQUENCE NUMBERS PLUS BLANKS #
00161 M00S00111.comfds2 +++| ITEM USRNUMCOL I(04)=[1]; # DEFAULT COLUMNS TO DISPLAY #
00162 M00S00112.comfds2 +++| ITEM USRNUMLIN I(05)=[1]; # DEFAULT LINES TO DISPLAY #
00163 M00S00113.comfds2 +++| ITEM USRSPLTSZ I(06)=[-1]; # USER SPLIT SIZE #
00164 M00S00114.comfds2 +++| ITEM EDITFIELD I(07)=[250]; # DEFAULT EDIT FIELD FOR SVE #
Line S00115 Modification History |
M01 (Removed by) | ns2623 |
Seq # *Modification Id* Act
----------------------------+
00165 M01S00115.ns2623 ---| ITEM FILLLEFT I(08)=[0]; # SWF LEFT MARGIN #
00166 M01S00116.ns2623 ---| ITEM FILLRIGHT I(09)=[64]; # SWF RIGHT MARGIN #
00167 M01S00117.ns2623 ---| ITEM FILLFIRST I(10)=[4]; # SWF INDENTATION #
Line S00002 Modification History |
M01 (Added by) | ns2623 |
Seq # *Modification Id* Act
----------------------------+
00168 M01S00002.ns2623 +++| ITEM FILLLEFT I(08,00,12)=[0]; # SWF LEFT MARGIN #
00169 M01S00003.ns2623 +++| ITEM FILLRIGHT I(08,12,12)=[64];# SWF RIGHT MARGIN #
00170 M01S00004.ns2623 +++| ITEM FILLFIRST I(08,24,12)=[4]; # SWF INDENTATION #
Line S00001 Modification History |
M01 (Added by) | ns2688 |
Seq # *Modification Id* Act
----------------------------+
00171 M01S00001.ns2688 +++| ITEM INFLDBGN I(08,36,12)=[0]; # LEFT *IN* MARGIN #
00172 M01S00002.ns2688 +++| ITEM INFLDEND I(08,48,12)=[0]; # RIGHT *IN* MARGIN #
Line S00005 Modification History |
M01 (Added by) | ns2623 |
Seq # *Modification Id* Act
----------------------------+
00173 M01S00005.ns2623 +++| ITEM UNPRINT I(09)=[CUPARROW];# UNPRINTABLE CHARACTERS #
Line S00006 Modification History |
M01 (Added by) | ns2623 |
M02 (Removed by) | ns2688 |
Seq # *Modification Id* Act
----------------------------+
00174 M02S00006.ns2688 ---| ITEM CDCRESVRD I(10)=[0]; # RESERVED FOR CDC #
Line S00003 Modification History |
M01 (Added by) | ns2688 |
Seq # *Modification Id* Act
----------------------------+
00175 M01S00003.ns2688 +++| ITEM DFINFIELD I(10,00,24); # DEFAULT *IN* MARGINS(*SVI*) #
00176 M01S00004.ns2688 +++| ITEM DFINBGN I(10,00,12)=[1]; # DEFAULT LEFT *IN* MARGIN #
00177 M01S00005.ns2688 +++| ITEM DFINEND I(10,12,12)=[250]; # DEFAULT RIGHT *IN* MARGIN #
00178 M01S00006.ns2688 +++| ITEM CDCRESVRD I(10,24,36)=[0]; # RESERVED FOR CDC #
00179 M00S00118.comfds2 +++| END # ARRAY SIZES #
00180 M00S00119.comfds2 +++|
00181 M00S00120.comfds2 +++| ARRAY VARYCHARS(6); # VARIABLE SYNTAX CHARACTERS #
00182 M00S00121.comfds2 +++| BEGIN # MUST MATCH SETKEYS ARRAY #
00183 M00S00122.comfds2 +++| ITEM BLKCHAR (0)=[CAMPER]; # M-MOD BLANK #
00184 M00S00123.comfds2 +++| ITEM COPCHAR (1)=[CBLANK]; # M-MOD COPY #
00185 M00S00124.comfds2 +++| ITEM DELCHAR (2)=[CPOUND]; # M-MOD DELETE #
00186 M00S00125.comfds2 +++| ITEM INSCHAR (3)=[CUPARROW]; # M-MOD INSERT #
00187 M00S00126.comfds2 +++| ITEM TABCHAR (4)=[CBAKSLASH]; # TAB #
00188 M00S00127.comfds2 +++| ITEM TRNCHAR (5)=[CEXCLAM]; # M-MOD TRUNCATE #
00189 M00S00128.comfds2 +++| END
00190 M00S00129.comfds2 +++| ARRAY TABVECTOR [1:TABWORDS];
00191 M00S00130.comfds2 +++| BEGIN # 20 TABS, DEFAULT FOR FORTRAN #
00192 M00S00131.comfds2 +++| ITEM TABVCTWRD=[O"01443400000000000000",0,0];
00193 M00S00132.comfds2 +++| END
00194 M00S00133.comfds2 +++|
00195 M00S00134.comfds2 +++| # THE WORDFLAGS ARRAY INDICATES WHICH INTERNAL CHARACTER SET VALUES #
00196 M00S00135.comfds2 +++| # ARE TREATED AS ALPHANUMERIC RATHER THAN AS PUNCTUATION, FOR THE #
00197 M00S00136.comfds2 +++| # PURPOSES OF UPPER-CASE SEARCHING, THE DELETE WORD OPERATION, AND #
00198 M00S00137.comfds2 +++| # THE CURRENT WORD MICRO. THE ARRAY USES FOUR WORDS IN WHICH THE #
00199 M00S00138.comfds2 +++| # FIRST 32 BITS ARE USED. THE INITIAL VALUE TURNS ON THE BITS FOR #
00200 M00S00139.comfds2 +++| # ALL UPPER AND LOWER CASE LETTERS AND FOR DIGITS. THE ORDER OF #
00201 M00S00140.comfds2 +++| # THE BITS IS HARD CODED FOR THE STANDARD DEFINITION OF THE #
00202 M00S00141.comfds2 +++| # INTERNAL CHARACTER SET. #
00203 M00S00142.comfds2 +++|
00204 M00S00143.comfds2 +++| ARRAY WORDFLAGS [0:3] P(1); # PUNCTUATION VS ALPHANUMERIC #
00205 M00S00144.comfds2 +++| BEGIN # ARRAY WORDFLAGS #
00206 M00S00145.comfds2 +++| ITEM WORDFLAG I= # CHARACTER SET FLAGS #
00207 M00S00146.comfds2 +++| [O"3777 7777 7760 0000 0000",
00208 M00S00147.comfds2 +++| O"7600 0000 0000 0000 0000",
00209 M00S00148.comfds2 +++| O"3777 7777 7000 0000 0000",
00210 M00S00149.comfds2 +++| O"0000 0000 0000 0000 0000"];
00211 M00S00150.comfds2 +++| END # ARRAY WORDFLAGS #
00212 M00S00151.comfds2 +++|
00213 M00S00152.comfds2 +++| ITEM CURSPLIT=1; # SELECT SPLIT SPLITTAGE #
00214 M00S00153.comfds2 +++| ITEM CURFILE=1; # SELECT FILE 1 OR 2 #
00215 M00S00154.comfds2 +++| ITEM CURCURSOR=0; # CURRENT X-CURSOR #
00216 M00S00155.comfds2 +++| ITEM TEMPCURLIN=0; # TEMP STORAGE FOR CURRENT LINE #
00217 M00S00156.comfds2 +++| ITEM NEWCURSOR=0; # NEXT X-CURSOR #
00218 M00S00157.comfds2 +++| ITEM OLDCURSOR=0; # PREVIOUS X-CURSOR #
00219 M00S00158.comfds2 +++| ITEM OLDLINPTR=0; # PREVIOUS START LINE #
00220 M00S00159.comfds2 +++| ITEM OLDCURFIL=0; # PREVIOUS CURRENT FILE #
00221 M00S00160.comfds2 +++| ITEM OLDFDLF1=0; # PREVIOUS DIRECTORY ID FOR FIRST FILE #
00222 M00S00161.comfds2 +++| ITEM OLDFDLF2=0; # PREVIOUS DIRECTORY ID FOR SECOND #
00223 M00S00162.comfds2 +++|
00224 M00S00163.comfds2 +++| ITEM FILNUM=1; # NEW FILE CHOICE SCANNED #
00225 M00S00164.comfds2 +++| ITEM CHARPARM=0; # 0=DONT CARE, 1=NORMAL, 2=6/12, 3=8/12 #
00226 M00S00165.comfds2 +++| ITEM GETPARM=0; # 0=DONT PFM, 1=IF NEEDED, 2=FORCED #
00227 M00S00166.comfds2 +++| # 3 = FORCED LOCAL READ W/OUT PFM #
00228 M00S00167.comfds2 +++| ITEM SAVECURL=1;
00229 M00S00168.comfds2 +++| ITEM LINENO=-1; # NUMBER ON CUR LINE #
00230 M00S00169.comfds2 +++| ITEM INCR=100;
00231 M00S00170.comfds2 +++| ITEM LOCSTRLEN1=0, LOCSTRLEN2=0;
00232 M00S00171.comfds2 +++| ITEM CHGSTRLEN1=0, STRINGLEN=0;
00233 M00S00172.comfds2 +++| ITEM KEYWDTYPE=1;
00234 M00S00173.comfds2 +++| ITEM WIDTHFOUND=0;
00235 M00S00174.comfds2 +++| ITEM DINCR=100; # DEFAULT INCR #
00236 M00S00175.comfds2 +++| ITEM STACKPTR=-1;
00237 M00S00176.comfds2 +++| ITEM ORIGSTKPTR=0; # ORIGINAL STACK DEPTH #
00238 M00S00177.comfds2 +++| ITEM DATAPTR=-1;
00239 M00S00178.comfds2 +++|
00240 M00S00179.comfds2 +++| ITEM ERRSTRING C(80)=" $"; # HOLDS RESPONSE MESSAGE #
00241 M00S00180.comfds2 +++| ITEM ERRCURSOR=-1;
00242 M00S00181.comfds2 +++|
00243 M00S00182.comfds2 +++| ITEM FIELDNDX=0; # WHICH TAB FIELD IS IN USE #
Line S00183 Modification History |
M01 (Removed by) | ns2688 |
Seq # *Modification Id* Act
----------------------------+
00244 M01S00183.ns2688 ---| ITEM FIELDBGN=0; # FOR COLLUMN SPEC IN F,S CMDS #
Line S00007 Modification History |
M01 (Added by) | ns2688 |
Seq # *Modification Id* Act
----------------------------+
00245 M01S00007.ns2688 +++| ITEM FIELDBGN=0; # FOR COLUMN SPEC IN F,S CMDS #
00246 M00S00184.comfds2 +++| ITEM FIELDEND=0;
00247 M00S00185.comfds2 +++| ITEM FIELDTARGET=0; # WHICH FIELD FOR TARGET ADDRESS #
00248 M00S00186.comfds2 +++| ITEM PROCESSNDX=0; # USED BY PROCESS #
00249 M00S00187.comfds2 +++| ITEM LASTPROCESS=0;
00250 M00S00188.comfds2 +++| ITEM LIMIT=1; # USER SPECIFIED LIMIT #
00251 M00S00189.comfds2 +++| ITEM LCOUNT=0; # COUNTS VERIFIED LINES IN RNG #
00252 M00S00190.comfds2 +++| ITEM FINDCONTROL=0; # CONTROLS TEXT SEARCH OPTIONS #
00253 M00S00191.comfds2 +++| # BOTTOM BIT=FIRST/LAST RANGE #
00254 M00S00192.comfds2 +++| # NEXT BIT UP=WORD OR ELLIPSIS #
00255 M00S00193.comfds2 +++| # OR CASELESS OR FIELD #
00256 M00S00194.comfds2 +++|
Line S00001 Modification History |
M01 (Added by) | ns2700 |
M02 (Removed by) | ns2718 |
Seq # *Modification Id* Act
----------------------------+
00257 M02S00001.ns2718 ---| ITEM SHIFTFKEY = 1; # DISPLAY SHIFTED FUNCTION KEYS #
Line S00001 Modification History |
M01 (Added by) | ns2718 |
Seq # *Modification Id* Act
----------------------------+
00258 M01S00001.ns2718 +++| ARRAY SFKEYSPECS [0:0];
00259 M01S00002.ns2718 +++| BEGIN # ARRAY SFKEYSPECS #
00260 M01S00003.ns2718 +++| ITEM SFKEYDEFS I(00,06,18) = [1]; # SHIFTED F-KEYS DEFINED #
00261 M01S00004.ns2718 +++| ITEM SFKEYSHOW I(00,24,18) = [1]; # SHIFTED F-KEYS SELECTED #
00262 M01S00005.ns2718 +++| ITEM SHIFTFKEY I(00,42,18) = [1]; # DISPLAY SHIFTED F-KEYS #
00263 M01S00006.ns2718 +++| END # ARRAY SFKEYSPECS #
00264 M00S00195.comfds2 +++| ITEM SCANPOS=0; # SYNTAX SCAN CURSOR #
00265 M00S00196.comfds2 +++| ITEM TOKENTYPE=0; # RETURNED BY TOKEN #
00266 M00S00197.comfds2 +++| ITEM TOKENPOS=0;
00267 M00S00198.comfds2 +++| ITEM TOKENVAL=0;
00268 M00S00199.comfds2 +++| ITEM TOKENSYM C(10)=" ";
00269 M00S00200.comfds2 +++| ITEM TOKENCHAR=CBLANK;
00270 M00S00201.comfds2 +++| ITEM TOKENLEN=1;
00271 M00S00202.comfds2 +++| ITEM ORIGSCNLIN=0;
00272 M00S00203.comfds2 +++| ITEM CMDMARKER=0;
00273 M00S00204.comfds2 +++| ITEM EXPANDAT=-1; # CMDLINE POSITION TO EXPAND MICROS #
00274 M00S00205.comfds2 +++| ITEM EXTENDSIZE=0;
00275 M00S00206.comfds2 +++| ITEM THISEXTEND=0;
00276 M00S00207.comfds2 +++| ITEM KEYWDNDX=0;
00277 M00S00208.comfds2 +++| ITEM WHICHLIN=0, WHICHSTR=0, WHICHDGT=0;
00278 M00S00209.comfds2 +++|
Line S00001 Modification History |
M01 (Added by) | ns2626 |
Seq # *Modification Id* Act
----------------------------+
00279 M01S00001.ns2626 +++| ITEM WORKORG C(7); # ORIGINAL WORKFILE NAME #
00280 M00S00210.comfds2 +++| ITEM READNAM C(7)=" "; # READ/WRITE FILE #
00281 M00S00211.comfds2 +++| ITEM PROCNAM C(7)="FSEPROC"; # NAME PROCEDURE LIBRARY #
00282 M00S00212.comfds2 +++| ITEM CURPROCNAM C(7);
00283 M00S00213.comfds2 +++| ITEM PROCREC C(7);
00284 M00S00214.comfds2 +++|
00285 M00S00215.comfds2 +++| ITEM SPLIT I;
00286 M00S00216.comfds2 +++| ITEM SCREENLIMIT=0;
00287 M00S00217.comfds2 +++| ITEM COMMANDROW=0;
00288 M00S00218.comfds2 +++| ITEM RESPONSEROW=0;
00289 M00S00219.comfds2 +++| ITEM ROWSUSED=0;
00290 M00S00220.comfds2 +++| ITEM FKEYNUMROW=1;
00291 M00S00221.comfds2 +++| ITEM FKEYROW=0;
00292 M00S00222.comfds2 +++| ITEM FKEYCHARS=6;
00293 M00S00223.comfds2 +++| ITEM FKEYSHOW=8;
Line S00001 Modification History |
M01 (Added by) | ns2641 |
Seq # *Modification Id* Act
----------------------------+
00294 M01S00001.ns2641 +++| ITEM FKEYLEN=79;
00295 M01S00002.ns2641 +++| ITEM FKEYPAD=0;
00296 M00S00224.comfds2 +++| ITEM XCURSOR=0;
00297 M00S00225.comfds2 +++| ITEM YCURSOR=0;
00298 M00S00226.comfds2 +++| ITEM OLDVTXCURS=0;
00299 M00S00227.comfds2 +++| ITEM OLDVTYCURS=0;
00300 M00S00228.comfds2 +++| ITEM FKEYMSKON U;
00301 M00S00229.comfds2 +++| ITEM FKEYMSKOFF U;
00302 M00S00230.comfds2 +++| ITEM FKEYNDX=0;
00303 M00S00231.comfds2 +++| ITEM FKEYSPC1 C(2);
00304 M00S00232.comfds2 +++| ITEM FKEYSPC2 C(4);
00305 M00S00233.comfds2 +++| ITEM NUMMARKS=0;
00306 M00S00234.comfds2 +++| ITEM SCRNPT1=0, SCRNPT2=0, SCRNPT3=0;
00307 M00S00235.comfds2 +++| ITEM SCRNPT4=0, SCRNPT5=0, SCRNPT6=0;
00308 M00S00236.comfds2 +++|
00309 M00S00237.comfds2 +++| ITEM ATTCOUNT=0; # ATTRIBUTE MARK COUNT #
00310 M00S00238.comfds2 +++| ITEM BACKIN=0; # BACKSTACK IN POINTER #
00311 M00S00239.comfds2 +++| ITEM BACKOUT=0; # BACKSTACK OUT POINTER #
00312 M00S00240.comfds2 +++| ARRAY NONTRIVSTK [1:2,1:4]; # RECENT NON-ZZZNULL FILE #
00313 M00S00241.comfds2 +++| BEGIN
00314 M00S00242.comfds2 +++| ITEM NONTRIVFILE=[ [0,0] [0,0] [0,0] [0,0] ];
00315 M00S00243.comfds2 +++| END
00316 M00S00244.comfds2 +++|
00317 M00S00245.comfds2 +++| ITEM EXECNDX=0; # FOR EXEC #
00318 M00S00246.comfds2 +++| ITEM FILCMDNDX=0; # FOR FILCMD #
00319 M00S00247.comfds2 +++| ITEM DORNGCTR=0; # FOR DORANGE, POSN #
00320 M00S00248.comfds2 +++|
00321 M00S00249.comfds2 +++| ITEM LINCTR=0;
00322 M00S00250.comfds2 +++| ITEM CHRPTR1=0, CHRPTR2=0, CHRPTR3=0;
00323 M00S00251.comfds2 +++| ITEM LINPTR1=0, LINPTR2=0, LINPTR3=0;
00324 M00S00252.comfds2 +++| ITEM FILPTR1=0, FILPTR2=0, FILPTR3=0;
00325 M00S00253.comfds2 +++| ITEM LINNUM1=0, LINNUM2=0, LINNUM3=0;
00326 M00S00254.comfds2 +++|
00327 M00S00255.comfds2 +++| ITEM AUDITNEXT=0;
00328 M00S00256.comfds2 +++|
00329 M00S00257.comfds2 +++| ARRAY DATASTACK [0:MAXDATA]; ITEM DATASTK=[MAXDATA(0),0];
00330 M00S00258.comfds2 +++|
00331 M00S00259.comfds2 +++| ARRAY LIN [0:BUFWID];
00332 M00S00260.comfds2 +++| BEGIN
00333 M00S00261.comfds2 +++| ITEM LINE=[BUFWIDP1(NULLIN)];
00334 M00S00262.comfds2 +++| END
00335 M00S00263.comfds2 +++| ARRAY CMDLIN[0:BUFWID];
00336 M00S00264.comfds2 +++| BEGIN
00337 M00S00265.comfds2 +++| ITEM CMDLINE=[BUFWIDP1(NULLIN)];
00338 M00S00266.comfds2 +++| END
00339 M00S00267.comfds2 +++| ARRAY TTYLIN[0:BUFWID];
00340 M00S00268.comfds2 +++| BEGIN
00341 M00S00269.comfds2 +++| ITEM TTYLINE=[BUFWIDP1(NULLIN)];
00342 M00S00270.comfds2 +++| END
00343 M00S00271.comfds2 +++| ARRAY TMPLIN[0:BUFWID2];
00344 M00S00272.comfds2 +++| BEGIN
00345 M00S00273.comfds2 +++| ITEM TMPLINE=[BUFWID2P1(0)];
00346 M00S00274.comfds2 +++| END
00347 M00S00275.comfds2 +++|
00348 M00S00276.comfds2 +++|
00349 M00S00277.comfds2 +++| # REGSTACK IS THE VECTOR OF RELOCATABLE LINE ORDINALS WHICH #
00350 M00S00278.comfds2 +++| # IS MAINTAINED BY THE COMPASS ROUTINE *FASTRLC*. #
00351 M00S00279.comfds2 +++|
00352 M00S00280.comfds2 +++| ARRAY REGSTACK [0:MAXREG]; ITEM REGLINE=[0,MAXREG(0)];
00353 M00S00281.comfds2 +++|
00354 M00S00282.comfds2 +++| ARRAY STKFILES [0:MAXSTACK]; ITEM STKFILE=[0,MAXSTACK(0)];
00355 M00S00283.comfds2 +++| ARRAY XYZFILES [0:2]; ITEM XYZFILE=[0,0,0];
00356 M00S00284.comfds2 +++| ARRAY XYZCHARS [0:2]; ITEM XYZCHAR=[-1,-1,-1];
00357 M00S00285.comfds2 +++| ARRAY MRKFILES [0:1]; ITEM MRKFILE=[0,0];
00358 M00S00286.comfds2 +++| ARRAY MRKCHARS [0:1]; ITEM MRKCHAR=[-1,-1];
00359 M00S00287.comfds2 +++|
00360 M00S00288.comfds2 +++| ITEM BUILDCIO=0; # TOTAL CIO-S IN FILE BUILD #
00361 M00S00289.comfds2 +++| ITEM ACCTCIO=0; # TOTAL CIO-S PER SESSION #
00362 M00S00290.comfds2 +++| ITEM ACCTTRANS=0; # TOTAL TRANSACTIONS PER SESSION #
00363 M00S00291.comfds2 +++| ITEM ACCTPRU=0; # TOTAL PRU-S IN SESSION #
00364 M00S00292.comfds2 +++| ITEM ACCTOUT=0; # TOTAL WORDS TERMINAL OUTPUT #
00365 M00S00293.comfds2 +++|
00366 M00S00294.comfds2 +++| ITEM TEMP=0; # STACKABLE TEMP STORAGE #
00367 M00S00295.comfds2 +++|
00368 M00S00296.comfds2 +++| ITEM DATAEND; # END OF DATA PRESERVED BETWEEN EDITS #
00369 M00S00297.comfds2 +++|
00370 M00S00298.comfds2 +++| # FORMAT OF REST OF COMMON MAY BE MODULE-DEPENDENT #
00371 M00S00299.comfds2 +++|PAGE # DISPATCHED DATA FOR OTHER MODULES #
00372 M00S00300.comfds2 +++|
00373 M00S00301.comfds2 +++| CONTROL IFEQ MULTI,1;
00374 M00S00302.comfds2 +++| ITEM TTIADDR=0; # SMFEX DATA #
00375 M00S00303.comfds2 +++| ITEM TTILEN=0;
00376 M00S00304.comfds2 +++| ITEM TTINEXT=0;
00377 M00S00305.comfds2 +++| ITEM TTILAST=0;
00378 M00S00306.comfds2 +++| ITEM TTOADDR=0;
00379 M00S00307.comfds2 +++| ITEM TTOLEN=0;
00380 M00S00308.comfds2 +++| ITEM TTOTYPE=0;
00381 M00S00309.comfds2 +++| ITEM TTOQUIT B=FALSE;
00382 M00S00310.comfds2 +++| CONTROL IFEQ METERING,1;
00383 M00S00311.comfds2 +++| ITEM TTOWORDS=0;
00384 M00S00312.comfds2 +++| ITEM TTOBLOCKS=0;
00385 M00S00313.comfds2 +++| CONTROL FI;
00386 M00S00314.comfds2 +++| ITEM RSTKSAVE=0; # FOR REPAIR OF STACK ON ERROR #
00387 M00S00315.comfds2 +++| CONTROL FI;
00388 M00S00316.comfds2 +++|
00389 M00S00317.comfds2 +++|
00390 M00S00318.comfds2 +++| BASED ARRAY STR(24); ITEM ST C(0,0,240); # FOR TTF #
00391 M00S00319.comfds2 +++| ITEM STL=0; # STRING LENGTH #
00392 M00S00320.comfds2 +++| ITEM TTCBC=0; # CURRENT BUFFER CHAR #
00393 M00S00321.comfds2 +++| ITEM NUMS1 C(20); # NUMBER BUFFER #
00394 M00S00322.comfds2 +++| ITEM S1=0, S2=0, S3=0, S4=0; # TEMPORARIES #
00395 M00S00323.comfds2 +++| ITEM TTOWB; # TTY OUT WORD BUFF #
00396 M00S00324.comfds2 +++| ITEM TTOCB; # TTY OUT CHAR BUFF #
00397 M00S00325.comfds2 +++|
00398 M00S00326.comfds2 +++|
00399 M00S00327.comfds2 +++| ARRAY PATH[0:MAXDEPTH] S(5); # FOR WORKIO #
00400 M00S00328.comfds2 +++| ITEM PADISP (0)=[MAXDEPTH(0),0],
00401 M00S00329.comfds2 +++| PAFIRST (1)=[MAXDEPTH(0),0],
00402 M00S00330.comfds2 +++| PALAST (2)=[MAXDEPTH(0),0],
00403 M00S00331.comfds2 +++| PAHEAD (3)=[MAXDEPTH(0),0],
00404 M00S00332.comfds2 +++| PADA U(3,0,18), # SACRED BIT LOCATION #
00405 M00S00333.comfds2 +++| PADEPTH U(3,18,6),
00406 M00S00334.comfds2 +++| PADIRTY B(3,48,1),
00407 M00S00335.comfds2 +++| PATOP B(3,49,1),
00408 M00S00336.comfds2 +++| PADIR B(3,50,1),
00409 M00S00337.comfds2 +++| PADATA B(3,51,1),
00410 M00S00338.comfds2 +++| PAFINAL U(3,54,6), # SACRED BIT LOCATION #
00411 M00S00339.comfds2 +++| PACACHE (4)=[MAXDEPTH(-1),-1];
00412 M00S00340.comfds2 +++|
00413 M00S00341.comfds2 +++| ARRAY CACHECONTROL [0:MAXCACHE];
00414 M00S00342.comfds2 +++| BEGIN
00415 M00S00343.comfds2 +++| ITEM CACHEDIRTY B(0,0,1)=[FALSE,MAXCACHE(FALSE)];
00416 M00S00344.comfds2 +++| ITEM CACHEOWNED B(0,1,1)=[FALSE,MAXCACHE(FALSE)];
00417 M00S00345.comfds2 +++| ITEM CACHEAGE I(0,30,30)=[-1,MAXCACHE(-1)];
00418 M00S00346.comfds2 +++| END
00419 M00S00347.comfds2 +++|
00420 M00S00348.comfds2 +++| ITEM CURRENT=0; # REAL CURRENT LINE POSITION #
00421 M00S00349.comfds2 +++| ITEM NEWCURL=0;
00422 M00S00350.comfds2 +++| ITEM OLDCURL=0;
00423 M00S00351.comfds2 +++| ITEM AGECOUNT=0;
00424 M00S00352.comfds2 +++| ITEM PALVL=0;
00425 M00S00353.comfds2 +++| ITEM CURNW=0;
00426 M00S00354.comfds2 +++| ITEM DANEXT=0; # NEXT DA TO ALLOC #
00427 M00S00355.comfds2 +++| ITEM MAXDA=0;
00428 M00S00356.comfds2 +++| ITEM DELETCTL=0; # CONTROL AUTO-POS AFTER DELETE #
00429 M00S00357.comfds2 +++| ITEM FETCHGUIDE=0; # CURRENT GUIDELINE FOR PREFETCH #
00430 M00S00358.comfds2 +++| ITEM ARRAYLEN=0;
00431 M00S00359.comfds2 +++| ITEM ARRAYPRUS=0;
00432 M00S00360.comfds2 +++| ITEM DATALEN=0;
00433 M00S00361.comfds2 +++| ITEM DATAPRUS=0;
00434 M00S00362.comfds2 +++|
00435 M00S00363.comfds2 +++| ITEM CIOCOUNT=0; # FOR STATISTICS COLLECTION #
00436 M00S00364.comfds2 +++| ITEM RUNTIME=0; # DITTO #
00437 M00S00365.comfds2 +++|
00438 M00S00366.comfds2 +++| ITEM SPINTIME=0; # TIME WASTED TO HOLD TASK #
00439 M00S00367.comfds2 +++| ITEM SPINSTART=0;
00440 M00S00368.comfds2 +++|
00441 M00S00369.comfds2 +++|
00442 M00S00370.comfds2 +++| # END OF SWAPPED DATA #
00443 M00S00371.comfds2 +++| ITEM SWAPEND; # NOT INCLUDED IN BLOCK #
00444 M00S00372.comfds2 +++|PAGE # DISPATCH, UNSWAPPED DATA #
00445 M00S00373.comfds2 +++|
00446 M00S00374.comfds2 +++| # DISPATCHED BUT UNSWAPPED WORKIO DATA #
00447 M00S00375.comfds2 +++|
00448 M00S00376.comfds2 +++| ITEM PL, TPL, DISP, ODA, ONL, FIRST, LAST, NL;
00449 M00S00377.comfds2 +++| ITEM NWBEFORE,NWNEW,NWAFTER;
00450 M00S00378.comfds2 +++| BASED ARRAY NEW;;
00451 M00S00379.comfds2 +++| ARRAY NDIR [0:1]; ITEM NEWDA U(0,0,18), NEWNL U(0,42,18);
00452 M00S00380.comfds2 +++| ITEM RDIN, RDOUT, LASTDA;
00453 M00S00381.comfds2 +++| ITEM DSKSIZ = DISKSIZE, QUARTER;
00454 M00S00382.comfds2 +++|
00455 M00S00383.comfds2 +++| # THE FOLLOWING BASED ARRAYS ARE "MOBILE", TEMPORARY #
00456 M00S00384.comfds2 +++|
00457 M00S00385.comfds2 +++| BASED ARRAY FROM;; BASED ARRAY TOO;;
00458 M00S00386.comfds2 +++| BASED ARRAY PRU[0:O"77"];
00459 M00S00387.comfds2 +++| ITEM PRUWORD,
00460 M00S00388.comfds2 +++| DATWORD,
00461 M00S00389.comfds2 +++| DATCHAR C(0,0,10),
00462 M00S00390.comfds2 +++| DIRWORD,
00463 M00S00391.comfds2 +++| DIRDA U(0,0,18),
00464 M00S00392.comfds2 +++| DIRNL U(0,42,18);
00465 M00S00393.comfds2 +++|
00466 M00S00394.comfds2 +++| # THE FOLLWING BASED ARRAYS ARE OF OTHER TYPES, BUT #
00467 M00S00395.comfds2 +++| # THEIR POINTER WORDS BELONG IN THIS SEGMENT #
00468 M00S00396.comfds2 +++|
00469 M00S00397.comfds2 +++| CONTROL IFEQ MULTI,1;
00470 M00S00398.comfds2 +++| BASED ARRAY SWAPRSTK;; # USER'S COPY RENTSTK #
00471 M00S00399.comfds2 +++| BASED ARRAY DISPRSTK;; # TASK'S COPY RENTSTK #
00472 M00S00400.comfds2 +++| BASED ARRAY TTOBUFFER[0:99]; ITEM TTOBUFF; # TASK'S TTY OUTPUT #
00473 M00S00401.comfds2 +++| CONTROL FI;
00474 M00S00402.comfds2 +++| # LINEBUF REDEFINITION RESTRICTION - SEE FSESUBS INTERFACE #
00475 M00S00403.comfds2 +++| BASED ARRAY LINEBUF;; # WORKIO/EDITOR INTERFACE #
00476 M00S00404.comfds2 +++| BASED ARRAY MVLNBUF;; # USED BY WORKIO FOR LINEBUF #
00477 M00S00405.comfds2 +++| BASED ARRAY BFPRU[0:MAXDEPTH] S(O"100"); # DISK BUUFERS #
00478 M00S00406.comfds2 +++| ITEM BFHEAD (0), BFDA U(0,0,18); # MUST MATCH PAHEAD, PADA #
00479 M00S00407.comfds2 +++| BASED ARRAY OBF S(OBFSIZE);; # TEMP BUFF FOR SPLIT #
00480 M00S00408.comfds2 +++| BASED ARRAY DISK;; # CIRCULAR BUFFER #
00481 M00S00409.comfds2 +++| BASED ARRAY FET S(FETSIZ); # WORKING FET #
00482 M00S00410.comfds2 +++| ITEM FETWD0 (0),
Line S00411 Modification History |
M01 (Removed by) | ns2681 |
Seq # *Modification Id* Act
----------------------------+
00483 M01S00411.ns2681 ---| FETNAM C(0,0,7),
00484 M01S00412.ns2681 ---| FETCOD U(0,50,10),
00485 M01S00413.ns2681 ---| FETDUN B(0,59,1),
00486 M01S00414.ns2681 ---| FETR B(1,12,1),
00487 M01S00415.ns2681 ---| FETL U(1,36,6),
00488 M01S00416.ns2681 ---| FETFIR U(1,42,18),
00489 M01S00417.ns2681 ---| FETIN U(2,42,18),
00490 M01S00418.ns2681 ---| FETOUT U(3,42,18),
00491 M01S00419.ns2681 ---| FETFNT U(4,0,12),
00492 M01S00420.ns2681 ---| FETLIM U(4,42,18),
00493 M01S00421.ns2681 ---| FETLAW U(5,0,60),
00494 M01S00422.ns2681 ---| FETLA U(5,42,18),
00495 M01S00423.ns2681 ---| FETCRI U(6,0,30),
00496 M01S00424.ns2681 ---| FETW B(6,30,1),
00497 M01S00425.ns2681 ---| FETRR U(6,31,29);
Line S00001 Modification History |
M01 (Added by) | ns2681 |
Seq # *Modification Id* Act
----------------------------+
00498 M01S00001.ns2681 +++| FETNAM C(00,00,07), # LOGICAL FILE NAME #
00499 M01S00002.ns2681 +++| FETAT U(00,42,09), # STATUS INFORMATION FROM *CIO* #
00500 M01S00003.ns2681 +++| FETCOD U(00,51,09), # REQUEST/RETURN CODE #
00501 M01S00004.ns2681 +++| FETDUN B(00,59,01), # COMPLETE BIT #
00502 M01S00005.ns2681 +++| FETR B(01,12,01), # RANDOM PROCESSING BIT #
00503 M01S00006.ns2681 +++| FETEP B(01,15,01), # ERROR PROCESSING BIT #
00504 M01S00007.ns2681 +++| FETL U(01,36,06), # FET LEVEL #
00505 M01S00008.ns2681 +++| FETFIR U(01,42,18), # FIRST #
00506 M01S00009.ns2681 +++| FETIN U(02,42,18), # IN #
00507 M01S00010.ns2681 +++| FETOUT U(03,42,18), # OUT #
00508 M01S00011.ns2681 +++| FETFNT U(04,00,12), # FNT POINTER #
00509 M01S00012.ns2681 +++| FETLIM U(04,42,18), # LIMIT #
00510 M01S00013.ns2681 +++| FETLAW U(05,00,60), # ADDR. OF LIST (FULL WORD) #
00511 M01S00014.ns2681 +++| FETLA U(05,42,18), # ADDR. OF LIST OF RANDOM ADDR. #
00512 M01S00015.ns2681 +++| FETCRI U(06,00,30), # CURRENT RANDOM INDEX #
00513 M01S00016.ns2681 +++| FETW B(06,30,01), # RANDOM REWRITE REQUEST #
00514 M01S00017.ns2681 +++| FETRR U(06,31,29); # RANDOM REQUEST PARAMETER #
00515 M01S00018.ns2681 +++|
00516 M00S00426.comfds2 +++| BASED ARRAY READLST[0:RDLIM]; ITEM RDLIST;
00517 M00S00427.comfds2 +++|
00518 M00S00428.comfds2 +++|
00519 M00S00429.comfds2 +++| # MULTI-USER VERSION ALLOCATES POINTER WORDS HERE FOR VARIOUS #
00520 M00S00430.comfds2 +++| # EDITOR ARRAYS. DUE TO DUPLICATE DECLARATIONS, BE CAREFUL IN #
00521 M00S00431.comfds2 +++| # CHANGING ANY OF THESE ARRAYS. #
00522 M00S00432.comfds2 +++|
00523 M00S00433.comfds2 +++| CONTROL IFEQ MULTI,1;
00524 M00S00434.comfds2 +++|
00525 M00S00435.comfds2 +++| BASED ARRAY ARRAYSTART;; # THESE TWO BRACKET ALLOCATED MEMORY #
00526 M00S00436.comfds2 +++| BASED ARRAY ARRAYEND;;
00527 M00S00437.comfds2 +++|
00528 M00S00438.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00529 M00S00439.comfds2 +++|
00530 M00S00440.comfds2 +++| BASED ARRAY TABLEHEADR [0:0] P(6);
00531 M00S00441.comfds2 +++| BEGIN # *TDU* TABLE HEADER INFORMATION #
00532 M00S00442.comfds2 +++| ITEM TABHEADONE U(00,00,60); # WORD ONE #
00533 M00S00443.comfds2 +++| ITEM TABMODNAME C(00,00,07); # MODEL NAME #
00534 M00S00444.comfds2 +++| ITEM TABVERSION U(00,42,18); # VERSION NUMBER #
00535 M00S00445.comfds2 +++| ITEM TABHEADTWO U(01,00,60); # WORD TWO #
00536 M00S00446.comfds2 +++| ITEM TABSTRINPT U(01,00,12); # OFFSET TO START OF INPUT TABLE #
00537 M00S00447.comfds2 +++| ITEM TABSTRNMES U(01,12,12); # OFFSET TO START OF KEY LABELS #
00538 M00S00448.comfds2 +++| ITEM TABSTRINIT U(01,24,12); # OFFSET FOR INITIALIZATION DATA #
00539 M00S00449.comfds2 +++| ITEM TABSTRAPPS U(01,36,12); # OFFSET FOR APPLICATION STRINGS #
00540 M00S00450.comfds2 +++| ITEM TABSTRENDT U(01,48,12); # OFFSET TO END OF TABLE #
00541 M00S00451.comfds2 +++| ITEM TABHEADTHR U(02,00,60); # WORD THREE #
00542 M00S00452.comfds2 +++| ITEM TABPTRHGTC U(02,00,04); # PROTECTED RIGHT BEHAVIOR #
00543 M00S00453.comfds2 +++| ITEM TABPTLEFTC U(02,04,04); # PROTECTED LEFT BEHAVIOR #
00544 M00S00454.comfds2 +++| ITEM TABPTUPCUR U(02,08,04); # PROTECTED UP BEHAVIOR #
00545 M00S00455.comfds2 +++| ITEM TABPTDNCUR U(02,12,04); # PROTECTED DOWN BEHAVIOR #
00546 M00S00456.comfds2 +++| ITEM TABUNRHGTC U(02,16,04); # UNPROTECTED RIGHT BEHAVIOR #
00547 M00S00457.comfds2 +++| ITEM TABUNLEFTC U(02,20,04); # UNPROTECTED LEFT BEHAVIOR #
00548 M00S00458.comfds2 +++| ITEM TABUNUPCUR U(02,24,04); # UNPROTECTED UP BEHAVIOR #
00549 M00S00459.comfds2 +++| ITEM TABUNDNCUR U(02,28,04); # UNPROTECTED DOWN BEHAVIOR #
00550 M00S00460.comfds2 +++| ITEM TABRESERV2 U(02,32,28); # RESERVED #
00551 M00S00461.comfds2 +++| ITEM TABHEADFOU U(03,00,60); # WORD FOUR #
00552 M00S00462.comfds2 +++| ITEM TABCURADDT U(03,00,06); # CURSOR ADDRESSING TYPE #
00553 M00S00463.comfds2 +++| ITEM TABCURBIAS I(03,06,08); # CURSOR BIAS FOR POSTIONING #
00554 M00S00464.comfds2 +++| ITEM TABLEFTCUR U(03,14,04); # CURSOR LEFT BEHAVIOR #
00555 M00S00465.comfds2 +++| ITEM TABRGHTCUR U(03,18,04); # CURSOR RIGHT BEHAVIOR #
00556 M00S00466.comfds2 +++| ITEM TABUPCURSR U(03,22,04); # CURSOR UP BEHAVIOR #
00557 M00S00467.comfds2 +++| ITEM TABDWNCRSR U(03,26,04); # CURSOR DOWN BEHAVIOR #
00558 M00S00468.comfds2 +++| ITEM TABLEFTCHR U(03,30,04); # CHARACTER LEFT BEHAVIOR #
00559 M00S00469.comfds2 +++| ITEM TABRGHTCHR U(03,34,04); # CHARACTER RIGHT BEHAVIOR #
00560 M00S00470.comfds2 +++| ITEM TABLASTPOS U(03,38,04); # LAST POSITION BEHAVIOR (CHAR) #
00561 M00S00471.comfds2 +++| ITEM TABXFIRSTY B(03,42,01); # X BEFORE Y IN CURSOR OUTPUT #
00562 M00S00472.comfds2 +++| ITEM TABXDECIML U(03,43,03); # X COORDINATE COUNT IF DECIMAL #
00563 M00S00473.comfds2 +++| ITEM TABYDECIML U(03,46,03); # Y COORDINATE COUNT IF DECIMAL #
00564 M00S00474.comfds2 +++| ITEM TABRESERV3 U(03,49,11); # RESERVED #
00565 M00S00475.comfds2 +++| ITEM TABHEADFIV U(04,00,60); # WORD FIVE #
00566 M00S00476.comfds2 +++| ITEM TABVTFLAGS U(04,00,60); # VIRTUAL TERMINAL FLAGS #
00567 M00S00477.comfds2 +++| ITEM TABVTHOMEU B(04,00,01); # HOME UP FLAG #
00568 M00S00478.comfds2 +++| ITEM TABVTPROTM B(04,01,01); # TERMINAL HAS PROTECT #
00569 M00S00479.comfds2 +++| ITEM TABVTDIFSS B(04,02,01); # DIFFERENT SCREEN SIZES #
00570 M00S00480.comfds2 +++| ITEM TABVTUNUSD B(04,03,01); # UNUSED #
00571 M00S00481.comfds2 +++| ITEM TABVTGUARD B(04,04,01); # TERMINAL HAS GUARD #
00572 M00S00482.comfds2 +++| ITEM TABVTABHME B(04,05,01); # PROTECTED TAB GOES TO HOME #
00573 M00S00483.comfds2 +++| ITEM TABVTABUPF B(04,06,01); # TABS TO UNPROTECTED FIELDS #
00574 M00S00484.comfds2 +++| ITEM TABVTABSTP B(04,07,01); # TABS TO TAB STOP #
00575 M00S00485.comfds2 +++| ITEM TABVTSCLRS B(04,08,01); # SIZE CHANGE CLEARS SCREEN #
00576 M00S00486.comfds2 +++| ITEM TABAUTOTAB B(04,09,01); # TERMINAL HAS AUTOMATIC TABBING #
00577 M00S00487.comfds2 +++| ITEM TABTYPHEAD B(04,10,01); # TYPE AHEAD ENABLED #
00578 M00S00488.comfds2 +++| ITEM TABLOCKMDE B(04,11,01); # BLOCK MODE TERMINAL #
00579 M00S00489.comfds2 +++| ITEM TABPTDWFLN B(04,12,01); # PROT TABS DO NOT WRAP FWD LINE #
00580 M00S00490.comfds2 +++| ITEM TABPTDWFPG B(04,13,01); # PROT TABS DO NOT WRAP FWD PAGE #
00581 M00S00491.comfds2 +++| ITEM TABPTDWBLN B(04,14,01); # PROT TABS DO NOT WRAP BKW LINE #
00582 M00S00492.comfds2 +++| ITEM TABPTDWBPG B(04,15,01); # PROT TABS DO NOT WRAP BKW PAGE #
00583 M00S00493.comfds2 +++| ITEM TABUNDWFLN B(04,16,01); # UNPROT TABS DO NOT WRAP FWD LN #
00584 M00S00494.comfds2 +++| ITEM TABUNDWFPG B(04,17,01); # UNPROT TABS DO NOT WRAP FWD PG #
00585 M00S00495.comfds2 +++| ITEM TABUNDWBLN B(04,18,01); # UNPROT TABS DO NOT WRAP BKW LN #
00586 M00S00496.comfds2 +++| ITEM TABUNDWBPG B(04,19,01); # UNPROT TABS DO NOT WRAP BKW PG #
00587 M00S00497.comfds2 +++| ITEM TABATTRCHR B(04,20,01); # ATTRIBUTE CHARACTER NEEDS BYTE #
00588 M00S00498.comfds2 +++| ITEM TABATTRSET B(04,21,01); # RESET ATTRIBUTES BEFORE VDTPOS #
00589 M00S00499.comfds2 +++| ITEM TABSNDSPLR B(04,22,01); # SEND DISPLAY REWRITE FOR SFORM #
00590 M00S00500.comfds2 +++| ITEM TABSNDSPLH B(04,23,01); # SEND DISPLAY ON HELP FOR SFORM #
00591 M00S00501.comfds2 +++| ITEM TABNOTMASK B(04,24,01); # ATTRIBUTES ARE NOT MASKABLE #
00592 M00S00502.comfds2 +++| ITEM TABNOTCHAR B(04,25,01); # ATTRIBUTES ARE LINE/PAGE BASED #
00593 M00S00503.comfds2 +++| ITEM TABNOVDTEO B(04,26,01); # DISABLE OUTPUT END (ERR. EXIT) #
00594 M00S00504.comfds2 +++| ITEM TABPROCLRS B(04,27,01); # PROTECT ALL CLEARS THE SCREEN #
00595 M00S00505.comfds2 +++| ITEM TABCLEARSM B(04,28,01); # CLEARS ACROSS PROTECTED FIELDS #
00596 M00S00506.comfds2 +++| ITEM TABRSBIT29 B(04,29,01); # RESERVED FOR CDC (FUTURE CODE) #
00597 M00S00507.comfds2 +++| ITEM TABRSBIT30 B(04,30,01); # RESERVED FOR CDC (FUTURE CODE) #
00598 M00S00508.comfds2 +++| ITEM TABRSBIT31 B(04,31,01); # RESERVED FOR CDC (FUTURE CODE) #
00599 M00S00509.comfds2 +++| ITEM TABRSBIT32 B(04,32,01); # RESERVED FOR CDC (FUTURE CODE) #
00600 M00S00510.comfds2 +++| ITEM TABRSBIT33 B(04,33,01); # RESERVED FOR CDC (FUTURE CODE) #
00601 M00S00511.comfds2 +++| ITEM TABRSBIT34 B(04,34,01); # RESERVED FOR CDC (FUTURE CODE) #
00602 M00S00512.comfds2 +++| ITEM TABRSBIT35 B(04,35,01); # RESERVED FOR CDC (FUTURE CODE) #
00603 M00S00513.comfds2 +++| ITEM TABRSBIT36 B(04,36,01); # RESERVED FOR CDC (FUTURE CODE) #
00604 M00S00514.comfds2 +++| ITEM TABINSTL01 B(04,37,01); # RESERVED FOR INSTALLATION CODE #
00605 M00S00515.comfds2 +++| ITEM TABINSTL02 B(04,38,01); # RESERVED FOR INSTALLATION CODE #
00606 M00S00516.comfds2 +++| ITEM TABINSTL03 B(04,39,01); # RESERVED FOR INSTALLATION CODE #
00607 M00S00517.comfds2 +++| ITEM TABINSTL04 B(04,40,01); # RESERVED FOR INSTALLATION CODE #
00608 M00S00518.comfds2 +++| ITEM TABINSTL05 B(04,41,01); # RESERVED FOR INSTALLATION CODE #
00609 M00S00519.comfds2 +++| ITEM TABINSTL06 B(04,42,01); # RESERVED FOR INSTALLATION CODE #
00610 M00S00520.comfds2 +++| ITEM TABINSTL07 B(04,43,01); # RESERVED FOR INSTALLATION CODE #
00611 M00S00521.comfds2 +++| ITEM TABINSTL08 B(04,44,01); # RESERVED FOR INSTALLATION CODE #
00612 M00S00522.comfds2 +++| ITEM TABINSTL09 B(04,45,01); # RESERVED FOR INSTALLATION CODE #
00613 M00S00523.comfds2 +++| ITEM TABINSTL10 B(04,46,01); # RESERVED FOR INSTALLATION CODE #
00614 M00S00524.comfds2 +++| ITEM TABINSTL11 B(04,47,01); # RESERVED FOR INSTALLATION CODE #
00615 M00S00525.comfds2 +++| ITEM TABINSTL12 B(04,48,01); # RESERVED FOR INSTALLATION CODE #
00616 M00S00526.comfds2 +++| ITEM TABINSTL13 B(04,49,01); # RESERVED FOR INSTALLATION CODE #
00617 M00S00527.comfds2 +++| ITEM TABINSTL14 B(04,50,01); # RESERVED FOR INSTALLATION CODE #
00618 M00S00528.comfds2 +++| ITEM TABINSTL15 B(04,51,01); # RESERVED FOR INSTALLATION CODE #
00619 M00S00529.comfds2 +++| ITEM TABINSTL16 B(04,52,01); # RESERVED FOR INSTALLATION CODE #
00620 M00S00530.comfds2 +++| ITEM TABINSTL17 B(04,53,01); # RESERVED FOR INSTALLATION CODE #
00621 M00S00531.comfds2 +++| ITEM TABINSTL18 B(04,54,01); # RESERVED FOR INSTALLATION CODE #
00622 M00S00532.comfds2 +++| ITEM TABINSTL19 B(04,55,01); # RESERVED FOR INSTALLATION CODE #
00623 M00S00533.comfds2 +++| ITEM TABINSTL20 B(04,56,01); # RESERVED FOR INSTALLATION CODE #
00624 M00S00534.comfds2 +++| ITEM TABVTFKLSM U(04,57,03); # FUNCTION KEY MARK COUNT #
00625 M00S00535.comfds2 +++| ITEM TABHEADSIX U(05,00,60); # WORD SIX #
00626 M00S00536.comfds2 +++| ITEM TABXMAXONE U(05,00,08); # X MAX, SCREEN SIZE ONE #
00627 M00S00537.comfds2 +++| ITEM TABYMAXONE U(05,08,07); # Y MAX, SCREEN SIZE ONE #
Line S00538 Modification History |
M01 (Removed by) | ns2613 |
Seq # *Modification Id* Act
----------------------------+
00628 M01S00538.ns2613 ---| ITEM TABXMAXTWO U(05,15,08); # X MAX, SCREEN SIZE ONE #
00629 M01S00539.ns2613 ---| ITEM TABYMAXTWO U(05,23,07); # Y MAX, SCREEN SIZE ONE #
00630 M01S00540.ns2613 ---| ITEM TABXMAXTHR U(05,30,08); # X MAX, SCREEN SIZE ONE #
00631 M01S00541.ns2613 ---| ITEM TABYMAXTHR U(05,38,07); # Y MAX, SCREEN SIZE ONE #
00632 M01S00542.ns2613 ---| ITEM TABXMAXFOR U(05,45,08); # X MAX, SCREEN SIZE ONE #
00633 M01S00543.ns2613 ---| ITEM TABYMAXFOR U(05,53,07); # Y MAX, SCREEN SIZE ONE #
Line S00001 Modification History |
M01 (Added by) | ns2613 |
Seq # *Modification Id* Act
----------------------------+
00634 M01S00001.ns2613 +++| ITEM TABXMAXTWO U(05,15,08); # X MAX, SCREEN SIZE TWO #
00635 M01S00002.ns2613 +++| ITEM TABYMAXTWO U(05,23,07); # Y MAX, SCREEN SIZE TWO #
00636 M01S00003.ns2613 +++| ITEM TABXMAXTHR U(05,30,08); # X MAX, SCREEN SIZE THREE #
00637 M01S00004.ns2613 +++| ITEM TABYMAXTHR U(05,38,07); # Y MAX, SCREEN SIZE THREE #
00638 M01S00005.ns2613 +++| ITEM TABXMAXFOR U(05,45,08); # X MAX, SCREEN SIZE FOUR #
00639 M01S00006.ns2613 +++| ITEM TABYMAXFOR U(05,53,07); # Y MAX, SCREEN SIZE FOUR #
00640 M00S00544.comfds2 +++| END
00641 M00S00545.comfds2 +++|
00642 M00S00546.comfds2 +++| BASED ARRAY TABLEWORDS [0:O"271"] P(1); # *TDU* TABLE I/O INFO #
00643 M00S00547.comfds2 +++| BEGIN # *TDU* TABLE I/O INFORMATION #
00644 M00S00548.comfds2 +++| ITEM TABFULLWRD U(00,00,60); # TABLE WORD #
00645 M00S00549.comfds2 +++| END
00646 M00S00550.comfds2 +++|
00647 M00S00551.comfds2 +++|
00648 M00S00552.comfds2 +++| BASED ARRAY SPLITCONTROL [1:2] P(SPLTCTLSIZ); # SPLIT SCREEN #
00649 M00S00553.comfds2 +++| BEGIN # ARRAY SPLITCONTROL #
00650 M00S00554.comfds2 +++| ITEM TITLEROW I(00,00,60); # WHERE TITLES ARE #
00651 M00S00555.comfds2 +++| ITEM NUMROWS I(01,00,60); # NUMBER OF DATA ROWS IN SPLIT #
00652 M00S00556.comfds2 +++| ITEM SPLITFILE I(02,00,60); # FILE DISPLAYED IN SPLIT #
00653 M00S00557.comfds2 +++| ITEM XSHIFT I(03,00,60); # DISPLAY COLUMN OFFSET #
00654 M00S00558.comfds2 +++| ITEM LASTNAME C(04,00,07); # LAST DISPLAYED FILE NAME #
00655 M00S00559.comfds2 +++| END # ARRAY SPLITCONTROL #
00656 M00S00560.comfds2 +++|
00657 M00S00561.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00658 M00S00562.comfds2 +++| BASED ARRAY ROWCONTROL [0:MAXROWS] P(2);
00659 M00S00563.comfds2 +++| BEGIN
00660 M00S00564.comfds2 +++| ITEM ROWPAINT B(0); # WHETHER TO REDISPLAY THIS ROW #
00661 M00S00565.comfds2 +++| ITEM ROWBITS U(1,0,6); # INCLUDES ALL FLAGS #
00662 M00S00566.comfds2 +++| ITEM ROWCOLUM B(1,1,1); # LIST COLUMN NUMBERS HERE #
00663 M00S00567.comfds2 +++| ITEM ROWPMARK B(1,2,1); # WHETHER WITHIN ACTIVE MARKS #
00664 M00S00568.comfds2 +++| ITEM ROWPHALF B(1,3,1); # TO PARTIALLY UPDATE TITLE #
00665 M00S00569.comfds2 +++| # END OF BITS INCLUDED UNDER ROWBITS #
00666 M00S00570.comfds2 +++| ITEM ROWSPLIT U(1,6,3); # SPLIT THIS ROW IS IN #
00667 M00S00571.comfds2 +++| ITEM ROWTYPE U(1,9,6); # TYPES ARE ROWST VALUES #
00668 M00S00572.comfds2 +++| # DEFINED IFF TEXT, EMPTY OR TITLE #
00669 M00S00573.comfds2 +++| ITEM ROWORIG I(1,18,12); # ORIGINAL ROW BEFORE SHUFFLES #
00670 M00S00574.comfds2 +++| ITEM ROWLNPTR U(1,30,30); # LINE POINTER FOR GLOBAL SEARCH #
00671 M00S00575.comfds2 +++| END
00672 M00S00576.comfds2 +++|
00673 M00S00577.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00674 M00S00578.comfds2 +++| BASED ARRAY BACKSTACK [0:BACKMAX]; # STACK OF PREVIOUS SCREENS #
00675 M00S00579.comfds2 +++| BEGIN
00676 M00S00580.comfds2 +++| ITEM BACKFIL1 U (00,00,18); # FDLF(1) #
00677 M00S00581.comfds2 +++| ITEM BACKFIL2 U (00,18,18); # FDLF(2) #
00678 M00S00582.comfds2 +++| ITEM BACKSPL1 U (00,36,06); # SPLIT FILE 1 #
00679 M00S00583.comfds2 +++| ITEM BACKSPL2 U (00,42,06); # SPLIT FILE 2 #
00680 M00S00584.comfds2 +++| ITEM BACKSPLN U (00,48,12); # SPLIT SIZE #
00681 M00S00585.comfds2 +++| END
00682 M00S00586.comfds2 +++|
00683 M00S00587.comfds2 +++| BASED ARRAY BACKSTORE [0:TEMPIND] P(2); # SAVED POSITION STORAGE #
00684 M00S00588.comfds2 +++| BEGIN
00685 M00S00589.comfds2 +++| ITEM BKFDLFF1 U (00,00,18); # FDLF(1) #
00686 M00S00590.comfds2 +++| ITEM BKFDLFF2 U (00,18,18); # FDLF(2) #
00687 M00S00591.comfds2 +++| ITEM BKSPLIT2 U (00,36,06); # SPLIT FILE 2 #
00688 M00S00592.comfds2 +++| ITEM BKNROWS1 U (00,42,12); # SPLIT SIZE 1 #
00689 M00S00593.comfds2 +++| ITEM BKWHCHSP U (00,54,06); # WHICH SPLIT (0 = TOP) #
00690 M00S00594.comfds2 +++| ITEM BKNROWS2 U (01,00,12); # SPLIT SIZE 2 #
00691 M00S00595.comfds2 +++| ITEM BKCURSOR U (01,12,12); # CURSOR POSITION #
00692 M00S00596.comfds2 +++| END
00693 M00S00597.comfds2 +++|
00694 M00S00598.comfds2 +++|
00695 M00S00599.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00696 M00S00600.comfds2 +++| BASED ARRAY FKEYDEFS [-POSFKEYS:POSFKEYS];
00697 M00S00601.comfds2 +++| BEGIN
00698 M00S00602.comfds2 +++| ITEM FKEYNAME C (00,00,10);
00699 M00S00603.comfds2 +++| END
00700 M00S00604.comfds2 +++|
00701 M00S00605.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00702 M00S00606.comfds2 +++| BASED ARRAY AUDITSTAGE[0:AUDITSIZE]; ITEM AUDITWORD;
00703 M00S00607.comfds2 +++|
00704 M00S00608.comfds2 +++|
00705 M00S00609.comfds2 +++| # LOCATE AND CHANGE STRING BUFFERS HOLD 80 CHARS PLUS EOL #
00706 M00S00610.comfds2 +++|
00707 M00S00611.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00708 M00S00612.comfds2 +++| BASED ARRAY LOCSTRING1 [0:STRWIDM1]; ITEM LOCSTR1;
00709 M00S00613.comfds2 +++| BASED ARRAY LOCSTRING2 [0:STRWIDM1]; ITEM LOCSTR2;
00710 M00S00614.comfds2 +++| BASED ARRAY CHGSTRING1 [0:STRWIDM1]; ITEM CHGSTR1;
00711 M00S00615.comfds2 +++|
00712 M00S00616.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00713 M00S00617.comfds2 +++| BASED ARRAY FKEYSTRINGS[-POSFKEYS:POSFKEYS] S(2);
00714 M00S00618.comfds2 +++| BEGIN
00715 M00S00619.comfds2 +++| ITEM FKEYSTRING U(0);
00716 M00S00620.comfds2 +++| END
00717 M00S00621.comfds2 +++|
Line S00001 Modification History |
M01 (Added by) | ns2675 |
Seq # *Modification Id* Act
----------------------------+
00718 M01S00001.ns2675 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00719 M01S00002.ns2675 +++| BASED ARRAY FKEYNUMB[1:POSFKEYS];
00720 M01S00003.ns2675 +++| BEGIN
00721 M01S00004.ns2675 +++| ITEM FKEYNUMS U;
00722 M01S00005.ns2675 +++| END
00723 M01S00006.ns2675 +++|
00724 M00S00622.comfds2 +++| # MUST MATCH CORRESPONDING SINGLE-USER ARRAY #
00725 M00S00623.comfds2 +++|
00726 M00S00624.comfds2 +++| BASED ARRAY TITLE1LIN [0:TTLLNLEN]; # TITLE LINE ONE ARRAY #
00727 M00S00625.comfds2 +++| BEGIN # ARRAY TITLE1LIN #
00728 M00S00626.comfds2 +++| ITEM TITLE1LINE I; # TITLE LINE ONE #
00729 M00S00627.comfds2 +++| END # ARRAY TITLE1LIN #
00730 M00S00628.comfds2 +++|
00731 M00S00629.comfds2 +++| BASED ARRAY TITLE2LIN [0:TTLLNLEN]; # TITLE LINE TWO ARRAY #
00732 M00S00630.comfds2 +++| BEGIN # ARRAY TITLE2LIN #
00733 M00S00631.comfds2 +++| ITEM TITLE2LINE I; # TITLE LINE TWO #
00734 M00S00632.comfds2 +++| END # ARRAY TITLE2LIN #
00735 M00S00633.comfds2 +++|
00736 M00S00634.comfds2 +++|
00737 M00S00635.comfds2 +++| CONTROL FI;
00738 M00S00636.comfds2 +++|
00739 M00S00637.comfds2 +++|
00740 M00S00638.comfds2 +++| ITEM DISPATEND; # END OF MOVED COMMON #
00741 M00S00639.comfds2 +++|PAGE # GLOBAL COMMON DATA #
00742 M00S00640.comfds2 +++|
00743 M00S00641.comfds2 +++|
00744 M00S00642.comfds2 +++| ITEM WORKNAM C(7)="ZZZWORK"; # NAME OF WORK FILE #
00745 M00S00643.comfds2 +++| BASED ARRAY CORE; ITEM MEM;
00746 M00S00644.comfds2 +++|
00747 M00S00645.comfds2 +++|
00748 M00S00646.comfds2 +++| # DATA WHICH CAN BE USED ONLY INSTANTLY #
00749 M00S00647.comfds2 +++|
Line S00648 Modification History |
M01 (Removed by) | ns2607 |
Seq # *Modification Id* Act
----------------------------+
00750 M01S00648.ns2607 ---| ITEM SCNFDSIZE, SCNFDCURF, SCNFDLOCK, SCNFDCHNG,
00751 M01S00649.ns2607 ---| SCNFDASCI, SCNFDNUMB, SCNNAMPTR; # SCANFDL RESULTS #
Line S00003 Modification History |
M01 (Added by) | ns2607 |
Seq # *Modification Id* Act
----------------------------+
00752 M01S00003.ns2607 +++| ITEM SCNFDASCI, SCNFDCHNG, # SCANFDL RESULTS #
00753 M01S00004.ns2607 +++| SCNFDCURF, SCNFDINIT,
00754 M01S00005.ns2607 +++| SCNFDLOCK, SCNFDNUMB,
00755 M01S00006.ns2607 +++| SCNFDSIZE, SCNNAMPTR;
00756 M00S00650.comfds2 +++|
00757 M00S00651.comfds2 +++| ARRAY PROTLIN[0:BUFWID]; ITEM PROTLINE; # BUFFER FOR PROTECTED FIELD #
00758 M00S00652.comfds2 +++|
00759 M00S00653.comfds2 +++| # STANDARD TTY PROMPTS PLUS CONTROL BYTES #
00760 M00S00654.comfds2 +++|
00761 M00S00655.comfds2 +++| ITEM AQCCKWRD=AQCCKCON;
00762 M00S00656.comfds2 +++| ITEM AQCKWRD=AQCKCON;
00763 M00S00657.comfds2 +++| ITEM CKWRD=CKCON;
00764 M00S00658.comfds2 +++| ITEM BCCKWRD=BCCKCON;
00765 M00S00659.comfds2 +++| ITEM NULLWRD=NULLCON;
00766 M00S00660.comfds2 +++| ITEM QCCKWRD=QCCKCON;
00767 M00S00661.comfds2 +++| ITEM BLANKWRD=BLANKCON;
00768 M00S00662.comfds2 +++|
00769 M00S00663.comfds2 +++| # OTHER USEFUL CONSTANT DATA #
00770 M00S00664.comfds2 +++|
00771 M00S00665.comfds2 +++| ITEM BUFWIDE=BUFWIDP1, BUFWIDE2=BUFWID2P1;
00772 M00S00666.comfds2 +++|
00773 M00S00667.comfds2 +++|
00774 M00S00668.comfds2 +++| # DATA UNIQUE TO SINGLE EDITOR #
00775 M00S00669.comfds2 +++|
00776 M00S00670.comfds2 +++| CONTROL IFEQ SINGLE,1;
00777 M00S00671.comfds2 +++| ITEM ORIGIN=-1;
00778 M00S00672.comfds2 +++| ITEM SMALLFIELD B=FALSE;
00779 M00S00673.comfds2 +++| ITEM TRYRESUME B=FALSE;
00780 M00S00674.comfds2 +++| ITEM FORMERASCII B=FALSE;
00781 M00S00675.comfds2 +++| ITEM CTLCDCMD B=TRUE;
00782 M00S00676.comfds2 +++| ITEM INTERACT B=FALSE;
00783 M00S00677.comfds2 +++| ITEM NULLINPUT B=FALSE;
00784 M00S00678.comfds2 +++| ITEM TTYINPUT B=TRUE;
00785 M00S00679.comfds2 +++| ITEM TTYOUTPUT B=TRUE;
00786 M00S00680.comfds2 +++| ITEM SINGLEONLY B=FALSE;
00787 M00S00681.comfds2 +++| ITEM INPTNAM C(7)="INPUT "; # NAME INPUT FILE #
00788 M00S00682.comfds2 +++| ITEM OUTPNAM C(7)="OUTPUT "; # NAME OUTPUT FILE #
00789 M00S00683.comfds2 +++| ITEM OLDPROCREC C(7);
00790 M00S00684.comfds2 +++| ITEM OLDPROCFIL C(7);
00791 M00S00685.comfds2 +++| ARRAY PARMLIN [0:BUFWID]; ITEM PARMLINE=[BUFWIDP1(-1)];
00792 M00S00686.comfds2 +++| ITEM PARMPTR;
00793 M00S00687.comfds2 +++| ITEM ONWAYINBLK=0;
00794 M00S00688.comfds2 +++| ITEM NUMMODE=0;
00795 M00S00689.comfds2 +++| ITEM STARTNUM=100;
00796 M00S00690.comfds2 +++| ARRAY TSTATAREA(2);
00797 M00S00691.comfds2 +++| BEGIN
00798 M00S00692.comfds2 +++| ITEM TSTATUSTN U(0,48,12);
00799 M00S00693.comfds2 +++| ITEM CURRENTASC B(1,57,1);
00800 M00S00694.comfds2 +++| ITEM INITASCII B(1,58,1);
00801 M00S00695.comfds2 +++| END
00802 M00S00696.comfds2 +++| ARRAY DEFIONAMES (3); # DEFAULT I/O NAMES #
00803 M00S00697.comfds2 +++| BEGIN
00804 M00S00698.comfds2 +++| ITEM DEFINPNAM C(0,0,7);
00805 M00S00699.comfds2 +++| ITEM DEFINPCHAR C(0,0,5)=["INPUT"];
00806 M00S00700.comfds2 +++| ITEM DEFINPBIN U(0,30,12)=[0];
00807 M00S00701.comfds2 +++| ITEM DEFOUTNAM C(1,0,7);
00808 M00S00702.comfds2 +++| ITEM DEFOUTCHAR C(1,0,6)=["OUTPUT"];
00809 M00S00703.comfds2 +++| ITEM DEFOUTBIN U(1,36,6)=[0];
00810 M00S00704.comfds2 +++| ITEM NULLNAM C(2,0,7);
00811 M00S00705.comfds2 +++| ITEM NULLCHARXX C(2,0,1)=["0"];
00812 M00S00706.comfds2 +++| ITEM NULLBINXX U(2,6,36)=[0];
00813 M00S00707.comfds2 +++| END
00814 M00S00708.comfds2 +++| ARRAY UTILBUF(MINIBUFSIZ);;
00815 M00S00709.comfds2 +++| BASED ARRAY FILEBUF;;
00816 M00S00710.comfds2 +++| ARRAY UTILFET (9);
00817 M00S00711.comfds2 +++| BEGIN
00818 M00S00712.comfds2 +++| ITEM UTILFETAT U(0,42,8);
00819 M00S00713.comfds2 +++| ITEM UTILFETEP B(1,15,1);
00820 M00S00714.comfds2 +++| ITEM UTILFETL U(1,36,6);
00821 M00S00715.comfds2 +++| ITEM UTILFETWORD7 (7);
00822 M00S00716.comfds2 +++| ITEM UTILFETWORD8 (8);
00823 M00S00717.comfds2 +++| ITEM UTILFETSR U(8,42,6);
00824 M00S00718.comfds2 +++| ITEM UTILFETMODE U(8,54,6);
00825 M00S00719.comfds2 +++| END
00826 M00S00720.comfds2 +++| ARRAY FILEFET(FETSIZ);
00827 M00S00721.comfds2 +++| BEGIN
00828 M00S00722.comfds2 +++| ITEM FILECODE U(0,50,10);
00829 M00S00723.comfds2 +++| ITEM FILEEP B(1,15,1);
00830 M00S00724.comfds2 +++| ITEM FILEIN U(2,42,18);
00831 M00S00725.comfds2 +++| ITEM FILEOUT U(3,42,18);
00832 M00S00726.comfds2 +++| END
00833 M00S00727.comfds2 +++| ITEM PFMERROR=0;
Line S00001 Modification History |
M01 (Added by) | ns2568 |
Seq # *Modification Id* Act
----------------------------+
00834 M01S00001.ns2568 +++| ITEM PFMMSG C(40)=" $";
00835 M01S00002.ns2568 +++| ITEM PFMMS2 C(40)=" $";
00836 M00S00728.comfds2 +++| ARRAY PFMFET(10);
00837 M00S00729.comfds2 +++| BEGIN
00838 M00S00730.comfds2 +++| ITEM PFMFETAT U(0,42,8);
00839 M00S00731.comfds2 +++| ITEM PFMFETEP B(1,15,1);
00840 M00S00732.comfds2 +++| ITEM PFMFETL U(1,36,6);
00841 M00S00733.comfds2 +++| ITEM PFMFETWD8 I(8);
00842 M00S00734.comfds2 +++| ITEM PFMFETPFN C(8,0,7);
00843 M00S00735.comfds2 +++| ITEM PFMFETCT U(8,48,6);
00844 M00S00736.comfds2 +++| ITEM PFMFETM U(8,54,6);
00845 M00S00737.comfds2 +++| ITEM PFMFETWD9 I(9);
00846 M00S00738.comfds2 +++| ITEM PFMFETOAUN C(9,0,7);
00847 M00S00739.comfds2 +++| END
00848 M00S00740.comfds2 +++| ARRAY MOVEFET(FETSIZ); ITEM MOVEFETIN U(2,42,18);
00849 M00S00741.comfds2 +++| ARRAY FILINFPARMS (5);
00850 M00S00742.comfds2 +++| BEGIN
00851 M00S00743.comfds2 +++| ITEM FILINFNAME C(0,0,7);
00852 M00S00744.comfds2 +++| ITEM FILINFLENC U(0,42,18)=[O"050001"];
00853 M00S00745.comfds2 +++| ITEM FILINFSTAT U(1,12,42);
00854 M00S00746.comfds2 +++| ITEM FILINFTTY B(1,43,1);
00855 M00S00747.comfds2 +++| ITEM FILINFRMS B(1,44,1);
00856 M00S00748.comfds2 +++| ITEM FILINFWRIT B(1,52,1);
00857 M00S00749.comfds2 +++| ITEM FILINFREAD B(1,53,1);
00858 M00S00750.comfds2 +++| ITEM FILINFFT U(1,54,6);
00859 M00S00751.comfds2 +++| END
00860 M00S00752.comfds2 +++|
00861 M00S00753.comfds2 +++|
00862 M00S00754.comfds2 +++| # ARRAYS USED FOR WORKIO PATH AND BUFFER #
00863 M00S00755.comfds2 +++|
00864 M00S00756.comfds2 +++| ARRAY SNGLFET (FETSIZ);;
00865 M00S00757.comfds2 +++| ARRAY SNGLOBF (OBFSIZE);;
00866 M00S00758.comfds2 +++| ARRAY SNGLLST (LSTSIZE);;
00867 M00S00759.comfds2 +++| ARRAY SNGLPRU (BUFSIZE);;
00868 M00S00760.comfds2 +++|
00869 M00S00761.comfds2 +++|
00870 M00S00762.comfds2 +++| # T T F STORAGE #
00871 M00S00763.comfds2 +++|
00872 M00S00764.comfds2 +++| ARRAY TTYIBF (TTYIBUFSIZ);; # FILE BUFFER #
00873 M00S00765.comfds2 +++| ARRAY TTYI (FETSIZ); # INPUT FET #
00874 M00S00766.comfds2 +++| BEGIN
00875 M00S00767.comfds2 +++| ITEM TTYICD U(0,50,10); # FET CODE #
00876 M00S00768.comfds2 +++| ITEM TTYIIN U(2,42,18);
00877 M00S00769.comfds2 +++| ITEM TTYIOT U(3,42,18);
00878 M00S00770.comfds2 +++| END
00879 M00S00771.comfds2 +++|
00880 M00S00772.comfds2 +++| ARRAY TTYOBF (TTYOBUFSIZ);; # *OUTPUT* BUFFER #
00881 M00S00773.comfds2 +++| ARRAY TTYO (FETSIZ); # OUTPUT FET #
00882 M00S00774.comfds2 +++| ITEM TTYONM U(0,0,42), # FILE NAME #
00883 M00S00775.comfds2 +++| TTYOFB B(1,23,1), # FLUSH BIT FOR NOS 460 #
00884 M00S00776.comfds2 +++| TTYOFT U(1,42,18),
00885 M00S00777.comfds2 +++| TTYOIN U(2,42,18),
00886 M00S00778.comfds2 +++| TTYOOT U(3,42,18),
00887 M00S00779.comfds2 +++| TTYOLM U(4,42,18);
00888 M00S00780.comfds2 +++|
00889 M00S00781.comfds2 +++| ITEM LISTFETPTR=0;
00890 M00S00782.comfds2 +++| ARRAY FETLIST (3);
00891 M00S00783.comfds2 +++| BEGIN
00892 M00S00784.comfds2 +++| ITEM FETLIST0 (0) = [3];
00893 M00S00785.comfds2 +++| ITEM FETLSTNAM U(1,0,42) = [0];
00894 M00S00786.comfds2 +++| ITEM FETLSTLOC U(1,42,18) = [0];
00895 M00S00787.comfds2 +++| ITEM FETLIST2 (2) = [0];
00896 M00S00788.comfds2 +++| END
00897 M00S00789.comfds2 +++|
00898 M00S00790.comfds2 +++| CONTROL FI;
00899 M00S00791.comfds2 +++|
00900 M00S00792.comfds2 +++| END # OF COMMON COMFDAT #
00901 M00S00793.comfds2 +++| CONTROL LIST;