Routine: LEXQL

Call Graph

Call Graph Total: 8

Package	Total	Call Graph
DRG Grouper	3	($$CODEABA,$$ICDDX,$$ICDOP,$$ROOT)^ICDEX $$CPT^ICPTCOD $$MOD^ICPTMOD
Kernel	2	$$DT^XLFDT $$UP^XLFSTR
Lexicon Utility	2	($$RET,SAV)^LEXQD (ADD,PR)^LEXQL2
VA Fileman	1	^DIR

Package	Total	Caller Graph
Lexicon Utility	1	LEXQH

Package

Total

Caller Graph

Lexicon Utility

LEXQH

Entry Points

Name	Comments	DBIA/ICR reference
CL	; Clear
MULQ	; Quit Multiple
X(X)	; Set X
SEL(X)	; Select from List
SOH	; Select a Code Help
SOGD(X)	; Select a Code Global/Data
MULS(LEXS,LEXI)	; Select Multiple
MUL(X)	; Multiple Entries Found
CT(X)	; Code and Text
FI(X)	; File
ASK	; Ask for Selection
MULSH	; Select Multiple Help
ONE(X)	; One Entry Found
MULW	; Write Multiple
SO(X)	; Select a Code ; ; Input None ; ; Output X - "^" delimited string ; 1 - IEN ; 2 - Global Root ; 3 - File # ; 4 - Coding System (if available) ; 5 - Code ; 6 - Short Name ; ; or "^" if no code is found/selected ;
SHO	; Show TMP

External References

Name	Field # of Occurrence
^DIR	SO+18, ONE+8, MULS+6
$$CODEABA^ICDEX	SOGD+3, SOGD+4, SOGD+6, SOGD+7, SOGD+9, SOGD+10, SOGD+12, SOGD+13
$$ICDDX^ICDEX	SOGD+3, SOGD+4, SOGD+6, SOGD+7, CT+3, CT+7
$$ICDOP^ICDEX	SOGD+9, SOGD+10, SOGD+12, SOGD+13, CT+5, CT+9
$$ROOT^ICDEX	SOGD+3, SOGD+4, SOGD+6, SOGD+7, SOGD+9, SOGD+10, SOGD+12, SOGD+13, FI+2, FI+3 , FI+4, FI+5
$$CPT^ICPTCOD	SOGD+15, SOGD+16, CT+11
$$MOD^ICPTMOD	SOGD+18, SOGD+19, CT+13
$$RET^LEXQD	SO+16
SAV^LEXQD	SO+23
ADD^LEXQL2	SEL+1
PR^LEXQL2	ONE+4, MULW+3
$$DT^XLFDT	SO+14, SOGD+1
$$UP^XLFSTR	SOGD+4, SOGD+7, SOGD+10, SOGD+13, SOGD+16, SOGD+19, X+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !," Enter a code from either:",! Line Location: SOH+1
Function Call: WRITE	Prompt: !," ICD-9 Diagnosis file #80 4-7 Characters" Line Location: SOH+2
Function Call: WRITE	Prompt: !," ICD-9 Procedure file #80.1 3-5 Characters" Line Location: SOH+3
Function Call: WRITE	Prompt: !," ICD-10 Diagnosis file #80 4-8 Characters" Line Location: SOH+4
Function Call: WRITE	Prompt: !," ICD-10 Procedure file #80.1 7 Characters" Line Location: SOH+5
Function Call: WRITE	Prompt: !," CPT/HCPCS Procedure file #81 5 Characters" Line Location: SOH+6
Function Call: WRITE	Prompt: !," CPT Modifier file #81.3 2 Characters",! Line Location: SOH+7
Function Call: WRITE	Prompt: !," Or enter keywords, 2-30 characters, to search for in" Line Location: SOH+8
Function Call: WRITE	Prompt: !," the above files.",! Line Location: SOH+9
Function Call: WRITE	Prompt: ! Line Location: ONE+7
Function Call: WRITE	Prompt: ! Line Location: MUL+2
Function Call: WRITE	Prompt: !," ",LEXTTT," matches found" Condition for execution: +LEXTTT>1 Line Location: MUL+2
Function Call: WRITE	Prompt: ! Line Location: MUL+6
Function Call: WRITE	Prompt: !,$J(LEXI,5),". ",$G(LEX(1)) Line Location: MULW+4
Function Call: WRITE	Prompt: !," ",LEXT2 Condition for execution: $L(LEXT2) Line Location: MULW+4
Function Call: WRITE	Prompt: !,$G(LEXTQ) Line Location: MULSH+1
Function Call: WRITE	Prompt: ! Line Location: SHO+2
Function Call: WRITE	Prompt: !,LEXNN,"=",@LEXNN Line Location: SHO+2
Function Call: WRITE	Prompt: ! Line Location: SHO+3
Routine Call	DIR Line Location: SO+18 ONE+8 MULS+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(81.3 - [#81.3]	SOGD+18, SOGD+19, CT+13
^ICPT - [#81]	CT+11
^ICPT("BA"	SOGD+15, SOGD+16
^TMP("LEXQL"	LEXQL+24!, SO+14!, SO+19!, SO+20, SO+22, SO+23!, SEL+1!, SEL+2!, ASK+1, ONE+2 , ONE+8!, MUL+2, MUL+4, MULW+1, MULS+2, MULS+3, MULS+6!, X+2
^UTILITY($J	LEXQL+24!

Name	Line Occurrences
$$CT	ONE+2, MULW+1, X+3
$$FI	ONE+4, X+3
$$MUL	ASK+2
$$MULS	MUL+5, MUL+6
$$ONE	ASK+2
$$SO	LEXQL+24
$$X	ONE+9, MULQ+1
ASK	SEL+1
MULQ	MUL+2, MUL+7
MULW	MUL+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	LEXQL+21~, SO+14~, ONE+1~, MULS+1~, MULS+7!
DIR("?"	SO+18, MULS+5
DIR("??"	SO+18, MULS+5
DIR("A"	SO+15, ONE+5, ONE+6, ONE+7, MULS+2, MULS+3
DIR("B"	SO+16, ONE+7
DIR("PRE"	SO+17, MULS+5
DIR(0	SO+15, ONE+7, MULS+6*
DIRB	LEXQL+21~, SO+14~, SO+16*, SO+20, MULS+1~
DIROUT	LEXQL+21~, SO+14~, SO+21, ONE+1~, MULS+1~
DIRUT	LEXQL+21~, SO+14~, SO+21, ONE+1~, MULS+1~
DIW	LEXQL+21~
DIWF	LEXQL+21~
DIWI	LEXQL+21~
DIWL	LEXQL+21~
DIWR	LEXQL+21~
DIWT	LEXQL+21~
DIWTC	LEXQL+21~
DIWX	LEXQL+21~
DN	LEXQL+21~
DTOUT	LEXQL+21~, SO+14~, SO+19, SO+21, ONE+1~, ONE+8, MULS+1~, MULS+6, MULS+7
DUOUT	LEXQL+21~, SO+14~, SO+21, ONE+1~, MULS+1~
DUZ	SO+16, SO+23
LEX	LEXQL+21~, SO+14~, SO+23, SOGD+1~, ONE+1~, ONE+4, MULW+1~, MULW+2!, MULW+3
LEX(	MULW+4
LEX(1	ONE+3, ONE+5, MULW+3, MULW+4
LEX(2	ONE+6
LEXC	LEXQL+21~, ONE+1~, ONE+5, ONE+6, ONE+7, CT+1~, CT+3, CT+5, CT+7, CT+9* , CT+11, CT+13, CT+14
LEXCOM	LEXQL+21~
LEXCT	LEXQL+21~, ONE+1~, ONE+2, ONE+4, MULW+1, X+1~, X+3*, X+4
LEXCTY	LEXQL+21~
LEXD	LEXQL+21~
LEXDS	LEXQL+21~
LEXDT	LEXQL+21~
LEXE	LEXQL+21~
LEXENT	LEXQL+21~, MUL+1~, MUL+4*, MULW+1
LEXEXIT	SO+14, SO+19, ONE+1, ONE+8, MUL+1, MULS+1, MULS+6, CL+1!
LEXFD	LEXQL+21~
LEXFI	LEXQL+22~, X+1~, X+3*, X+4
LEXI	LEXQL+22~, MUL+1~, MUL+3, MUL+4, MUL+5, MUL+6, MULW+1, MULW+4, MULS~, MULS+1
LEXIEN	LEXQL+22~, ONE+1~, ONE+2, ONE+4, MUL+1~, MULW+1~, X+1~, X+4, CT+1~, CT+3 , CT+5, CT+7, CT+9, CT+11, CT+13
LEXIN	LEXQL+22~
LEXIT	LEXQL+22~, MUL+1~, MUL+3, MUL+5, MUL+6*, MULQ+1
LEXIX	LEXQL+22~
LEXKEY	LEXQL+22~
LEXL	LEXQL+22~
LEXLAST	LEXQL+22~, MULS+1~*, MULS+2, MULS+3
LEXLEN	LEXQL+22~
LEXMAX	LEXQL+22~, MUL+1~, MUL+4, MUL+5, MUL+6, MULS+1~*, MULS+2, MULS+3, MULS+4, MULS+6
LEXN	LEXQL+22~, CT+1~, CT+3, CT+5, CT+7, CT+9, CT+11, CT+13, CT+14
LEXNC	SHO+1~*, SHO+2
LEXNM	LEXQL+22~
LEXNN	SHO+1~, SHO+2
LEXO	LEXQL+22~
LEXOC	LEXQL+22~
LEXRTN	LEXQL+22~
LEXS	LEXQL+22~, MULS~, MULS+1, MULS+7*, MULS+8
LEXSEL	LEXQL+22~, X+1~*, X+2
LEXSO	LEXQL+22~
LEXSS	LEXQL+22~, MUL+1~, MUL+2, MUL+3, MUL+5, MUL+6, MULQ+1
LEXSTR	LEXQL+22~, MUL+1~, MUL+4*
LEXT	LEXQL+22~, CT+1~*, CT+2, CT+4, CT+6, CT+8, CT+10, CT+12
LEXT1	LEXQL+23~, ONE+1~, ONE+2, ONE+3, MUL+1~, MULW+1~, MULW+2, MULW+3, MULW+4, X+1~ , X+2, X+3, X+4
LEXT2	LEXQL+23~, ONE+1~, ONE+2, ONE+3, MULW+1~, MULW+2, MULW+4, X+1~, X+2, X+3
LEXT3	LEXQL+23~, ONE+1~, ONE+3, ONE+4, MULW+1~, MULW+3, X+1~, X+3*
LEXTAG	LEXQL+23~
LEXTD	LEXQL+23~, SO+14~, SOGD+1~, SOGD+3, SOGD+4, SOGD+6, SOGD+7, SOGD+9, SOGD+10, SOGD+12 , SOGD+13, SOGD+15, SOGD+16, SOGD+18, SOGD+19
LEXTMP	LEXQL+23~
LEXTN	LEXQL+23~
LEXTOT	LEXQL+23~, ASK+1~*, ASK+2
LEXTQ	LEXQL+23~, MULS+1~, MULS+4*, MULSH+1
LEXTS	LEXQL+23~
LEXTTT	LEXQL+23~, MUL+1~, MUL+2*, MUL+3
LEXTY	LEXQL+23~
LEXUSR	LEXQL+23~
LEXV	LEXQL+23~
LEXVAL	LEXQL+23~
LEXVDT	SO+14, CT+3, CT+5, CT+7, CT+9, CT+11, CT+13, CL+1!
LEXX	LEXQL+23~, ONE+1~, ONE+4*
U	SO+20, SO+23, ONE+2, ONE+4, MUL+1*, MUL+4, MULW+1, MULS+7, X+4, CT+1 , CT+11, CT+13, CT+14
X	LEXQL+24, SO~, SO+18, SO+19, SO+21, SO+22, SO+23, SO+24, SOGD~, SOGD+1 , SOGD+3, SOGD+4, SOGD+6, SOGD+7, SOGD+9, SOGD+10, SOGD+12, SOGD+13, SOGD+15, SOGD+16 , SOGD+18, SOGD+19, SEL~, SEL+1, SEL+2, SEL+3, ASK+1!, ASK+2, ONE~, ONE+8 , ONE+9, ONE+10, MUL~, MUL+8, MULS+1~, MULS+6, MULS+7, MULQ+1, MULQ+2, X~ , X+1, X+4, X+5, CT~, CT+1, CT+14, CT+15, FI~, FI+1*, FI+2 , FI+3, FI+4, FI+5, FI+6, FI+7
Y	LEXQL+23~, SO+14~, SO+18*, SO+20, ONE+1~, ONE+9, MUL+1~, MULS+1~, MULS+7

Customize PDF page

Package: Lexicon Utility

Routine: LEXQL

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: