TIUGBR ; SLC/MAM - ID Browse Action Subroutines: HASIDKID, HASIDDAD, DADORKID, IDTOP, LOADID, GETKIDS ;8/16/06 13:32
Source file <TIUGBR.m>
| 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
|
