Routine: LEXQL4

Package	Total	Call Graph
DRG Grouper	2	($$CPT,$$CPTD)^ICPTCOD $$MOD^ICPTMOD
Kernel	1	$$UP^XLFSTR
Lexicon Utility	1	($$FC,$$FT,$$STY)^LEXQL2

Package	Total	Caller Graph
Lexicon Utility	1	LEXQL2

Entry Points

Name	Comments	DBIA/ICR reference
CP	; $$CPT^ICPTCOD(CODE,DATE) ; ; 1 IEN of code in ^ICPT 1-6 ; 2 CPT Code (.01) 5 ; 3 Versioned Short Name (#61) 1-28 ; 6 Effective Date (#60) 10 (external) ; 7 Status (#60) 6-8 (external) ; 8 Inactivation Date (#60) 10 (external) ; 9 Activation Date (#60) 10 (external)
PUR	; Purge for CPT
VI(X)	; Verify Input
CM	; $$MOD(CODE,FORMAT,DATE)
NOT(X)	; Word not to use

External References

Name	Field # of Occurrence
$$CPT^ICPTCOD	CP+36
$$CPTD^ICPTCOD	CP+29
$$MOD^ICPTMOD	CM+19
$$FC^LEXQL2	CP+45, CM+25
$$FT^LEXQL2	CP+44, CM+24
$$STY^LEXQL2	CP+40, CM+22
$$UP^XLFSTR	CP+37, CM+20, VI+1, VI+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(81.3 - [#81.3]	CM+15, CM+16, CM+19, VI+8, VI+9
^ICPT - [#81]	CP+17, CP+18, CP+24, CP+25, CP+36
^ICPT("BA"	VI+5, VI+6
^TMP("LEXQL"	CP+44, CP+45, CM+24, CM+25

Label References

Name	Line Occurrences
$$NOT	PUR+3
$$VI	CP+11
PUR	CP+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
LEX	VI+1~*, VI+2, VI+10
LEXC	CP+21~, CP+26, CP+27, CP+29~, CP+31, CP+34, CP+35~, CP+36, CP+37, CP+38 , CP+40, CP+43, CP+44, CP+45, CM+18~, CM+19, CM+20, CM+22, CM+23, CM+24 , CM+25, PUR+1~, PUR+3, PUR+5
>> LEXCO	CP+10, CP+12*, CP+15, CM+10, CM+13
>> LEXCT	CP+10, CP+11, CP+12, CP+16, CM+10, CM+14, CM+24, CM+25
LEXD	CP+29~, CP+35~, CP+36, CM+18~, CM+19
LEXD(	CP+32, CP+33
LEXDS	CP+35~, CP+42, CP+43, CM+18~, CM+23
LEXDT	CP+35~, CP+43, CM+18~, CM+23
LEXE	CP+35~, CP+39, CP+42, CM+18~, CM+21, CM+22
LEXF	CP+23~, CP+25, CP+26, CP+29~, CP+33, CP+34, NOT+1~, NOT+2, NOT+3, NOT+4 , NOT+5, NOT+6, NOT+7, NOT+8, NOT+9
LEXI	CP+32~*, CP+33
LEXIC	VI+1~, VI+2*, VI+3, VI+5, VI+8
LEXIEN	CP+18~, CP+25, CP+29, CP+36, CP+44, CP+45, CM+16~, CM+19, CM+24, CM+25
LEXIO	VI+1~, VI+2*, VI+3, VI+5, VI+8
LEXIX	CP+13~, CP+14, CP+15, CP+16, CP+17, CP+18, CP+19, CP+20, CP+24, CP+25 , CP+28, CM+11~, CM+12, CM+13, CM+14, CM+15, CM+16, CM+17
LEXKT	CP+23~
LEXL	PUR+1~*, PUR+2, PUR+4
LEXN	CP+21~, CP+22, CP+29~, CP+30, CP+33, CP+35~, CP+37, CP+38, CP+42, CP+44 , CP+45, CM+18~, CM+20, CM+23, CM+24, CM+25, PUR+1~, PUR+2, PUR+3, PUR+4 , NOT+1~, NOT+2, NOT+3, NOT+4, NOT+5, NOT+6, NOT+7
LEXNUM	CP+13~
LEXNUM(	CP+30, PUR+3*
LEXNUM(0	CP+28
LEXO	CP+14~, CP+15, CP+17, CP+18, CP+29~, CM+12~, CM+13, CM+15*, CM+16
LEXOC	CP+14~, CP+16, CP+17, CM+12~, CM+14, CM+15
LEXOK	CP+19~, CP+27, CP+34, CP+35, CM+17~, CM+18, PUR+3*, PUR+4
LEXOT	CP+23~, CP+24, CP+25
LEXS	CP+35~, CP+37, CP+38, CP+39, CP+42, CM+18~, CM+20, CM+21, CM+22
LEXSS	CP+35~, CP+42, CP+44, CP+45, CM+18~, CM+22, CM+23, CM+24, CM+25
LEXT	CP+21~, CP+22, CP+23, CP+24, CP+33~, CP+35~, CP+36, CP+37, CP+39, CM+18~ , CM+19, CM+20, CM+21
>> LEXTD	CP+36, CM+19
>> LEXTKNS(	CP+21, CP+22, PUR+1, PUR+2, PUR+4!
>> LEXTKNS(0	CP+19, CP+20, CM+17
LEXTN	CP+35~, CP+41, CP+44, CP+45, CM+18~, CM+22, CM+24, CM+25
>> LEXTO	CP+10, CP+15, CM+10, CM+13
LEXTS	CP+35~, CP+40, CP+41, CP+43, CM+18~, CM+22*, CM+23
>> LEXTT	CP+10, CP+14, CP+16, CM+10, CM+12, CM+14
>> LEXTTK	CP+27, PUR+5*
LEXUC	VI+1~, VI+3*, VI+6, VI+9
LEXUO	VI+1~, VI+3*, VI+6, VI+9
>> LEXVDT	CP+36, CM+19
U	CP+36, CP+37, CP+39, CP+41, CP+44, CP+45, CM+19, CM+20, CM+21, CM+22 , CM+24, CM+25
X	VI~, VI+1, NOT~, NOT+1, NOT+2, NOT+3, NOT+4, NOT+5, NOT+6, NOT+7 , NOT+8

Customize PDF page

Package: Lexicon Utility

Routine: LEXQL4

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Global Variables Directly Accessed

Label References

Local Variables

Legend: