Routine: APCDETPD

Package	Total	Call Graph
Lexicon Utility	4	LOOK^LEXA CONFIG^LEXSET $$ONE^LEXSRC ($$ICDONE,$$ONE)^LEXU
IHS Patient	2	$$CHK^AUPNCIX $$IMP^AUPNSICD
DRG Grouper	1	$$ICDDX^ICDEX
IHS VA Utilities	1	EN^XBNEW
Kernel	1	$$DT^XLFDT
Patient Care Component	1	GETANS^APCDAPOV
VA Fileman	1	^DIR

Package

Total

Call Graph

Lexicon Utility

LOOK^LEXA CONFIG^LEXSET $$ONE^LEXSRC ($$ICDONE,$$ONE)^LEXU

IHS Patient

$$CHK^AUPNCIX $$IMP^AUPNSICD

DRG Grouper

$$ICDDX^ICDEX

IHS VA Utilities

EN^XBNEW

Kernel

$$DT^XLFDT

Patient Care Component

GETANS^APCDAPOV

VA Fileman

^DIR

Package	Total	Caller Graph
Patient Care Component	1	APCDETP1

Package

Total

Caller Graph

Patient Care Component

APCDETP1

Entry Points

Name	Comments	DBIA/ICR reference
ICDONE9(ALEX,ALEXVDT)	;EP - Return one ICD code for an expression ; LEX IEN of file 757.01 ; LEXVDT Date to use for screening by codes
I	;
START1	;EP
XITL
START	;
LEX	;EP - called from input template
LEXN	;
ICDONE1(ALEX,ALEXVDT)	;EP - Return one ICD code for an expression ; LEX IEN of file 757.01 ; LEXVDT Date to use for screening by codes

External References

Name	Field # of Occurrence
GETANS^APCDAPOV	LEX+32
$$CHK^AUPNCIX	ICDONE9+8, ICDONE1+7
$$IMP^AUPNSICD	I+1
^DIR	LEX+9
$$ICDDX^ICDEX	LEX+14, LEX+15, LEX+16, LEX+17, LEX+18, LEX+40, ICDONE9+6, ICDONE1+5
LOOK^LEXA	LEX+26, LEX+27
CONFIG^LEXSET	LEX+4, LEX+5, LEX+20, LEX+21
$$ONE^LEXSRC	ICDONE9+5
$$ICDONE^LEXU	LEX+36
$$ONE^LEXU	LEX+37, ICDONE1+4
EN^XBNEW	START+1
$$DT^XLFDT	ICDONE9+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,LEX("HLP",X) Line Location: LEX+29
Function Call: WRITE	Prompt: ! Line Location: LEX+33
Function Call: WRITE	Prompt: ! Line Location: LEX+34
Function Call: WRITE	Prompt: ! Line Location: LEX+35
Function Call: WRITE	Prompt: !!,"lexicon isn't passing back an ICD code." Line Location: LEX+39
Function Call: WRITE	Prompt: !!,"lexicon isn't passing back an ICD code." Line Location: LEX+41
Function Call: WRITE	Prompt: ! Line Location: LEXN+2
Routine Call	DIR Line Location: LEX+9

Name	Line Occurrences (* Changed, ! Killed)
^TMP("LEXFND"	LEX+19!
^TMP("LEXHIT"	LEX+19!, LEX+36, LEX+37
^TMP("LEXSCH"	LEX+3!, LEX+19!, LEX+38!

Name	Line Occurrences
LEX	LEX+28, LEX+33, LEX+34, LEX+35
LEXN	LEX+14, LEX+15, LEX+16, LEX+17, LEX+18
XITL	LEX+10, LEX+11, LEX+39, LEX+41

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LEX+13, LEX+14, LEX+15, LEX+16, LEX+17, LEX+18, LEX+40*, LEX+41, LEXN+1, ICDONE1+3~
ALEVXDT	ICDONE1+3~
ALEX	ICDONE9~, ICDONE9+5, ICDONE9+6, ICDONE1~, ICDONE1+4, ICDONE1+5
ALEXICD	ICDONE9+3~, ICDONE9+6, ICDONE9+7, ICDONE9+8, ICDONE1+3~, ICDONE1+5, ICDONE1+6, ICDONE1+7
ALEXVDT	ICDONE9~, ICDONE9+4*, ICDONE9+5, ICDONE9+6, ICDONE1~, ICDONE1+4, ICDONE1+5
APCDANS	START1+4~, LEX+31*
>> APCDD	START1+2, START1+3, I+1, LEX+4, LEX+5, LEX+14, LEX+15, LEX+16, LEX+17, LEX+18 , LEX+20, LEX+21, LEX+26, LEX+27, LEX+36, LEX+37, LEX+40
APCDIMP	START1+4~, I+1*, LEX+4, LEX+5, LEX+14, LEX+15, LEX+16, LEX+17, LEX+18, LEX+20 , LEX+21, LEX+23, LEX+24, LEX+26, LEX+27, LEX+36, LEX+37, LEX+40
>> APCDINPE	START1+1*
>> APCDLOOK	LEX+10, LEX+11, LEX+39, LEX+41
>> APCDTDI	START1+2, ICDONE9+8, ICDONE1+7
>> APCDTDX	LEXN+1*
>> APCDTERR	LEX+39, LEX+41
>> APCDTIN9	LEX+7, LEX+8
APCDTPCC	START1+1*, XITL!
>> APCDTSKI	LEX+10, LEX+11
>> APCDUINP	LEX+12*, LEX+14, LEX+15, LEX+16, LEX+17, LEX+18, LEX+22
>> APCDY	LEX+33, LEX+34, LEX+35, LEX+36, LEX+37
D	XITL!
DA	LEX+9!
DD	XITL!
>> DIC("A"	LEX+25*
>> DIC("S"	LEX+23, LEX+24
DIPGM	XITL!
DIR	LEX+2!, LEX+9!
DIR("?"	LEX+7*
DIR("??"	LEX+8*
DIR("A"	LEX+6*
DIR(0	LEX+6*
>> DIRUT	LEX+10
DO	LEX+38!, XITL!
DT	START1+3
LEX	LEX+19!, LEX+28
LEX("HLP"	LEX+29
U	LEX+36, LEX+37, LEX+41, ICDONE9+8, ICDONE1+7
X	LEX+22, LEX+26, LEX+27, LEX+29, XITL!
Y	LEX+11, LEX+12, LEX+36, LEX+37, LEX+39, LEX+40, XITL!

Customize PDF page

Package: Patient Care Component

Routine: APCDETPD

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: