Routine: LEXA

Information

LEXA ;ISL/KER - Look-up (Silent) ;04/21/2014

Source Information

Source file <LEXA.m>

Call Graph

Call Graph Total: 17

Package	Total	Call Graph
Lexicon Utility	13	$$EN^LEXAB $$EN^LEXABC (ADDL,BEG)^LEXAL EN^LEXALK SETUP^LEXAM EN^LEXAR QMH^LEXAR3 SET^LEXAR4 ($$DES,$$EN)^LEXASC $$SO^LEXASO ($$AP,$$MD,$$NS)^LEXDFN2 CONFIG^LEXSET VDT^LEXU
Kernel	2	$$DT^XLFDT $$UP^XLFSTR
VA Fileman	2	^DIM $$GET1^DIQ

Caller Graph

Caller Graph Total: 22

Package	Total	Caller Graph
Patient Care Component	9	APCDAOP APCDAPOV APCDBPOV APCDCPOV APCDEPOV APCDETPD APCDFHD APCDLPOV APCDXPOV
Lexicon Utility	6	LEX10CX3 LEX10DBT LEX10DX LEX10TAX LEXA1 LEXTRAN
Order Entry Results Reporting	2	ORQQPL1 ORWPCE
Emergency Room	1	AMERUTIL
IHS Emergency Dept Dashboard	1	BEDDPOV
IHS Prenatal Care Module	1	BJPNUTIL
Problem List	1	GMPLX
Radiology Nuclear Medicine	1	RA97PST1

Entry Points

Name	Comments	DBIA/ICR reference
FIL(X)	; Validate Filter
CLN	; Clean
CODE	; Look-up by Code EN^LEXABC
SRC(X)	; Source
SCH	; Search Parameters
INFO(X,LEXVDT)	; Get Information about a Term ; ; Input ; ; X Internal Entry Number in file 757.01 ; LEXVDT Optional date - retrieves codes active ; on a specified date ; ; Output ; ; Local Array LEX("SEL") or null ; ; LEX("SEL","EXP") Expressions Concepts/Synonyms/Variants ; LEX("SEL","SIG") Expression definition ; LEX("SEL","SRC") Classification Codes ; LEX("SEL"."STY") Semantic Class/Semantic Types ; LEX("SEL","VAS") VA Classification Sources ;	ICR #1597 Status: Active Usage: Supported
SCT	; Look-up by Shortcuts EN^LEXASC
APP	; Application
KEYWRD	; Look-up by word EN^LEXALK
LK	; Look-up
HLP	; Look-up Help ADDL^LEXAL
CAT(X,Y)	; Source Category
LOOK(LEXX,LEXAP,LEXLL,LEXSUB,LEXCDT,LEXXSR,LEXXCT)	; Main Lexicon Lookup	ICR #2950 Status: Active Usage: Supported ICR #6267 Status: Pending Usage: Supported
EXIT	; Clean-up and quit
USR	; User
IEN	; Look-up by IEN ADDL^LEXAL PCH 4
X	; Search for X
EXACT	; Look-up Exact Match EN^LEXAB
DEF	; Defaults CONFIG^LEXSET
MAN	; Mandatory variables

External References

Name	Field # of Occurrence
^DIM	FIL+1
$$GET1^DIQ	USR+1
$$EN^LEXAB	EXACT+1
$$EN^LEXABC	CODE+1
ADDL^LEXAL	IEN+6
BEG^LEXAL	IEN+7
EN^LEXALK	KEYWRD+1
SETUP^LEXAM	DEF+12
EN^LEXAR	LOOK+36, EXIT+10
QMH^LEXAR3	HLP+2
SET^LEXAR4	INFO+20
$$DES^LEXASC	IEN+6
$$EN^LEXASC	SCT+2
$$SO^LEXASO	IEN+6
$$AP^LEXDFN2	LOOK+42
$$MD^LEXDFN2	DEF+3
$$NS^LEXDFN2	DEF+3
CONFIG^LEXSET	DEF+4
VDT^LEXU	LOOK+28
$$DT^XLFDT	INFO+19
$$UP^XLFSTR	LOOK+35, LOOK+39, USR+8, CAT+3, SRC+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: SCH+2
Function Call: WRITE	Prompt: !,NN,"=",@NN Line Location: SCH+2
Function Call: WRITE	Prompt: ! Line Location: SCH+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^LEX(757.01 - [#757.01]	IEN+5, IEN+9, CODE+4, INFO+18
^LEX(757.13 - [#757.13]	CAT+1, CAT+2, CAT+3, CAT+4, CAT+5, CAT+6
^LEX(757.14 - [#757.14]	SRC+1, SRC+2
^LEX(757.41 - [#757.41]	SCT+1
^LEXT(757.2 - [#757.2]	APP+1
^TMP("LEXFND"	LOOK+29!, DEF+9!, IEN+7, EXACT+2!, CLN+2!
^TMP("LEXHIT"	LOOK+29!, DEF+9!, EXACT+3!, CLN+2!
^TMP("LEXSCH"	LOOK+30!, LOOK+31!, LOOK+42, LOOK+43, LOOK+44, LOOK+45, LOOK+46, LOOK+48, APP+1, USR+6 , USR+7, USR+8, DEF+2, DEF+4, DEF+5*, DEF+6, DEF+12, IEN+1, IEN+3, IEN+4 , IEN+6, IEN+8, SCT+1, SCT+2, CODE+1, CODE+3, CODE+4, EXACT+1, EXIT+8, EXIT+9 , EXIT+10, CLN+2!, MAN+3

Label References

Name	Line Occurrences
$$CAT	LOOK+37
$$FIL	DEF+7
$$SRC	CAT+2
CLN	EXIT+4
EXIT	LOOK+36, X+1, APP+1, USR+1, DEF+11, DEF+13, HLP+1, IEN+1, SCT+3, CODE+2 , CODE+5
MAN	DEF+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIC	FIL+1~
DIC("S"	LOOK+46, DEF+1
DIC(0	LOOK+32, LOOK+33, LOOK+34
DIERR	LOOK+28!
DUZ	USR+1, USR+6
LEX	LOOK+28!, EXIT+5, EXIT+12, CAT+1~, CAT+3, SRC+1~*, SRC+2
LEX("ERR"	X+2, X+3, APP+2, APP+3, USR+2, USR+3, DEF+11, DEF+13, EXIT+4, MAN+4* , MAN+5*
LEX("HLP"	HLP+1, EXIT+3, EXIT+13, EXIT+15, EXIT+16, EXIT+18, EXIT+19, EXIT+20*
LEX("LIST"	IEN+1, EXIT+5
LEX("NAR"	IEN+8, IEN+9, EXIT+11*
LEX("SEL"	INFO+18!
LEXAP	LOOK~, LOOK+36!, LOOK+39*, LOOK+42, DEF+3
LEXC	EXIT+6~, EXIT+7, EXIT+13, EXIT+16, EXIT+17, EXIT+18, EXIT+19, EXIT+20, CAT+1~, CAT+3* , CAT+4
LEXCDT	LOOK~, LOOK+28*
LEXD	INFO+19~*, INFO+20
LEXDICS	EXIT+1!
>> LEXDISP	LOOK+44, DEF+5
LEXDSP	DEF+1~, EXIT+1!
LEXE	IEN+2~, IEN+3*, IEN+5, IEN+6, IEN+9
LEXERR	MAN+1~, MAN+2*, MAN+3, MAN+5
LEXF	EXIT+6~, EXIT+8, EXIT+14, EXIT+15
LEXFIL	DEF+1~, DEF+2, DEF+6, DEF+7, DEF+8*, EXIT+1!
LEXFILR	DEF+1~, EXIT+1!
LEXFND	USR+4~, USR+5, SCT+2, SCT+3, CODE+1, CODE+2, CODE+5, EXACT+1, EXACT+2
LEXI	EXIT+3!, CLN+1!, CAT+1~, CAT+5*, CAT+6
LEXISCD	USR+4~, USR+5, CODE+4, CODE+5
LEXLKFL	EXIT+2!
LEXLKGL	EXIT+2!
LEXLKIX	EXIT+2!
LEXLKSH	EXIT+2!
LEXLL	LOOK~, LOOK+40, LOOK+47, LOOK+48
LEXNS	DEF+3~*, DEF+4
LEXO	CAT+1~, CAT+5, CAT+6, CAT+7
LEXOVR	EXIT+2!
LEXQ	LOOK+35*, EXIT+1!, CLN+1!
LEXS	CAT+1~, CAT+2*, CAT+4, CAT+6, CAT+7
LEXSC	LOOK+37~*, LOOK+38
LEXSHCT	EXIT+1!
LEXSHOW	EXIT+1!
LEXSS	DEF+3~*, DEF+4
LEXSUB	LOOK~, LOOK+41, LOOK+45, DEF+3, EXIT+1!
LEXTKN	EXIT+2!, CLN+1!
LEXTKNS	EXIT+2!, CLN+1!
LEXU	CAT+1~, CAT+3, CAT+4, CAT+5, SRC+1~, SRC+2
LEXUN	IEN+2~, IEN+4*, IEN+8, IEN+9, EXIT+2!
LEXV	EXIT+6~, EXIT+9*, EXIT+15
LEXVDT	LOOK+28, LOOK+36, DEF+4, IEN+6, SCT+2, CODE+1, EXACT+1, EXIT+10, INFO~, INFO+19 , INFO+20~
LEXX	LOOK~, LOOK+35*, LOOK+36, X+1, USR+7, USR+8, HLP+1, HLP+2, EXIT+5, EXIT+10 , EXIT+11
LEXXCT	LOOK~, LOOK+37, LOOK+38~*
LEXXSR	LOOK~, LOOK+37, LOOK+38~*
NC	SCH+1~*, SCH+2
NN	SCH+1~, SCH+2
X	CAT~, CAT+1, CAT+2, CAT+3, CAT+4, CAT+7, CAT+8, SRC~, SRC+1, SRC+2* , FIL~, FIL+1, FIL+2, INFO~, INFO+18, INFO+20
Y	CAT~, CAT+2*

Customize PDF page

Package: Lexicon Utility

Routine: LEXA

Call Graph Total: 17

Caller Graph Total: 22