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 |  Local Variables |  All
Print Page as PDF
Routine: BHSEYEKG

Package: Health Summary Components

Routine: BHSEYEKG


Information

BHSEYEKG ;IHS/CIA/MGH - Health Summary eye and EKG components ;05-Oct-2012 09:30;DU

Source Information

Source file <BHSEYEKG.m>

Call Graph

Call Graph Total: 5

Package Total Call Graph
Health Summary 2 REGDT4^GMTSU  CKP^GMTSUP  
Health Summary Components 1 GETSITEV^BHSUTL  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 $$FMTE^XLFDT  

Entry Points

Name Comments DBIA/ICR reference
EKGDSP ;display EKG(S)
; <DISPLAY>
ADDTOL
BLDL
EYEMEAS ;display eye care measurements
GETEKG ;get EKG
EYERX ; *************** EYE GLASS PRESCRIPTIONS * 9000010.04 *******
; <SETUP>
NPG
GATHER ;gather up last 5 of measurement in array by inverse date
EKGX ; exit EKG
DISPEM ;display eye measurements
EKG ; ***** EKG SUMMARY * 9000010.21 (V DIAGNOSTIC PROCEDURE RESULT) *****
EYERXX
BLD ; <BUILD>
DSPLY ;<DISPLAY>

External References

Name Field # of Occurrence
GETSITEV^BHSUTL EYERX+10
REGDT4^GMTSU EYERX+11, EKGDSP+7
CKP^GMTSUP EYERX+6, DSPLY+1, DSPLY+2, DSPLY+4, DSPLY+6, DSPLY+8, DISPEM+1, DISPEM+3, DISPEM+5, EKG+5
, EKGDSP+10
$$VAL^XBDIQ1 GATHER+2
$$FMTE^XLFDT DISPEM+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,BHSDAT,?12,BHSNSH,!
  • Line Location: DSPLY+1
Function Call: WRITE
  • Prompt: " Sphere Cyl Axis Prism H Prism V Add",!
  • Line Location: DSPLY+3
Function Call: WRITE
  • Prompt: !,BHSL,!
  • Line Location: DSPLY+4
Function Call: WRITE
  • Prompt: BHSL,!
  • Line Location: DSPLY+6
Function Call: WRITE
  • Prompt: !,BHSL1,!!
  • Line Location: DSPLY+8
Function Call: WRITE
  • Prompt: !?29,"Eye Care Measurements"
  • Line Location: DISPEM+2
Function Call: WRITE
  • Prompt: !?15,"VU",?34,"VC",?48,"TONOMETRY"
  • Line Location: DISPEM+4
Function Call: WRITE
  • Prompt: !,$$FMTE^XLFDT((9999999-BHSX),"2D")
  • Line Location: DISPEM+5
Function Call: WRITE
  • Prompt: ?$P(BHSJ,";",BHST),$P(BHSMT(BHSX),U,BHST)
  • Line Location: DISPEM+5
Function Call: WRITE
  • Prompt: BHSDAT,?10,BHSNSH,!
  • Line Location: NPG+0
Function Call: WRITE
  • Prompt: " Sphere Cyl Axis Prism H Prism V Add",!
  • Line Location: NPG+1
Function Call: WRITE
  • Prompt: BHSDS
  • Line Location: EKGDSP+11
Function Call: WRITE
  • Prompt: ?12,BHSDP,?30,"RESULT: ",BHSVL,!
  • Line Location: EKGDSP+11

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNVDXP - [#9000010.21] EKGDSP+2
^AUPNVDXP("AA" EKG+7, EKG+8, EKG+9
^AUPNVDXP("AC" EKG+4
^AUPNVEYE - [#9000010.04] EYERX+10, BLD+1
^AUPNVEYE("AA" EYERX+5, EYERX+7, EYERX+9
^AUPNVMSR("AA" GATHER+2
^AUPNVSIT - [#9000010] EKGDSP+7
^AUTTDXPR - [#9999999.68] GETEKG+1
^AUTTMSR("C" EYEMEAS+2, EYEMEAS+3, EYEMEAS+4

Label References

Name Line Occurrences
ADDTOL BLD+4, BLD+6
BLD EYERX+12
BLDL BLD+9, DSPLY+5
DISPEM EYEMEAS+5
EKGDSP EKG+9
EYEMEAS EYERX+4
EYERXX EYERX+13
GATHER EYEMEAS+2, EYEMEAS+3, EYEMEAS+4
GETEKG EKGDSP+4
NPG DSPLY+4, DSPLY+6, DSPLY+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCHQ EKG+2~, EKG+8*, EKG+9*
BHSCNT EKG+6*, EKGX+2!, EKGDSP+5*
BHSDAT EYERX+11*, DSPLY+1, DSPLY+2, EYERXX!, NPG, EKG+7*, EKG+8, EKG+9, EKGX+2!
BHSDFN EKG+9*, EKGX+2!, EKGDSP+2
BHSDP EKGX+2!, EKGDSP+3*, EKGDSP+4, EKGDSP+11, GETEKG+1*
BHSDS EKGX+2!, EKGDSP+6*, EKGDSP+7*, EKGDSP+11
BHSDT EYERX+7*, EYERX+9, EYERX+11, EYERXX!
BHSEN BLD+1*, EYERXX!, ADDTOL, BLDL
BHSF EYERXX!, ADDTOL*, ADDTOL+1, BLDL*, BLDL+1
BHSI BLD+4*, BLD+6*, BLD+9*, DSPLY+5*, EYERXX!, ADDTOL, ADDTOL+1, BLDL
BHSIVD EKG+8*, EKG+9, EKGX+2!
BHSJ BLD+3*, EYERXX!, DISPEM+5*, ADDTOL
BHSL BLD+4*, BLD+5, BLD+6*, BLD+7, BLD+9*, DSPLY+4, DSPLY+5*, DSPLY+6, EYERXX!, ADDTOL+1*
, BLDL+1*
BHSL1 BLD+5*, DSPLY+7*, DSPLY+8, EYERXX!
BHSL2 BLD+7*, DSPLY+7, EYERXX!
BHSM EYEMEAS+2*, EYEMEAS+3*, EYEMEAS+4*, EYERXX!, GATHER+2
BHSMT EYEMEAS+1!, EYERXX!
BHSMT( GATHER+2*, DISPEM+5
BHSN EYERX+9*, EYERX+10, BLD+1, EYERXX!, EKGX+2!, EKGDSP+2*, EKGDSP+3, EKGDSP+7, EKGDSP+8
BHSNRQ EKGX+2!
BHSNSH EYERX+2~, DSPLY+1, DSPLY+2, NPG
BHSP EYERX+2~, EYERX+10*, EYEMEAS+2*, EYEMEAS+3*, EYEMEAS+4*, GATHER+2
BHSPAT EYERX+2~, EYERX+3*, EYERX+5, EYERX+7, EYERX+9, GATHER+2, EKG+2~, EKG+3*, EKG+4, EKG+7
, EKG+8, EKG+9
BHSQ EKG+2~, EKG+7*
BHST BLD+2*, BLD+8*, EYERXX!, DISPEM+5*, ADDTOL+1
BHSVDF EYERX+10*, EYERXX!
BHSVL EKGX+2!, EKGDSP+8*, EKGDSP+9*, EKGDSP+11
BHSVNM EYERXX!
BHSX EYERXX!, DISPEM+5*
C GATHER+1~, GATHER+2*
D GATHER+1~, GATHER+2*
>> DFN EYERX+3, EKG+3
>> GMTSDLM EKG+8
>> GMTSNPG DSPLY+2, DSPLY+4, DSPLY+6, DSPLY+8
>> GMTSQIT EYERX+6, DSPLY+1, DSPLY+2, DSPLY+4, DSPLY+6, DSPLY+8, DISPEM+1, DISPEM+3, DISPEM+5, EKG+5
, EKG+7, EKG+8, EKG+9, EKGDSP+10
N GATHER+1~, GATHER+2*
U EYERX+10, GATHER+2, DISPEM+5, ADDTOL, ADDTOL+1, BLDL, EKGDSP+3, EKGDSP+7, EKGDSP+8, GETEKG+1
X EYERX+2~, EYERX+11*, EKGDSP+7*
Y EYERXX!, EKGX+2!, EKGDSP+7*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All