Routine: APCLAAP

Package	Total	Call Graph
VA Fileman	2	DD^%DT ^DIR
Patient Care Component Reports	1	DONE^APCLOSUT

Package

Total

Call Graph

DD^%DT ^DIR

Name	Comments	DBIA/ICR reference
HEAD
HEAD1	;
P	;
START2
SU	;
CHKPRIM	;
START	;
DONE
MONTOT	;set up month totals for all visits and pcp visits
W

Name	Field # of Occurrence
DD^%DT	START+6
DONE^APCLOSUT	DONE
^DIR	HEAD+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"NO VISITS FOR THIS FISCAL YEAR",! Line Location: START2+2
Function Call: WRITE	Prompt: !!," T O T A L",?21,$J(APCLGRAN,7),?30,"100.0" Line Location: START2+6
Function Call: WRITE	Prompt: ?APCLTAB,$J(APCLMON,6) Line Location: START2+7
Function Call: WRITE	Prompt: !!,"*TOTAL PRIMARY PVDR",?21,$J(APCLPRIT,7) Line Location: START2+8
Function Call: WRITE	Prompt: ?30,$J(APCLP,5) Line Location: START2+9
Function Call: WRITE	Prompt: ?APCLTAB,$J(APCLMON,6) Line Location: START2+9
Function Call: WRITE	Prompt: ! Line Location: START2+10
Function Call: WRITE	Prompt: W Line Location: W+0
Function Call: WRITE	Prompt: !,APCLDISN,?22,$J(APCLT,6),?30,$J(APCLP,5) Line Location: W+0
Function Call: WRITE	Prompt: ?APCLTAB,$J(APCLMON,6) Line Location: W+1
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: APCL132,! Line Location: HEAD1+2
Function Call: WRITE	Prompt: !?5,"AREA: ",APCLAREC," ",APCLAREA,?50,"PCC-OUTPATIENT PATIENT CARE REPORT",?95,APCLDT,?110,"Page ",APCLPG Line Location: HEAD1+3
Function Call: WRITE	Prompt: !?5,"S.U.: ",APCLSUC," ",APCLSU,?58,"FISCAL YEAR ",APCLFYD Line Location: HEAD1+4
Function Call: WRITE	Prompt: !?5,"FAC.: ",APCLLOCC," ",APCLLOCP Line Location: HEAD1+5
Function Call: WRITE	Prompt: !?24,"ALL PCC OUTPATIENT (NON-HOSPITAL) VISITS TO SERVICE LOCATION BY PRIMARY PROVIDER AND MONTH OF SERVICE",! Line Location: HEAD1+6
Function Call: WRITE	Prompt: APCL132,! Line Location: HEAD1+7
Function Call: WRITE	Prompt: "PRIMARY PROVIDER",?23,"YR-TO",?30,"% OF" Line Location: HEAD1+8
Function Call: WRITE	Prompt: !," OF SERVICE",?23,"DATE",?30,"TOTAL" Line Location: HEAD1+9
Function Call: WRITE	Prompt: ?APCLTAB,$P(APCLMOL,",",APCLX) Line Location: HEAD1+10
Function Call: WRITE	Prompt: !,APCL132 Line Location: HEAD1+11
Routine Call	DIR Line Location: HEAD+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUTTAREA - [#9999999.21]	START+9, START+10
^AUTTLOC - [#9999999.06]	START+3, START+8, SU+1
^AUTTSU - [#9999999.22]	SU+2, SU+3
^DIC(4 - [#4]	START+3
^DIC(7 - [#7]	P+4, CHKPRIM+2
^XTMP("APCLAA"	START2+3, START2+7, START2+9, DONE+1!, P+2, W+1, MONTOT+1, MONTOT+2

Name	Line Occurrences
CHKPRIM	P+4
DONE	START2+2, START2+4, START2+5
HEAD	START2, START2+5, P+1
HEAD1	HEAD
MONTOT	W+1
P	START2+3
START2	SU+1, SU+2
SU	START+8, START+9
W	P+3

Name	Field # of Occurrence
^(	START2+7, START2+9, W+1, MONTOT+1, MONTOT+2

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCL("FY"	START+6
>> APCL132	START+1*, HEAD1+2, HEAD1+7, HEAD1+11
>> APCLAREA	START+8, START+9, START+10*, HEAD1+3
>> APCLAREC	START+8, START+9, START+10*, HEAD1+3
>> APCLBT	START2+3, START2+7, START2+9, DONE+1, P+2, W+1, MONTOT+1, MONTOT+2
>> APCLDISC	START2, START2+3, P+2, P+3, P+4, W+1, CHKPRIM+2
>> APCLDISN	P+3, P+4, W
>> APCLDT	START+6*, HEAD1+3
>> APCLFYD	START+6*, HEAD1+4
>> APCLGRAN	START2+2, START2+6, START2+8, P+2
>> APCLJ	START2+7, START2+9, W+1*, MONTOT+1, MONTOT+2
>> APCLJOB	START2+3, START2+7, START2+9, DONE+1, P+2, W+1, MONTOT+1, MONTOT+2
>> APCLLOC	START+3, START+8, SU+1
>> APCLLOCC	START+3*, HEAD1+5
>> APCLLOCP	START+3*, HEAD1+5
>> APCLMOL	START+2*, HEAD1+10
>> APCLMON	START2+7, START2+9, W+1*, MONTOT+1, MONTOT+2
>> APCLP	START2+8, START2+9, P+2, W
>> APCLPG	START2, HEAD, HEAD1+1, HEAD1+3
APCLPRIM	P+4!, MONTOT+2, CHKPRIM+2*
>> APCLPRIT	START2, START2+8, CHKPRIM+2
APCLQUIT	START2+1!, START2+3, START2+4, START2+5, P+1, HEAD+1*
>> APCLSU	SU+1, SU+2, SU+3*, HEAD1+4
>> APCLSUC	SU+1, SU+2, SU+3*, HEAD1+4
>> APCLT	P+2*, W, CHKPRIM+2
>> APCLTAB	START2+7, START2+9, W+1, HEAD1+10
>> APCLX	HEAD1+10*
DIR	HEAD+1!
DIR(0	HEAD+1*
DT	START+6
>> DTOUT	HEAD+1
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	START2+5, P+1
IOST	HEAD+1
U	START+3, START+8, START+10, SU+1, SU+3, P+4, CHKPRIM+2
>> Y	START+6*, HEAD+1

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLAAP

Information

Source Information

Call Graph

Call Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: