Routine: XTIDCTX

Package	Total	Call Graph
Toolkit	2	($$NEWTERM,$$VALIDREF,CONTEXT,FINDTERM,SRCHTRMS)^XTIDSET ($$VALIDREF,CONTEXT,FINDTERM,SRCHTRMS)^XTIDTBL
VA Fileman	2	FIELD^DID GETS^DIQ

Package

Total

Call Graph

Toolkit

($$NEWTERM,$$VALIDREF,CONTEXT,FINDTERM,SRCHTRMS)^XTIDSET ($$VALIDREF,CONTEXT,FINDTERM,SRCHTRMS)^XTIDTBL

VA Fileman

FIELD^DID GETS^DIQ

Package	Total	Caller Graph
Toolkit	3	XTID1 XTIDSET XTIDTBL

Package

Total

Caller Graph

Toolkit

XTID1 XTIDSET XTIDTBL

Entry Points

Name	Comments	DBIA/ICR reference
GETTYPE(FILE,FIELD)	; determine type of context ; based on FILE and FIELD combination ; D FIELD^DID(FILE,FIELD,FLAGS,ATTRIBUTES,TARGET_ROOT,MSG_ROOT)
NEWTERM(CTX,TIREF,VUID)	; create a new term reference with given VUID ; only for "set of codes" ; on success (term entry), new TERM array is returned ; create a new entry in the Kernel (8985.1) file only (set of codes)
CONTEXT(TFILE,TFIELD,CTX)	; determine and create context impl ; returns new CTX array ; CTX("TYPE")=<"SET" or "TABLE" or "ROOT"> ; CTX("TERM FILE#")=<TFILE or ""> ; CTX("TERM FIELD#")=<TFIELD or ""> ; CTX("SOURCE FILE#")=<8985.1 or TFILE or ""> ; CTX("TERMSTATUS SUBFILE#")= ; <subfile for the multi-valued field ; 99.991, EFFECTIVE DATE/TIME or "">
SRCHTRMS(CTX,VUID,XTCARR,MASTER)	; search term reference entries ; search term reference entries based on VUID and its context
ADDTARRY(XTC2ARR,FILE,FIELD,IREF,VALUE)	; ; adds element and value to XTC2ARR array (by name) ; called by CTX implementations of SRCHTRMS() ; increased count
FINDTERM(CTX,TIREF,TERM)	; find term ; find the single term reference for given term IREF ; return TERM data as new TERM array ; IREF is unique within a given CTX, except for "RO0T" context ; on success, attach CTX to TERM array
VALIDREF(CTX,TIREF)	; validate IREF ; validate internal reference against given CTX
GETTERM(CTX,FILE,IENS,TERM)	; get term ; return TERM data as new TERM array ; called from CTX implementations only ; subroutine might be moved to XTIDTERM ; D GETS^DIQ(FILE,IENS,FIELD,FLAGS,TARGET_ROOT,MSG_ROOT)
ROOTCTX(CTX)	; set up Context for "ROOT" type ; called from CONTEXT^XTIDCTX(TFILE,TFIELD,CTX) ; called only when TFILE is not defined

External References

Name	Field # of Occurrence
FIELD^DID	GETTYPE+12
GETS^DIQ	GETTERM+9
$$NEWTERM^XTIDSET	NEWTERM+9
$$VALIDREF^XTIDSET	VALIDREF+5
CONTEXT^XTIDSET	CONTEXT+14
FINDTERM^XTIDSET	FINDTERM+6
SRCHTRMS^XTIDSET	SRCHTRMS+5, SRCHTRMS+14
$$VALIDREF^XTIDTBL	VALIDREF+8
CONTEXT^XTIDTBL	CONTEXT+15
FINDTERM^XTIDTBL	FINDTERM+7
SRCHTRMS^XTIDTBL	SRCHTRMS+6, SRCHTRMS+25

Name	Line Occurrences (* Changed, ! Killed)
^DD(	SRCHTRMS+20
^DIC - [#1]	SRCHTRMS+19

Name	Line Occurrences
$$GETTYPE	CONTEXT+12
ROOTCTX	CONTEXT+16

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ATTR	GETTYPE+3~
ATTR("LABEL"	GETTYPE+14
COUNT	ADDTARRY+4~, ADDTARRY+5*, ADDTARRY+7
CTX	CONTEXT~, CONTEXT+10, CONTEXT+14, CONTEXT+15, CONTEXT+16, VALIDREF~, VALIDREF+3, VALIDREF+5, VALIDREF+8, FINDTERM~ , FINDTERM+5, FINDTERM+6, FINDTERM+7, FINDTERM+10, NEWTERM~, NEWTERM+6, NEWTERM+9, GETTERM~, GETTERM+8, SRCHTRMS~ , SRCHTRMS+4, SRCHTRMS+5, SRCHTRMS+6, SRCHTRMS+14, SRCHTRMS+25, ROOTCTX~
CTX("SOURCE F	ILE#" , SRCHTRMS+13, SRCHTRMS+22, SRCHTRMS+29, ROOTCTX+7
CTX("TERM FIE	LD#" , SRCHTRMS+24, SRCHTRMS+31, ROOTCTX+5*
CTX("TERM FIL	E#" , SRCHTRMS+23, SRCHTRMS+30, ROOTCTX+4*
CTX("TERMSTAT	US SUBFILE#" , ROOTCTX+9*
CTX("TYPE"	VALIDREF+4, VALIDREF+7, FINDTERM+6, FINDTERM+7, NEWTERM+8, SRCHTRMS+5, SRCHTRMS+6, SRCHTRMS+7, SRCHTRMS+12, SRCHTRMS+17 , SRCHTRMS+28, ROOTCTX+3
DIERR	GETTERM+5~, GETTYPE+3~
FIELD	ADDTARRY~, ADDTARRY+6, GETTYPE~, GETTYPE+4*, GETTYPE+9
FILE	GETTERM~, GETTERM+6, GETTERM+8, GETTERM+9, ADDTARRY~, ADDTARRY+6, GETTYPE~, GETTYPE+4, GETTYPE+7, GETTYPE+12
FL	SRCHTRMS+9~, SRCHTRMS+18, SRCHTRMS+19, SRCHTRMS+20, SRCHTRMS+21, SRCHTRMS+22, SRCHTRMS+23
IENS	GETTERM~, GETTERM+6*, GETTERM+8, GETTERM+9
IREF	ADDTARRY~, ADDTARRY+6
MASTER	SRCHTRMS~, SRCHTRMS+2*, SRCHTRMS+5, SRCHTRMS+6, SRCHTRMS+14, SRCHTRMS+25
MSG	GETTERM+5~, GETTYPE+3~
MSG("DIERR"	GETTERM+10
SUCCESS	NEWTERM+4~
TERM	FINDTERM~, FINDTERM+5, FINDTERM+6, FINDTERM+7, FINDTERM+10, GETTERM~, GETTERM+8
TERM("CTX"	FINDTERM+10*
TFIELD	CONTEXT~, CONTEXT+11*, CONTEXT+12, CONTEXT+14
TFILE	CONTEXT~, CONTEXT+11*, CONTEXT+12, CONTEXT+14, CONTEXT+15
TIREF	VALIDREF~, VALIDREF+5, VALIDREF+8, FINDTERM~, FINDTERM+6, FINDTERM+7, NEWTERM~, NEWTERM+5*, NEWTERM+9
TTYPE	CONTEXT+9~, CONTEXT+12*, CONTEXT+13, CONTEXT+14, CONTEXT+15, CONTEXT+16
TYPE	GETTYPE+3~, GETTYPE+5, GETTYPE+7, GETTYPE+14, GETTYPE+16, GETTYPE+22, GETTYPE+23
VALID	VALIDREF+2~, VALIDREF+3, VALIDREF+4, VALIDREF+5, VALIDREF+7, VALIDREF+8*, VALIDREF+10
VALUE	ADDTARRY~, ADDTARRY+6
VFIELD	GETTYPE+10~, GETTYPE+11*, GETTYPE+12
VUID	NEWTERM~, NEWTERM+5, NEWTERM+6, NEWTERM+9, SRCHTRMS~, SRCHTRMS+2, SRCHTRMS+4, SRCHTRMS+5, SRCHTRMS+6, SRCHTRMS+14 , SRCHTRMS+25
XTC2ARR	ADDTARRY~, ADDTARRY+5, ADDTARRY+6, ADDTARRY+7
XTCARR	SRCHTRMS~, SRCHTRMS+2*, SRCHTRMS+4, SRCHTRMS+5, SRCHTRMS+6, SRCHTRMS+14, SRCHTRMS+25

Customize PDF page

Package: Toolkit

Routine: XTIDCTX

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: