Routine: APCHPWHM

Package	Total	Call Graph
Patient Care Component	4	S^APCHPWH1 SUBHEAD^APCHPWHU REF^APCHS7O GETMEDS^APCHSMU1
VA Fileman	2	$$GET1^DIQ ^DIWP
Kernel	1	($$FMADD,$$FMDIFF,$$FMTE)^XLFDT
Order Entry Results Reporting	1	$$VALUE^ORCSAVE2
Outpatient Pharmacy	1	OCL^PSOORRL

Name	Comments	DBIA/ICR reference
DISP	;display them now, this was a pain
SET	;
GETPSIFN(ORIFN)	;
NVINST(Y)	;
HOLD(S)	;EP - is this prescription on hold?
SETMULT(Y,SUB)	;
GETVMEDE	;NOW GET OUTSIDE MEDS DEFINED AS ANY WITH 1108 FIELD OR EVENT VISIT SERVICE CATEGORY
HLDRSN(ORIFN)	;
OPINST(Y)	;
MEDS	;EP - medications component
GETRXS	;
SET1	;
GETCMF1(ORIFN)	;EP
WPVAL(Y,ORN,ID)	;
MEDSACT	;EP - medications (active) component
GRP2	;
NVREASON(Y,NVSDT)	;
GETEXP	;get expired chronic meds in past 120 days

Name	Field # of Occurrence
S^APCHPWH1	DISP+2, DISP+3, DISP+4, DISP+5, DISP+6, DISP+7, DISP+15, DISP+16, DISP+19, DISP+20 , DISP+24, DISP+25, DISP+26, DISP+27, DISP+33, DISP+36, DISP+37, DISP+39
SUBHEAD^APCHPWHU	DISP+1
REF^APCHS7O	GETRXS+40, GRP2+11, SET+3
GETMEDS^APCHSMU1	GETVMEDE+2
$$GET1^DIQ	HLDRSN+7, HLDRSN+8, GETCMF1+3
^DIWP	DISP+18, DISP+35
$$VALUE^ORCSAVE2	GETCMF1+4
OCL^PSOORRL	GETRXS+5
$$FMADD^XLFDT	GETRXS+5, GETVMEDE+2, GETEXP+3
$$FMDIFF^XLFDT	GRP2+4
$$FMTE^XLFDT	GETRXS+41, DISP+39

FileNo	Call Tags
^PSRX - [#52]	GET1^DIQ

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMED - [#9000010.14]	GETVMEDE+6, GETVMEDE+8, GETVMEDE+9, GETVMEDE+10, GETVMEDE+11, GETVMEDE+14, SET1+1, SET1+2, SET1+3, SET+2
^AUPNVSIT - [#9000010]	GETVMEDE+7
^DIC(9.4 - [#9.4]	GETPSIFN+3
^OR(100 - [#100]	GETRXS+12, GETRXS+13, NVREASON+3, NVREASON+4, WPVAL+2, WPVAL+3, HLDRSN+2, HLDRSN+3, HLDRSN+4, GETPSIFN+2
^PS(55 - [#55]	GETEXP+4, GETEXP+5, GRP2+1, GRP2+2
^PSDRUG - [#50]	GETRXS+14, GETVMEDE+11, GETEXP+8, GETEXP+9
^PSRX - [#52]	GETRXS+32, GETRXS+34, GETRXS+35, GETRXS+36, GETRXS+37, GETRXS+38, GETEXP+6, GETEXP+7, GETEXP+11, GETEXP+13 , GETEXP+14, GETEXP+15, GETEXP+16, GETEXP+19, GRP2+4, GRP2+6, GRP2+7, GRP2+8, GRP2+9, GRP2+12 , SET+1, HOLD+2, HOLD+7
^TMP("PS"	GETRXS+3!, GETRXS+7, GETRXS+9, GETRXS+18, GETRXS+19, GETRXS+20, GETRXS+57!, SETMULT+3, SETMULT+4
^UTILITY($J	DISP+18!, DISP+19, DISP+20, DISP+21!, DISP+35!, DISP+36, DISP+37, DISP+38!

Name	Line Occurrences
$$GETPSIFN	HLDRSN+5, GETCMF1+2
$$HLDRSN	GETRXS+54
DISP	MEDS+12
GETEXP	MEDS+11
GETRXS	MEDS+9
GETVMEDE	MEDS+10
GRP2	GETEXP+36
MEDS	MEDSACT+2
NVINST	GETRXS+46
NVREASON	GETRXS+48
OPINST	GETRXS+28
SETMULT	GETRXS+51, OPINST+2, OPINST+4, OPINST+5, OPINST+6, NVINST+2, NVINST+4, NVINST+5, NVINST+6
WPVAL	NVREASON+5

Name	Field # of Occurrence
^(	GETRXS+20*, WPVAL+3
^("P"	GETRXS+9
^(4	GETPSIFN+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APCHACTO	MEDSACT+1*, MEDSACT+3!, MEDS+11, DISP+23
APCHALL	MEDS+8~, GETEXP+2!
APCHALL(	GETRXS+23, GETRXS+24, GETRXS+44, GETVMEDE+12, GETEXP+10, GETEXP+21, GETEXP+24, GETEXP+25, GETEXP+27, GETEXP+28 , GETEXP+29
>> APCHC	DISP+8, DISP+13, DISP+14, DISP+32*, DISP+33
>> APCHD	DISP+30*, DISP+31, DISP+39
>> APCHI	DISP+11, DISP+12, DISP+29, DISP+30, DISP+31
APCHKEEP	GETEXP+2!, GETEXP+23!
APCHKEEP(	GETEXP+26, GETEXP+29*, GETEXP+31, GETEXP+32, GETEXP+33, GETEXP+34, GETEXP+35
APCHM	GETVMEDE+1!
APCHMED	MEDS+8~, DISP+7
APCHMED(	GETRXS+27, GETRXS+29, GETRXS+33, GETRXS+39, GETRXS+40, GETRXS+41, GETRXS+45, GETRXS+47, GETRXS+49, GETRXS+50 , GETRXS+52, GETRXS+56, GETVMEDE+14, GRP2+6, GRP2+10, GRP2+11, GRP2+12, DISP+10, DISP+11, DISP+12 , SET1+1, SET1+2, SET1+3, SET+1, SET+2, SET+3*
APCHMED(2	DISP+28, DISP+29, DISP+30, DISP+31
>> APCHMEDE	DISP+23
APCHMEDS	GETRXS+8~, GETVMEDE+1!, GETVMEDE+2
APCHMEDS(	GETVMEDE+4, GETVMEDE+5, GETVMEDE+14
>> APCHN	DISP+9, DISP+10, DISP+11, DISP+12, DISP+28*, DISP+29, DISP+30, DISP+31, DISP+33
>> APCHP	GRP2+8*
>> APCHRXN	SET+1, SET+3
>> APCHSDFN	GETRXS+5, GETVMEDE+2, GETEXP+4, GETEXP+5, GETEXP+12, GRP2+1, GRP2+2
APCHSREF	GETRXS+8~, GETRXS+40, GRP2+11, SET+3*
APCHSRX	GETRXS+8~, GETRXS+40, GRP2+11, SET+3*
>> APCHZ	DISP+12, DISP+15, DISP+16, DISP+18, DISP+31, DISP+33, DISP+35, DISP+39
C	MEDS+3~, GRP2+2*, GRP2+3
CMF	GETRXS+8~, GETRXS+9*
COMMENTS	GETRXS+8~, GETRXS+9*, GETRXS+51, GETRXS+52
D	MEDS+3~, GETVMEDE+10, GETVMEDE+11, GETEXP+7, GETEXP+8, GETEXP+9, GETEXP+21, GETEXP+25, GETEXP+26, GETEXP+27 , GETEXP+28, GETEXP+29, GETEXP+32, GETEXP+33, GETEXP+34, GETEXP+35, GRP2+6, SET1+1, SET1+2, SET1+3 , SET+1, SET+2, SET+3
DA	WPVAL+1~, WPVAL+2*, WPVAL+3
DAT	GETRXS+2~
DAW	GETRXS+8~, GETRXS+9*
>> DAYS	GETRXS+4*, GETRXS+5
DEA	GETRXS+8~, GETRXS+9, GETRXS+14
>> DIWL	DISP+18, DISP+35
>> DIWR	DISP+18, DISP+35
DRUGNAME	GETRXS+8~, GETRXS+22, GETRXS+23, GETRXS+24, GETRXS+27, GETRXS+29, GETRXS+33, GETRXS+39, GETRXS+40, GETRXS+41 , GETRXS+43, GETRXS+44, GETRXS+45, GETRXS+47, GETRXS+49, GETRXS+50, GETRXS+52, GETRXS+56
DRUGND	GETRXS+8~, GETRXS+22, GETRXS+25, GETRXS+26*, GETRXS+27
DT	GETRXS+5, GETVMEDE+2, GETEXP+3, GRP2+4
EXPDT	MEDS+3~, GETEXP+3, GETEXP+4, GETEXP+5
>> F	DISP+20, DISP+37
FIELDS	GETRXS+8~, GETRXS+9*, GETRXS+10, GETRXS+11, GETRXS+12, GETRXS+16, GETRXS+17, GETRXS+22, GETRXS+25, GETRXS+26 , GETRXS+30, GETRXS+43, GETRXS+54, NVREASON+2
>> H	GETRXS+34*
I	MEDS+3~, GETRXS+36, GETRXS+37, GETRXS+38, OPINST+1~, NVINST+1~, WPVAL+1~, WPVAL+2, WPVAL+3, SETMULT+1~ , SETMULT+2, SETMULT+3, SETMULT+4, GETEXP+5, GETEXP+6, GETEXP+7, GETEXP+11, GETEXP+13, GETEXP+14, GETEXP+15 , GETEXP+16, GETEXP+19, GETEXP+21, GETEXP+28, GETEXP+29, GETEXP+34*, GETEXP+35, GRP2+1, GRP2+2, GRP2+4 , GRP2+6, GRP2+7, GRP2+8, GRP2+9, GRP2+11, GRP2+12
ID	WPVAL~, WPVAL+2
IFN	GETRXS+8~, GETRXS+12*, GETRXS+13, GETRXS+20, GETRXS+54
ILST	GETRXS+2~, GETRXS+6*
IND	GETRXS+8~, GETRXS+9*
INDEX	GETRXS+2~, GETRXS+6, GETRXS+7, GETRXS+9, GETRXS+18, GETRXS+19, GETRXS+27, GETRXS+29, GETRXS+33, GETRXS+39 , GETRXS+40, GETRXS+41, GETRXS+45, GETRXS+47, GETRXS+49, GETRXS+50, GETRXS+52, GETRXS+56, SETMULT+3, SETMULT+4
INSTRUCT	GETRXS+8~, GETRXS+9*, GETRXS+28, GETRXS+29, GETRXS+46, GETRXS+47
J	GETRXS+8~, GETRXS+30, GETRXS+31, GETRXS+32, GETRXS+34, GETRXS+35, GETRXS+40, GETRXS+41, WPVAL+1~, WPVAL+2
K	GETRXS+8~, GETRXS+34*, GETRXS+41
L	GETRXS+8~, GETRXS+35, GETRXS+36, GETRXS+37, GETRXS+38, GETRXS+39, GETEXP+13, GETEXP+14, GETEXP+15, GETEXP+16 , GETEXP+17, GETEXP+18, GETEXP+21, GETEXP+27, GETEXP+28, GETEXP+29, GETEXP+33*, GETEXP+34, GETEXP+35, GRP2+6
LINDEX	MEDS+8~, GETRXS+6, GETRXS+7, GETVMEDE+13, GETVMEDE+14, GRP2+5, GRP2+10, GRP2+11, GRP2+12
M	MEDS+3~, GETVMEDE+5*, GETVMEDE+6, GETVMEDE+8, GETVMEDE+9, GETVMEDE+10, GETVMEDE+11, SET1+1, SET1+2, SET1+3 , SET+2
N	MEDS+3~, GETVMEDE+11, GETVMEDE+12, GETVMEDE+14, GETEXP+9, GETEXP+10, GETEXP+21, GETEXP+24, GETEXP+25, GETEXP+26 , GETEXP+27, GETEXP+28, GETEXP+29, GETEXP+31, GETEXP+32, GETEXP+33, GETEXP+34, GETEXP+35, GRP2+6, GRP2+10 , GRP2+11, GRP2+12, SET1+1, SET1+2, SET1+3, SET+1, SET+2, SET+3
NVSDT	GETRXS+8~, GETRXS+48, GETRXS+50, NVREASON~, NVREASON+4*
ORIFN	HLDRSN~, HLDRSN+2, HLDRSN+3, HLDRSN+4, HLDRSN+5, GETCMF1~, GETCMF1+2, GETCMF1+4, GETPSIFN~, GETPSIFN+2
ORN	NVREASON+1~, NVREASON+2*, NVREASON+3, NVREASON+4, NVREASON+5, WPVAL~, WPVAL+2, WPVAL+3
P	MEDS+3~, GETEXP+11*, GETEXP+12
PKG	GETPSIFN+1~, GETPSIFN+2*, GETPSIFN+3
PRV	GETRXS+8~, GETRXS+9*
PSIFN	HLDRSN+1~, HLDRSN+5, HLDRSN+6, HLDRSN+7, HLDRSN+8, GETCMF1+1~, GETCMF1+2, GETCMF1+3, GETPSIFN+1~, GETPSIFN+2* , GETPSIFN+3
REASON	GETRXS+8~, GETRXS+9, GETRXS+41, GETRXS+48, GETRXS+49, GETRXS+54*, GETRXS+55, GETRXS+56
RSN	HLDRSN+1~, HLDRSN+4, HLDRSN+9, HLDRSN+10
RXN	GETRXS+8~, GETRXS+9, GETRXS+32, GETRXS+33
S	GETEXP+19, GETEXP+20, GETEXP+21, GETEXP+35, GETEXP+36, GRP2+8, GRP2+9, GRP2+10, HOLD~, HOLD+2 , HOLD+7
SUB	SETMULT~, SETMULT+3, SETMULT+4
TYPE	GETRXS+8~, GETRXS+16, GETRXS+17, GETRXS+18, GETRXS+19, GETRXS+20, GETRXS+21, GETRXS+42
U	GETRXS+9, GETRXS+10, GETRXS+11, GETRXS+12, GETRXS+14, GETRXS+16, GETRXS+22, GETRXS+25, GETRXS+26, GETRXS+29 , GETRXS+30, GETRXS+32, GETRXS+33, GETRXS+35, GETRXS+37, GETRXS+38, GETRXS+39, GETRXS+40, GETRXS+41, GETRXS+43 , GETRXS+47, GETRXS+49, GETRXS+50, GETRXS+52, GETRXS+54, GETRXS+56, NVREASON+2, NVREASON+4, GETPSIFN+2, GETVMEDE+5 , GETVMEDE+6, GETVMEDE+7, GETVMEDE+8, GETVMEDE+9, GETVMEDE+10, GETVMEDE+11, GETVMEDE+14, GETEXP+7, GETEXP+9, GETEXP+11 , GETEXP+13, GETEXP+15, GETEXP+16, GETEXP+19, GRP2+4, GRP2+6, GRP2+9, GRP2+10, GRP2+11, GRP2+12 , DISP+15, DISP+16, DISP+18, DISP+33, DISP+35, DISP+39, SET1+1, SET1+2, SET1+3, SET+1 , SET+2, SET+3, HOLD+2, HOLD+7
>> V	GETVMEDE+6*, GETVMEDE+7
X	MEDS+3~, GETRXS+8~, GETRXS+12, GETRXS+13, GETRXS+14, OPINST+1~, HLDRSN+1~, HLDRSN+2, HLDRSN+3, HLDRSN+4 , HLDRSN+7, HLDRSN+8, HLDRSN+9, GETVMEDE+4, GETVMEDE+5, GETVMEDE+14, DISP+14, DISP+15, DISP+16, DISP+18* , DISP+19, DISP+20, DISP+33, DISP+35, DISP+36, DISP+37, DISP+39, SET1+1, SET1+2, SET1+3 , SET+1, SET+2, SET+3, HOLD+1~, HOLD+2, HOLD+3, HOLD+7*, HOLD+8
Y	OPINST~, OPINST+2, OPINST+3, OPINST+4, OPINST+5, OPINST+6, NVINST~, NVINST+2, NVINST+3, NVINST+4 , NVINST+5, NVINST+6, NVREASON~, NVREASON+5, WPVAL~, WPVAL+3, SETMULT~, SETMULT+4, GRP2+3*, GRP2+4
Z	MEDS+3~, SET1+1, SET1+2, SET1+3, SET+1, SET+2, SET+3

Customize PDF page

Package: Patient Care Component

Routine: APCHPWHM

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: