Routine: APCLCZP

Package	Total	Call Graph
VA Fileman	4	DD^%DT C^%DTC ^DIC ^DIR
Patient Care Component Reports	2	GETINFO^APCLAP0 DEMOCHK^APCLUTL
IHS VA Utilities	1	^XBDBQUE

Package

Total

Call Graph

VA Fileman

DD^%DT C^%DTC ^DIC ^DIR

Patient Care Component Reports

GETINFO^APCLAP0 DEMOCHK^APCLUTL

IHS VA Utilities

^XBDBQUE

Name	Comments	DBIA/ICR reference
BD	;get beginning date
LOC
ZIS	;CALL TO XBDBQUE
ERR
INFORM	;
ED	;get ending date
LOC1	;enter location
START	;
GETDATES	;
XIT	;
DEMO	;
CHECK	;

Name	Field # of Occurrence
DD^%DT	ED+1
C^%DTC	ED+4
GETINFO^APCLAP0	START+4, CHECK+7
DEMOCHK^APCLUTL	DEMO+1
^DIC	LOC1+1
^DIR	CHECK+3, BD+1, ED+1, LOC+1
^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: !,$C(7),$C(7),"REPORT TYPE MISSING!! NOTIFY PROGRAMMER",! Line Location: START+3
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: !,"*** VISIT COUNTS BY ",APCLTITL," ***",! Line Location: INFORM+2
Function Call: WRITE	Prompt: !,"This report will generate a count of visits by ",APCLINF,!,"for a date range that you specify.",! Line Location: INFORM+3
Function Call: WRITE	Prompt: "ALL Visits in the database will be included in the tabulation with",!,"the exception of the following: " Line Location: INFORM+4
Function Call: WRITE	Prompt: !,"VISIT TYPES: Contract, VA",!,"VISIT SERVICE CATEGORIES: Chart Review, In-Hospital, Hospitalizations,",!,"Historical Events, and Telephone Calls..",! Line Location: INFORM+5
Function Call: WRITE	Prompt: "Visits MUST have a Primary Provider and Purpose of Visit.",! Line Location: INFORM+6
Function Call: WRITE	Prompt: "The report will be sub-totaled by Location of Encounter.",! Line Location: INFORM+7
Function Call: WRITE	Prompt: !!,"THIS REPORT WILL BE SUB-TOTALED BY ZIP CODE.",! Line Location: INFORM+8
Routine Call	DIC Line Location: LOC1+1
Routine Call	DIR Line Location: CHECK+3 BD+1 ED+1 LOC+1

FileNo	Call Tags
^AUTTLOC - [#9999999.06]	Classic Fileman Calls

Name	Line Occurrences
BD	ED+2, LOC+2
GETDATES	CHECK+1
INFORM	START+6
LOC	LOC1+1, DEMO+2
XIT	START+4, CHECK+4, BD+2, DEMO+5
ZIS	LOC, LOC+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCL1	XIT+1!
APCL2	XIT+1!
APCL80S	XIT+2!
APCLADIS	XIT+1!
APCLAP	XIT+1!
APCLBD	BD+3*, ED+1, ED+4, XIT+1!
APCLBDD	XIT+2!
APCLBT	XIT+2!
APCLBTH	START+5*, XIT+2!
APCLCAT	XIT+2!
APCLCLIN	XIT+1!
APCLCZP	XIT+1!
APCLDA1	XIT+2!
APCLDA2	XIT+2!
APCLDATE	XIT+1!
>> 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!, INFORM+3
APCLINFO	XIT+1!
APCLJOB	START+5*, XIT+1!
APCLLENG	XIT+2!
APCLLOC	LOC, LOC+3, LOC1+2*, XIT+1!
APCLLOCT	XIT+2!
APCLLOW	XIT+2!
APCLODAT	XIT+1!
APCLPG	XIT+2!
APCLPPOV	XIT+1!
APCLPRNT	XIT+2!
APCLPROC	XIT+1!
APCLPROV	XIT+2!
APCLQUIT	START+4, XIT+2!
APCLRPT	START+2, START+3, CHECK+1, CHECK+5, CHECK+6*, LOC, XIT+1!
APCLSD	ED+4*, XIT+1!
APCLSEC	XIT+2!
APCLSITE	START+1!, XIT+1!, XIT+2!
APCLSKIP	XIT+1!
APCLSORT	XIT+1!
APCLSRT2	XIT+2!
APCLTITL	XIT+2!, INFORM+2
APCLTOT	XIT+2!
APCLVDFN	XIT+1!
APCLVLOC	XIT+1!
APCLVREC	XIT+1!
APCLX	XIT+1!
APCLY	XIT+2!
APCLZ	XIT+2!
DA	LOC1+1!
DIC	LOC1+1*!
DIC("A"	LOC1+1*
DIC(0	LOC1+1*
DIR	CHECK+3!, BD+1!, ED+1!, LOC+1!
DIR("?"	CHECK+3, LOC+1
DIR("A"	CHECK+2, BD+1, ED+1, LOC+1
DIR("B"	ED+1*
DIR(0	CHECK+2, BD+1, ED+1, LOC+1
>> DIRUT	CHECK+4, BD+1, BD+2, ED+1, ED+2, LOC+2
>> DUOUT	BD+1, ED+1
DUZ(2	START+1
IOF	INFORM+1
>> X	ED+4
>> X1	ED+4*
>> X2	ED+4*
>> XBNS	DEMO+3*
>> XBRC	DEMO+3*
>> XBRP	DEMO+3*
>> XBRX	DEMO+3*
>> Y	CHECK+5, CHECK+6, BD+3, ED+1*, ED+3, LOC+3, LOC1+1, LOC1+2

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLCZP

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Label References

Local Variables

Legend: