Routine: BHSDM3

Package	Total	Call Graph
Health Summary Components	4	$$REFDF^BHSDM3 $$DNKA^BHSDM4 $$LASTHF^BHSMU ($$LASTFLU,$$LASTTD)^BHSMU2
IHS VA Utilities	2	$$VAL^XBDIQ1 $$PROVCLSC^XBFUNC1
Kernel	1	($$FMADD,$$FMTE)^XLFDT
Patient Care Component	1	$$REFDF^APCHS9B3
Patient Care Component Reports	1	($$CLINIC,$$PRIMPOV)^APCLV

Package

Total

Call Graph

Health Summary Components

$$REFDF^BHSDM3 $$DNKA^BHSDM4 $$LASTHF^BHSMU ($$LASTFLU,$$LASTTD)^BHSMU2

IHS VA Utilities

$$VAL^XBDIQ1 $$PROVCLSC^XBFUNC1

Kernel

($$FMADD,$$FMTE)^XLFDT

Patient Care Component

$$REFDF^APCHS9B3

Patient Care Component Reports

($$CLINIC,$$PRIMPOV)^APCLV

Package	Total	Caller Graph
Health Summary Components	5	BHSDM3 BHSDM4 BHSDM5 BHSDM6 BHSDMPRE

Package

Total

Caller Graph

Health Summary Components

BHSDM3 BHSDM4 BHSDM5 BHSDM6 BHSDMPRE

Entry Points

Name	Comments	DBIA/ICR reference
DIETV(P)	;EP
BI()	;EP- check to see if using new imm package or not 1/5/1999 IHS/CMI/LAB
TD(P,BHSED)	;EP
SELF(P,D)	;EP
EDT(E)	;
DIETP(V)	;are any providers an 07 or 29
FLU(P)	;EP
EDUCREF	;EP - gather up all education provided in past year in APCHX
FLU1
REFDF(P,F,I,D)	;EP - dm item refused?
FLUR	;

External References

Name	Field # of Occurrence
$$REFDF^APCHS9B3	TD+26, TD+28
$$CLINIC^APCLV	DIETV+12, DIETV+14
$$PRIMPOV^APCLV	DIETV+20
$$REFDF^BHSDM3	TD+5, TD+7, TD+9, TD+11, TD+13, TD+15, TD+17, TD+19, TD+21, TD+23 , FLUR+1, FLUR+3, FLUR+5, FLUR+7
$$DNKA^BHSDM4	DIETV+11
$$LASTHF^BHSMU	SELF+12
$$LASTFLU^BHSMU2	FLU+2
$$LASTTD^BHSMU2	TD+2
$$VAL^XBDIQ1	REFDF+8, REFDF+9, SELF+10, SELF+11
$$PROVCLSC^XBFUNC1	DIETP+5
$$FMADD^XLFDT	TD+3
$$FMTE^XLFDT	TD+4, TD+30, FLU1+1, FLUR+9, REFDF+8, REFDF+9, DIETV+20, SELF+10, SELF+11, EDUCREF+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	SELF+8, EDT+4, EDT+6, EDT+8, EDT+10
^ATXAX("B"	SELF+5, EDT+3, EDT+5, EDT+7, EDT+9
^AUPNPREF("AA"	REFDF+5, EDUCREF+2
^AUPNVMED - [#9000010.14]	SELF+8, SELF+10, SELF+11
^AUPNVMED("AA"	SELF+7, SELF+8
^AUPNVPOV("AD"	DIETV+9
^AUPNVPRV - [#9000010.06]	DIETP+4
^AUPNVPRV("AD"	DIETV+10, DIETP+3
^AUPNVSIT - [#9000010]	DIETV+6, DIETV+7, DIETV+8, DIETV+13, DIETV+20, SELF+10, SELF+11
^AUPNVSIT("AA"	DIETV+4, DIETV+5
^AUTTEDT - [#9999999.09]	EDUCREF+3, EDT+11
^AUTTIMM("C"	TD+5, TD+7, TD+9, TD+11, TD+13, TD+15, TD+17, TD+19, TD+21, TD+23 , TD+26, TD+28, FLUR+1, FLUR+3, FLUR+5, FLUR+7
^AUTTIMM(0	BI+1
^DD(9000010.06	DIETP+5

Name	Line Occurrences
$$BI	FLUR+1, FLUR+3, FLUR+5, FLUR+7
$$DIETP	DIETV+15
$$EDT	EDUCREF+2
FLUR	FLU+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	FLU+1~, SELF+3~, SELF+4, SELF+7, SELF+8, SELF+9, SELF+10, SELF+11
%DT	TD+1~
>> APCHD	EDUCREF+2*, EDUCREF+3
APCHX	EDUCREF+1!
APCHX(	EDUCREF+3*
APCHY	TD+1~, FLU+1~, EDUCREF+1!, EDUCREF+2*, EDUCREF+3
B	TD+1~
>> BHSBEG	EDUCREF+2
>> BHSDFN	SELF+12
BHSED	TD~
>> BHSPAT	FLUR+1, FLUR+3, FLUR+5, FLUR+7, EDUCREF+2
D	FLU1~, FLU1+1, REFDF~, REFDF+4, REFDF+8, DIETV+4~, DIETV+5, SELF~, SELF+2, SELF+7
DT	TD+3, FLU1
E	TD+1~, FLU+1~, EDT~, EDT+4, EDT+6, EDT+8, EDT+10
F	REFDF~, REFDF+2, REFDF+5, REFDF+8, REFDF+9
G	TD+5, TD+6, TD+7, TD+8, TD+9, TD+10, TD+11, TD+12, TD+13, TD+14 , TD+15, TD+16, TD+17, TD+18, TD+19, TD+20, TD+21, TD+22, TD+23, TD+24 , TD+26, TD+27, TD+28, TD+29, FLUR+1, FLUR+2, FLUR+3, FLUR+4, FLUR+5, FLUR+6 , FLUR+7, FLUR+8, DIETV+4~, DIETV+5, DIETV+14, DIETV+16, DIETV+19, DIETV+20, SELF+8
H	DIETP+2~, DIETP+3, DIETP+5, DIETP+7
I	REFDF~, REFDF+3, REFDF+5, REFDF+8, REFDF+9, SELF+3~, SELF+7*, SELF+8
LFLU	FLU+1~, FLU+2*, FLU+3, FLU1+1, FLUR+1, FLUR+3, FLUR+5, FLUR+7, FLUR+9
P	TD~, TD+2, TD+5, TD+7, TD+9, TD+11, TD+13, TD+15, TD+17, TD+19 , TD+21, TD+23, TD+26, TD+28, FLU~, FLU+2, REFDF~, REFDF+1, REFDF+5, DIETV~ , DIETV+1, DIETV+4, DIETV+5, SELF~, SELF+1, SELF+7, SELF+8
T	FLU+1~, SELF+5~, SELF+6, SELF+8, EDT+2~, EDT+3, EDT+4, EDT+5, EDT+6, EDT+7 , EDT+8, EDT+9, EDT+10, EDT+11, EDT+12, EDT+13
TDD	TD+1~, TD+2*, TD+4, TD+30
U	TD+30, FLU1+1, FLUR+9, DIETV+7, DIETV+8, DIETV+13, DIETV+20, DIETP+4, DIETP+5, SELF+8 , SELF+10, SELF+11, EDUCREF+3, EDT+11
V	DIETV+4~, DIETV+5, DIETV+6, DIETV+7, DIETV+8, DIETV+9, DIETV+10, DIETV+11, DIETV+12, DIETV+13 , DIETV+14, DIETV+15, DIETV+16, DIETP~, DIETP+1, DIETP+3, SELF+3~, SELF+8, SELF+12
X	TD+1~, TD+3, TD+4, FLU+1~, REFDF+5~, REFDF+6, REFDF+7, DIETV+4~, DIETV+15*, DIETV+16 , DIETP+2~
Y	TD+1~, REFDF+7~, REFDF+8, REFDF+9, DIETP+2~, DIETP+4, DIETP+5*
Z	DIETP+2~, DIETP+3*, DIETP+4

Customize PDF page

Package: Health Summary Components

Routine: BHSDM3

Information

Source Information