Routine: APCDFOAP

Package	Total	Call Graph
VA Fileman	2	DD^%DT ^DIR
DRG Grouper	1	$$ICDOP^ICDEX
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component Reports	1	$$VD^APCLV

Package

Total

Call Graph

VA Fileman

DD^%DT ^DIR

DRG Grouper

$$ICDOP^ICDEX

IHS VA Utilities

$$VAL^XBDIQ1

Patient Care Component Reports

$$VD^APCLV

Package	Total	Caller Graph
Patient Care Component	1	APCDFOA

Package

Total

Caller Graph

Patient Care Component

APCDFOA

Name	Comments	DBIA/ICR reference
HEAD
HEAD1	;
POV	;
POVW	;
START	;
WRT	;
DONE	;
POV1	;

Name	Field # of Occurrence
DD^%DT	START+2, WRT+2
$$VD^APCLV	WRT+8
^DIR	DONE+1, HEAD+1
$$ICDOP^ICDEX	WRT+6, WRT+8, POVW+2, POVW+3
$$VAL^XBDIQ1	WRT+6, POVW+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No Visits to report!",! Line Location: START+5
Function Call: WRITE	Prompt: !,"No visits to report",! Line Location: START+7
Function Call: WRITE	Prompt: ?30,$P(^ICD0(+^AUPNVPRC(APCDPOVD,0),0),U) Line Location: WRT+5
Function Call: WRITE	Prompt: !!,APCDHRN,?8,APCDDATE Line Location: WRT+6
Function Call: WRITE	Prompt: ?27,$P($$ICDOP^ICDEX(+^AUPNVPRC(APCDPOVD,0),,,"I"),U,2),?36,$$VAL^XBDIQ1(9000010.08,APCDPOVD,.22) Line Location: WRT+6
Function Call: WRITE	Prompt: !?27,$P($$ICDOP^ICDEX(+^AUPNVPRC(APCDPOVD,0),,,"I"),U,2),?36,$$VAL^XBDIQ1(9000010.08,APCDPOVD,.22) Line Location: POVW+2
Function Call: WRITE	Prompt: ?43,$E($P(^AUTNPOV(APCDNQ,0),U),1,33) Condition for execution: APCDNQ]"" Line Location: POVW+2
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: ?25,APCDLHDR,?72,"Page ",APCDPG,! Line Location: HEAD1+2
Function Call: WRITE	Prompt: ?(80-$L($P(^DIC(4,DUZ(2),0),U))/2),$P(^DIC(4,DUZ(2),0),U),! Line Location: HEAD1+3
Function Call: WRITE	Prompt: !?15,"Visit POSTING Dates: "_APCDBDD_" and "_APCDEDD,! Line Location: HEAD1+4
Function Call: WRITE	Prompt: ?(80-APCDLENG)/2,"Data Entry Operator: ",$P(^VA(200,APCDPROV,0),U),! Line Location: HEAD1+6
Function Call: WRITE	Prompt: ?(80-APCDLENG)/2,"Clinic: ",$S(APCDCLN]"":$P(^DIC(40.7,APCDCLN,0),U),1:"ALL") Line Location: HEAD1+8
Function Call: WRITE	Prompt: !!,"Total Visits Found: ",APCDVCNT Line Location: HEAD1+9
Function Call: WRITE	Prompt: " Total Number of Random Visits Selected: ",APCDMAX Line Location: HEAD1+9
Function Call: WRITE	Prompt: !!?27,"ICD O/P",?36,"ICD-9",?43,"Provider Narrative" Line Location: HEAD1+10
Function Call: WRITE	Prompt: !?2,"HR#",?9,"Visit Date",?27,"Code",?36,"Code",?43,"[ICD O/P NARRATIVE]" Line Location: HEAD1+11
Function Call: WRITE	Prompt: !,APCD80D Line Location: HEAD1+12
Routine Call	DIR Line Location: DONE+1 HEAD+1

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	WRT+4
^AUPNVPRC - [#9000010.08]	POV+1, POV1+2, WRT+6, WRT+8, POVW+2, POVW+3
^AUPNVPRC("AD"	POV+1
^AUPNVSIT - [#9000010]	START+9
^AUTNPOV - [#9999999.27]	WRT+8, POVW+2
^DIC(4 - [#4]	HEAD1+3
^DIC(40.7 - [#40.7]	HEAD1+7, HEAD1+8
^VA(200 - [#200]	HEAD1+5, HEAD1+6
^XTMP("APCDFOA"	START+7, START+9, POV1+1, POV1+2

Name	Line Occurrences
DONE	START+5, START+7, START+10, START+11
HEAD	START+5, START+7, START+11, WRT+1
HEAD1	HEAD
POV	START+9
POV1	POV+1
POVW	WRT+9
WRT	POV+2

Name	Field # of Occurrence
^(0	START+9

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCD80D	START+1*, HEAD1+12
>> APCDBD	START+2
>> APCDBDD	START+2*, HEAD1+4
>> APCDBT	START+7, START+9, POV1+1, POV1+2
>> APCDCLN	HEAD1+7, HEAD1+8
>> APCDDATE	WRT+2*, WRT+6
>> APCDED	START+2
>> APCDEDD	START+2*, HEAD1+4
>> APCDGOT	START+6*, START+9
>> APCDHRN	WRT+4*, WRT+6
>> APCDJOB	START+7, START+9, POV1+1, POV1+2
>> APCDLENG	HEAD1+5, HEAD1+6, HEAD1+7, HEAD1+8
>> APCDLHDR	HEAD1+2
>> APCDMAX	START+3, START+4, START+5, START+6, HEAD1+9
>> APCDNQ	WRT+8, POVW+2
>> APCDPAT	WRT+3*, WRT+4
>> APCDPG	START+5, START+7, HEAD, HEAD1+1*, HEAD1+2
>> APCDPOV	POV+1*, POV1+1, POV1+2
APCDPOVA	POV+1!
APCDPOVA(	POV1+1, POV1+2, POVW+1, POVW+2
APCDPOVA(1	WRT+6
>> APCDPOVC	POV+1, POV1+1, POV1+2*, WRT+1
>> APCDPOVD	WRT+6, WRT+8, POVW+2, POVW+3
>> APCDPOVN	POVW+1*, POVW+2
>> APCDPROV	HEAD1+5, HEAD1+6
APCDQUIT	START+8!, START+9, START+10, START+11, DONE+1, WRT+1, HEAD+1*
>> APCDRSM	HEAD1+9
>> APCDVCNT	START+3, START+4, START+6, START+9, HEAD1+9
>> APCDVDFN	START+9*, POV+1, WRT+8
>> APCDVREC	START+9*, WRT+2, WRT+3
>> APCDX	START+9*
DIR	DONE+1!, HEAD+1!
DIR(0	DONE+1, HEAD+1
>> DTOUT	HEAD+1
DUZ(2	WRT+4, HEAD1+3
IO	DONE+1, HEAD+1
IO(0	DONE+1, HEAD+1
IOF	DONE+2, HEAD1+1
IOSL	START+11, WRT+1
IOST	DONE+1, HEAD+1
U	POV1+2, WRT+3, WRT+4, WRT+6, WRT+8, POVW+2, POVW+3, HEAD1+3, HEAD1+5, HEAD1+6 , HEAD1+7, HEAD1+8
>> Y	START+2, WRT+2, HEAD+1

Customize PDF page

Package: Patient Care Component

Routine: APCDFOAP

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: