XTIDTBL ;OAKCIOFO/JLG - TABLE CONTEXT ;04/21/2005 15:12
Source file <XTIDTBL.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
CONTEXT(TFILE,TFIELD,CTX) | ; set up Context for "table" type
; called from CONTEXT^XTIDCTX(TFILE,TFIELD,CTX) ; returns a valid new CTX array |
|
VALIDREF(CTX,TIREF) | ; validate the term, internal ref
; test TIREF is a valid value in given context (table) ; TIREF must be in IENS form, but will be checked ; later as VDUI related data is retrieved ; would be nice if we can do an earlier check ; based on IENS and the CTX("SOURCE FILE#") |
|
FINDTERM(CTX,TIREF,TERM) | ; find term
; called from FINDTERM^XTIDCTX(CTX,TIREF,TERM) ; find term for given term IREF ; return TERM data as new TERM array |
|
SRCHTRMS(CTX,VUID,XTTBARR,MASTER) | ; search term index entries
; called from SEARCH^XTIDCTX(CTX,VUID,ARRAY,MASTER) ; FIND^DIC(FILE,IENS,FIELDS,FLAGS,[.]VALUE,NUMBER,[.]INDEXES, ; [.]SCREEN,IDENTIFIER,TARGET_ROOT,MSG_ROOT) |
|
GETSUBF(FILE,MFIELD) | ; get subfile #
; get subfile for the given file and multiple-valued field |