Routine: GMVHG1

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

Package	Total	Caller Graph
General Medical Record - Vitals	1	GMVHG0

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

Name	Field # of Occurrence
EN1^GMVHG2	LABEL+30

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,-15,13,1;PW.15;PA0,0;FT3,1;RR16,14;PW.3;EA16,14;PA-3,-9.2;EA16,0;" Line Location: EN1+2
Function Call: WRITE	Prompt: !,"PW.3;PA0,0;PD0,-9.2;" Line Location: EN1+3
Function Call: WRITE	Prompt: !,I(1) Line Location: EN1+5
Function Call: WRITE	Prompt: !,I(1) Line Location: EN1+7
Function Call: WRITE	Prompt: !,"PU-3,-9.2;PD16,-9.2;PU-3,-8.8;PD16,-8.8;PU16,-8.4;PD-3,-8.4;PU;" Line Location: EN1+8
Function Call: WRITE	Prompt: !,"PA16,-8.0;PD-3,-8.0;PU-3,-7.6;PD16,-7.6;PU16,-7.2;PD-3,-7.2;PU-3,-6.8;PD16,-6.8;PU-3,-6.4;PD16,-6.4;PU16,-6.0;PD-3,-6.0;" Line Location: EN1+9
Function Call: WRITE	Prompt: !,"PU-3,-5.6;PD16,-5.6;PU16,-5.2;PD-3,-5.2;" Line Location: EN1+9
Function Call: WRITE	Prompt: !,"PU-3,-4.8;PD16,-4.8;PU16,-4.4;PD-3,-4.4;PU-3,-3.2;PD16,-3.2;PU16,-2.8;PD-3,-2.8;PU-3,-2.4;PD16,-2.4;PU16,-2.0;PD-3,-2.0;" Line Location: EN1+10
Function Call: WRITE	Prompt: !,"PU-3,-1.6;PD16,-1.6;PU16,-1.2;PD-3,-1.2;PU-3,-0.4;PD16,-0.4;PU;" Line Location: EN1+11
Function Call: WRITE	Prompt: !,"PW.3;PA0,5.6;PD16,5.6;PU;" Line Location: EN1+12
Function Call: WRITE	Prompt: !,"DT#,1;" Line Location: LABEL+1
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,10,5,1,6,5,7,4;SS;LO12;" Line Location: LABEL+2
Function Call: WRITE	Prompt: !,"PA-2,12.5;LBDate/Time#;PA-3,11.8;LB Pulse Temp/F/C#;" Line Location: LABEL+3
Function Call: WRITE	Prompt: !,"PA-3,11;LB150#;PA-1.6,11,LB104/40.0#;" Line Location: LABEL+4
Function Call: WRITE	Prompt: !,"PA-3,10;LB140#;PA-1.6,10;LB103/39.4#;PA-3,9;LB130#;PA-1.6,9;LB102/38.9#;" Line Location: LABEL+4
Function Call: WRITE	Prompt: !,"PA-3,8;LB120#;PA-1.6,8;LB101/38.3#;PA-3,7;LB110#;PA-1.6,7;LB100/37.8#;" Line Location: LABEL+5
Function Call: WRITE	Prompt: !,"PA-3,6;LB100#;PA-1.6,6;LB 99/37.2#;PA-1.6,5.6;LB 98.6#;" Line Location: LABEL+6
Function Call: WRITE	Prompt: !,"PA-3,5;LB 90#;PA-1.6,5;LB 98/36.7#;PA-3,4;LB 80#;PA-1.6,4;LB 97/36.1#;PA-3,3;LB 70#;PA-1.6,3;LB 96/35.6#;" Line Location: LABEL+7
Function Call: WRITE	Prompt: !,"PA-3,2;LB 60#;PA-1.6,2;LB 95/35.0#;PA-3,1;LB 50#;PA-1.6,1;LB 94#;" Line Location: LABEL+8
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,8,5,1,6,5,7,4;SS;LO11;PA-3,-0.3;LBTemperature#;PA-3,-0.7;LBPulse#;PA-3,-1.5;LBRespiration#;PA-3,-1.9;LBPulse Ox.#;" Line Location: LABEL+10
Function Call: WRITE	Prompt: !,"PA-3,-2.3;LB L/Min#;PA-3,-2.7;LB %#;" Line Location: LABEL+11
Function Call: WRITE	Prompt: !,"PA-3,-3.1;LB Method#;PA-3,-3.5;LBBlood Pressure#;" Line Location: LABEL+12
Function Call: WRITE	Prompt: !,"PA-3,-4.7;LBWeight (lb)#;PA-3,-5.1;LB (kg)#;PA-3,-5.5;LBBody Mass Index#;" Line Location: LABEL+13
Function Call: WRITE	Prompt: !,"PA-3,-5.9;LBHeight (in)#;PA-3,-6.3;LB (cm)#;PA-3,-6.7;LBC/G (in)#;PA-2.5,-7.1;LB(cm)#;PA-3,-7.5;LBCVP#;PA-2,-7.5;LB(cm H2O)#;" Line Location: LABEL+14
Function Call: WRITE	Prompt: !,"PA-2,-7.9;LB(mm Hg)#;" Line Location: LABEL+15
Function Call: WRITE	Prompt: !,"PA-3,-8.3;LBIntake (24hr)(cc)#;PA-3,-8.7;LBOutput (24hr)(cc)#;" Line Location: LABEL+16
Function Call: WRITE	Prompt: !,"PA-3,-9.1;LBPain#;" Line Location: LABEL+17
Function Call: WRITE	Prompt: !,"PA-3,-9.6;LBT: Temperature P: Pulse C/G: Circumference/Girth * - Abnormal value **- Abnormal value off of graph#;" Line Location: LABEL+18
Function Call: WRITE	Prompt: !,"PA-3,-9.9;LBPAIN: 99 - Unable to respond 0 - No pain 10 - Worst imaginable pain#;" Line Location: LABEL+19
Function Call: WRITE	Prompt: !,"PA-3,-10.3;LB"_$E($G(GLINE(1)),1,100)_"#;" Line Location: LABEL+20
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(1)),101,180)_"#;" Line Location: LABEL+20
Function Call: WRITE	Prompt: !,"PA-3,-10.6;LB"_$E($G(GLINE(2)),1,100)_"#;" Line Location: LABEL+21
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(2)),101,180)_"#;" Line Location: LABEL+21
Function Call: WRITE	Prompt: !,"PA-3,-10.9;LB"_$E($G(GLINE(3)),1,100)_"#;" Line Location: LABEL+22
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(3)),101,180)_"#;" Line Location: LABEL+22
Function Call: WRITE	Prompt: !,"PA-3,-11.2;LB"_$E($G(GLINE(4)),1,100)_"#;" Line Location: LABEL+23
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(4)),101,180)_"#;" Line Location: LABEL+23
Function Call: WRITE	Prompt: 1,"PA-3,-11.5;LB"_$E($G(GLINE(5)),1,100)_"#;" Line Location: LABEL+24
Function Call: WRITE	Prompt: !,"LB"_$E($G(GLINE(5)),101,180)_"#;" Line Location: LABEL+24
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,9,5,1,6,5,7,4;SS;PA12,-11.7;LBVITAL FLOW SHEET#;" Line Location: LABEL+25
Function Call: WRITE	Prompt: !,"SD1,277,2,1,4,9,5,1,6,5,7,4;SS;PA12,-11.3;LBMEDICAL RECORD#;PA12,-12.1;LBVAF 10-7987 VICE SF 511#;" Line Location: LABEL+26
Function Call: WRITE	Prompt: !,"PA3,10;LBTHERE IS NO DATA FOR THIS PERIOD#;" Line Location: LABEL+27
Function Call: WRITE	Prompt: !,GRAPHT(I) Line Location: LABEL+28
Function Call: WRITE	Prompt: !,GRAPHP(I) Line Location: LABEL+29
Function Call: WRITE	Prompt: !,"PU;LO1;" Line Location: LABEL+30
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: GMVHG1

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	LABEL+20
>> GLINE(2	LABEL+21
>> GLINE(3	LABEL+22
>> GLINE(4	LABEL+23
>> GLINE(5	LABEL+24
>> GRAPHP(	LABEL+29
>> GRAPHT(	LABEL+28
>> GTNM	LABEL+27
I	EN1+4, EN1+6, EN1+7!, LABEL+28, LABEL+29, Q1+1!
I(1	EN1+4, EN1+5, EN1+6, EN1+7
J	Q1+1!