Routine: APCL1A

Package	Total	Call Graph
Patient Care Component Reports	2	^APCLFY DEMOCHK^APCLUTL
IHS VA Utilities	1	^XBDBQUE
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	^DIC

Package

Total

Call Graph

Patient Care Component Reports

^APCLFY DEMOCHK^APCLUTL

IHS VA Utilities

^XBDBQUE

Kernel

$$FMTE^XLFDT

VA Fileman

^DIC

Name	Comments	DBIA/ICR reference
ZIS	;
ERR
F	;
DEMO	;
START	;
EOJ
FY
INFORM	;

Name	Field # of Occurrence
^APCLFY	FY
DEMOCHK^APCLUTL	DEMO+1
^DIC	F+3
^XBDBQUE	ZIS+2
$$FMTE^XLFDT	FY+6, FY+7

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?6,"Current FISCAL Year date range: ",APCL("FY PRINTABLE BDATE")," - ",APCL("FY TODAY") Line Location: FY+4
Function Call: WRITE	Prompt: !!?6,"FISCAL Year date range: ",APCL("FY PRINTABLE BDATE")," - ",APCL("FY PRINTABLE EDATE") Line Location: FY+5
Function Call: WRITE	Prompt: $C(7),$C(7),!!?6,"You have selected a FY with a beginning date that is in the future!!",!,?6,$$FMTE^XLFDT(APCL("FY BEG DATE"))," Select again!",! Line Location: FY+6
Function Call: WRITE	Prompt: !!?6,"FISCAL Year date range: ",$$FMTE^XLFDT(APCL("FY BEG DATE"))," - ",$S(APCL("FY END DATE")>DT:$$FMTE^XLFDT(DT),1:$$FMTE^XLFDT(APCL("FY END DATE"))) Line Location: FY+7
Function Call: WRITE	Prompt: ! Line Location: FY+11
Function Call: WRITE	Prompt: !!,"Your provider class file does not contain the 1A workload reportable flags.",!,"This report cannot be run accurately until AUM Patch 6 is installed.",!! Line Location: F+1
Function Call: WRITE	Prompt: !! Line Location: F+2
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"THIS REPORT MUST BE PRINTED ON 132 COLUMN PAPER OR ON A PRINTER THAT IS",!,"SET UP FOR CONDENSED PRINT!!!",!,"IF YOU DO NOT HAVE SUCH A PRINTER AVAILABLE - SEE YOUR SITE MANAGER.",! Line Location: F+5
Function Call: WRITE	Prompt: $C(7),$C(7),!,"Must be a valid Year. Enter a year only!!" Line Location: ERR+0
Function Call: WRITE	Prompt: !,"******** PCC/APC REPORT 1A ********",! Line Location: INFORM+2
Function Call: WRITE	Prompt: !,"This report will print Year to Date Ambulatory Visit Counts for the Facility",!,"and Fiscal Year that you select. The counts by month are for date of" Line Location: INFORM+3
Function Call: WRITE	Prompt: !,"service. This report will resemble, but not duplicate exactly, the",!,"APC 1A report produced at the IHS Data Warehouse in Albuquerque.",!! Line Location: INFORM+4
Routine Call	DIC Line Location: F+3

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

Name	Line Occurrences (* Changed, ! Killed)
^DIC(7 - [#7]	F+1

Name	Line Occurrences
EOJ	FY+3, ZIS+3
FY	FY+6, F+3, DEMO+2
INFORM	START+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EOJ+2!
%DT	EOJ+2!
%H	EOJ+2!
%T	EOJ+2!
%W	EOJ+2!
%Y	EOJ+2!
APCL	EOJ+1!
APCL("FY BEG	DATE" , FY+6, FY+7, FY+8
APCL("FY END	DATE" , FY+7, FY+9
APCL("FY WORK	ING DT" , FY+10
APCL("FY"	FY+3
APCL1	EOJ!
APCL132	EOJ+1!
APCL2	EOJ!
APCLAP	EOJ!
APCLAREA	EOJ+1!
APCLAREC	EOJ+1!
APCLBT	EOJ!
APCLCLIN	EOJ!
>> APCLDEMO	DEMO+1, DEMO+2
APCLDISC	EOJ!
APCLDISN	EOJ+1!
APCLDPTR	EOJ!
APCLDT	EOJ+1!
APCLFY	FY+8*, EOJ!
APCLFYD	EOJ!
APCLFYE	FY+9*, EOJ+1!
APCLGRAN	EOJ+1!
APCLJ	EOJ+1!
APCLJOB	EOJ!
APCLLOC	F+4*, EOJ!, EOJ+1!
APCLLOCC	EOJ+1!
APCLLOCP	EOJ+1!
APCLMOL	EOJ!
APCLMON	EOJ+1!
APCLMOS	EOJ!
APCLP	EOJ+1!
APCLPDC	EOJ+1!
APCLPG	EOJ+1!
APCLPPOV	EOJ!
APCLPRIM	EOJ+1!
APCLPRIT	EOJ+1!
APCLQUIT	EOJ+1!
APCLSD	FY+10*, EOJ!
APCLSKIP	EOJ!
APCLSU	EOJ+1!
APCLSUC	EOJ+1!
APCLT	EOJ+1!
APCLTAB	EOJ+1!
APCLVDFN	EOJ!
APCLVLOC	EOJ!
APCLVREC	EOJ!
APCLX	EOJ!
DA	F+3!
DFN	EOJ+1!
DIC	F+3*!
DIC("A"	F+3*
DIC(0	F+3*
DT	FY+6, FY+7
DTOUT	START+2!, FY+3, EOJ+2!
DUOUT	START+2!, EOJ+2!
H	EOJ+2!
IO("Q"	EOJ+2!
IOF	INFORM+1
M	EOJ+2!
POP	EOJ+2!
S	EOJ+2!
TS	EOJ+2!
U	F+1
X	F+1*, EOJ+2!
X1	EOJ+2!
X2	EOJ+2!
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	F+3, F+4, EOJ+2!

Customize PDF page

Package: Patient Care Component Reports

Routine: APCL1A

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: