DICUIX1 ;SF/TOAD/TKW-FileMan: Lookup Tools, Indexes (called by DICUIX) ;4/13/00 13:40 [ 04/02/2003 8:25 AM ]
Source file <DICUIX1.m>
| Package | Total | Call Graph | 
|---|---|---|
| VA Fileman | 3 | FOLLOW^DICL3 ERR^DICU1 GETTMP^DICUIX1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| GETTMP(DITEMP,DISUB) | ; Return name of unique entry in ^TMP global. | |
| GET(DITOP,DIFILE,DIFIELD,DIDEF,DICODE) | ; ; get the definition and fetch code for a field | |
| G5 | ; build field fetch code (piece or extract) & quit | |
| G4 | ; get field's storage location, handle ?, build node fetch code | |
| G3 | ; handle computed fields | |
| G2 | ; piece out the fields data type, & handle multiples and WPs | |
| G1 | ; handle .001 fields, fetch field definition, & handle undefineds | |
| G30 | ; Handle whole file x-refs | |
| TMPIDX(DISUB,DITEMP,DITEMP2,DINDEX) | ; Set data to build temporary index on Lister call with Pointer/VP in index. | |
| F2 | ; build fetch code from node expression | |
| F1 | ; handle .01 & computeds, build node expression | |
| FIELD(DIFILE,DIFIELD,DINDEX) | ; | |
| BLDB(DIROOT,DITEMP) | ; Build temporary "B" index on file | |
| TMPB(DITEMP,DIFILE) | ; Set place for temporary "B" index on file | |
| CHKP(DIFILE,DINDEX,DINUMBER,DIFRPRT,DISCREEN,DICQ1) | ; Check whether to build temporary index on Lister call with Pointer/VP in first subscript of index. | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DD( | G1+3, G2+4, CHKP+10, CHKP+11 | 
| ^DIC - [#1] | CHKP+6 | 
| Name | Line Occurrences | 
|---|---|
| GETTMP | TMPB+2 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | CHKP+11 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| D | CHKP+1~, CHKP+8*, CHKP+10*, CHKP+11*, CHKP+12*, CHKP+13 | 
| DICODE | GET~, G1+2*, G1+3*, G3+3*, G30+1*, G4+5*, G5+2*, G5+6*, F2+2~, F2+3* , F2+7*, F2+8 | 
| DICQ1 | CHKP~, CHKP+14, CHKP+15 | 
| DIDEF | GET~, G1+2*, G1+3*, G1+4, G2+2, G3+3, G3+4*, G4+2, G4+5* | 
| DIEFROM | G5+4~*, G5+6, F2+5~*, F2+7 | 
| DIENTRY | BLDB+1~*, BLDB+2*, BLDB+3, BLDB+4 | 
| DIETO | G5+5~*, G5+6, F2+6~*, F2+7 | 
| DIF | CHKP+3~*, CHKP+4 | 
| DIF("STACKEND" | CHKP+5 | 
| DIFIELD | GET~, G1+2, G1+3, G1+4, G2+6, FIELD~, F1+2 | 
| DIFILE | GET~, G1+3, G1+4, G2+6, G30+1, G4+6, FIELD~, TMPB~, TMPB+1, CHKP~ , CHKP+2, CHKP+3 | 
| DIFILE( | CHKP+2 | 
| DIFRPRT | CHKP~, CHKP+13, CHKP+14 | 
| DIKJ | GETTMP+6~, GETTMP+7* | 
| DIN1 | CHKP+1~, CHKP+2*, CHKP+15, CHKP+16 | 
| DIN2 | CHKP+1~*, CHKP+7*, CHKP+13*, CHKP+14*, CHKP+15, CHKP+16 | 
| DINDEX | FIELD~, TMPIDX~, CHKP~ | 
| DINDEX("ROOTCNG" | TMPIDX+4* | 
| DINDEX(1 | F1+3, CHKP+3, CHKP+4, CHKP+9 | 
| DINODE | G4+3~*, G4+5, G4+6*, G4+7*, G5+2, G5+6, F1+4~*, F1+6, F1+7*, F1+8* , F2+3, F2+7 | 
| DINUMBER | CHKP~, CHKP+13 | 
| DIPIECE | G4+4~*, G4+5, G5+2, G5+4, G5+5, F1+5~*, F1+6, F2+3, F2+5, F2+6 | 
| DIROOT | BLDB~, BLDB+2, BLDB+3 | 
| DISCREEN | CHKP~, CHKP+4 | 
| DISTORE | G4+2~*, G4+3, G4+4, F1+3~*, F1+4, F1+5 | 
| DISUB | GETTMP~, GETTMP+1, TMPB+1~, TMPB+2, TMPIDX~, TMPIDX+4 | 
| DISUB( | GETTMP+3, GETTMP+4 | 
| DISUB(1 | GETTMP+1*, TMPB+1* | 
| DISUB(2 | TMPB+1* | 
| DITEMP | GETTMP~, GETTMP+2*, GETTMP+5*, GETTMP+7, GETTMP+8*, TMPB~, TMPB+2, TMPB+3*, BLDB~, BLDB+1* , BLDB+4, TMPIDX~, TMPIDX+1, TMPIDX+2, TMPIDX+3* | 
| DITEMP2 | TMPIDX~, TMPIDX+1* | 
| DITOP | GET~, G30+1, G4+6 | 
| DITYPE | G2+2~*, G2+3, G2+4*, G2+5*, G2+6, G3+2 | 
| DIVALUE | BLDB+1~, BLDB+3*, BLDB+4 | 
| DIVPTR | CHKP+3~*, CHKP+4, CHKP+10 | 
| F1 | CHKP+9~*, CHKP+10, CHKP+11 | 
| F2 | CHKP+9~*, CHKP+10, CHKP+11 | 
| I | GETTMP+2~, GETTMP+3*, GETTMP+4, CHKP+1~, CHKP+5*, CHKP+10*, CHKP+11* | 
| J | GETTMP+6~, GETTMP+7*, GETTMP+8 | 
| U | G2+2, G2+4, G3+3, G3+4, G4+2, F1+3, BLDB+3, CHKP+2, CHKP+5, CHKP+7 , CHKP+10 | 
| X | GETTMP+4~*, GETTMP+5, CHKP+1~, CHKP+5*, CHKP+6*, CHKP+7 |