Routine: APCLCP3P

Package	Total	Call Graph
Patient Care Component Reports	3	$$CTR^APCLCP1P NOTE2^APCLCPUT DONE^APCLOSUT
VA Fileman	3	DD^%DT NOW^%DTC ^DIR
DRG Grouper	1	$$ICDDX^ICDEX

Entry Points

Name	Comments	DBIA/ICR reference
LOC	;
HEAD
SUBHEAD	;
HEAD1	;
P	;
NOTE	;
START	;
DONE	;

External References

Name	Field # of Occurrence
DD^%DT	START+1, START+4
NOW^%DTC	START+1
$$CTR^APCLCP1P	HEAD1+8, HEAD1+11
NOTE2^APCLCPUT	NOTE+2
DONE^APCLOSUT	DONE+1
^DIR	HEAD+1
$$ICDDX^ICDEX	P+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"No visits to report",! Line Location: START+7
Function Call: WRITE	Prompt: !!?10,"TOTAL:" Line Location: LOC+4
Function Call: WRITE	Prompt: ?Z,$J(^XTMP(APCLNSP,APCLJOB,APCLBT,"SUBTOTAL",APCLSU,X),7) Line Location: LOC+5
Function Call: WRITE	Prompt: ?Z,$J(^XTMP(APCLNSP,APCLJOB,APCLBT,"SUBTOTAL",APCLSU,X)/60,7,2) Line Location: LOC+6
Function Call: WRITE	Prompt: !!!,"* -- ",^XTMP(APCLNSP,APCLJOB,APCLBT,APCLSU,"NOACT")," of the visits did not have an activity time recorded." Line Location: LOC+7
Function Call: WRITE	Prompt: !,APCLZ Line Location: P+5
Function Call: WRITE	Prompt: ?Z,$J($S($D(^XTMP(APCLNSP,APCLJOB,APCLBT,APCLSU,APCLVAL,X)):^(X),1:0),7) Line Location: P+6
Function Call: WRITE	Prompt: ?Z,$J($S($D(^XTMP(APCLNSP,APCLJOB,APCLBT,APCLSU,APCLVAL,X)):^(X),1:0)/60,7,2) Line Location: P+7
Function Call: WRITE	Prompt: ?(80-($L(APCLSECS)+APCLLENG)/2),APCLSECS,": ",APCLVALP Line Location: SUBHEAD+4
Function Call: WRITE	Prompt: !!?28,"TOTAL",?38,"# VISITS",?48,"# VISITS" Line Location: SUBHEAD+5
Function Call: WRITE	Prompt: !?28,"PATIENT",?38,"AS PRIM.",?48,"AS SEC.",?58,"ACTIVITY",?69,"TRAVEL" Line Location: SUBHEAD+6
Function Call: WRITE	Prompt: !,APCLSORT,?28,"CONTACTS",?38,"PROVIDER",?48,"PROVIDER",?58,"TIME*",?69,"TIME" Line Location: SUBHEAD+7
Function Call: WRITE	Prompt: !,APCL80S,! Line Location: SUBHEAD+8
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: ! Line Location: HEAD1+2
Function Call: WRITE	Prompt: APCLDT,?72,"Page ",APCLPG,! Line Location: HEAD1+3
Function Call: WRITE	Prompt: ?((80-APCLLENG)/2),APCLSORT," REPORT BY ",APCLSECS," FOR ",$P(^APCLACTG(APCLACTG,0),U)," STAFF",! Line Location: HEAD1+4
Function Call: WRITE	Prompt: ?18,"VISIT DATES: ",APCLBDD," TO ",APCLEDD,! Line Location: HEAD1+5
Function Call: WRITE	Prompt: $$CTR^APCLCP1P(X),! Line Location: HEAD1+8
Function Call: WRITE	Prompt: $$CTR^APCLCP1P(X),! Line Location: HEAD1+11
Routine Call	DIR Line Location: HEAD+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCLACTG - [#9001003.6]	HEAD1+4
^AUTTSU - [#9999999.22]	SUBHEAD+2
^DIC(4 - [#4]	P+3, SUBHEAD+3, HEAD1+7
^DIC(40.7 - [#40.7]	HEAD1+10
^XTMP(	START+7, START+8, DONE+2!, LOC+2, LOC+3, LOC+5, LOC+6, LOC+7, P+1, P+6 , P+7

Label References

Name	Line Occurrences
DONE	START+7
HEAD	START+7, LOC+1, P+2, NOTE+1
HEAD1	HEAD
LOC	START+8
NOTE	LOC+8
P	LOC+3
SUBHEAD	LOC+1, P+2

Naked Globals

Name	Field # of Occurrence
^(	P+6, P+7

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCL80S	START+2*, SUBHEAD+8
>> APCLACTG	HEAD1+4
>> APCLBD	START+4
>> APCLBDD	START+4*, HEAD1+5
>> APCLBT	START+7, START+8, DONE+2, LOC+2, LOC+3, LOC+5, LOC+6, LOC+7, P+1, P+6 , P+7
>> APCLCLN	HEAD1+9, HEAD1+10
>> APCLCLN(	HEAD1+10
>> APCLDT	START+1*, HEAD1+3
>> APCLED	START+4
>> APCLEDD	START+4*, HEAD1+5
>> APCLGLOB	P+4
>> APCLJOB	START+7, START+8, DONE+2, LOC+2, LOC+3, LOC+5, LOC+6, LOC+7, P+1, P+6 , P+7
>> APCLLENG	SUBHEAD+2, SUBHEAD+3, SUBHEAD+4, HEAD1+4*
>> APCLLOC	HEAD1+6, HEAD1+7
>> APCLLOC(	HEAD1+7
>> APCLNSP	START+7, START+8, DONE+2, LOC+2, LOC+3, LOC+5, LOC+6, LOC+7, P+1, P+6 , P+7
>> APCLPG	START+5, HEAD, HEAD1+1, HEAD1+3
>> APCLPIEC	P+4
APCLQUIT	START+6!, START+8, LOC+1, LOC+3, P+2, SUBHEAD+1, HEAD+1*, NOTE+1
>> APCLSECS	SUBHEAD+4, HEAD1+4
>> APCLSECV	SUBHEAD+2, SUBHEAD+3
>> APCLSORT	SUBHEAD+7, HEAD1+4
>> APCLSORV	P+3, P+4
>> APCLSU	START+5, START+8, LOC+2, LOC+3, LOC+5, LOC+6, LOC+7, P+1, P+6, P+7 , SUBHEAD+2, SUBHEAD+3
>> APCLSUB	START+3*, LOC+2, LOC+5, LOC+6, P+1, P+6, P+7
>> APCLVAL	LOC+3*, P+1, P+3, P+4, P+6, P+7
>> APCLVALP	SUBHEAD+2, SUBHEAD+3, SUBHEAD+4
>> APCLZ	P+3, P+4, P+5
DIR	HEAD+1!
DIR(0	HEAD+1*
>> DTOUT	HEAD+1
>> G	P+4*
IO	HEAD+1
IO(0	HEAD+1
IOF	HEAD1+1
IOSL	P+2, NOTE+1
IOST	HEAD+1
U	LOC+2, LOC+5, LOC+6, P+1, P+3, P+4, P+6, P+7, SUBHEAD+2, SUBHEAD+3 , HEAD1+4, HEAD1+7, HEAD1+10
X	START+1, LOC+2, LOC+5, LOC+6, P+1, P+6~, P+7, HEAD1+6, HEAD1+7, HEAD1+8 , HEAD1+9, HEAD1+10, HEAD1+11
>> Y	START+1, START+4, LOC+2, LOC+5, LOC+6, P+1, P+6, P+7, HEAD+1, HEAD1+7* , HEAD1+10*
Z	LOC+5, LOC+6, P+6~, P+7

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLCP3P

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: