Routine: APCLCP3

Package	Total	Call Graph
VA Fileman	5	DD^%DT C^%DTC ^DIC EN^DIQ ^DIR
Patient Care Component Reports	2	(O,OC,T,TC)^APCLCP1 DEMOCHK^APCLUTL
IHS VA Utilities	1	^XBDBQUE

Entry Points

Name	Comments	DBIA/ICR reference
BD	;get beginning date
LOC	;get location
ZIS	;
ERR
INFORM	;
ED	;get ending date
OC	;EP one location
O	;EP one location
TC	;EP taxonomy
START	;
CLINIC	;
GETDATES	;
XIT	;
T	;EP taxonomy
DEMO	;
GETGROUP	;

External References

Name	Field # of Occurrence
DD^%DT	ED+1
C^%DTC	ED+4
O^APCLCP1	O+1
OC^APCLCP1	OC+1
T^APCLCP1	T+1
TC^APCLCP1	TC+1
DEMOCHK^APCLUTL	DEMO+1
^DIC	GETGROUP+1
EN^DIQ	GETGROUP+5
^DIR	BD+1, ED+1, LOC+3, CLINIC+3
^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: !,"Bye ... " Line Location: GETGROUP+2
Function Call: WRITE	Prompt: !!,"You have selected the ",$P(Y,U,2)," discipline group.",! Line Location: GETGROUP+4
Function Call: WRITE	Prompt: ! Line Location: BD+1
Function Call: WRITE	Prompt: ! Line Location: ED+1
Function Call: WRITE	Prompt: $C(7),$C(7),!,"Must be a valid date and be Today or earlier. Time not allowed!" Line Location: ERR+0
Function Call: WRITE	Prompt: !,"Time and Patient Services by ",APCLSECS," for a Group of Provider",!,"Disciplines that you select.",! Line Location: INFORM+2
Function Call: WRITE	Prompt: !,"This report displays, by ",APCLSORT,", the number of patient contacts",!,"total activity time and total travel time for each provider with",!,"a discipline in the provider discipline group that you select." Line Location: INFORM+3
Function Call: WRITE	Prompt: ! Line Location: INFORM+4
Routine Call	DIC Line Location: GETGROUP+1
Routine Call	DIR Line Location: BD+1 ED+1 LOC+3 CLINIC+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APCLACTG - [#9001003.6]	Classic Fileman Calls

Label References

Name	Line Occurrences
BD	ED+2, LOC+4
CLINIC	LOC+5, CLINIC+6, CLINIC+7, DEMO+2
GETGROUP	BD+2
INFORM	START+5
LOC	LOC+6, LOC+7, CLINIC+4
O	LOC+6
OC	CLINIC+6
T	LOC+7
TC	CLINIC+7
XIT	GETGROUP+2, DEMO+5
ZIS	CLINIC+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	XIT+4!
APCL1	XIT+1!
APCL2	XIT+1!
APCL80S	XIT+1!
APCLACTG	GETGROUP+3*, XIT+2!
APCLAP	XIT+1!
APCLBD	BD+3*, ED+1, ED+4, XIT+1!
APCLBDD	XIT+1!
APCLBT	XIT+1!
APCLCHN	XIT+1!
APCLCLN	CLINIC+1!, CLINIC+5!
APCLCODE	XIT+1!, XIT+2!
APCLDA1	XIT+1!
APCLDA2	XIT+1!
>> APCLDEMO	DEMO+1, DEMO+2
APCLDISC	XIT+1!
APCLDT	XIT+1!
APCLED	ED+3*, XIT+1!
APCLEDD	XIT+1!
APCLFOUN	XIT+1!
APCLG	XIT+1!
APCLGLOB	XIT+3!
APCLHIGH	XIT+1!
APCLICD	XIT+1!
APCLIPTR	XIT+1!
APCLJOB	XIT+3!
APCLLENG	XIT+1!
APCLLOC	LOC+1!, LOC+5!, XIT+2!
APCLLOW	XIT+1!
APCLNSP	XIT+2!
APCLODAT	XIT+1!
APCLPG	XIT+1!
APCLPIEC	XIT+3!
APCLPRIM	XIT+2!
>> APCLQ	LOC+6, LOC+7, CLINIC+6, CLINIC+7
APCLQUIT	XIT+1!
APCLRRTN	XIT+3!
APCLSD	ED+4*, XIT+1!
APCLSECS	XIT+2!, INFORM+2
APCLSECV	XIT+2!
APCLSITE	START+2*, XIT+2!
APCLSKIP	XIT+2!
APCLSORT	START+3, START+4, XIT+2!, INFORM+3
APCLSORV	START+3, START+4, XIT+2!
APCLSU	XIT+1!, XIT+2!
APCLSUB	XIT+2!
APCLVACT	XIT+2!
APCLVAL	XIT+2!
APCLVALP	XIT+2!
APCLVDFN	XIT+2!
APCLVLOC	XIT+2!
APCLVREC	XIT+2!
APCLVTM	XIT+2!
APCLVTT	XIT+2!
APCLX	XIT+2!
APCLY	XIT+2!
APCLZ	XIT+2!
DA	GETGROUP+5*!, LOC+3!, CLINIC+3!
DIC	GETGROUP+1!, GETGROUP+5!
DIC("A"	GETGROUP+1*
DIC(0	GETGROUP+1*
DIR	BD+1!, ED+1!, LOC+3!, CLINIC+3!
DIR("A"	BD+1, ED+1, LOC+3, CLINIC+3
DIR("B"	LOC+3, CLINIC+3
DIR(0	BD+1, ED+1, LOC+2, CLINIC+2
DIRUT	BD+1, BD+2, ED+1, ED+2, LOC+4, CLINIC+4, XIT+4!
>> DUOUT	BD+1, ED+1
DUZ(2	START+1, START+2
H	XIT+4!
IO("Q"	XIT+4!
IOF	INFORM+1
POP	XIT+4!
U	GETGROUP+4
X	ED+4, 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	GETGROUP+2, GETGROUP+3, GETGROUP+4, GETGROUP+5, BD+3, ED+1*, ED+3, LOC+5, LOC+6, LOC+7 , CLINIC+5, CLINIC+6, CLINIC+7, XIT+4!
ZTQUEUED	XIT+4!
ZTSK	XIT+4!

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLCP3

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: