Routine: LEXQM

Package	Total	Call Graph
Kernel	3	HOME^%ZIS ($$DT,$$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR
VA Fileman	3	$$GET1^DIQ ^DIR ^DIWP
Lexicon Utility	1	($$RET,SAV)^LEXQD

Package

Total

Call Graph

Kernel

HOME^%ZIS ($$DT,$$FMADD,$$FMTE)^XLFDT $$UP^XLFSTR

VA Fileman

$$GET1^DIQ ^DIR ^DIWP

Lexicon Utility

($$RET,SAV)^LEXQD

Package	Total	Caller Graph
Lexicon Utility	13	LEXQC LEXQC2 LEXQCM LEXQCM2 LEXQCP LEXQCP2 LEXQID LEXQID2 LEXQID3 LEXQID4 LEXQIP LEXQIP2 LEXQIP3

Package

Total

Caller Graph

Lexicon Utility

LEXQC LEXQC2 LEXQCM LEXQCM2 LEXQCP LEXQCP2 LEXQID LEXQID2
LEXQID3 LEXQID4 LEXQIP LEXQIP2 LEXQIP3

Entry Points

Name	Comments	DBIA/ICR reference
AD(X)	; Assumed Date
SD(X)	; Short Date
CLR	; Clear
ED(X)	; External Date
CSD(X)	; Code Set Date
ES(X)	; External Status
CSDX(X)	; Code Set Date Pre-Processing
CS(X)	; Trim Comma/Space
CSDH	; Code Set Date Help
AND(X)	; Substitute 'and'
TM(X,Y)	; Trim Character Y - Default " "
PR(LEX,X)	; Parse Array
ADH	; Assumed Date Help
EV(X)	; Check environment

External References

Name	Field # of Occurrence
HOME^%ZIS	EV+1
$$GET1^DIQ	EV+2
^DIR	AD+7, CSD+6
^DIWP	PR+3
$$RET^LEXQD	AD+3, CSD+3
SAV^LEXQD	AD+9, CSD+8
$$DT^XLFDT	AD+2, CSD+2, CSDX+1, EV+1
$$FMADD^XLFDT	AD+2, CSD+2
$$FMTE^XLFDT	AD+2, AD+8, ADH+5, CSD+2, CSD+7, CSDH+6, SD+1, ED+2
$$UP^XLFSTR	AD+2, AD+8, ADH+5, CSD+2, CSD+7, CSDH+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: AD+7
Function Call: WRITE	Prompt: !,?5,"This is the date of a fictitious healthcare transaction. It is the" Line Location: ADH+1
Function Call: WRITE	Prompt: !,?5,"date that service was provided to a patient and the date that will " Line Location: ADH+2
Function Call: WRITE	Prompt: !,?5,"be used during the lookup of a code (ICD/CPT/CPT Modifier)." Line Location: ADH+3
Function Call: WRITE	Prompt: !!,?5,"Enter a date from ",$$UP^XLFSTR($$FMTE^XLFDT(LEXPAS))," to ",$$UP^XLFSTR($$FMTE^XLFDT(LEXFUT))," or" Line Location: ADH+5
Function Call: WRITE	Prompt: !,?5,"T (for TODAY), T+1 (for TOMORROW), T+2, T+7, etc.",!,?5,"T-1 (for YESTERDAY), T-3W (for 3 WEEKS AGO), etc." Line Location: ADH+6
Function Call: WRITE	Prompt: ! Line Location: CSD+6
Function Call: WRITE	Prompt: !,?3,"This is a date to used to search for Code Set changes in the ICD and CPT" Line Location: CSDH+1
Function Call: WRITE	Prompt: !,?3,"files. A future date may be used to search for changes in the Code Sets" Line Location: CSDH+2
Function Call: WRITE	Prompt: !,?3,"with future effective dates. (HINT: Most Code Set effective dates are" Line Location: CSDH+3
Function Call: WRITE	Prompt: !,?3,"quarterly, the first of January, April, July or October)" Line Location: CSDH+4
Function Call: WRITE	Prompt: !!,?5,"Enter a date from ",$$UP^XLFSTR($$FMTE^XLFDT(LEXPAS))," to ",$$UP^XLFSTR($$FMTE^XLFDT(LEXFUT))," or" Line Location: CSDH+6
Function Call: WRITE	Prompt: !,?5,"T (for TODAY), T+1 (for TOMORROW), T+2, T+7, etc." Line Location: CSDH+7
Function Call: WRITE	Prompt: !,?5,"T-1 (for YESTERDAY), T-3W (for 3 WEEKS AGO), etc." Line Location: CSDH+8
Function Call: WRITE	Prompt: !,?5,"Q1 (for first quarter), Q109 (for first quarter of FY09), etc." Line Location: CSDH+9
Function Call: WRITE	Prompt: !!,?5,"DUZ not defined" Line Location: EV+1
Function Call: WRITE	Prompt: !!,?5,"DUZ not valid" Line Location: EV+2
Routine Call	%ZIS Line Location: EV+1
Routine Call	DIR Line Location: AD+7 CSD+6

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

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY($J	PR+1!, PR+4, PR+5, PR+6!

Name	Line Occurrences
$$TM	PR+5, CS+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DIR	AD+1~, CSD+1~
DIR("?"	AD+5, CSD+5
DIR("??"	AD+5, CSD+5
DIR("A"	AD+4, CSD+4
DIR("B"	AD+4, CSD+4
DIR("PRE"	AD+6, CSD+5
DIR(0	AD+5, CSD+5
DIRB	AD+1~, AD+3, AD+4, CSD+1~, CSD+3, CSD+4
DIROUT	AD+1~, CSD+1~
DIRUT	AD+1~, CSD+1~
DIW	PR+1~
DIWF	PR+1~, PR+3*
DIWI	PR+1~
DIWL	PR+1~, PR+3*
DIWR	PR+1~
DIWT	PR+1~
DIWTC	PR+1~
DIWX	PR+1~
DN	PR+1~
DT	EV+1*
DTOUT	AD+1~, AD+7, CSD+1~, CSD+6
DUOUT	AD+1~, CSD+1~
DUZ	AD+3, AD+9, CSD+3, CSD+8, EV+1, EV+2
LEX	PR~, PR+1, PR+2, PR+4!, PR+6, EV+1~, EV+2
LEX(	PR+3, PR+5*
LEX(" "	PR+2
LEXAD	AD+3, CSD+3, CLR+1~
LEXC	PR+1~, PR+2, PR+4, PR+5*, PR+6
LEXEXIT	AD+1, AD+7, CSD+1, CSD+6, CLR+1~
LEXF	CSDX+1~, CSDX+4~*, CSDX+6
LEXFUT	AD+1~, AD+2, AD+5, ADH+4, ADH+5, CSD+1~, CSD+2, CSD+5, CSDH+5, CSDH+6
LEXI	PR+1~, PR+3, PR+4, PR+5
LEXLEN	PR+1~, PR+2*, PR+3
LEXN	CSDX+1~*
LEXNOW	AD+1~, AD+2, AD+3, CSD+1~, CSD+2, CSD+3
LEXPAS	AD+1~, AD+2, AD+5, ADH+5, CSD+1~, CSD+2, CSD+5, CSDH+6
LEXQ	CSDX+1~, CSDX+4~, CSDX+5, CSDX+6
LEXT	CSDX+1~*, CSDX+6
LEXX	CSDX+1~, CSDX+3, CSDX+6, CSDX+7
LEXY	CSDX+1~*, CSDX+2
U	EV+1*
X	AD~, AD+7, AD+8, AD+9, AD+10, CSD~, CSD+6, CSD+7, CSD+8, CSD+9 , CSDX~, CSDX+1, CSDX+2, CSDX+3, CSDX+4, CSDX+7, CSDX+8, PR~, PR+2, PR+3 , AND~, AND+1, AND+2, AND+3, CS~, CS+1, CS+2, TM~, TM+1, TM+2* , TM+3, SD~, SD+1, ED~, ED+1, ED+2, ES~, ES+1, EV~
Y	AD+1~, AD+8, CSD+1~, CSD+7, TM~, TM+1*, TM+2

Customize PDF page

Package: Lexicon Utility

Routine: LEXQM

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 13

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: