Routine: APCLYV42

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

Package

Total

Call Graph

Patient Care Component Reports

DONE^APCLOSUT ^APCLYV43

VA Fileman

^DIR

Package	Total	Caller Graph
Patient Care Component Reports	1	APCLYV43

Package

Total

Caller Graph

Patient Care Component Reports

APCLYV43

Name	Comments	DBIA/ICR reference
HEAD
SET	;set up print fields
END	;
HEAD0	;EP
TIME
TOTALS	;print totals
INIT	;initialize variables
SET0
SET1
SET2
PAGE	;form feed to new page
FINAL	;print grand totals

Name	Field # of Occurrence
DONE^APCLOSUT	END+1
^APCLYV43	INIT+1
^DIR	TOTALS+5, PAGE+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !?21,$E(APCLVDT,4,5),"/",$E(APCLVDT,6,7),"/",$E(APCLVDT,2,3) Line Location: SET2+4
Function Call: WRITE	Prompt: ?45,$J(APCLCNT,5) Line Location: SET2+5
Function Call: WRITE	Prompt: !!?30,"TOTAL VISITS: ",$J(APCLTOT,5),!! Line Location: FINAL+3
Function Call: WRITE	Prompt: !!?21,"TOTAL VISITS FOR CLINIC:",?45,$J(APCLCTOT,5) Line Location: TOTALS+2
Function Call: WRITE	Prompt: ! Line Location: TOTALS+5
Function Call: WRITE	Prompt: !!,$P(^VA(200,DUZ,0),"^",2),?(80-$L(X)/2),X,?70,"Page ",APCLPAGE Line Location: HEAD+1
Function Call: WRITE	Prompt: !,Y Line Location: HEAD+2
Function Call: WRITE	Prompt: ?(80-$L(X)/2),X Line Location: HEAD+5
Function Call: WRITE	Prompt: !,Y Line Location: HEAD+6
Function Call: WRITE	Prompt: ?28,"for ",$E(APCLBD,4,5),"/",$E(APCLBD,6,7),"/",$E(APCLBD,2,3) Line Location: HEAD+7
Function Call: WRITE	Prompt: " to ",$E(APCLED,4,5),"/",$E(APCLED,6,7),"/",$E(APCLED,2,3) Line Location: HEAD+8
Function Call: WRITE	Prompt: !!?20,"VISIT DATES",?41,"NUMBER OF VISITS" Line Location: HEAD+9
Function Call: WRITE	Prompt: !!,$P(^VA(200,DUZ,0),"^",2),?(80-$L(X)/2),X,?70,"Page ",APCLPAGE Line Location: HEAD0+2
Function Call: WRITE	Prompt: !,Y Line Location: HEAD0+3
Function Call: WRITE	Prompt: !,Y Line Location: HEAD0+5
Function Call: WRITE	Prompt: ?28,"for ",$E(APCLBD,4,5),"/",$E(APCLBD,6,7),"/",$E(APCLBD,2,3) Line Location: HEAD0+6
Function Call: WRITE	Prompt: " to ",$E(APCLED,4,5),"/",$E(APCLED,6,7),"/",$E(APCLED,2,3) Line Location: HEAD0+7
Function Call: WRITE	Prompt: !!!!,"NUMBER OF VISITS: ","No visits to report." Line Location: HEAD0+8
Function Call: WRITE	Prompt: ! Line Location: PAGE+3
Routine Call	DIR Line Location: TOTALS+5 PAGE+3

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	HEAD+6, HEAD0+5
^DIC(4 - [#4]	HEAD, HEAD0+1
^DIC(40.7 - [#40.7]	HEAD+3, HEAD0+4
^VA(200 - [#200]	HEAD+1, HEAD0+2
^XTMP("APCLYV4"	INIT+2, SET0, SET1, SET2, SET2+2, END+4!

Name	Line Occurrences
END	SET2+1, SET2+3, FINAL+1, FINAL+2, TOTALS+1, HEAD0+8
FINAL	SET0
HEAD	SET1+1, PAGE+1, PAGE+4
HEAD0	INIT+2
PAGE	SET2+3, FINAL+2, TOTALS+1
SET0	SET1
SET1	SET2+1
SET2	SET2+5
TIME	HEAD+2, HEAD0+3
TOTALS	SET2+1

Name	Field # of Occurrence
^(0	HEAD+3, HEAD0+4

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%A	TIME+1*, TIME+2, TIME+3!
%B	TIME+1*, TIME+3!
%C	TIME+2*, TIME+3!
>> APCLBD	INIT+1, HEAD+7, HEAD0+6
>> APCLBT	INIT+2, SET0, SET1, SET2, SET2+2, END+4
>> APCLCL	INIT+1, FINAL+1
APCLCLP	SET+1, SET0, SET1, SET2, SET2+2, END+2!, HEAD+4
APCLCLX	SET0+1, SET1, SET2, SET2+2, END+2!, HEAD+3, HEAD0+4
APCLCNT	SET2+2*, SET2+5, END+2!
APCLCTOT	SET1+1, SET2+2, END+2!, TOTALS+2, TOTALS+3
>> APCLED	INIT+1, HEAD+8, HEAD0+7
>> APCLJOB	INIT+2, SET0, SET1, SET2, SET2+2, END+4
APCLPAGE	INIT+2, INIT+3, END+2!, HEAD, HEAD+1, HEAD0+1, HEAD0+2
APCLSTOP	INIT+2, INIT+3, SET2+1, SET2+3, FINAL+2, END+2!, TOTALS+1, TOTALS+5, PAGE+3, PAGE+4
APCLTOT	INIT+3, FINAL+3, END+2!, TOTALS+3
APCLVDT	SET1+1, SET2, SET2+1, SET2+2, SET2+4, END+2!
DIR	TOTALS+5!, PAGE+3!
DIR(0	TOTALS+5, PAGE+3
DT	HEAD+6, HEAD0+5
>> DTOUT	TOTALS+5, PAGE+3
DUZ	HEAD+1, HEAD0+2
DUZ(2	HEAD, HEAD0+1
IO	TOTALS+5, PAGE+3
IO(0	TOTALS+5, PAGE+3
IOF	END+3, HEAD, HEAD0+1
IOSL	SET2+3, FINAL+2, TOTALS+1
IOST	END+3, TOTALS+5, PAGE+1, PAGE+3
>> X	HEAD, HEAD+1, HEAD+2, HEAD+4, HEAD+5, HEAD0+1, HEAD0+2, HEAD0+3*, TIME, TIME+1
>> Y	TOTALS+5, HEAD+2, HEAD+3, HEAD+4, HEAD+6, HEAD0+3, HEAD0+4, HEAD0+5, PAGE+3, TIME* , TIME+3*

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLYV42

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: