Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BHSAPRO

Package: Health Summary Components

Routine: BHSAPRO


Information

BHSAPRO ;IHS/CIA/MGH - Health Summary for Medication Profile ;17-Mar-2006 10:36;MGH

Source Information

Source file <BHSAPRO.m>

Call Graph

Call Graph Total: 4

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*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All