Call Graph
Call Graph Total: 5
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 3 | LOADTOP^TIUBR LOADREC^TIUBR1 GETTIU^TIULD |
| List Manager | 1 | $$SETSTR^VALM1 |
| VA FileMan | 1 | EN^DIQ1 |
TIUGBR ; SLC/MAM - ID Browse Action Subroutines: HASIDKID, HASIDDAD, DADORKID, IDTOP, LOADID, GETKIDS ;8/16/06 13:32
Source file <TIUGBR.m>
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 3 | LOADTOP^TIUBR LOADREC^TIUBR1 GETTIU^TIULD |
| List Manager | 1 | $$SETSTR^VALM1 |
| VA FileMan | 1 | EN^DIQ1 |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETKIDS(TIUDA) | ; Set ID kids of TIUDA into array
; ^TMP("TIUGKID",$J,REFERENCE DATE,TIUKID)="": |
|
| HASIDKID(DA) | ; Function returns 1 if DA has ID kid, else 0.
|
|
| HASIDDAD(DA) | ; Function returns ID parent of DA if DA has parent; else 0.
|
|
| DADORKID(DA) | ; Function returns DA if DA has ID kid,
|
|
| ORKIDX | ||
| IDTOP(TIUDA,TIUL,SHORT,CURPRNT) | ; Load entry-specific info:
|
|
| LOADID(TIUDA,TIUL,TIUGDATA,TIUGWHOL) | ; Load ID entry TIUDA for browse
; Requires TIUDA, array TIUL, TIUGDATA; ; Optional TIUGWHOL (see rtn TIUBR). |
|
| INQUIRE(TIUDA,TIUREC) | ; Inquire to document TIUDA and set TIUREC
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925 - [#8925] | GETKIDS+4, GETKIDS+5, HASIDKID+3, HASIDDAD+1, DADORKID+4, DADORKID+5, LOADID+4 |
| ^TMP("TIUGKID" | GETKIDS+6* |
| Name | Line Occurrences |
|---|---|
| INQUIRE | LOADID+9 |
| ORKIDX | DADORKID+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CURPRNT | IDTOP~, IDTOP+4 |
| DA | HASIDKID~, HASIDKID+3, HASIDDAD~, HASIDDAD+1, DADORKID~, DADORKID+4, DADORKID+5, INQUIRE+1~, INQUIRE+2* |
| DFN | IDTOP+3~, LOADID+3~ |
| DIC | INQUIRE+1~, INQUIRE+2* |
| DIQ | INQUIRE+1~, INQUIRE+2* |
| DR | INQUIRE+1~, INQUIRE+3* |
| REFDATE | GETKIDS+2~, GETKIDS+5*, GETKIDS+6 |
| SHORT | IDTOP~, IDTOP+5, IDTOP+7 |
| TIU | IDTOP+3~, IDTOP+6, LOADID+3~, LOADID+8 |
| TIU("DOCTYP" | IDTOP+14 |
| TIU("EDT" | IDTOP+10, IDTOP+11 |
| TIU("LOC" | IDTOP+9 |
| TIU("WARD" | IDTOP+10 |
| TIUDA | GETKIDS~, GETKIDS+4, IDTOP~, IDTOP+6, LOADID~, LOADID+4, LOADID+8, LOADID+9, LOADID+12, LOADID+14 , INQUIRE~, INQUIRE+2 |
| TIUGDATA | LOADID~, LOADID+12, LOADID+14 |
| TIUGWHOL | LOADID~, LOADID+14 |
| TIUKID | GETKIDS+2~, GETKIDS+3*, GETKIDS+4*, GETKIDS+5, GETKIDS+6 |
| TIUL | IDTOP~, IDTOP+4*, IDTOP+5*, IDTOP+8*, IDTOP+12, IDTOP+13*, IDTOP+15, LOADID~, LOADID+7*, LOADID+12 , LOADID+14 |
| TIUREC | LOADID+3~, LOADID+9, LOADID+12, INQUIRE~ |
| TIUY | HASIDKID+1~, HASIDKID+2*, HASIDKID+3*, HASIDKID+4, DADORKID+2~, DADORKID+3*, DADORKID+4*, DADORKID+5*, ORKIDX, IDTOP+3~ , IDTOP+8*, IDTOP+9*, IDTOP+10*, IDTOP+11*, IDTOP+12, IDTOP+13*, IDTOP+14*, IDTOP+15 |
| U | IDTOP+9, IDTOP+10, IDTOP+11, IDTOP+14 |
| >> VALMAR | IDTOP+4, IDTOP+5, IDTOP+12, IDTOP+15, LOADID+7 |
| >> VALMQUIT | LOADID+4* |
