Routine: APCHS9B5

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

Package

Total

Call Graph

Patient Care Component

$$REFDF^APCHS9B3 ($$HYSTER,$$MAMREF)^APCHS9B4 $$TYPEREF^APCHSMU

Kernel

$$FMTE^XLFDT $$VERSION^XPDUTL

Patient Care Component Reports

$$LASTMAM^APCLAPI1 $$START1^APCLDF

$$AGE^AUPNPAT

$$VAL^XBDIQ1

$$ICD^ATXAPI

(,C)^%DTC

($$BNEED,$$CNEED)^BWUTL1

Package	Total	Caller Graph
Patient Care Component	4	APCHS9B1 APCHS9B2 APCHS9D1 APCHSM06

Package

Total

Caller Graph

Patient Care Component

APCHS9B1 APCHS9B2 APCHS9D1 APCHSM06

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
$$REFDF^APCHS9B3	PNEU+12, PNEU+14, PNEU+16, PPD+5
$$HYSTER^APCHS9B4	PAPA+1
$$MAMREF^APCHS9B4	MAM+7
$$TYPEREF^APCHSMU	ASPREF+12
$$LASTMAM^APCLAPI1	MAM+7
$$START1^APCLDF	PNEU+1, PNEU+4, PNEU+7, PPD+1, PPD+3, PPDS+5, PPDSPL+6
$$ICD^ATXAPI	PPDSPL+3
$$AGE^AUPNPAT	MAMA+1, MAMA+2, PAP+4
$$BNEED^BWUTL1	MAM+10
$$CNEED^BWUTL1	PAP+9
$$VAL^XBDIQ1	ASPREF+12
$$FMTE^XLFDT	ACE+11, ACE+12, ACE+18, ACE+19, ASPREF+12, PNEU+11, PPD+2, PPD+4, PPDSPL+7
$$VERSION^XPDUTL	MAM+8, PAP+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("TEST"	MAM+9, PAP+8
^ATXAX - [#9002226]	ACE+16, ASPREF+7, PPDS+9
^ATXAX("B"	ACE+13, ASPREF+4, PPDS+7, PPDSPL+1
^AUPNHF("AA"	PPDS+9
^AUPNPREF("AA"	ASPREF+6, ASPREF+8, ASPREF+9
^AUPNPROB - [#9000011]	PPDSPL+3
^AUPNPROB("AC"	PPDSPL+3
^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+10, PAP+9
^DPT - [#2]	MAM+4, PAP+4
^PSDRUG - [#50]	ACE+9

Name	Line Occurrences
$$BI	PNEU+1, PNEU+12, PNEU+14, PNEU+16
MAMA	MAM+8
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~*
APCHS	PPDS+3~, PPDS+4!, PPDS+6, PPDSPL+6!
APCHS(1	PPDSPL+7
APCHSAVX	MAM+9!, PAP+8!
APCHSBWR	MAM+9, MAM+10, MAMA+7!, PAP+8, PAP+9
>> APCHSCVD	MAMA+8
APCHSDAT	MAM+1!, MAM+2, MAM+7, MAMA+5, MAMA+6, MAMA+8, MAMA+9, PAP+1!, PAP+2, PAPA+3*
>> APCHSDD	MAMA+9
APCHSDF1	MAM+5!, PAP+5!
APCHSEXD	MAM+5!, PAP+5!
>> APCHSINT	MAMA+4*, MAMA+8, MAMA+9
>> APCHSPAT	MAM+4, MAM+7, MAM+10, MAMA+1, MAMA+2, PAP+4, PAP+9, PAPA+1, PNEU+12, PNEU+14 , PNEU+16, PPD+5
APCHSTEX	MAM+1!, PAP+1!
APCHSTEX(	MAM+10, PAP+9, PAPA+2*
APCHSTEX(""	MAM+11, PAPA+3
APCHSTEX(1	MAM+10!, MAMA+5, MAMA+6, MAMA+8, MAMA+9, PAP+9!
APCHSTP	PAP+1!, PAPA+1*, PAPA+2
APCHSTXN	MAM+6, MAM+10, MAMA+3!, PAP+6, PAP+9, PAPA+2*
>> APCHSWD	MAMA+8*, MAMA+9
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
>> C	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+1
E	PNEU+1, PNEU+4, PNEU+7, PPD+1~, PPD+3, PPDS+3~, PPDS+5, PPDSPL+6*
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+3~*, PPDSPL+4
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+3, PPDSPL+6
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+2, PPDSPL+3
U	MAM+4, 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+3, PPDSPL+7
V	ACE+6~, ACE+9, ACE+16
X	MAM+9, 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+3~, PPDSPL+6*
>> X1	MAMA+8, MAMA+9
>> X2	MAMA+8, MAMA+9
Y	MAMA+8, PPD+1~, PPDSPL+3~
Z	ASPREF+2~

Customize PDF page

Package: Patient Care Component

Routine: APCHS9B5

Information

Source Information