Routine: APCLACC

Package	Total	Call Graph
VA Fileman	3	^%DT ^DIC ^DIR
IHS VA Utilities	1	^XBDBQUE
Kernel	1	$$FMTE^XLFDT
PCC Medical Query	1	PEP^AMQQGTX0
Patient Care Component Reports	1	DEMOCHK^APCLUTL

Entry Points

Name	Comments	DBIA/ICR reference
ACC	;
SUF	;S (APCLSUF,APCLFS)="",DIR(0)="SBO^F:FACILITY;S:SERVICE UNIT",DIR("A")="Report for a particular Facility or for a Service Unit?" D ^DIR K DIR
ACCEOJ
RPT	;report type
SBT	;subtotal by tribe?
F	;
FY	;
INIT	;
SBC	;subtotal by community
START	;
S	;
EOJ	;ENTRY POINT
SUR	;
DEMO	;
IND	;
ZIS	;

External References

Name	Field # of Occurrence
^%DT	FY+2
PEP^AMQQGTX0	F+3, S+3
DEMOCHK^APCLUTL	DEMO+1
^DIC	F+2, S+2
^DIR	SUF+1, SUR+5, IND+1, RPT+2, SBT+2, SBC+1
^XBDBQUE	DEMO+5
$$FMTE^XLFDT	RPT+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: F+2
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: S+2
Function Call: WRITE	Prompt: ! Line Location: SUR+1
Function Call: WRITE	Prompt: ! Line Location: SUR+3
Function Call: WRITE	Prompt: ! Line Location: IND+1
Function Call: WRITE	Prompt: ! Line Location: FY+2
Function Call: WRITE	Prompt: !!,$C(7),"The name of the template will be: ACTIVE USERS AS OF "_$$FMTE^XLFDT(APCLFYE,"2E")_" and it will be attached to the IHS PATIENT file" Line Location: RPT+5
Function Call: WRITE	Prompt: ! Line Location: SBT+2
Function Call: WRITE	Prompt: ! Line Location: SBC+1
Function Call: WRITE	Prompt: !!!,"THIS REPORT WILL SEARCH THE ENTIRE PATIENT FILE!",!!,"IT IS STRONGLY RECOMMENDED THAT YOU QUEUE THIS REPORT FOR A TIME WHEN THE",!,"SYSTEM IS NOT IN HEAVY USE!",! Line Location: DEMO+3
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",! Line Location: ACC+1
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"SITE NOT SET IN DUZ(2) - NOTIFY SITE MANAGER!!",! Line Location: ACC+2
Function Call: WRITE	Prompt: $C(7),$C(7),!!,"Report Type Missing!!",! Line Location: ACC+4
Function Call: WRITE	Prompt: !,"This option will produce either:" Line Location: ACC+5
Function Call: WRITE	Prompt: !?5,"1) A Report of Registered Patients and Active Users sorted by",!?8,$S(APCLSORT="C":"Community of Residence",APCLSORT="T":"Tribe of Membership",1:"Service Unit of Residence"),", OR" Line Location: ACC+6
Function Call: WRITE	Prompt: !?5,"2) A Template of Active Users for use in QMan Searches" Line Location: ACC+7
Function Call: WRITE	Prompt: !!,"Your Report or Template can be generated for one or more Facilities or for",!,"one or more Service Units." Line Location: ACC+8
Function Call: WRITE	Prompt: !!,"To determine Active Users for your Report or Template, the system will select",!,"patients who have had a visit at the Facility(s) or Service Unit(s) specified",! Line Location: ACC+9
Function Call: WRITE	Prompt: "within the past 3 years of the date you specify. IHS, CHS and Tribal" Line Location: ACC+10
Function Call: WRITE	Prompt: !,"visits will all be included. Home, telephone, employee health, and chart review",!,"visits are excluded." Line Location: ACC+11
Function Call: WRITE	Prompt: !!,"You will be asked if the patients must live in the Service Unit specified",!,"and if you only want Indian patients included." Line Location: ACC+12
Function Call: WRITE	Prompt: " You must answer YES to both",!,"questions in order to conform to the official IHS definition of Active Users." Line Location: ACC+13
Routine Call	DIC Line Location: F+2 S+2
Routine Call	DIR Line Location: SUF+1 SUR+5 IND+1 RPT+2 SBT+2 SBC+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTLOC - [#9999999.06]	F+6
^DD("DD"	FY+1, FY+4

Label References

Name	Line Occurrences
EOJ	START+2, SUF+2, F+2, S+2, DEMO+6
FY	RPT+3, SBT+3, SBC+2
IND	FY+3
INIT	START+1
RPT	DEMO+2
S	SUF+4
SBC	SBT+1
SUF	F+4, F+5, S+4, S+5, SUR+6, IND+2
SUR	F+7
ZIS	RPT+5, SBT+5

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	FY+2*, ACCEOJ!
%DT("A"	FY+2*
APCL1	ACCEOJ+2!
APCL2	ACCEOJ+2!
APCL80D	ACCEOJ+1!
APCLBT	ACCEOJ+2!
APCLCOMM	ACCEOJ+1!
APCLCOMN	ACCEOJ+2!, ACCEOJ+3!
>> APCLDEMO	DEMO+1, DEMO+2
APCLDFN	ACCEOJ+1!
>> APCLDIC("B"	ACCEOJ+1!
APCLDICB	ACCEOJ+1!
APCLDTP	FY+1*, ACCEOJ+2!
APCLFS	SUF+1, SUF+3, SUR+3, ACCEOJ+1!
APCLFYB	ACCEOJ+1!, ACCEOJ+3!
APCLFYBI	ACCEOJ+3!
APCLFYBY	ACCEOJ+3!
APCLFYE	FY+4*, RPT+5, ACCEOJ+1!
APCLFYEI	ACCEOJ+3!
APCLFYEY	FY+4*, ACCEOJ+1!
APCLGOT1	ACCEOJ+1!
APCLGOTA	ACCEOJ+2!
APCLHRN	ACCEOJ+1!
APCLI	ACCEOJ+3!
APCLIND	IND+1, IND+3, ACCEOJ+3!
APCLJ	ACCEOJ+1!
APCLJOB	ACCEOJ+2!
APCLMAJ	ACCEOJ+3!
APCLMIN	ACCEOJ+3!
APCLP	ACCEOJ+3!
APCLPCP	ACCEOJ+2!
APCLPG	ACCEOJ+1!
APCLQUIT	START+2, ACC+1, ACC+2, ACC+4*, ACCEOJ+2!
APCLRPTT	RPT+1, RPT+4, RPT+5, ACCEOJ+1!
APCLSKIP	ACCEOJ+2!
APCLSORT	SBT+1, ACC+4, ACC+6, ACCEOJ+3!
APCLSSUR	SUR+2, SUR+7, ACCEOJ+3!
APCLSTMP	ACCEOJ+1!
APCLSU	F+1!, F+4, F+5!, S+1!, S+4, S+5!, ACCEOJ+1!
APCLSU(	F+6, S+6
APCLSU("*"	F+5, S+5
APCLSUB	SBT+2, SBT+4, SBC+1, SBC+3, ACCEOJ+2!
APCLSUF	SUF+1*, F+1!, ACCEOJ+3!
APCLSUF(	F+6, S+6
APCLSUN	ACCEOJ+3!
APCLSUP	ACCEOJ+2!
APCLSUR	ACCEOJ+3!
APCLSVJ	ACCEOJ+1!
APCLT	ACCEOJ+3!
APCLTRI	ACCEOJ+1!
APCLTRIC	ACCEOJ+1!
APCLV	ACCEOJ+2!
APCLVAR	ACCEOJ+3!
APCLVAR1	ACCEOJ+3!
APCLVAR2	ACCEOJ+3!
APCLVD	ACCEOJ+2!
APCLVDFN	ACCEOJ+2!
DA	SUF+1!, F+2!, S+2!, RPT+2!
DIC	F+2!, S+2!, ACCEOJ!
DIC("S"	F+2, S+2
DIC(0	F+2, S+2
DIR	SUF+1!, SUR+5!, IND+1!, RPT+2!, SBT+2!, SBC+1!
DIR("?"	SUR+5, IND+1, SBT+2, SBC+1
DIR("A"	SUF+1, SUR+3, IND+1, RPT+2, SBT+2, SBC+1
DIR("B"	SUF+1, RPT+2
DIR(0	SUF+1, SUR+4, IND+1, RPT+2, SBT+2, SBC+1
DIRUT	SUF+2, SUR+6, IND+2, RPT+3, SBT+3, SBC+2, ACCEOJ!
DT	FY+1
DUZ(2	ACC+1, ACC+2
H	ACCEOJ!
I	ACCEOJ!
IO("Q"	ACCEOJ!
IOF	ACC+3
J	ACCEOJ!
JK	ACCEOJ!
K	ACCEOJ!
M	ACCEOJ!
POP	ACCEOJ!
S	ACCEOJ!
TS	ACCEOJ!
U	F+6
X	F+2, F+6, S+2, S+6, ACCEOJ!
>> XBNS	DEMO+4*
>> XBRC	DEMO+4*
>> XBRP	DEMO+4*
>> XBRX	DEMO+4*
Y	SUF+3, SUF+4, F+2, F+3, S+2, S+3, SUR+7, IND+3, FY+1*, FY+3 , FY+4, RPT+4, SBT+4, SBC+3, ACCEOJ!
ZTQUEUED	ACCEOJ!
ZTSK	ACCEOJ!

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLACC

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: