Routine: GMRVBP4

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

Entry Points

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

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

>>	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

Customize PDF page

Package: General Medical Record - Vitals

Routine: GMRVBP4

Information

Source Information

Caller Graph

Caller Graph Total: 5

Entry Points

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

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