Routine: BHSMEDSF

Information

BHSMEDSF ;IHS/CIA/MGH - Health Summary for V MED file ;01-May-2014 10:15;DU

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
Health Summary Components	2	(HOLDDSP,MEDRU)^BHSMED DISPREF^BHSRAD
Kernel	2	($$FMADD,$$FMTE)^XLFDT $$LOW^XLFSTR
Health Summary	1	CKP^GMTSUP
IHS VA Utilities	1	$$VAL^XBDIQ1
VA Fileman	1	$$GET1^DIQ

Caller Graph

Caller Graph Total: 3

Package	Total	Caller Graph
Health Summary Components	3	BHSMEDAL BHSMEDH BHSMEDI

Entry Points

Name	Comments	DBIA/ICR reference
OTH	;gather up all others by date range in components, get last of each
GETMEDS(DFN,Y,Z,SIGT)	;PEP - return array of meds for patient P
SETNVA	;
SITE	;DETERMINE IF OUTSIDE LOCATION INFO PRESENT
S(Y,F,C,T)	;set up array
S1	;
MEDS	;EP - called from component - <SETUP>
CHRONIC(N)	;EP
SIG	;CONSTRUCT THE FULL TEXT FROM THE ENCODED SIG
SETARRAY	;DISPLAY MEDICATION
MEDX	;
NONVA	; S DFN=APCHSPAT,PSOACT=1 D ^PSOHCSUM
DISPLAY	;
REORDER	;

External References

Name	Field # of Occurrence
HOLDDSP^BHSMED	MEDS+10
MEDRU^BHSMED	MEDS+15
DISPREF^BHSRAD	MEDS+3, MEDS+13
$$GET1^DIQ	SETARRAY+15
CKP^GMTSUP	MEDS+4, DISPLAY+2, DISPLAY+4
$$VAL^XBDIQ1	REORDER+2, REORDER+3
$$FMADD^XLFDT	GETMEDS+16, GETMEDS+18
$$FMTE^XLFDT	SETARRAY+6, SETARRAY+10, SETNVA+3, SETNVA+7
$$LOW^XLFSTR	SETARRAY+11, SETNVA+8

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ?4,"LAST OF EACH CHRONIC MEDICATION (no limit on days)",?57,"Last fill date",!! Line Location: DISPLAY+1
Function Call: WRITE	Prompt: ^TMP("BHSMEDS",$J,"C",BHSX),! Line Location: DISPLAY+2
Function Call: WRITE	Prompt: !?4,"LAST OF EACH OTHER MEDICATION "_GMTSEGL_"",?57,"Last fill date",!! Line Location: DISPLAY+3
Function Call: WRITE	Prompt: ^TMP("BHSMEDS",$J,"A",BHSX),! Line Location: DISPLAY+4

FileNo	Call Tags
^PSDRUG - [#50]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMED - [#9000010.14]	GETMEDS+24, GETMEDS+25, GETMEDS+27, OTH+3, OTH+4, OTH+6, NONVA+3, CHRONIC+2, CHRONIC+4, SETARRAY+3
^AUPNVMED("AA"	GETMEDS+22, GETMEDS+23, OTH+1, OTH+2
^AUPNVMED("AC"	MEDS+3
^AUPNVSIT - [#9000010]	SETARRAY+6, SITE+2, SITE+3, SITE+4
^DIC(4 - [#4]	SITE+4
^DPT - [#2]	GETMEDS+12
^PS(50.7 - [#50.7]	NONVA+9
^PS(51 - [#51]	SIG+3
^PS(55 - [#55]	NONVA+2, NONVA+3, NONVA+4, NONVA+7, NONVA+9, NONVA+10, CHRONIC+6
^PSDRUG - [#50]	NONVA+9, NONVA+10, SETARRAY+9
^PSRX("APCC"	CHRONIC+5
^TMP("BHSMEDS"	MEDX+1!, DISPLAY+1, DISPLAY+2, DISPLAY+3, DISPLAY+4, GETMEDS+10!, REORDER+6!, S1+1, S1+2, S1+3*
^TMP($J	MEDX+1!, GETMEDS+10!, GETMEDS+25, GETMEDS+27, OTH+4, OTH+6, NONVA+10*, REORDER+2, REORDER+3, REORDER+7!

Label References

Name	Line Occurrences
$$CHRONIC	GETMEDS+26, OTH+5
DISPLAY	MEDS+8
GETMEDS	MEDS+7
S	SETARRAY+13, SETARRAY+16, SETARRAY+17, SETNVA+9, SETNVA+10
S1	S+5, S+7, S+10
SETARRAY	REORDER+4, REORDER+5
SETNVA	SETARRAY+2
SIG	SETARRAY+11, SETNVA+8
SITE	SETARRAY+12

Naked Globals

Name	Field # of Occurrence
^(	CHRONIC+5
^(21	SITE+2
^(9	SIG+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	GETMEDS+9~, SETARRAY+3, SETARRAY+4, SETARRAY+6, SETARRAY+8, SETARRAY+9, S+8, S+9, S1+2, S1+3
A	GETMEDS+9~, REORDER+3~
A(	REORDER+3*, REORDER+5
B	GETMEDS+9~, SETNVA+7*, SETNVA+9
BHSC	REORDER+4~, REORDER+5~
BHSFN	MEDS+3, MEDS+13, MEDS+16!
BHSPAT	MEDS+1~, MEDS+2*, MEDS+3, MEDS+7, NONVA+2, NONVA+3, NONVA+4, NONVA+7, NONVA+9, NONVA+10
BHST	MEDS+3, MEDS+13, MEDS+16!
BHSX	MEDX+2!, DISPLAY+2, DISPLAY+4, REORDER+4~, REORDER+5~
C	GETMEDS+9~, REORDER+2, REORDER+3, S~, S+7
D	GETMEDS+9~, NONVA+7, NONVA+8, NONVA+9, NONVA+10, SETARRAY+6, SETARRAY+7, SETARRAY+13, SETNVA+1, SETNVA+2 , SETNVA+3*, SETNVA+9
DFN	MEDS+2, GETMEDS~, GETMEDS+11, GETMEDS+12, GETMEDS+22, GETMEDS+23, OTH+1, OTH+2
DRG	SETARRAY+1~, SETARRAY+4*, SETARRAY+15
DT	GETMEDS+16, GETMEDS+18
DUZ(2	SITE+4
E	GETMEDS+9~, SETARRAY+8, SETARRAY+10, SETNVA+4*, SETNVA+7
F	GETMEDS+9~, S~, S+2, S+5
G	GETMEDS+9~, SETARRAY+8, SETARRAY+11, SETARRAY+13, SETNVA+5, SETNVA+8, SETNVA+9, SIG+1, SIG+2, SIG+3
>> GMTS1	GETMEDS+13
>> GMTS2	GETMEDS+14
>> GMTSDLM	MEDS+6, GETMEDS+22, OTH+1, NONVA+6
>> GMTSEGL	DISPLAY+3
>> GMTSQIT	MEDS+4, MEDS+11, DISPLAY+2, DISPLAY+4
H	GETMEDS+9~
I	GETMEDS+9~, GETMEDS+21~, GETMEDS+22, GETMEDS+23, OTH+1~, OTH+2, REORDER+2~, REORDER+3~, REORDER+4~, REORDER+5~ , S1+1, S1+2, S1+3
J	GETMEDS+9~
K	GETMEDS+9~, SETARRAY+9, SETARRAY+13, SETNVA+6, SETNVA+9
L	GETMEDS+9~, NONVA+4, NONVA+5, NONVA+6, NONVA+10, S+7*
M	GETMEDS+9~, REORDER+2~
M(	REORDER+2*, REORDER+4
N	GETMEDS+9~, NONVA+9, NONVA+10, REORDER+2~, REORDER+3~, REORDER+4~, REORDER+5~*, CHRONIC~, CHRONIC+1, CHRONIC+2 , CHRONIC+4, CHRONIC+5, SETARRAY+2, SETARRAY+3, SETARRAY+9, SETNVA+1, SETNVA+4, SETNVA+5, SETNVA+6
O	GETMEDS+9~, REORDER+2~, REORDER+3~
P	GETMEDS+9~, CHRONIC+3~, CHRONIC+4, CHRONIC+6, SIG+2~, SIG+3
Q	GETMEDS+9~, SETARRAY+8*, SETARRAY+13
R	GETMEDS+9~
RXNORM	SETARRAY+1~, SETARRAY+15*, SETARRAY+17
S	GETMEDS+9~, REORDER+2~, REORDER+3~, SETARRAY+16, SITE+1, SITE+2, SITE+4*
SIGT	GETMEDS~, SIG+1
T	GETMEDS+9~, SETARRAY+6, SETARRAY+7, SETARRAY+8, SETARRAY+13, S~, S+3, S+7*, S+8, S+9
U	GETMEDS+25, GETMEDS+27, OTH+4, OTH+6, NONVA+3, NONVA+4, NONVA+7, NONVA+9, NONVA+10, CHRONIC+4 , SETARRAY+6, SETARRAY+8, SETARRAY+9, SETNVA+1, SETNVA+4, SETNVA+5, SETNVA+6, SITE+2, SITE+3, SITE+4 , S1+2
V	GETMEDS+9~, SETARRAY+6*, SETARRAY+7, SITE+2, SITE+3, SITE+4
W	GETMEDS+9~
X	MEDX+3!, GETMEDS+9~, GETMEDS+23~, GETMEDS+24, GETMEDS+25, GETMEDS+26, GETMEDS+27, OTH+2, OTH+3, OTH+4 , OTH+5, OTH+6, NONVA+2, NONVA+3, NONVA+4, NONVA+7, NONVA+9, NONVA+10, CHRONIC+3~, CHRONIC+5 , CHRONIC+6, SETARRAY+13, SETARRAY+16, SETARRAY+17, SETNVA+9, SETNVA+10, SIG+2, SIG+3, SIG+4, S+1~ , S+5, S+6, S+8, S+9*, S1+3
X1	MEDX+3!
X2	MEDX+3!
Y	MEDS+6, MEDS+7, MEDX+3!, GETMEDS~, GETMEDS+13, GETMEDS+16, GETMEDS+17, CHRONIC+3~, CHRONIC+6, CHRONIC+7 , SIG+3, S~, S+6, S+7, S+9
Z	MEDS+6, MEDS+7, GETMEDS~, GETMEDS+14, GETMEDS+18, GETMEDS+19, SETARRAY+11, SETNVA+8, SIG+1, SIG+2 , SIG+4*

Customize PDF page

Package: Health Summary Components

Routine: BHSMEDSF

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: