Routine: APCLDP1P

Package	Total	Call Graph
VA Fileman	3	DD^%DT EN^DIQ1 ^DIR
DRG Grouper	1	$$ICDDX^ICDEX
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component Reports	1	DONE^APCLOSUT

Entry Points

Name	Comments	DBIA/ICR reference
PIH	;
VSTS	; process visits
HEAD1	;
HEAD
START	;
DFN	;
DONE
PRINT	;
LINE	;

External References

Name	Field # of Occurrence
DD^%DT	START+2
DONE^APCLOSUT	DONE
EN^DIQ1	DFN+6
^DIR	HEAD+1
$$ICDDX^ICDEX	VSTS+13
$$VAL^XBDIQ1	START+11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO PATIENTS TO REPORT" Line Location: START+4
Function Call: WRITE	Prompt: !,$E($P(^DPT(DFN,0),U),1,15) Line Location: DFN+3
Function Call: WRITE	Prompt: ?17,$J(APCLHRCN,7) Line Location: DFN+5
Function Call: WRITE	Prompt: ?26,APCLAGE Line Location: DFN+8
Function Call: WRITE	Prompt: ?38,APCLLINE(X),! Line Location: VSTS+22
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: $P(^VA(200,DUZ,0),U,2),?72,"Page ",APCLPG,! 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: ?5,"PATIENTS BY DESIGNATED PRIMARY CARE PROVIDER, WITH VISIT COUNTS",! Line Location: HEAD1+4
Function Call: WRITE	Prompt: ?(80-(L+35)/2),"DESIGNATED PRIMARY CARE PROVIDER: ",P,! Line Location: HEAD1+5
Function Call: WRITE	Prompt: ?17,"VISIT DATES: ",APCLBDD," TO ",APCLEDD,! Line Location: HEAD1+6
Function Call: WRITE	Prompt: !!?31,"TIMES",?38,"OTHER" Line Location: PIH+1
Function Call: WRITE	Prompt: !?31,"SEEN",?38,"PROVIDERS",! Line Location: PIH+2
Function Call: WRITE	Prompt: "PATIENT NAME",?17,"CHART #",?26,"AGE",?31,"BY DP",?38,"SEEN",?54,"ICD DIAGNOSES",!,APCL80D Line Location: PIH+3
Routine Call	DIR Line Location: HEAD+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT - [#9000001]	DFN+4
^AUPNVPOV - [#9000010.07]	VSTS+13
^AUPNVPOV("AD"	VSTS+13
^AUPNVPRV - [#9000010.06]	VSTS+7
^AUPNVPRV("AD"	VSTS+7
^AUPNVSIT("AA"	VSTS+4, VSTS+5
^DD(9000010.06	VSTS+9, VSTS+10, HEAD1+5
^DIC(16 - [#16]	VSTS+9, VSTS+10, HEAD1+5
^DIC(4 - [#4]	HEAD1+3
^DPT - [#2]	DFN+3
^UTILITY("DIQ1"	DFN+6!, DFN+7!
^VA(200 - [#200]	VSTS+9, VSTS+10, HEAD1+2, HEAD1+5
^XTMP("APCLDP1"	START+4, START+5, START+8, DONE+1!

Label References

Name	Line Occurrences
DFN	START+8
DONE	START+4, START+12
HEAD	START+4, START+8, START+10, DFN+2
HEAD1	HEAD
LINE	VSTS+19, VSTS+21

Naked Globals

Name	Field # of Occurrence
^(0	DFN+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCL80D	START+1*, PIH+3
>> APCLAGE	DFN+7*, DFN+8
>> APCLBD	START+2, VSTS+3
>> APCLBDD	START+2*, HEAD1+6
>> APCLBDO	VSTS+3*, VSTS+4
APCLBTH	START+4, START+5, START+8, DONE+1!
>> APCLED	START+2, VSTS+3
>> APCLEDD	START+2*, HEAD1+6
>> APCLEDO	VSTS+3*
>> APCLHRCN	DFN+4*, DFN+5
APCLJOB	START+4, START+5, START+8, DONE+1!
APCLLINE	VSTS+16!
APCLLINE(	VSTS+22, LINE+9, LINE+10, LINE+11*
APCLLINE(1	VSTS+17, LINE+3, LINE+7*, LINE+9, LINE+11
>> APCLP	VSTS+7, VSTS+13
APCLPCNT	VSTS+16!
>> APCLPG	START+3, HEAD, HEAD1+1, HEAD1+2
APCLPRNM	VSTS+16!, VSTS+18!, VSTS+20!, LINE+1
APCLPRNM(	VSTS+18, VSTS+20, LINE+4, LINE+8
APCLPRNM(1	LINE+6
APCLPRNT	VSTS+16!, LINE+1, LINE+2, LINE+3, LINE+6, LINE+7, LINE+8, LINE+10
APCLPROB	VSTS+2!
APCLPROB(	VSTS+13*, VSTS+20
>> APCLPROV	START+5*, START+8, START+11, VSTS+8, HEAD1+5
APCLPRV	VSTS+2!
APCLPRV(	VSTS+9, VSTS+10, VSTS+18
APCLQ	START+5, START+6!, START+8, START+9, START+10, START+12, DFN+2, HEAD+1*
>> APCLR	VSTS+3, VSTS+5, VSTS+7, VSTS+13
>> APCLRCNT	VSTS+1, VSTS+3, VSTS+8, VSTS+22
APCLRLOC	VSTS+2!
>> APCLSD	VSTS+3, VSTS+4, VSTS+5
>> APCLSUB	START+7, START+11, DFN+1
>> C	VSTS+18, VSTS+20
>> DA	DFN+6*
>> DFN	START+6, START+8, DFN+3, DFN+4, DFN+6, DFN+7, VSTS+4, VSTS+5
>> DIC	DFN+6*
DIR	HEAD+1!
DIR(0	HEAD+1*
>> DR	DFN+6*
>> DTOUT	HEAD+1
DUZ	HEAD1+2
DUZ(2	DFN+4, HEAD1+3
>> I	LINE+3, LINE+7, LINE+10, LINE+11
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	START+10, DFN+2
IOST	HEAD+1
>> J	LINE+3, LINE+7, LINE+10, LINE+11
>> K	VSTS+18, VSTS+20, LINE+2, LINE+3, LINE+6, LINE+7, LINE+8, LINE+9, LINE+10, LINE+11*
>> L	HEAD1+5*
>> P	VSTS+7, VSTS+8, VSTS+9, VSTS+10, VSTS+13, HEAD1+5*
U	DFN+3, DFN+4, VSTS+7, VSTS+9, VSTS+10, VSTS+13, HEAD1+2, HEAD1+3, HEAD1+5
>> X	VSTS+18, VSTS+20, VSTS+22, LINE+4, LINE+5, LINE+8, LINE+9, LINE+10, LINE+11*
>> Y	START+2*, HEAD+1

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLDP1P

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: