XQ83A ;ISC-SF..SEA/JLI,LUKE - MICROSURGERY ON MENU TREES TO ADD A NEW ITEM TO A MENU ;10/27/2009
Source file <XQ83A.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PATHS | ;
|
|
PATH1 | ;
|
|
ADD2 | ;
|
|
ADD1 | ;
|
|
CLEAN(XQNEW,L) | ;clean broken pointers if found on the sub menu with IEN=XQNEW - P ;494
|
|
DOIT | ||
ADD | ;
|
|
TABLE | ;
|
|
ENTRY | ;
|
|
X1 | ;
|
|
XPAND | ; eXPAND option into subtree, if it is a menu
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(19 - [#19] | ENTRY+2*, TABLE+1, TABLE+2, TABLE+3, TABLE+5, XPAND+1, X1+1, X1+2, PATH1+4, ADD+1 , ADD+2, DOIT, ADD2+4, ADD2+5, ADD2+6 |
^TMP($J | TABLE+1!, TABLE+2*, TABLE+4*, TABLE+5, TABLE+6!, X1+1*, X1+3*, PATHS+1, PATH1+1, PATH1+3 , PATH1+6*, ADD+1*, ADD+2*, DOIT!*, DOIT+1, ADD1+2 |
Name | Line Occurrences |
---|---|
ADD | ENTRY+2 |
ADD1 | DOIT+1 |
ADD2 | ADD1+2 |
DOIT | ADD+1 |
PATH1 | PATHS+1 |
PATHS | TABLE+6 |
TABLE | ENTRY+1 |
X1 | XPAND+1 |
XPAND | TABLE+4, TABLE+5 |
Name | Field # of Occurrence |
---|---|
^( | ENTRY+2!, TABLE+3, TABLE+4*, TABLE+5, XPAND+1, X1+1*, X1+2, PATHS+1, PATH1+3, PATH1+6* , ADD+2!, DOIT+1, ADD1+2, ADD2+4*, ADD2+5*, ADD2+6* |
^("NEW" | TABLE+6! |
^("PATH" | TABLE+1! |
^("S" | PATHS+1 |
^("S2" | TABLE+1!, TABLE+6! |
^("SYN" | PATH1+6*, ADD1+2 |
^("U" | TABLE+2, X1+1, PATH1+3 |
^(0 | TABLE+3, XPAND+1, X1+2, ADD2+6* |
^(3 | PATH1+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %XQT1 | ENTRY+2 |
>> A | ENTRY+2*, ADD+1, ADD+2, ADD2+4, ADD2+5, ADD2+6 |
>> BASE | PATH1+1*, PATH1+2, ADD1+2*, ADD2+1, ADD2+4, ADD2+7 |
>> BASE1 | ADD2+5*, ADD2+6 |
DA | CLEAN+1~, CLEAN+2* |
DA(1 | CLEAN+2* |
DIK | CLEAN+1~, CLEAN+2* |
>> I | PATHS+1*, PATH1+1 |
>> IJ | TABLE+3*, X1+2* |
>> J | TABLE+5*, PATHS+1*, ADD+2* |
>> K | TABLE+5*, ADD+2*, ADD1+2* |
L | ENTRY+3!, XPAND+1*, CLEAN~, CLEAN+2, ADD+2*, ADD2+5* |
M | ENTRY+3! |
N | ENTRY+3!, TABLE+4*, TABLE+5*, X1+1, ADD+2*, ADD2+3*, ADD2+5*, ADD2+6* |
>> NEW | PATH1+3*, PATH1+4, PATH1+6 |
>> NPATH | PATH1+1* |
P | ENTRY+3!, ADD+2* |
>> PATH | PATHS+1*, PATH1+1, PATH1+6, ADD1+2*, ADD2+3, ADD2+4, ADD2+5 |
R | ENTRY+3! |
S | ENTRY+3!, TABLE+4*, TABLE+5*, X1+1* |
S1 | XPAND+1*, XPAND+2!, X1+1 |
S2 | TABLE+2*, TABLE+4*, XPAND+1*, XPAND+2!, X1+1 |
SU | TABLE+2!*, TABLE+4 |
>> SYN | PATHS+1*, PATH1+6, ADD1+2*, ADD2+8 |
T | ENTRY+3!, XPAND+1*, X1+1, X1+2, X1+3, PATH1+1*, PATH1+3, PATH1+4, DOIT+1*, ADD1+1 , ADD2+3*, ADD2+4, ADD2+5, ADD2+6, ADD2+7, ADD2+8 |
U | ENTRY+2, TABLE+2, TABLE+3, TABLE+4, XPAND+1, X1+2, X1+3, PATH1+2, PATH1+4, PATH1+6 , ADD+1, ADD+2, DOIT, ADD1+1, ADD2+1, ADD2+4, ADD2+5, ADD2+6, ADD2+7, ADD2+8 |
V | ADD2+7*, ADD2+8*, ADD2+9! |
>> XQ83AJ | DOIT*, DOIT+1* |
>> XQA | ADD1+1*, ADD2+4, ADD2+5 |
>> XQC | ENTRY+2, TABLE+4 |
>> XQC2 | XPAND+1 |
>> XQE | PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+1 |
>> XQE1 | PATH1+4*, PATH1+5, ADD2+1*, ADD2+4, ADD2+5 |
>> XQF | PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+2 |
>> XQF1 | PATH1+4*, PATH1+5, ADD2+1*, ADD2+2*, ADD2+4, ADD2+5 |
>> XQFLG | ADD2+3*, ADD2+4*, ADD2+5*, ADD2+6 |
XQJ | ENTRY+2*, ENTRY+3! |
>> XQK | PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+1 |
>> XQK1 | PATH1+4*, PATH1+5, ADD2+1*, ADD2+4, ADD2+5 |
XQLAST | ENTRY+3! |
XQLM | ENTRY+3! |
XQLM1 | ENTRY+3! |
XQNAM | ENTRY+3! |
XQNAME | ENTRY+3! |
XQNEW | ENTRY+3!, TABLE+4*, TABLE+5*, XPAND+1, CLEAN~, CLEAN+2 |
XQOLD | ENTRY+3!, TABLE+4*, TABLE+5*, XPAND+1, X1+1 |
>> XQOPI | TABLE+1, TABLE+2, TABLE+3, TABLE+4, DOIT |
>> XQOPM | ENTRY+2, TABLE+4, ADD+1, ADD+2, DOIT, DOIT+1 |
>> XQP | TABLE+3*, TABLE+4, X1+2*, X1+3, PATH1+2*, PATH1+5*, PATH1+6, ADD1+1*, ADD2+1 |
XQP1 | ENTRY+3!, PATH1+4*, PATH1+5, ADD2+1*, ADD2+4, ADD2+5 |
XQP2 | ENTRY+3! |
XQPATH | ENTRY+3! |
XQSYN | ENTRY+3! |
>> XQSYNY | ADD2+7*, ADD2+8* |
>> XQUC | PATH1+3*, PATH1+6, ADD1+2*, ADD2+7 |