Routine: BHSDM5

Package	Total	Call Graph
Health Summary Components	3	$$REFDF^BHSDM3 $$HYSTER^BHSDM4 $$TYPEREF^BHSMU
Kernel	2	$$FMTE^XLFDT $$VERSION^XPDUTL
Patient Care Component Reports	2	$$LASTMAM^APCLAPI1 $$START1^APCLDF
Health Summary	1	REGDT4^GMTSU
IHS Patient	1	$$AGE^AUPNPAT
IHS VA Utilities	1	$$VAL^XBDIQ1
Patient Care Component	1	$$MAMREF^APCHS9B4
Taxonomy	1	$$ICD^ATXAPI
VA Fileman	1	(,C)^%DTC
Women's Health	1	($$BNEED,$$CNEED)^BWUTL1

Package

Total

Call Graph

Health Summary Components

$$REFDF^BHSDM3 $$HYSTER^BHSDM4 $$TYPEREF^BHSMU

Kernel

$$FMTE^XLFDT $$VERSION^XPDUTL

Patient Care Component Reports

$$LASTMAM^APCLAPI1 $$START1^APCLDF

Health Summary

REGDT4^GMTSU

IHS Patient

$$AGE^AUPNPAT

IHS VA Utilities

$$VAL^XBDIQ1

Patient Care Component

$$MAMREF^APCHS9B4

Taxonomy

$$ICD^ATXAPI

VA Fileman

(,C)^%DTC

Women's Health

($$BNEED,$$CNEED)^BWUTL1

Entry Points

Name	Comments	DBIA/ICR reference
PAP	;EP
BI()	;EP- check to see if using new imm package or not 1/5/1999 IHS/CMI/LAB
PPDS(P)	;EP
ACE(P,D)	;EP - return date of last ACE iNHIBITOR
PAPA
ASPREF(P)	;EP - CHECK FOR ASPIRIN NMI OR REFUSAL
PNEU(P)	;EP
PPDSPL	;CHECK PL
MAMA	;
PPD(P)	;EP
MAM	;EP

External References

Name	Field # of Occurrence
^%DTC	MAMA+9
C^%DTC	MAMA+8
$$MAMREF^APCHS9B4	MAM+8
$$LASTMAM^APCLAPI1	MAM+8
$$START1^APCLDF	PNEU+1, PNEU+4, PNEU+7, PPD+1, PPD+3, PPDS+5, PPDSPL+11
$$ICD^ATXAPI	PPDSPL+8
$$AGE^AUPNPAT	MAMA+1, MAMA+2, PAP+4
$$REFDF^BHSDM3	PNEU+12, PNEU+14, PNEU+16, PPD+5
$$HYSTER^BHSDM4	PAPA
$$TYPEREF^BHSMU	ASPREF+12
$$BNEED^BWUTL1	MAM+11
$$CNEED^BWUTL1	PAP+9
REGDT4^GMTSU	MAMA+8
$$VAL^XBDIQ1	ASPREF+12
$$FMTE^XLFDT	ACE+11, ACE+12, ACE+18, ACE+19, ASPREF+12, PNEU+11, PPD+2, PPD+4, PPDSPL+12
$$VERSION^XPDUTL	MAM+9, PAP+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	MAM+10, PAP+8
^ATXAX - [#9002226]	ACE+16, ASPREF+7, PPDS+9
^ATXAX("B"	ACE+13, ASPREF+4, PPDS+7, PPDSPL+4
^AUPNHF("AA"	PPDS+9
^AUPNPREF("AA"	ASPREF+6, ASPREF+8, ASPREF+9
^AUPNPROB - [#9000011]	PPDSPL+8
^AUPNPROB("AC"	PPDSPL+7
^AUPNVMED - [#9000010.14]	ACE+9, ACE+11, ACE+12, ACE+16, ACE+18, ACE+19
^AUPNVMED("AA"	ACE+8, ACE+9, ACE+15, ACE+16
^AUPNVSIT - [#9000010]	ACE+11, ACE+12, ACE+18, ACE+19
^AUPNVSK - [#9000010.12]	PPD+2
^AUTTIMM("C"	PNEU+12, PNEU+14, PNEU+16
^AUTTIMM(0	BI+1
^AUTTSK("B"	PPD+5
^BWP - [#9002086]	MAM+11, PAP+9
^DPT - [#2]	MAM+5, PAP+4
^PSDRUG - [#50]	ACE+9

Name	Line Occurrences
$$BI	PNEU+1, PNEU+12, PNEU+14, PNEU+16
MAMA	MAM+9
PAPA	PAP+7
PPDSPL	PPDS+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ACE+6~, ACE+7, ACE+8, ACE+9, ACE+10, ACE+11, ACE+12, ACE+15, ACE+16, ACE+17 , ACE+18, ACE+19, PNEU+1, PNEU+4, PNEU+7, PPD+1~*
APCHY	PNEU+1~, PNEU+4!, PNEU+7!, PNEU+10!, PPD+1~, PPD+3!
APCHY(	PNEU+10*
APCHY(1	PNEU+2, PNEU+5, PNEU+8, PNEU+11, PNEU+12, PNEU+14, PNEU+16, PPD+2, PPD+4
APCHY(2	PNEU+3, PNEU+6, PNEU+9, PNEU+11
BHS	PPDS+3~, PPDS+4!, PPDS+6, PPDSPL+11!
BHS(1	PPDSPL+12
BHSAVX	MAM+10!, PAP+8!
BHSBWR	MAM+10, MAM+11, MAMA+7!, PAP+8, PAP+9
BHSDAT	MAM+1!, MAM+3, MAM+8, MAMA+5, MAMA+6, MAMA+8, MAMA+9, PAP+1!, PAP+2, PAPA+2*
>> BHSDD	MAMA+9
BHSDF1	MAM+6!, PAP+5!
BHSEXD	MAM+6!, PAP+5!
>> BHSINT	MAMA+4*, MAMA+8, MAMA+9
>> BHSPAT	MAM+5, MAM+8, MAM+11, MAMA+1, MAMA+2, PAP+4, PAP+9, PAPA, PNEU+12, PNEU+14 , PNEU+16, PPD+5
BHSTEX	MAM+1!, PAP+1!
BHSTEX(	MAM+11, PAP+9, PAPA+1*
BHSTEX(""	MAM+12, PAPA+2
BHSTEX(1	MAM+11!, MAMA+5, MAMA+6, MAMA+8, MAMA+9, PAP+9!
BHSTP	PAP+1!, PAPA*, PAPA+1
BHSTXN	MAM+7, MAM+11, MAMA+3!, PAP+6, PAP+9, PAPA+1*
>> BHSWD	MAMA+8*, MAMA+9
C	PNEU+1~, PNEU+10*
D	ACE~, ACE+5, ACE+8, ACE+15, ASPREF+2~, ASPREF+6, ASPREF+7, ASPREF+8, ASPREF+9, ASPREF+10
DATE	ASPREF+2~, ASPREF+10*, ASPREF+12
DRUG	ASPREF+2~, ASPREF+10*, ASPREF+12
DT	MAMA+1, MAMA+2, MAMA+9, PAP+4, PAPA
E	PNEU+1, PNEU+4, PNEU+7, PPD+1~, PPD+3, PPDS+3~, PPDS+5, PPDSPL+11*
G	ACE+9, ACE+16, ASPREF+6, ASPREF+10, ASPREF+11, PNEU+12, PNEU+13, PNEU+14, PNEU+15, PNEU+16* , PNEU+17, PPD+5, PPD+6, PPDS+9~, PPDS+10
I	ACE+6~, ACE+8, ACE+9, ACE+15, ACE+16, PPDSPL+6~, PPDSPL+7, PPDSPL+8, PPDSPL+9
IEN	ASPREF+2~, ASPREF+10*, ASPREF+12
N	ASPREF+2~, ASPREF+9*, ASPREF+10
P	ACE~, ACE+4, ACE+8, ACE+9, ACE+15, ACE+16, ASPREF~, ASPREF+1, ASPREF+6, ASPREF+8 , ASPREF+9, PNEU~, PNEU+1, PNEU+4, PNEU+7, PPD~, PPD+1, PPD+3, PPDS~, PPDS+5 , PPDS+9, PPDSPL+7, PPDSPL+11
PNEU	PNEU+1~
PNEU(	PNEU+10
PNEU(9999999	PNEU+2, PNEU+3, PNEU+5, PNEU+6, PNEU+8, PNEU+9
T	ACE+13~, ACE+14, ACE+16, ASPREF+4, ASPREF+5, ASPREF+7, PPDS+7~, PPDS+8, PPDS+9, PPDSPL+1~ , PPDSPL+4, PPDSPL+5, PPDSPL+8
TAXARR	PPDSPL+1~, PPDSPL+3*
U	MAM+5, MAMA+5, PAP+4, ACE+9, ACE+11, ACE+12, ACE+16, ACE+18, ACE+19, PNEU+2 , PNEU+3, PNEU+5, PNEU+6, PNEU+8, PNEU+9, PNEU+11, PNEU+12, PNEU+14, PNEU+16, PPD+2 , PPD+4, PPDSPL+8, PPDSPL+12
V	ACE+6~, ACE+9, ACE+16
X	MAM+10, MAMA+8, MAMA+9, PAP+8, ASPREF+2~, ASPREF+3!, ASPREF+8, ASPREF+9, ASPREF+10, PNEU+1~ , PNEU+10, PPD+1~, PPD+3, PPDS+3~, PPDS+5, PPDS+9, PPDSPL+6~, PPDSPL+7, PPDSPL+8, PPDSPL+11
X1	MAM+2~, MAMA+8, MAMA+9
X2	MAM+2~, MAMA+8, MAMA+9
Y	PPD+1~, PPDSPL+6~, PPDSPL+8
Z	ASPREF+2~

Customize PDF page

Package: Health Summary Components

Routine: BHSDM5

Information

Source Information