Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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
Info |  Source |  Entry Points |  Interaction Calls