Routine: APCLDP1

Package	Total	Call Graph
VA Fileman	4	DD^%DT C^%DTC ^DIC ^DIR
IHS VA Utilities	2	^XBDBQUE EN^XBVK
Patient Care Component Reports	2	XTMP^APCLOSUT ($$DEMO,DEMOCHK)^APCLUTL
Kernel	1	HOME^%ZIS

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
VSTS	; process visits
PROC1	;
ZIS	;
PROV	;
START	;
PROC	;EP - entry point for processing
GETDATES	;
XIT
ED	;get ending date
ASK	;
DEMO	;
PROC0	;

External References

Name	Field # of Occurrence
DD^%DT	ED+1, ED+4
C^%DTC	ED+4
HOME^%ZIS	START+2
XTMP^APCLOSUT	PROC+2
$$DEMO^APCLUTL	PROC1+1
DEMOCHK^APCLUTL	DEMO+1
^DIC	PROV+2
^DIR	BD+2, ED+1, ASK+2
^XBDBQUE	DEMO+4
EN^XBVK	XIT+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @(IOF),!! Line Location: START+3
Function Call: WRITE	Prompt: " PATIENTS BY DESIGNATED PRIMARY CARE PROVIDER, WITH VISIT COUNTS, DX'S ",! Line Location: START+4
Function Call: WRITE	Prompt: "This report will produce a list of patients by their Designated Primary ",!,"Care Provider. It will include the patient's name, chart #, age, " Line Location: START+5
Function Call: WRITE	Prompt: !,"number of times seen by the Designated Primary Care Provider, number of times " Line Location: START+6
Function Call: WRITE	Prompt: !,"seen by other primary providers and diagnoses.",! Line Location: START+7
Function Call: WRITE	Prompt: !,"Please enter the date range during which the patient should have been seen.",! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: BD+2
Function Call: WRITE	Prompt: ! Line Location: ED+1
Routine Call	%ZIS Line Location: START+2
Routine Call	DIC Line Location: PROV+2
Routine Call	DIR Line Location: BD+2 ED+1 ASK+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNPAT("AK"	PROC+4, PROC0+1
^AUPNVSIT - [#9000010]	VSTS+4, VSTS+5, VSTS+6
^AUPNVSIT("AA"	VSTS+2, VSTS+3
^DD(9000010.06	PROV+2, PROV+5
^DIC(16 - [#16]	PROV+5
^VA(200 - [#200]	PROV+5
^XTMP("APCLDP1"	PROC1+2, VSTS+9

Label References

Name	Line Occurrences
ASK	PROV+3, DEMO+2
BD	ED+2
GETDATES	ASK+3
PROC0	PROC+3, PROC+4
PROC1	PROC0+1
XIT	START+1, BD+3
ZIS	ASK+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	XIT+2!
APCL80D	XIT!
APCLAGE	XIT+2!
APCLBD	BD+4*, ED+1, ED+4, XIT!, VSTS+1
APCLBDD	ED+4*, XIT+1!
APCLBDO	XIT+1!, VSTS+1*, VSTS+2
APCLBT	XIT+1!, PROC+1*
APCLBTH	XIT!, PROC+1*, PROC1+2, VSTS+9
>> APCLDEMO	DEMO+1, DEMO+2, PROC1+1
APCLED	ED+3*, ED+4, XIT!, VSTS+1
APCLEDD	ED+4*, XIT+1!
APCLEDO	XIT+1!, VSTS+1*
APCLET	XIT+1!, PROC+5*
APCLFOUN	XIT+1!
APCLHIT	XIT+1!
APCLHRCN	XIT!
APCLID	XIT+1!
APCLJOB	XIT!, PROC+1*, PROC1+2, VSTS+9
APCLLENG	XIT!
APCLLINE	XIT+1!
APCLNUM	XIT!, VSTS+9
APCLP	XIT+1!
APCLPCNT	XIT!
APCLPG	XIT!
APCLPRNM	XIT+1!
APCLPRNT	XIT+1!
APCLPROB	XIT+1!
APCLPROV	ASK+1, PROV+4, XIT+2!, PROC+3, PROC+4*, PROC0+1, PROC1+2
APCLPRV	PROV+5*, XIT+1!
APCLQ	XIT+1!
APCLR	XIT+1!, VSTS+1, VSTS+3, VSTS+4, VSTS+5, VSTS+6
APCLRCNT	XIT+1!, VSTS+1, VSTS+7, VSTS+9
APCLRLOC	XIT+1!
APCLSD	ED+4, XIT+1!, VSTS+1, VSTS+2*, VSTS+3
APCLTOT	XIT+1!, PROC+1*
APCLX	XIT!
C	XIT+2!
D	XIT!
D0	XIT+2!
DA	XIT+2!
DDH	XIT+2!
DFN	XIT!, XIT+2!, PROC+1, PROC+6!, PROC0+1, PROC1+1, PROC1+2, VSTS+2, VSTS+3, VSTS+9
DIC	PROV+2*!, XIT!, XIT+2!
DIC("A"	PROV+2*
DIC(0	PROV+2*
DIG	XIT+2!
DIQ	XIT+2!
DIR	BD+2!, ED+1!, ASK+2!, XIT!
DIR("A"	BD+2, ED+1, ASK+2*
DIR("B"	ASK+2*
DIR(0	BD+2, ED+1, ASK+2*
DIRUT	BD+2, BD+3, ED+1, ED+2, ASK+2*, ASK+3, XIT!
DIU	XIT+2!
DIV	XIT+2!
DIW	XIT+2!
DR	XIT+2!
DTOUT	XIT!
DUOUT	BD+2, ED+1, ASK+2, XIT!
I	XIT+2!
IO("Q"	XIT!
IOF	START+2, START+3
J	XIT+2!
K	XIT+2!
P	XIT+2!
U	PROV+2, PROV+5, VSTS+4, VSTS+5, VSTS+6
X	ED+4, XIT+2!
>> X1	ED+4*
>> X2	ED+4*
XBNS	DEMO+3*, XIT!
XBRC	DEMO+3*, XIT!
XBRP	DEMO+3*, XIT!
>> XBRX	DEMO+3*
XBTX	XIT!
Y	BD+4, ED+1, ED+3, ED+4, ASK+4, PROV+3, PROV+4, PROV+5, XIT!, XIT+2!
Z	XIT+2!
ZTSK	XIT!

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLDP1

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: