Routine: GMRVHB1

Package	Total	Call Graph
General Medical Record - Vitals	1	EN1^GMRVHB2

Package	Total	Caller Graph
General Medical Record - Vitals	1	GMRVHB0

Name	Comments	DBIA/ICR reference
Q1	;
EN1	;RESET PRINTER, SET PAGE SIZE (PORTRAIT) AND PCL PICTURE FRAME 8"*11"
QUAL	;

Name	Field # of Occurrence
EN1^GMRVHB2	QUAL+9

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,$CHAR(27),"E",$CHAR(27),"&l1E",$CHAR(27),"*c5952x7920Y",$CHAR(27),"%0B" Line Location: EN1+1
Function Call: WRITE	Prompt: !,"IN;SP1;IP;SC-3,18,-8,20,1;PW.15;PA0,0;FT3,1;RR16,20;PW.3;PA0,-3;EA16,20;PA-3,-3;EA16,0;PW.15;" Line Location: EN1+2
Function Call: WRITE	Prompt: !,I(1) Line Location: EN1+4
Function Call: WRITE	Prompt: !,I(1) Line Location: EN1+5
Function Call: WRITE	Prompt: !,"PU;" Line Location: EN1+5
Function Call: WRITE	Prompt: !,"DT#,1;" Line Location: EN1+7
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,10,5,1,6,5,7,4;SS;LO12;PA-2,19.5;LBDate/Time#;PA-2.5,18.8;LBBlood Pressure#;PA-1,18;LB220#;PA-1,17;LB210#;" Line Location: EN1+8
Function Call: WRITE	Prompt: !,"PA-1,16;LB200#;PA-1,15;LB190#;PA-1,14;LB180#;PA-1,13;LB170#;PA-1,12;LB160#;PA-1,11;LB150#;PA-1,10;LB140#;" Line Location: EN1+9
Function Call: WRITE	Prompt: !,"PA-1,9;LB130#;PA-1,8;LB120#;PA-1,7;LB110#;" Line Location: EN1+10
Function Call: WRITE	Prompt: !,"PA-1,6;LB100#;PA-1,5;LB 90#;PA-1,4;LB 80#;PA-1,3;LB 70#;PA-1,2;LB 60#;PA-1,1;LB 50#;" Line Location: EN1+11
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,8,5,1,6,5,7,4;SS;LO11;PA-3,-0.4;LBPulse#;PA-3,-.5;PD16,-.5;PA16,-1;PD-3,-1;" Line Location: EN1+13
Function Call: WRITE	Prompt: !,"PA-3,-1.4;LBBlood Pressure#;PU;PA-3,-1.5;PD16,-1.5;PA16,-2;PD-3,-2;PA-3,-2.5;PD16,-2.5;PU;PA-3,-2.9;LBMAP#;" Line Location: EN1+14
Function Call: WRITE	Prompt: !,"PA-3,-3.4;LBS: Systolic B/P D: Diastolic B/P MAP: Mean Arterial Pressure #;" Line Location: EN1+15
Function Call: WRITE	Prompt: !,"LB * - Abnormal value ** - Abnormal value off of graph#;" Line Location: EN1+15
Function Call: WRITE	Prompt: !,"PA-3,-3.7;LB"_$E($G(GLINE(1)),1,100)_"#;" Line Location: QUAL+1
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(1)),101,180)_"#;" Line Location: QUAL+1
Function Call: WRITE	Prompt: !,"PA-3,-4;LB"_$E($G(GLINE(2)),1,100)_"#;" Line Location: QUAL+2
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(2)),101,180)_"#;" Line Location: QUAL+2
Function Call: WRITE	Prompt: !,"PA-3,-4.3;LB"_$E($G(GLINE(3)),1,100)_"#;" Line Location: QUAL+3
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(3)),101,180)_"#;" Line Location: QUAL+3
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,9,5,1,6,5,7,4;SS;PA12,-4.9;LBB/P PLOTTING CHART#;" Line Location: QUAL+4
Function Call: WRITE	Prompt: !,"PA12,-4.5;LBMEDICAL RECORD#;PA12,-5.3;LBVA STANDARD FORM 512-A#;" Line Location: QUAL+5
Function Call: WRITE	Prompt: !,"PA3,10;LBTHERE IS NO DATA FOR THIS PERIOD#;" Line Location: QUAL+6
Function Call: WRITE	Prompt: !,GRAPHS(I) Line Location: QUAL+7
Function Call: WRITE	Prompt: !,GRAPHD(I) Line Location: QUAL+8
Function Call: WRITE	Prompt: !,"PU;LO1;" Line Location: QUAL+9
Function Call: WRITE	Prompt: !,"PA-3,18;",$CHAR(27),"&r0F",$CHAR(27),"%0A" Line Location: Q1+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Customize PDF page

Package: General Medical Record - Vitals

Routine: GMRVHB1

Information

Source Information

Call Graph

Call Graph Total: 1

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Local Variables

Legend:

Name	Field # of Occurrence
>> GLINE(1	QUAL+1
>> GLINE(2	QUAL+2
>> GLINE(3	QUAL+3
>> GRAPHD(	QUAL+8
>> GRAPHS(	QUAL+7
>> GTNM	QUAL+6
I	EN1+3, EN1+4, QUAL+7, QUAL+8, Q1+1!
I(1	EN1+3, EN1+4, EN1+5
J	Q1+1!