Routine: APCLAP1

Information

APCLAP1 ; IHS/CMI/LAB - APC visit counts by selected vars ;

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

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: !!,"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: !,"*** APC 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: "The only visits included in this report are those that are considered",!,"APC workload reportable.",! Line Location: INFORM+4
Routine Call	DIC Line Location: DEF DEF+2
Routine Call	DIR Line Location: CHECK+3 BD+1 ED+1

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

Name	Field # of Occurrence
%	XIT+4!
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+5*, XIT+2!
APCLCLIN	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!, XIT+3!
APCLLENG	XIT+2!
APCLLOC	LOC, 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	START+4, XIT+2!
APCLRPT	START+3, CHECK+1, CHECK+5, CHECK+6, LOC, XIT+1!
APCLRXCL	DEF+3*, XIT+3!
APCLSD	ED+4*, XIT+1!
APCLSEC	XIT+2!
APCLSITE	START+2*, START+3!, XIT+1!
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!
DIC	DEF!, DEF+2!
DIC(0	DEF, DEF+2
DIR	CHECK+3!, BD+1!, ED+1!
DIR("?"	CHECK+3*
DIR("A"	CHECK+2, BD+1, ED+1*
DIR(0	CHECK+2, BD+1, ED+1*
DIRUT	CHECK+4, BD+1, BD+2, ED+1, ED+2, XIT+4!
>> DUOUT	BD+1, ED+1
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, DEF!, DEF+2, XIT+4!
X1	ED+4*, XIT+4!
X2	ED+4*, XIT+4!
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	CHECK+5, CHECK+6, BD+3, ED+1*, ED+3, DEF, DEF+1, DEF+2, DEF+3, XIT+4!
ZTQUEUED	XIT+4!
ZTSK	XIT+4!