Routine: GMRVHPN2

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Information

GMRVHPN2 ;HIRMFO/YH-HP LASER PAIN CHART - ^TMP DATA ;2/6/99

Source Information

Source file <GMRVHPN2.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
Kernel	1	$$UP^XLFSTR

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

Package	Total	Caller Graph
General Medical Record - Vitals	2	GMRVHPN0 GMRVHPN1

Entry Points

Name	Comments	DBIA/ICR reference
SETA	;
PTID	;PRINT PATIENT ID
WRTLN	;PRINT LINE

External References

Name	Field # of Occurrence
$$UP^XLFSTR	SETA+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,10,5,1,6,5,7,4;SS;PA-2,-10.5;LB"_^TMP($J,"GMRK","G194")_"#;PA-2,-11;LB"_^("G196")_" "_^("G197")_"#;" Line Location: PTID+1
Function Call: WRITE	Prompt: !,"PA-2,-11.5;LB"_^TMP($J,"GMRK","G198")_"#;PA6,-12;LB"_^("G200")_"#;PA6,-12.5;LB"_^("G199")_"#;PA-2,-12;LB"_GMRDIV_"#;" Line Location: PTID+2
Function Call: WRITE	Prompt: !,"PA-2,-12.5;LB"_GSTRFIN_"#;" Line Location: PTID+3
Function Call: WRITE	Prompt: !,I(1) Line Location: WRTLN+2
Function Call: WRITE	Prompt: !,I(1) Line Location: WRTLN+3

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	SETA+3, SETA+4, PTID+1, PTID+2, WRTLN+1, WRTLN+2

Naked Globals

Name	Field # of Occurrence
^("G196"	PTID+1
^("G197"	PTID+1
^("G199"	PTID+2
^("G200"	PTID+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> GCNTD	SETA+3, SETA+4
>> GJ	SETA+3
>> GK	SETA+1*, SETA+2, SETA+3, SETA+4
>> GMRDIV	PTID+2
>> GSTRFIN	PTID+3
>> I	WRTLN+1, WRTLN+2
>> I(1	WRTLN+1, WRTLN+2, WRTLN+3
>> I(2	WRTLN+1, WRTLN+2
>> J	WRTLN+1, WRTLN+2
>> J(1	WRTLN+1, WRTLN+2