Routine: GMRVGR4

Information

GMRVGR4 ;HIRMFO/YH-VITALS GRAPH KYOCERA PRINT COMMANDS (PART 1) ;5/1/97

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
General Medical Record - Vitals	1	WRTCALL^GMRVBP4

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
General Medical Record - Vitals	1	GMRVGR1

Entry Points

Name	Comments	DBIA/ICR reference
EN3	;CONTINUATION OF GMRVGR3
CALL

External References

Name	Field # of Occurrence
WRTCALL^GMRVBP4	CALL+1, CALL+2, CALL+3, CALL+4, CALL+5, CALL+6, CALL+7, CALL+13, CALL+19

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 WT" Line Location: CALL+3
Function Call: WRITE	Prompt: !,"CALL WTKG" Line Location: CALL+4
Function Call: WRITE	Prompt: !,"CALL BMI" Line Location: CALL+5
Function Call: WRITE	Prompt: !,"CALL HT" Line Location: CALL+6
Function Call: WRITE	Prompt: !,"CALL HTCM" Line Location: CALL+7
Function Call: WRITE	Prompt: !,"CALL TMPG, "_^TMP($J,"GMRK","G50M")_", "_^("G50")_", "_^("G51")_", "_^("G52")_", "_^("G53")_", "_^("G54")_", "_^("G55")_", "_^("G56") Line Location: CALL+8
Function Call: WRITE	Prompt: ", "_^TMP($J,"GMRK","G57")_", "_^("G58")_", "_^("G59")_";" Line Location: CALL+9
Function Call: WRITE	Prompt: !,"CALL TMP1, "_^TMP($J,"GMRK","G50M")_", "_^("G50")_", '"_^("G211")_"', "_^("G51")_", '"_^("G212")_"', "_^("G52")_", '"_^("G213")_"', "_^("G53")_", '"_^("G214")_"', "_^("G54")_", '"_^("G215")_"', "_^("G55")_", '"_^("G216")_"', " Line Location: CALL+10
Function Call: WRITE	Prompt: ^TMP($J,"GMRK","G56")_", '"_^("G217")_"', "_^("G57")_", '"_^("G218")_"', "_^("G58")_", '"_^("G219")_"';" Line Location: CALL+11
Function Call: WRITE	Prompt: !,"CALL TMP2, "_^TMP($J,"GMRK","G59")_", '"_^("G220")_"';" Line Location: CALL+12
Function Call: WRITE	Prompt: !,"CALL TEMP" Line Location: CALL+13
Function Call: WRITE	Prompt: !,"CALL PLSG, "_^TMP($J,"GMRK","G82M")_", "_^("G82")_", "_^("G83")_", "_^("G84")_", "_^("G85")_", "_^("G86")_", "_^("G87")_", "_^("G88")_", " Line Location: CALL+14
Function Call: WRITE	Prompt: ^TMP($J,"GMRK","G89")_", "_^("G90")_", "_^("G91")_";" Line Location: CALL+15
Function Call: WRITE	Prompt: !,"CALL PLS1, "_^TMP($J,"GMRK","G82M")_", "_^("G82")_", '"_^("G231")_"', "_^("G83")_", '"_^("G232")_"', "_^("G84")_", '"_^("G233")_"', "_^("G85")_", '"_^("G234")_"', "_^("G86")_", '"_^("G235")_"', "_^("G87")_", '"_^("G236")_"', " Line Location: CALL+16
Function Call: WRITE	Prompt: ^TMP($J,"GMRK","G88")_", '"_^("G237")_"', "_^("G89")_", '"_^("G238")_"', "_^("G90")_", '"_^("G239")_"';" Line Location: CALL+17
Function Call: WRITE	Prompt: !,"CALL PLS2, "_^TMP($J,"GMRK","G91")_", '"_^("G240")_"';" Line Location: CALL+18
Function Call: WRITE	Prompt: !,"CALL PULS" Line Location: CALL+19

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	CALL+8, CALL+9, CALL+10, CALL+11, CALL+12, CALL+14, CALL+15, CALL+16, CALL+17, CALL+18

Naked Globals

Name	Field # of Occurrence
^("G211"	CALL+10
^("G212"	CALL+10
^("G213"	CALL+10
^("G214"	CALL+10
^("G215"	CALL+10
^("G216"	CALL+10
^("G217"	CALL+11
^("G218"	CALL+11
^("G219"	CALL+11
^("G220"	CALL+12
^("G231"	CALL+16
^("G232"	CALL+16
^("G233"	CALL+16
^("G234"	CALL+16
^("G235"	CALL+16
^("G236"	CALL+16
^("G237"	CALL+17
^("G238"	CALL+17
^("G239"	CALL+17
^("G240"	CALL+18
^("G50"	CALL+8, CALL+10
^("G51"	CALL+8, CALL+10
^("G52"	CALL+8, CALL+10
^("G53"	CALL+8, CALL+10
^("G54"	CALL+8, CALL+10
^("G55"	CALL+8, CALL+10
^("G56"	CALL+8
^("G57"	CALL+11
^("G58"	CALL+9, CALL+11
^("G59"	CALL+9
^("G82"	CALL+14, CALL+16
^("G83"	CALL+14, CALL+16
^("G84"	CALL+14, CALL+16
^("G85"	CALL+14, CALL+16
^("G86"	CALL+14, CALL+16
^("G87"	CALL+14, CALL+16
^("G88"	CALL+14
^("G89"	CALL+17
^("G90"	CALL+15, CALL+17
^("G91"	CALL+15

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> J(1	CALL+1, CALL+2, CALL+3, CALL+4, CALL+5, CALL+6, CALL+7, CALL+13, CALL+19*
>> J(2	CALL+1, CALL+2, CALL+3, CALL+4, CALL+5, CALL+6, CALL+7, CALL+13, CALL+19*

Customize PDF page

Package: General Medical Record - Vitals