Routine: BHSAPRO

Package	Total	Call Graph
Health Summary	2	REGDT4^GMTSU CKP^GMTSUP
Health Summary Components	1	PRTTXT^BHSUTL
VA Fileman	1	(,C)^%DTC

Entry Points

Name	Comments	DBIA/ICR reference
MEDBLD	;
CONT	; <SETUP>
MEDSNDUP	; *********** ALL, NON DUPLICATED ***********
MEDSCURR	; ************** CURRENT MEDICATIONS * 9000010.14 ********
ALL	;all meds included
SITE	;
CHRONIC	;chronic meds only
MEDDSP	;
MEDSCHRN	; *********** CHRONIC MEDCICATIONS **********
NODUP	;
MEDSALL	; **************** ALL MEDICATIONS * 9000010.14 **********
CURR	; current meds only
MEDX
REF	;
SIG	;

External References

Name	Field # of Occurrence
^%DTC	CURR+2, MEDDSP+11
C^%DTC	CONT+3, MEDDSP+13
PRTTXT^BHSUTL	MEDDSP+38
REGDT4^GMTSU	MEDDSP+8, MEDDSP+13, MEDDSP+21, MEDDSP+22
CKP^GMTSUP	CONT+5, MEDDSP+28, MEDDSP+37

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: CONT+5
Function Call: WRITE	Prompt: ?12,IOINHI,BHSMED," #",BHSQTY,IOINLOW," (",BHSDYS," days) ",BHSEXP,! Line Location: MEDDSP+30
Function Call: WRITE	Prompt: !,BHSDAT Line Location: MEDDSP+31
Function Call: WRITE	Prompt: IOINHI Line Location: MEDDSP+33
Function Call: WRITE	Prompt: ?12,BHSMED," #",BHSQTY Line Location: MEDDSP+34
Function Call: WRITE	Prompt: IOINLOW Line Location: MEDDSP+35
Function Call: WRITE	Prompt: " (",BHSDYS," days) ",BHSEXP,! Line Location: MEDDSP+36
Function Call: WRITE	Prompt: ?10," ------ MUST REWRITE THIS CONTROLLED DRUG----",! Line Location: MEDDSP+40
Function Call: WRITE	Prompt: ?14,"PROVIDER INITIALS: ______________________________ DATE_________",! Line Location: MEDDSP+41
Function Call: WRITE	Prompt: ?14,"REFILL 1______2______3______4______5______NR______DC______",! Line Location: MEDDSP+42

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMED - [#9000010.14]	MEDBLD+5, MEDDSP+5, MEDDSP+20
^AUPNVMED("AA"	CONT+8
^AUPNVMED("AC"	CONT+4
^AUPNVSIT - [#9000010]	SITE+3
^PS(51 - [#51]	SIG+4
^PS(55 - [#55]	CHRONIC+3, MEDDSP+7
^PSDRUG - [#50]	MEDBLD+6, MEDDSP+14, MEDDSP+16
^PSRX - [#52]	REF+3
^PSRX("APCC"	CHRONIC+2, MEDDSP+6
^TMP($J	CONT+7!, CONT+10, MEDX+2!, CURR+1, CURR+3, ALL+1, NODUP+1, NODUP+2, CHRONIC+1, CHRONIC+5 , MEDDSP+4

Label References

Name	Line Occurrences
@(	MEDBLD+11
CONT	MEDSCURR+1, MEDSALL+1, MEDSCHRN+1, MEDSNDUP+1
MEDBLD	CONT+8
MEDDSP	CONT+10
REF	MEDDSP+26
SIG	MEDDSP+25
SITE	MEDDSP+27

Naked Globals

Name	Field # of Occurrence
^(	CHRONIC+2, MEDDSP+6
^(21	SITE+3
^(9	SIG+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BHSALL	MEDX+1!
BHSCRN	MEDX+1!, MEDDSP+7*, MEDDSP+32
BHSDAT	MEDX!, MEDDSP+8*, MEDDSP+31
BHSDC	MEDX!, MEDBLD+8, CURR+3, ALL+1, NODUP+2, CHRONIC+5, MEDDSP+9, MEDDSP+21, MEDDSP+22
BHSDRG	MEDX+1!
BHSDTM	MEDX!, MEDBLD+7, CURR+2, MEDDSP+8, MEDDSP+11, MEDDSP+13
BHSDYS	MEDX!, MEDBLD+8, MEDBLD+9, CURR+2, MEDDSP+9, MEDDSP+10, MEDDSP+13, MEDDSP+36
BHSEXP	MEDX!, MEDDSP+12, MEDDSP+13, MEDDSP+21, MEDDSP+22, MEDDSP+36
BHSICL	MEDDSP+38*!
BHSIG	MEDX!, MEDDSP+9, MEDDSP+25, MEDDSP+26, MEDDSP+27, MEDDSP+38, SIG+3, SIG+4
BHSITE	MEDX+1!, MEDDSP+27, SITE+2, SITE+3
BHSIVD	CONT+8, CONT+10, MEDX!, MEDBLD+7, CURR+3, ALL+1, NODUP+2, CHRONIC+5, MEDDSP+4, MEDDSP+8
BHSMED	MEDX!, MEDDSP+14*, MEDDSP+34
BHSMFX	MEDX!, MEDBLD+8, CURR+1, CURR+3, ALL+1, NODUP+1, NODUP+2, CHRONIC+1, CHRONIC+5, MEDDSP+9 , MEDDSP+14, MEDDSP+16
BHSMTS	MEDX!
BHSMTY	MEDSCURR+1, MEDSALL+1, MEDSCHRN+1, MEDSNDUP+1, MEDX+1!, MEDBLD+11, MEDDSP+32
BHSMX	CONT+8, MEDX!, MEDBLD+5, CURR+3, ALL+1, NODUP+2, CHRONIC+2, CHRONIC+5, MEDDSP+4, MEDDSP+5 , MEDDSP+6, MEDDSP+20
BHSN	MEDX!, MEDBLD+5, MEDBLD+6, MEDBLD+8, MEDDSP+5, MEDDSP+9, MEDDSP+14
BHSNAB	MEDX+1!
BHSNARC	MEDX+1!, MEDDSP+16*, MEDDSP+17
BHSNARF	MEDDSP+17!*, MEDDSP+40
BHSNFL	MEDX+1!
BHSNRQ	MEDDSP+38*!
BHSNSH	MEDX+1!
BHSP	MEDX!, MEDDSP+38!, SIG+3*, SIG+4
BHSPAT	CONT+1~, CONT+2*, CONT+4, CONT+8, CHRONIC+3, MEDDSP+7
BHSQ	CONT+1~, CONT+8, CONT+10
BHSQTY	MEDX!, MEDDSP+9*, MEDDSP+34
BHSREF	MEDX+1!, MEDDSP+26, REF+2, REF+3, REF+4*
BHSRFL	MEDX+1!, REF+3*, REF+4
BHSRTN	MEDX+4!, MEDDSP+20*, MEDDSP+21, MEDDSP+22, MEDDSP+23!
BHSRX	MEDX+1!, MEDDSP+6*, MEDDSP+7, REF+2, REF+3
BHSSGY	MEDX!, MEDDSP+25, SIG+3, SIG+5
BHSTXT	MEDX+1!, MEDDSP+38*
BHSVDF	MEDX!, MEDDSP+9*, SITE+3
BHSVSC	MEDX+1!
>> DFN	CONT+2
DT	CONT+3, CURR+2, MEDDSP+11
>> GMTSDLM	CONT+3*, CONT+8
>> GMTSNPG	CONT+5
>> GMTSQIT	CONT+5, MEDDSP+28, MEDDSP+37
U	MEDBLD+6, MEDBLD+8, MEDDSP+9, MEDDSP+14, MEDDSP+16, MEDDSP+20, REF+3, SITE+3
X	CONT+3, MEDX+3!, CURR+2, CHRONIC+2, CHRONIC+3, MEDDSP+8, MEDDSP+13, MEDDSP+21, MEDDSP+22, SIG+3* , SIG+4*, SIG+5
X1	CONT+3!, MEDX+3!, CURR+2, MEDDSP+11, MEDDSP+13
X2	CONT+3!, MEDX+3!, CURR+2, MEDDSP+11, MEDDSP+13
Y	MEDX+3!, CHRONIC+3, CHRONIC+4, SIG+4

Customize PDF page

Package: Health Summary Components

Routine: BHSAPRO

Information

Source Information

Call Graph

Call Graph Total: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: