Routine: APCM13EP

Package	Total	Call Graph
Patient Care Component Table Maintiance	4	(,$$SN,W)^APCM13EH SAVEDEL^APCM13EQ SUM^APCM13ER LIST^APCM13NP
Kernel	3	^%ZISC $$FMTE^XLFDT $$REPEAT^XLFSTR
VA Fileman	3	COMMA^%DTC ^DIR ^DIWP
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component Reports	1	$$RBLK^APCLUTL

Package

Total

Call Graph

Patient Care Component Table Maintiance

(,$$SN,W)^APCM13EH SAVEDEL^APCM13EQ SUM^APCM13ER LIST^APCM13NP

Kernel

^%ZISC $$FMTE^XLFDT $$REPEAT^XLFSTR

VA Fileman

COMMA^%DTC ^DIR ^DIWP

IHS VA Utilities

$$VAL^XBDIQ1

Patient Care Component Reports

$$RBLK^APCLUTL

Package	Total	Caller Graph
Patient Care Component Table Maintiance	5	APCM13E APCM13ES APCM13ET APCM13H APCM13N

Package

Total

Caller Graph

Patient Care Component Table Maintiance

APCM13E APCM13ES APCM13ET APCM13H APCM13N

Entry Points

Name	Comments	DBIA/ICR reference
SUM	;summary sheet for each provider
USR()	;EP - Return name .
EOP	;EP - End of page.
DEL	;create delimited output file
SB(X)	;EP - Strip
WP	;
PRINT	;EP
V(T,R,N,P,PROV,K,RT)	;EP ;SPDX
DENOMO	;
PRINT1	;EP
PRINT2	;
CTR(X,Y)	;EP - Center X in a field Y wide.
SETN	;EP - set numerator fields
WPS	;
PRINT1N	;REORDER THE PRINT BY CORE,ORDER THEN MENU,ORDER
PRINT1H	;
SCREEN	;
PRNTM	;print 1 measure
HEADER	;EP
C(X,X2,X3)	;
PI1	;EP
EXCL	;
H2	;EP
H1	;EP
HEADER1	;
EXIT	;
CALC(N,O)	;ENTRY POINT
SUMEOP	;EP - End of page.

External References

Name	Field # of Occurrence
COMMA^%DTC	C+2
^%ZISC	DEL+1
$$RBLK^APCLUTL	C+1
^APCM13EH	PRINT+7, DEL+5
$$SN^APCM13EH	HEADER1+6
W^APCM13EH	PRINT+13, PRINT+15, WPS+3, PRINT2+3, PRINT2+5, PRINT2+9, PRINT2+13, PRINT2+16, PRINT2+19, PRINT2+23 , PRINT2+27, PRINT2+30, PRINT2+34, PRINT2+37, PRINT2+39, H2+2, H2+3, H2+4, H2+5, H2+6 , H2+14, H1+1, H1+2, H1+3, H1+4, H1+5, H1+6, H1+7, H1+8, HEADER1+2 , HEADER1+3, HEADER1+4, HEADER1+5, HEADER1+6, HEADER1+7, HEADER1+8, HEADER1+9, HEADER1+10, HEADER1+11, HEADER1+12 , PI1+14, PI1+15, PI1+19, PI1+20, PI1+21, PI1+22, PI1+23, PI1+28, PI1+29, DENOMO+13 , DENOMO+14, EXCL+2, EXCL+5, EXCL+6, EXCL+14, EXCL+18, EXCL+20, EXCL+22
SAVEDEL^APCM13EQ	DEL+13
SUM^APCM13ER	SUM+1
LIST^APCM13NP	PRINT+14, DEL+11
^DIR	EOP+5, SUMEOP+5, EXIT+1, HEADER+2
^DIWP	WP+5, PI1+11, DENOMO+10, EXCL+17
$$VAL^XBDIQ1	PRINT2+3
$$FMTE^XLFDT	HEADER1+2, HEADER1+10, HEADER1+11
$$REPEAT^XLFSTR	HEADER1+12

Name	Line Occurrences
Function Call: WRITE	Prompt: !,^TMP($J,"APCMDEL",X) Line Location: SCREEN+1
Function Call: WRITE	Prompt: ! Line Location: EXIT+1
Function Call: WRITE	Prompt: ! Line Location: HEADER+2
Routine Call	DIR Line Location: EOP+5 SUMEOP+5 EXIT+1 HEADER+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCM13OB - [#9001301.02]	WP+3, WP+5, PRINT1+4, PRINT1+5, PRINT2+3, PRINT2+7, PRINT2+9, PRINT2+14, PRINT2+16, PRINT2+21 , PRINT2+23, PRINT2+28, PRINT2+30, PRINT2+35, PRINT2+37, H2+6, H2+13, H1+5, H1+7, PI1+2 , PI1+10, PI1+11, PI1+20, PI1+21, PI1+22, PI1+28, PI1+29, DENOMO+1, DENOMO+2, DENOMO+9 , DENOMO+10, EXCL+4, EXCL+5, EXCL+7, SETN+5
^APCMM13C - [#9001301.03]	V+6, V+8
^APCMM13P - [#9001301.04]	V+10, V+12
^DD("FUNC" - [#.5]	SB+2
^DD(9001301.0311	PI1+4, DENOMO+4, EXCL+9
^DIC(4 - [#4]	PRINT1H+1, HEADER1+7, HEADER1+9
^TMP($J	PRINT+1!, PRINT+4, PRINT+16!, DEL+2!, DEL+3, DEL+15!, SCREEN+1
^UTILITY($J	WP+1!, WPS+1, WPS+3, WPS+5!, PI1+8!, PI1+14, PI1+17!, DENOMO+7!, DENOMO+13, DENOMO+16! , EXCL+13!, EXCL+18, EXCL+21!
^VA(200 - [#200]	PRINT1+9, HEADER1+2, HEADER1+6, USR+1
^XTMP("APCM1D"	PRINT+17!, DEL+14!

Label References

Name	Line Occurrences
$$C	H2+2, H2+4, PI1+19, PI1+20, PI1+21
$$SB	H2+10, H2+12
$$V	PI1+5, PI1+6, EXCL+10, SETN+1, SETN+2
DEL	PRINT+5
EOP	PRINT+17, DEL+16
EXCL	DENOMO+1
H1	PRNTM+4
H2	DENOMO+17
HEADER	WPS+2, PRINT2+1, PRINT2+4, PRINT2+8, PRINT2+11, PRINT2+15, PRINT2+18, PRINT2+22, PRINT2+25, PRINT2+29 , PRINT2+32, PRINT2+36, PRNTM+3, EXCL+12
HEADER1	PRINT1N+1, HEADER+1
PRINT1	PRINT+10, DEL+7
PRINT1H	PRINT1+7
PRINT1N	PRINT1+11, PRINT1H+3
PRINT2	PRINT1N+4
PRNTM	PRINT2+40
SETN	DENOMO+5
SUM	PRINT+12, DEL+9
SUMEOP	PRINT+11

Name	Field # of Occurrence
^(0	USR+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	SB+1~
>> APCM1	EXCL+4*, EXCL+5
>> APCMADDQ("ANS"	EXCL+1, EXCL+6
>> APCMBD	HEADER1+10
>> APCMCM	PRINT1N+2*, PRINT1N+3, PRINT1N+4
>> APCMCOL	WP+3
>> APCMCYD	PI1+5, PI1+19, PI1+25, PI1+27, SETN+6
>> APCMCYN	H2+2, H2+9, SETN+1, SETN+3, SETN+6
>> APCMCYP	H2+3, H2+10, SETN+6*
>> APCMDF	PI1+2*, PI1+4
>> APCMED	HEADER1+10
>> APCMEF	EXCL+7*, EXCL+9
>> APCMEV	EXCL+10*, EXCL+11, EXCL+16, EXCL+20
>> APCMFAC	PRINT1H+1, PRINT1H+2
>> APCMGPG	PRINT+8, HEADER+1, HEADER1+1, HEADER1+2
>> APCMGUI	PRINT+2
>> APCMH	PRINT+17, DEL+14
>> APCMIC	WP+3, WP+5, PRINT1N+4*, PRINT2+3, PRINT2+7, PRINT2+9, PRINT2+14, PRINT2+16, PRINT2+21, PRINT2+23 , PRINT2+28, PRINT2+30, PRINT2+35, PRINT2+37, H2+6, H2+13, H1+5, H1+7, PI1+2, PI1+10 , PI1+11, PI1+20, PI1+21, PI1+22, PI1+28, PI1+29, DENOMO+1, DENOMO+2, DENOMO+9, DENOMO+10 , EXCL+1, EXCL+4, EXCL+5, EXCL+6, EXCL+7, SETN+5
>> APCMIND(	PRINT1+3
APCMINDO	PRINT1+2!
APCMINDO(	PRINT1+6*, PRINT1N+2, PRINT1N+3, PRINT1N+4
>> APCMIOSL	PRINT+2*, WPS+2, PRINT2+4, PRINT2+8, PRINT2+11, PRINT2+15, PRINT2+18, PRINT2+22, PRINT2+25, PRINT2+29 , PRINT2+32, PRINT2+36, PRNTM+3, EXCL+12
>> APCMJ	PRINT+17, DEL+14
>> APCMLCNT	WP+2, WP+4, WP+5
>> APCMMO	PRINT1N+3*, PRINT1N+4
>> APCMNF	DENOMO+2*, DENOMO+3, DENOMO+4
>> APCMNODE	WP+3, WP+5, PRINT2+6, PRINT2+7, PRINT2+9, PRINT2+12, PRINT2+14, PRINT2+16, PRINT2+20, PRINT2+21 , PRINT2+23, PRINT2+26, PRINT2+28, PRINT2+30, PRINT2+33*, PRINT2+35, PRINT2+37
>> APCMNP	PI1+4, DENOMO+4, EXCL+9*
>> APCMPBD	HEADER1+11
>> APCMPED	HEADER1+11
>> APCMPNAM	PRINT1+10, PRINT1+11, PRINT1H+1
>> APCMPRD	PI1+6, PI1+20, PI1+26, PI1+27, SETN+7
>> APCMPRN	H2+4, H2+11, SETN+2, SETN+4, SETN+7
APCMPROV	PRINT1+8!, PRINT1+11, PRINT1H+2, HEADER1+6, HEADER1+7, PI1+5, PI1+6, EXCL+6, EXCL+10, SETN+1 , SETN+2
APCMPROV(	PRINT1+9*, PRINT1+10, PRINT1+11
>> APCMPRP	H2+5, H2+12, SETN+7*
>> APCMPRV(	PRINT1+9
>> APCMPTYP	PRINT+6, PRINT+13, PRINT+15, DEL+4, WPS+2, WPS+3, PRINT1N+1, PRINT2+1, PRINT2+3, PRINT2+4 , PRINT2+5, PRINT2+8, PRINT2+9, PRINT2+11, PRINT2+13, PRINT2+15, PRINT2+16, PRINT2+18, PRINT2+19, PRINT2+22 , PRINT2+23, PRINT2+25, PRINT2+27, PRINT2+29, PRINT2+30, PRINT2+32, PRINT2+34, PRINT2+36, PRINT2+37, PRINT2+39 , H2+1, H2+2, H2+3, H2+4, H2+5, H2+6, H2+7, H2+14, H1+1, H1+2 , H1+3, H1+4, H1+5, H1+6, H1+7, H1+8, HEADER1+1, HEADER1+2, HEADER1+3, HEADER1+4 , HEADER1+5, HEADER1+6, HEADER1+7, HEADER1+8, HEADER1+9, HEADER1+10, HEADER1+11, HEADER1+12, PRNTM+3, PI1+14 , PI1+15, PI1+18, PI1+19, PI1+20, PI1+21, PI1+22, PI1+23, PI1+24, PI1+28, PI1+29 , DENOMO+13, DENOMO+14, EXCL+2, EXCL+5, EXCL+6, EXCL+12, EXCL+14, EXCL+15, EXCL+18, EXCL+20 , EXCL+22
>> APCMQUIT	PRINT+3, PRINT+9, DEL+6, DEL+8, DEL+10, DEL+12, WPS+2, PRINT1+10, PRINT1+11, PRINT1N+2 , PRINT1N+3, PRINT1N+4, PRINT2+1, PRINT2+4, PRINT2+7, PRINT2+8, PRINT2+10, PRINT2+11, PRINT2+14, PRINT2+15 , PRINT2+17, PRINT2+18, PRINT2+21, PRINT2+22, PRINT2+24, PRINT2+25, PRINT2+28, PRINT2+29, PRINT2+31, PRINT2+32 , PRINT2+35, PRINT2+36, PRINT2+38, HEADER+2, PRNTM+3, EXCL+12
>> APCMROT	PRINT+5, PRINT+17
>> APCMRPT	PI1+5, PI1+6, EXCL+10, SETN+1, SETN+2
>> APCMRPTT	PRINT1+7, HEADER1+4, HEADER1+5, HEADER1+6, HEADER1+7, HEADER1+9, PI1+5, PI1+6, EXCL+10, SETN+1 , SETN+2
>> APCMSUM	PRINT+10, DEL+7
>> APCMTOT	HEADER1+8, PI1+5, PI1+6, EXCL+10, SETN+1, SETN+2
>> APCMWPP	HEADER1+11
>> APCMX	PRINT2+7, PRINT2+9, PRINT2+14, PRINT2+16, PRINT2+21, PRINT2+23, PRINT2+28, PRINT2+30, PRINT2+35, PRINT2+37 , H2+8, H2+9, H2+10, H2+11, H2+12, H2+13, H2+14, PI1+11, PI1+15, DENOMO+10* , DENOMO+14
>> APCMY	WP+3, WP+5
APCMZ	WP+2, WP+3, WP+5, PI1+9, PI1+10, PI1+11, PI1+14, PI1+16!, DENOMO+8, DENOMO+9* , DENOMO+10, DENOMO+13, DENOMO+15!, EXCL+1, EXCL+4, EXCL+5, EXCL+6, EXCL+18*, EXCL+19!
>> C	PRINT1+4*, PRINT1+6
DFOUT	EOP+4!, SUMEOP+4!
DIR	EOP+3~, SUMEOP+3~, EXIT+1!, HEADER+2!
DIR("A"	EOP+5, SUMEOP+5, EXIT+1*
DIR(0	EOP+5, SUMEOP+5, EXIT+1, HEADER+2
DIRUT	EOP+4!, SUMEOP+4!, EXIT+1*
DIWF	WP+3*, WPS+4!, PI1+16!, DENOMO+15!, EXCL+19!
DIWL	WP+3, WPS+1, WPS+3, WPS+4!, PI1+10, PI1+14, PI1+16!, DENOMO+9, DENOMO+13, DENOMO+15! , EXCL+16, EXCL+18, EXCL+19!
DIWR	WP+3, WPS+4!, PI1+10, PI1+16!, DENOMO+9, DENOMO+15!, EXCL+16, EXCL+19!
DLOUT	EOP+4!, SUMEOP+4!
DT	HEADER1+2
DTOUT	EOP+4!, SUMEOP+4!, HEADER+2
DUOUT	EOP+4!, SUMEOP+4!, EXIT+1
DUZ	HEADER1+2, USR+1
DUZ(2	HEADER1+9
I	V+1~, V+2, V+3, V+4*, V+6, V+10
IO	EXIT+1, HEADER+2
IO("S"	EOP+2, SUMEOP+2
IO(0	EXIT+1, HEADER+2
IOF	HEADER1+1
IOM	CTR+1
IOSL	PRINT+2
IOST	EOP+1, SUMEOP+1, EXIT+1, HEADER+2
>> IOT	EOP+2, SUMEOP+2
J	V+1~, V+6, V+7, V+8, V+10, V+11, V+12
K	V~, V+4, V+6, V+8, V+10, V+12
N	CALC~, CALC+2, PI1+4, PI1+5, PI1+6, DENOMO+4, EXCL+9*, EXCL+10, SETN+1, SETN+2 , V~, V+8, V+12
O	PRINT1+5*, PRINT1+6, CALC~, CALC+2
P	PI1+4, PI1+5, PI1+6, DENOMO+4, EXCL+9*, EXCL+10, SETN+1, SETN+2, V~, V+8 , V+12
PROV	V~, V+2, V+3
R	V~, V+6, V+8, V+10, V+12
RT	V~, V+2, V+3
T	V~, V+5, V+9
U	PRINT1+4, PRINT1+5, PRINT1+9, PRINT1H+1, PRINT2+3, H2+10, H2+11, H2+12, H2+13, H1+5 , H1+7, HEADER1+2, HEADER1+6, HEADER1+7, HEADER1+9, USR+1, PI1+2, PI1+4, PI1+20, PI1+21 , PI1+22, PI1+28, PI1+29, DENOMO+1, DENOMO+2, DENOMO+4, EXCL+7, EXCL+9, SETN+5, V+8 , V+12
X	WP+5, WPS+5!, PRINT1+3, PRINT1+4, PRINT1+5, PRINT1+6, PRINT1+9, SCREEN+1, SB~, SB+3 , C~, C+1, C+3, HEADER1+2, HEADER1+6, HEADER1+7, HEADER1+8, HEADER1+9, HEADER1+10, HEADER1+11* , HEADER1+12, CTR~, CTR+1, PI1+11, DENOMO+10, EXCL+16, V+1~, V+5, V+7, V+8 , V+9, V+11, V+12
X2	C~
X3	C~
Y	HEADER+2, CTR~, CTR+1, PI1+27, PI1+28, PI1+29, V+1~
Z	WPS+1, WPS+3, WPS+4!, CALC+1~, CALC+2, CALC+3, V+1~
>> ZTQUEUED	EOP+2, SUMEOP+2, EXIT+1, HEADER+2

Customize PDF page

Package: Patient Care Component Table Maintiance

Routine: APCM13EP

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: