Routine: APCLAP4

Package	Total	Call Graph
VA Fileman	4	DD^%DT C^%DTC ^DIC ^DIR
Patient Care Component Reports	2	$$GETLOC^APCLOCCK DEMOCHK^APCLUTL
IHS VA Utilities	1	^XBDBQUE
PCC Medical Query	1	PEP^AMQQGTX0

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
LOC	;
ZIS	;call to XBDBQUE
INFORM	;
ED	;get ending date
CLINIC1	;
START	;
CLINIC	;
GETDATES	;
XIT	;
DEMO	;
CHECK	;
DEF

External References

Name	Field # of Occurrence
DD^%DT	ED+1
C^%DTC	ED+4
PEP^AMQQGTX0	CLINIC1+2
$$GETLOC^APCLOCCK	LOC+1
DEMOCHK^APCLUTL	DEMO+1
^DIC	CLINIC1+1, DEF, DEF+2
^DIR	BD+1, ED+1, CLINIC+2
^XBDBQUE	DEMO+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",!! Line Location: START+1
Function Call: WRITE	Prompt: ! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: ! Line Location: CLINIC+2
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: CLINIC1+1
Function Call: WRITE	Prompt: !!,"CLINIC CODE 25 - OTHER MISSING FROM FILE - NOTIFY YOUR SITE MANAGER!!" Line Location: DEF+0
Function Call: WRITE	Prompt: !!,"PHARMACY CLINIC CODE 39 NOT IN FILE - NOTIFY SITE MANAGER!!" Line Location: DEF+2
Function Call: WRITE	Prompt: !,"This report will generate average daily outpatient visit counts for a date range ",!,"that you specify.",! Line Location: INFORM+2
Function Call: WRITE	Prompt: !,"The only visits counted are those that are considered to be",!,"APC workload reportable.",! Line Location: INFORM+5
Routine Call	DIC Line Location: CLINIC1+1 DEF DEF+2
Routine Call	DIR Line Location: BD+1 ED+1 CLINIC+2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(40.7 - [#40.7]	Classic Fileman Calls
^AMQQ(5 - [#9009075]	Classic Fileman Calls

Label References

Name	Line Occurrences
BD	ED+2, LOC+2
CLINIC	CLINIC1+3, DEMO+2
DEF	CLINIC+4
INFORM	START+4
LOC	CLINIC+3
XIT	BD+2, CLINIC1+1, DEF, DEF+2, DEMO+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	XIT+4!
AMQQATN	XIT+3!
AMQQCOMP	XIT+3!
AMQQCTXS	XIT+3!
AMQQLINK	XIT+3!
AMQQTAX	XIT+3!
APCL1	XIT+1!
APCL2	XIT+1!
APCL80S	XIT+2!
APCLADIS	XIT+2!
APCLAP	XIT+1!
APCLAPCC	XIT+1!
APCLBD	BD+3*, ED+1, ED+4, XIT+1!
APCLBDD	XIT+2!
APCLBT	XIT+2!
APCLBTH	START+3*, XIT+2!
APCLCLIN	XIT+1!
APCLCLNT	CLINIC+1!, CLINIC1+3, CLINIC1+4!, XIT+3!
APCLCLNT("*"	CLINIC1+4
APCLCLT	XIT+3!
APCLDA1	XIT+2!
APCLDA2	XIT+2!
APCLDATE	XIT+1!
APCLDAY	XIT+3!
>> APCLDEMO	DEMO+1, DEMO+2
APCLDISC	XIT+1!
APCLDT	XIT+1!
APCLDX	XIT+2!
APCLED	ED+3*, XIT+1!
APCLEDD	XIT+2!
APCLHD1	XIT+2!
APCLHD2	XIT+2!
APCLHIGH	XIT+1!
APCLICD	XIT+2!
APCLINF	XIT+1!
APCLINFO	XIT+1!
APCLJOB	START+3*, XIT+1!, XIT+3!
APCLLENG	XIT+2!
APCLLOC	LOC+1*, LOC+2, XIT+1!
APCLLOCC	XIT+2!
APCLLOCT	XIT+2!
APCLLOW	XIT+2!
APCLODAT	XIT+1!
APCLOTHC	DEF+1*, XIT+3!
APCLPG	XIT+2!
APCLPPOV	XIT+1!
APCLPRNT	XIT+1!
APCLPROC	XIT+1!
APCLPROV	XIT+2!
APCLQUIT	XIT+2!
APCLRPT	XIT+1!
APCLRXCL	DEF+3*, XIT+3!
APCLSD	ED+4*, XIT+1!
APCLSEC	XIT+2!
APCLSITE	START+2*, XIT+1!
APCLSKIP	XIT+1!
APCLSORT	XIT+1!
APCLSRT2	XIT+2!
APCLTITL	XIT+2!
APCLTOT	XIT+2!
APCLVDFN	XIT+1!
APCLVLOC	XIT+1!
APCLVREC	XIT+1!
APCLX	XIT+1!
APCLY	XIT+2!
APCLZ	XIT+2!
DA	CLINIC1+1!
DIC	CLINIC1+1!, DEF!, DEF+2*!
DIC("S"	CLINIC1+1*
DIC(0	CLINIC1+1, DEF, DEF+2*
DIR	BD+1!, ED+1!, CLINIC+2!
DIR("A"	BD+1, ED+1, CLINIC+2*
DIR(0	BD+1, ED+1, CLINIC+2*
DIRUT	BD+1, BD+2, ED+1, ED+2, CLINIC+2*, CLINIC+3, XIT+4!
>> DUOUT	BD+1, ED+1, CLINIC+2
DUZ(2	START+1, START+2
H	XIT+4!
IO("Q"	XIT+4!
IOF	INFORM+1
M	XIT+4!
POP	XIT+4!
S	XIT+4!
TS	XIT+4!
X	ED+4, CLINIC1+1, DEF!, DEF+2*, XIT+4!
X1	ED+4*, XIT+4!
X2	ED+4*, XIT+4!
>> XBNS	DEMO+3*
>> XBRC	DEMO+3*
>> XBRP	DEMO+3*
>> XBRX	DEMO+3*
Y	BD+3, ED+1*, ED+3, CLINIC+4, CLINIC1+1, CLINIC1+2, DEF, DEF+1, DEF+2, DEF+3 , XIT+4!
ZTQUEUED	XIT+4!
ZTSK	XIT+4!

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLAP4

Information

Source Information

Call Graph

Call Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend: