DICLIX ;SEA/TOAD,SF/TKW-FileMan: Lister, Search Compound Indexes ;6/5/00 10:13
Source file <DICLIX.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
VA FileMan | 4 | DICL1 DICL10 DICL3 DICLIX1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
WALK(DIFLAGS,DINDEX,DIDENT,DIFILE,DIEN,DIFIEN,DISCREEN,DILIST,DINDEX0,DIXV,DIC) | ;
|
|
PREP | ; prepare to loop through subscript
|
|
LOOP | ; loop through subscripts
|
|
DATA | ||
IEN | ||
CLEAN | ; clean up after loop, exit
|
|
CHK | ; See whether we have a match or are at the end of the subscripts.
|
|
MATCH | ; No more subscripts or partial matches, or past our TO value?
|
|
LOWSUB | ; Find next subscript value from multiple pointed-to files
|
|
TRY | ; Apply screens to entry. If passed, add entry to output.
|
Name | Field # of Occurrence |
---|---|
^( | IEN+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DI0NODE | TRY+7~*, TRY+8, TRY+9 |
DIC | WALK~, DATA+10, TRY+17 |
>> DICQ | TRY+17 |
>> DICQ(0 | TRY+16* |
DIDENT | WALK~, DATA+9, DATA+10, TRY+4, TRY+9 |
DIDENT( | TRY+12, TRY+13, TRY+16, TRY+19, TRY+20* |
DIDONE | LOOP+2~*, DATA+6*, DATA+7, DATA+12*, IEN+2*, IEN+8, IEN+10, CHK+1, CHK+2*, MATCH+2* , MATCH+4, MATCH+5, TRY+5*, TRY+13*, TRY+18* |
DIEN | WALK~, DATA+10, TRY+1*, TRY+4, TRY+7, TRY+8, TRY+9 |
>> DIERR | LOOP+2, DATA+12, TRY+11 |
DIFIEN | WALK~, DATA+10, TRY+4, TRY+8, TRY+9 |
DIFILE | WALK~, DATA+10, LOWSUB+16*, TRY+4, TRY+7, TRY+8, TRY+9, TRY+17 |
DIFILE( | TRY+7 |
DIFILE("STACK" | LOWSUB+1, LOWSUB+12, LOWSUB+13, LOWSUB+14*, LOWSUB+16, TRY+4 |
DIFILE("STACKEND" | LOWSUB+3!, LOWSUB+7, LOWSUB+14 |
DIFLAGS | WALK~, DATA+9, DATA+10, IEN+6, IEN+10, MATCH+4, MATCH+5, TRY+2, TRY+4, TRY+6 , TRY+8, TRY+9, TRY+15 |
DILIST | WALK~, DATA+10, TRY+4, TRY+9 |
DILIST("ORDER" | TRY+19* |
DILOWNO | LOWSUB+1~*, LOWSUB+2, LOWSUB+3, LOWSUB+4*, LOWSUB+6, LOWSUB+10*, LOWSUB+12, LOWSUB+14, LOWSUB+17 |
DILOWVAL | LOWSUB+1~*, LOWSUB+2, LOWSUB+4*, LOWSUB+7, LOWSUB+8, LOWSUB+9, LOWSUB+10*, LOWSUB+15 |
DIMNEM | IEN+3~, IEN+7* |
DIMORE | PREP+4~*, CHK+1, CHK+2 |
DINDEX | WALK~, DATA+9, DATA+10, IEN+3, IEN+10, CHK+2, MATCH+5, LOWSUB+17*, TRY+4, TRY+8 , TRY+9, TRY+17 |
DINDEX( | PREP+3, PREP+4, PREP+5, PREP+6, LOOP+3, DATA+5, DATA+8*, IEN+4, IEN+5, IEN+8 , IEN+9, CLEAN+1*, CLEAN+2*, MATCH+3, MATCH+5, TRY+1* |
DINDEX("#" | DATA+2 |
DINDEX("AT" | PREP+2, DATA+8*, DATA+11* |
DINDEX("DONE" | DATA+12, CHK+1, TRY+5*, TRY+11, TRY+13*, TRY+18* |
DINDEX("ROOTCNG" | DATA+9 |
DINDEX("WAY" | TRY+19 |
DINDEX(1 | LOWSUB+8, LOWSUB+9, TRY+3 |
DINDEX0 | WALK~, DATA+10, MATCH+4, TRY+4 |
DINDEX0("DONE" | TRY+5 |
DINDEX0(1 | TRY+3* |
DIPART | PREP+4~*, CHK+2, MATCH+2 |
DISCREEN | WALK~, DATA+9, DATA+10, TRY+4, TRY+8 |
DISKIP | LOOP+2~, DATA+4*, DATA+5 |
DISKIPMN | IEN+3~*, IEN+6* |
DISUB | PREP+2~*, PREP+3, PREP+4, PREP+5, PREP+6, LOOP+3, DATA+2, DATA+3, DATA+5, DATA+8 , DATA+9, DATA+11, IEN+4, IEN+5, IEN+8, IEN+9, IEN+10, CLEAN+1, CLEAN+2, CHK+2 , MATCH+3, MATCH+4, MATCH+5, TRY+1 |
DIVAL | PREP+3~*, PREP+5, PREP+6*, LOOP+3*, DATA+5, DATA+6, DATA+8, IEN+2, IEN+4, IEN+5 , IEN+10, CHK+2, MATCH+1, MATCH+2, MATCH+4, MATCH+5, LOWSUB+1, LOWSUB+13, LOWSUB+15*, TRY+1 |
DIXV | WALK~, LOWSUB+2! |
DIXV( | LOWSUB+3!, LOWSUB+4, LOWSUB+8, LOWSUB+9, LOWSUB+10, LOWSUB+13*, LOWSUB+17 |
DIXV(0 | DATA+3, LOWSUB+4 |
DTOUT | TRY+16!, TRY+18 |
DUOUT | TRY+16!, TRY+18 |
I | LOWSUB+1~, LOWSUB+7*, LOWSUB+8, LOWSUB+9, LOWSUB+10 |
J | LOWSUB+6~*, LOWSUB+7 |
U | LOWSUB+14, LOWSUB+16 |