Routine: APCDLPOV

Call Graph

Call Graph Total: 13

Package	Total	Call Graph
IHS Patient	3	$$CHKPL91^AUPNSIC9 ($$CHKPL,$$IMP)^AUPNSICD $$IMP^AUPNVUTL
Lexicon Utility	3	LOOK^LEXA CONFIG^LEXSET ($$ICDONE,$$ONE)^LEXU
IHS VA Utilities	2	$$VAL^XBDIQ1 EN^XBNEW
DRG Grouper	1	($$ICDDX,$$IMP)^ICDEX
Kernel	1	($$DT,$$FMADD)^XLFDT
Patient Care Component	1	GETANS^APCDAPOV
Patient Care Component Reports	1	$$DSCHDATE^APCLV
VA Fileman	1	^DIR

Package	Total	Caller Graph
Patient Care Component	1	APCDEPOV

Package

Total

Caller Graph

Patient Care Component

APCDEPOV

Entry Points

Name	Comments	DBIA/ICR reference
ICDONE99(ALEX,ALEXVDT)	;EP - Return one ICD code for an expression ; LEX IEN of file 757.01 ; LEXVDT Date to use for screening by codes
LEX1	;reader call to get TEXT for code
LEXP	;
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	;
EDITPLA1	;
XITL
PLEX	;EP - called from input template
START	;
XITP
PI	;
EDITPLA	;EP
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	LEX1+25, PLEX+36
$$DSCHDATE^APCLV	LEX+7, EDITPLA1+10
$$CHKPL91^AUPNSIC9	ICDONE99+8
$$CHKPL^AUPNSICD	ICDONE9+8, ICDONE1+8
$$IMP^AUPNSICD	I+1, PI+1
$$IMP^AUPNVUTL	EDITPLA1+6
^DIR	LEX1+8, PLEX+10
$$ICDDX^ICDEX	LEX1+33, ICDONE9+6, ICDONE99+6, ICDONE1+6, PLEX+18, PLEX+19, PLEX+20, PLEX+21, PLEX+22, PLEX+44
$$IMP^ICDEX	LEX+3
LOOK^LEXA	LEX1+19, LEX1+20, PLEX+30, PLEX+31
CONFIG^LEXSET	LEX1+3, LEX1+4, LEX1+13, LEX1+14, PLEX+4, PLEX+5, PLEX+24, PLEX+25
$$ICDONE^LEXU	LEX1+29, ICDONE9+5, ICDONE99+5, PLEX+40
$$ONE^LEXU	LEX1+30, ICDONE1+5, PLEX+41
$$VAL^XBDIQ1	PLEX+9, PLEX+16
EN^XBNEW	START+1, EDITPLA+1
$$DT^XLFDT	ICDONE9+4, ICDONE99+4
$$FMADD^XLFDT	LEX+3, EDITPLA1+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,LEX("HLP",X) Line Location: LEX1+22
Function Call: WRITE	Prompt: ! Line Location: LEX1+26
Function Call: WRITE	Prompt: ! Line Location: LEX1+27
Function Call: WRITE	Prompt: ! Line Location: LEX1+28
Function Call: WRITE	Prompt: !!,"lexicon isn't passing back an ICD code." Line Location: LEX1+32
Function Call: WRITE	Prompt: !!,"lexicon isn't passing back an ICD code." Line Location: LEX1+34
Function Call: WRITE	Prompt: ! Line Location: LEXN+2
Function Call: WRITE	Prompt: !,LEX("HLP",X) Line Location: PLEX+33
Function Call: WRITE	Prompt: ! Line Location: PLEX+37
Function Call: WRITE	Prompt: ! Line Location: PLEX+38
Function Call: WRITE	Prompt: ! Line Location: PLEX+39
Function Call: WRITE	Prompt: !!,"lexicon isn't passing back an ICD code." Line Location: PLEX+43
Function Call: WRITE	Prompt: !!,"lexicon isn't passing back an ICD code." Line Location: PLEX+45
Function Call: WRITE	Prompt: ! Line Location: LEXP+2
Routine Call	DIR Line Location: LEX1+8 PLEX+10

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	LEX+6, LEX+7, LEX+8, EDITPLA1+9, EDITPLA1+10, EDITPLA1+11
^TMP("LEXFND"	LEX1+12!, PLEX+23!
^TMP("LEXHIT"	LEX1+12!, LEX1+29, LEX1+30, PLEX+23!, PLEX+40, PLEX+41
^TMP("LEXSCH"	LEX1+2!, LEX1+12!, LEX1+31!, PLEX+3!, PLEX+23!, PLEX+42!

Label References

Name	Line Occurrences
I	LEX+5
LEX	LEX1+21, LEX1+26, LEX1+27, LEX1+28
LEX1	LEX+3
LEXP	PLEX+18, PLEX+19, PLEX+20, PLEX+21, PLEX+22
PI	EDITPLA1+8
PLEX	EDITPLA1+6, PLEX+32, PLEX+37, PLEX+38, PLEX+39
XITL	LEX1+9, LEX1+10, LEX1+32, LEX1+34
XITP	PLEX+11, PLEX+12, PLEX+13, PLEX+14, PLEX+16, PLEX+43, PLEX+45

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	LEX1+33, LEX1+34, LEXN+1, PLEX+17, PLEX+18, PLEX+19, PLEX+20, PLEX+21, PLEX+22, PLEX+44 , PLEX+45, LEXP+1
ALEX	ICDONE9~, ICDONE9+5, ICDONE9+6, ICDONE99~, ICDONE99+5, ICDONE99+6, ICDONE1~, ICDONE1+5*, ICDONE1+6
ALEXICD	ICDONE9+3~, ICDONE9+6, ICDONE9+7, ICDONE9+8, ICDONE99+3~, ICDONE99+6, ICDONE99+7, ICDONE99+8, ICDONE1+3~, ICDONE1+6* , ICDONE1+7, ICDONE1+8
ALEXVDT	ICDONE9~, ICDONE9+4, ICDONE9+5, ICDONE9+6, ICDONE99~, ICDONE99+4, ICDONE99+5, ICDONE99+6, ICDONE1~, ICDONE1+5 , ICDONE1+6
APCDANS	LEX+11~, LEX1+24, EDITPLA1+14~, PLEX+35
>> APCDD	LEX+3, LEX+4, LEX+5, LEX+7, LEX+8, LEX+9, LEX+10, I+1, LEX1+3, LEX1+4 , LEX1+13, LEX1+14, LEX1+19, LEX1+20, LEX1+29, LEX1+30, EDITPLA1+6, EDITPLA1+7, EDITPLA1+8, EDITPLA1+10* , EDITPLA1+11, EDITPLA1+12, EDITPLA1+13*, PI+1, PLEX+4, PLEX+5, PLEX+24, PLEX+25, PLEX+30, PLEX+31 , PLEX+40, PLEX+41, PLEX+44
>> APCDDATE	LEX+5, LEX+9, LEX1+33, EDITPLA1+8, EDITPLA1+12
>> APCDIAIE	PLEX+11
APCDIMP	LEX+3, LEX+11~, I+1, LEX1+3, LEX1+4, LEX1+13, LEX1+14, LEX1+16, LEX1+17, LEX1+19 , LEX1+20, LEX1+29, LEX1+30, LEX1+33, EDITPLA1+6, EDITPLA1+14~, PI+1, PLEX+4, PLEX+5, PLEX+18 , PLEX+19, PLEX+20, PLEX+21, PLEX+22, PLEX+24, PLEX+25, PLEX+27, PLEX+28, PLEX+30, PLEX+31 , PLEX+40, PLEX+41, PLEX+44
>> APCDINAD	LEX+5, EDITPLA1+8
>> APCDINPE	LEX+1, EDITPLA1+3, EDITPLA1+5*
>> APCDLOOK	LEX1+9, LEX1+10
>> APCDT90	LEX1+5, EDITPLA1+1
>> APCDTCLK	LEX1+32, LEX1+34, LEXN+1*
>> APCDTDA	PLEX+9, PLEX+16
APCDTDEL	PLEX+2!, PLEX+11*
>> APCDTDIA	LEX1+18, EDITPLA1+1, EDITPLA1+2, PLEX+6, PLEX+29
>> APCDTERR	LEX1+32, LEX1+34, PLEX+43, PLEX+45
>> APCDTFIE	PLEX+9, PLEX+16
>> APCDTIN9	LEX+3, LEX1+5, LEX1+6, LEX1+7, LEX1+16, EDITPLA1+1, EDITPLA1+6, PLEX+7, PLEX+8, PLEX+27
>> APCDTNOG	EDITPLA1+5*
>> APCDTNPV	EDITPLA1+5, PLEX+43, PLEX+45, LEXP+1
APCDTPCC	LEX+1, XITL!, EDITPLA1+3, EDITPLA1+5*, XITP!
>> APCDTSKI	LEX1+9, LEX1+10, PLEX+13*
>> APCDTUPH	PLEX+12*
>> APCDUINP	LEX1+11, LEX1+15, PLEX+15, PLEX+16, PLEX+18, PLEX+19, PLEX+20, PLEX+21, PLEX+22, PLEX+26
>> APCDVSIT	LEX+6, LEX+7, LEX+8, EDITPLA1+9, EDITPLA1+10, EDITPLA1+11
>> APCDY	LEX1+26, LEX1+27, LEX1+28, LEX1+29, LEX1+30, PLEX+37, PLEX+38, PLEX+39, PLEX+40, PLEX+41
D	XITL!, XITP!
DA	LEX1+8!, PLEX+10!
DD	XITL!, XITP!
>> DIC("A"	LEX1+18, PLEX+29
>> DIC("S"	LEX1+16, LEX1+17, PLEX+27, PLEX+28
DIPGM	XITL!, XITP!
DIR	LEX1+1!, LEX1+8!, EDITPLA1+4!, PLEX+2!, PLEX+10!
DIR("?"	LEX1+6, PLEX+7
DIR("??"	LEX1+7, PLEX+8
DIR("A"	LEX1+5, PLEX+6
DIR("B"	PLEX+9*
DIR(0	LEX1+5, PLEX+6
>> DIRUT	LEX1+9, PLEX+13
DO	LEX1+31!, XITL!, PLEX+42!, XITP!
DT	LEX+5, LEX+10, EDITPLA1+8, EDITPLA1+13
LEX	LEX1+12!, LEX1+21, PLEX+23!, PLEX+32
LEX("HLP"	LEX1+22, PLEX+33
U	LEX+7, LEX+8, LEX1+29, LEX1+30, LEX1+34, ICDONE9+8, ICDONE99+8, ICDONE1+8, EDITPLA1+10, EDITPLA1+11 , PLEX+12, PLEX+40, PLEX+41, PLEX+45
X	LEX1+15, LEX1+19, LEX1+20, LEX1+22, XITL!, PLEX+11, PLEX+12, PLEX+26, PLEX+30, PLEX+31 , PLEX+33, XITP!
Y	LEX1+10, LEX1+11, LEX1+29, LEX1+30, LEX1+32, LEX1+33, XITL!, PLEX+14, PLEX+15, PLEX+40* , PLEX+41*, PLEX+43, PLEX+44, XITP!

Customize PDF page

Package: Patient Care Component

Routine: APCDLPOV

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: