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

Package: General Medical Record - Vitals

Routine: GMRVBP4


Information

GMRVBP4 ;HIRMFO/YH-CALL KYOCERA B/P GRAPH MACRO ;5/16/97

Source Information

Source file <GMRVBP4.m>

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
General Medical Record - Vitals 5 GMRVBP1  GMRVGR4  GMRVGR6  GMRVKPO4  GMRVWT4  

Entry Points

Name Comments DBIA/ICR reference
EN3 ;CONTINUATION OF GMRVBP3
CALL
SYSG ;SYSTOLIC BP GRAPH
PULSE
WRTCALL ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"CALL BOX;"
  • Line Location: CALL+0
Function Call: WRITE
  • Prompt: !,"CALL DATE"
  • Line Location: CALL+1
Function Call: WRITE
  • Prompt: !,"CALL TIME"
  • Line Location: CALL+2
Function Call: WRITE
  • Prompt: !,"CALL PLSG, "_^TMP($J,"GMRK","G226M")_", "_^("G226")_", "_^("G227")_", "_^("G228")_", "_^("G229")_", "_^("G230")_", "_^("G231")_", "_^("G232")_", "
  • Line Location: SYSG+1
Function Call: WRITE
  • Prompt: ^TMP($J,"GMRK","G233")_", "_^("G234")_", "_^("G235")_";"
  • Line Location: SYSG+2
Function Call: WRITE
  • Prompt: !,"CALL PLS1, "_^TMP($J,"GMRK","G226M")_", "_^("G226")_", '"_^("G1201")_"', "_^("G227")_", '"_^("G1202")_"', "_^("G228")_", '"_^("G1203")_"', "_^("G229")_", '"_^("G1204")_"', "
  • Line Location: SYSG+3
Function Call: WRITE
  • Prompt: ^TMP($J,"GMRK","G230")_", '"_^("G1205")_"', "_^("G231")_", '"_^("G1206")_"', "_^("G232")_", '"_^("G1207")_"', "_^("G233")_", '"_^("G1208")_"', "_^("G234")_", '"_^("G1209")_"';"
  • Line Location: SYSG+4
Function Call: WRITE
  • Prompt: !,"CALL PLS2, "_^TMP($J,"GMRK","G235")_", '"_^("G1210")_"';"
  • Line Location: SYSG+5
Function Call: WRITE
  • Prompt: !,"CALL PLSG, "_^TMP($J,"GMRK","G210M")_", "_^("G210")_", "_^("G211")_", "_^("G212")_", "_^("G213")_", "_^("G214")_", "_^("G215")_", "_^("G216")_", "
  • Line Location: SYSG+7
Function Call: WRITE
  • Prompt: ^TMP($J,"GMRK","G217")_", "_^("G218")_", "_^("G219")_";"
  • Line Location: SYSG+8
Function Call: WRITE
  • Prompt: !,"CALL PLS1, "_^TMP($J,"GMRK","G210M")_", "_^("G210")_", '"_^("G1101")_"', "_^("G211")_", '"_^("G1102")_"', "_^("G212")_", '"_^("G1103")_"', "_^("G213")_", '"_^("G1104")_"', "_^("G214")_", '"_^("G1105")
  • Line Location: SYSG+9
Function Call: WRITE
  • Prompt: "', "_^TMP($J,"GMRK","G215")_", '"_^("G1106")_"', "_^("G216")_", '"_^("G1107")_"', "_^("G217")_", '"_^("G1108")_"', "_^("G218")_", '"_^("G1109")_"';"
  • Line Location: SYSG+10
Function Call: WRITE
  • Prompt: !,"CALL PLS2, "_^TMP($J,"GMRK","G219")_", '"_^("G1110")_"';"
  • Line Location: SYSG+11
Function Call: WRITE
  • Prompt: !,"CALL PULS"
  • Line Location: PULSE+0
Function Call: WRITE
  • Prompt: !,"CALL PQU"
  • Line Location: PULSE+1
Function Call: WRITE
  • Prompt: !,"CALL BP"
  • Line Location: PULSE+2
Function Call: WRITE
  • Prompt: !,"CALL BP3"
  • Line Location: PULSE+3
Function Call: WRITE
  • Prompt: !,"CALL BPQUA"
  • Line Location: PULSE+4
Function Call: WRITE
  • Prompt: !,"CALL MEAN"
  • Line Location: PULSE+5
Function Call: WRITE
  • Prompt: !,"CALL QUA, '"_$G(GLINE(1))_"';"
  • Line Location: PULSE+6
Function Call: WRITE
  • Prompt: !,"CALL QU2, '"_$G(GLINE(2))_"';"
  • Line Location: PULSE+7
Function Call: WRITE
  • Prompt: !,"CALL QU3, '"_$G(GLINE(3))_"';"
  • Line Location: PULSE+8
Function Call: WRITE
  • Prompt: !,"CALL PID, """_^TMP($J,"GMRK","G194")_""", '"_^("G196")_"', '"_^("G197")_"', '"_^("G198")_"', '"_^("G199")_"', '"_^("G200")_"', '"_GMRDIV_"', '"_GSTRFIN_"';"
  • Line Location: PULSE+9
Function Call: WRITE
  • Prompt: !,"RES; EXIT;"
  • Line Location: PULSE+10
Function Call: WRITE
  • Prompt: I(1)_";"
  • Line Location: WRTCALL+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP($J SYSG+1, SYSG+2, SYSG+3, SYSG+4, SYSG+5, SYSG+7, SYSG+8, SYSG+9, SYSG+10, SYSG+11
PULSE+9, WRTCALL+1

Label References

Name Line Occurrences
WRTCALL CALL+1, CALL+2, PULSEPULSE+1, PULSE+2, PULSE+3, PULSE+4, PULSE+5

Naked Globals

Name Field # of Occurrence
^("G1101" SYSG+9
^("G1102" SYSG+9
^("G1103" SYSG+9
^("G1104" SYSG+9
^("G1105" SYSG+9
^("G1106" SYSG+10
^("G1107" SYSG+10
^("G1108" SYSG+10
^("G1109" SYSG+10
^("G1110" SYSG+11
^("G1201" SYSG+3
^("G1202" SYSG+3
^("G1203" SYSG+3
^("G1204" SYSG+3
^("G1205" SYSG+4
^("G1206" SYSG+4
^("G1207" SYSG+4
^("G1208" SYSG+4
^("G1209" SYSG+4
^("G1210" SYSG+5
^("G196" PULSE+9
^("G197" PULSE+9
^("G198" PULSE+9
^("G199" PULSE+9
^("G200" PULSE+9
^("G210" SYSG+7, SYSG+9
^("G211" SYSG+7, SYSG+9
^("G212" SYSG+7, SYSG+9
^("G213" SYSG+7, SYSG+9
^("G214" SYSG+7, SYSG+9
^("G215" SYSG+7
^("G216" SYSG+7, SYSG+10
^("G217" SYSG+10
^("G218" SYSG+8, SYSG+10
^("G219" SYSG+8
^("G226" SYSG+1, SYSG+3
^("G227" SYSG+1, SYSG+3
^("G228" SYSG+1, SYSG+3
^("G229" SYSG+1, SYSG+3
^("G230" SYSG+1
^("G231" SYSG+1, SYSG+4
^("G232" SYSG+1, SYSG+4
^("G233" SYSG+4
^("G234" SYSG+2, SYSG+4
^("G235" SYSG+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> GLINE(1 PULSE+6
>> GLINE(2 PULSE+7
>> GLINE(3 PULSE+8
>> GMRDIV PULSE+9
>> GSTRFIN PULSE+9
>> I WRTCALL+1*
>> I(1 WRTCALL+1*, WRTCALL+2
>> J(1 CALL+1*, CALL+2*, PULSE*, PULSE+1*, PULSE+2*, PULSE+3*, PULSE+4*, PULSE+5*, WRTCALL+1
>> J(2 CALL+1*, CALL+2*, PULSE*, PULSE+1*, PULSE+2*, PULSE+3*, PULSE+4*, PULSE+5*, WRTCALL+1
Info |  Source |  Caller Graph |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All