Routine: GMTSVS

Package	Total	Call Graph
Health Summary	2	(MTIM,REGDT4)^GMTSU CKP^GMTSUP
General Medical Record - Vitals	1	EN1^GMVHS
Kernel	1	$$VERSION^XPDUTL
Toolkit	1	$$GET^XPAR

Package	Total	Caller Graph
Health Summary	2	GMTSVSD GMTSVSS

Entry Points

Name	Comments	DBIA/ICR reference
OUTPAT	; Outpatient Vital Signs Main Control
ENVS	; Set up for Vitals Extraction Routine
FIRST	; First Set of Vitals ; 1 2 3 4 5 6 7 8 ; Date^Temp()^Pulse^Respt^BP^Height()^Weight()^Control
FLOOP	; Loop through first set of vitals by date
FFMT	; Extract and format first set of vitals
FWRT	; Write first set of vitals by date
SECOND	; Second Set of Vitals ; 1 2 3 4 5 ; Date^CVP^POx^Cir/Gir^Control
SLOOP	; Loop through second set of vitals by date
SFMT	; Extract and format second set of vitals
SWRT	; Write second set of vitals by date
THIRD	; Third Set of Vitals
TLOOP	; Loop through third set of vitals by date
TFMT	; Extract and format third set of vitals
TWRT	; Write third set of vitals by date
KILLVS	; Kill Variables
FN(X,Y)	; Format Number
IMDSORD()	; Return imperial/metric display order ; 1: Metric first ; 0: Imperial first

External References

Name	Field # of Occurrence
MTIM^GMTSU	FFMT+2, SFMT+2, TFMT+2
REGDT4^GMTSU	FFMT+1, SFMT+2, TFMT+2
CKP^GMTSUP	OUTPAT+12, FIRST+5, FIRST+6, FIRST+9, FIRST+11, FIRST+12, FIRST+15, FWRT+2, SECOND+4, SWRT+2 , THIRD+5, TWRT+2
EN1^GMVHS	OUTPAT+8, ENVS+6
$$GET^XPAR	IMDSORD+3
$$VERSION^XPDUTL	FIRST+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "* No Outpatient measurements *",!! Line Location: OUTPAT+12
Function Call: WRITE	Prompt: "Measurement DT",?20,"TEMP",?29,"PULSE",?36,"RESP",?45,"BP",?55,"HT",?68,"WT",! Line Location: FIRST+5
Function Call: WRITE	Prompt: ?20,"C(F)",?55,"CM(IN)",?68,"KG(LB)",! Line Location: FIRST+7
Function Call: WRITE	Prompt: ?20,"F(C)",?55,"IN(CM)",?68,"LB(KG)",! Line Location: FIRST+8
Function Call: WRITE	Prompt: ?20,"----",?29,"-----",?36,"----",?45,"--",?55,"------",?68,"------",!! Line Location: FIRST+9
Function Call: WRITE	Prompt: "Measurement DT",?18,"TEMP",?30,"PULSE",?36,"RESP",?41,"BP",?53,"HT",?63,"WT",! Line Location: FIRST+11
Function Call: WRITE	Prompt: ?18,"C(F)",?53,"CM(IN)",?63,"KG(LB)[BMI]",! Line Location: FIRST+13
Function Call: WRITE	Prompt: ?18,"F(C)",?53,"IN(CM)",?63,"LB(KG)[BMI]",! Line Location: FIRST+14
Function Call: WRITE	Prompt: ?18,"----",?30,"-----",?36,"----",?41,"--",?53,"------",?63,"-----------",!! Line Location: FIRST+15
Function Call: WRITE	Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),?30,$P(ARRAY,U,3),?37,$P(ARRAY,U,4),?42,$P(ARRAY,U,5),?54,$P(ARRAY,U,6),?67,$P(ARRAY,U,7),! Line Location: FWRT+3
Function Call: WRITE	Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),?30,$P(ARRAY,U,3),?36,$P(ARRAY,U,4),?41,$P(ARRAY,U,5),?53,$P(ARRAY,U,6),?63,$P(ARRAY,U,7),! Line Location: FWRT+4
Function Call: WRITE	Prompt: !,"Measurement DT",?18,"CVP",?32,"POx",?45,"CG" Line Location: SECOND+5
Function Call: WRITE	Prompt: !,?18,"MMHG(CMH2O)",?32,"(L/MIN)(%)",?45,"CM(IN)",! Line Location: SECOND+6
Function Call: WRITE	Prompt: !,?18,"CMH2O(MMHG)",?32,"(L/MIN)(%)",?45,"IN(CM)",! Line Location: SECOND+7
Function Call: WRITE	Prompt: ?18,"-----------",?32,"----------",?45,"------",!! Line Location: SECOND+8
Function Call: WRITE	Prompt: !,"Measurement DT",?18,"CVP",?34,"POx",?46,"CG" Line Location: SWRT+4
Function Call: WRITE	Prompt: !,?18,"MMHG(CMH2O)",?32,"(L/MIN)(%)",?45,"CM(IN)" Line Location: SWRT+5
Function Call: WRITE	Prompt: !,?18,"CMH2O(MMHG)",?32,"(L/MIN)(%)",?45,"IN(CM)" Line Location: SWRT+6
Function Call: WRITE	Prompt: !,?18,"-----------",?32,"----------",?45,"------",!! Line Location: SWRT+7
Function Call: WRITE	Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),?32,$P(ARRAY,U,3),?45,$P(ARRAY,U,4),! Line Location: SWRT+9
Function Call: WRITE	Prompt: !,"Measurement DT",?18,"Pain" Line Location: THIRD+6
Function Call: WRITE	Prompt: !,?18,"----",!! Line Location: THIRD+7
Function Call: WRITE	Prompt: !,"Measurement DT",?18,"Pain" Line Location: TWRT+4
Function Call: WRITE	Prompt: !,?18,"----",!! Line Location: TWRT+5
Function Call: WRITE	Prompt: $P(ARRAY,U,1),?18,$P(ARRAY,U,2),! Line Location: TWRT+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY($J	OUTPAT+3!, OUTPAT+11, ENVS+2!, ENVS+6, FIRST+16, FLOOP+2, FFMT+1, SECOND+9, SLOOP+1, SFMT+1 , THIRD+8, TLOOP+1, TFMT+1, KILLVS+2!

Label References

Name	Line Occurrences
$$FN	FFMT+5, FFMT+6, FFMT+8, FFMT+9, FFMT+11, FFMT+12, SFMT+8, SFMT+9, TFMT+6
$$IMDSORD	OUTPAT+14, ENVS+7
ENVS	OUTPAT+13
FFMT	FLOOP+2
FIRST	OUTPAT+15, ENVS+8
FLOOP	FIRST+16
FWRT	FIRST+16
KILLVS	OUTPAT+15, ENVS+6, ENVS+8
SECOND	OUTPAT+15, ENVS+8
SFMT	SLOOP+1
SLOOP	SECOND+9
SWRT	SECOND+9
TFMT	TLOOP+1
THIRD	OUTPAT+15, ENVS+8
TLOOP	THIRD+8
TWRT	THIRD+8

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAY	OUTPAT+3!, ENVS+2!, FFMT+2, FFMT+5, FFMT+6, FFMT+8, FFMT+9, FFMT+11, FFMT+12, FFMT+13 , FFMT+14, FFMT+15, FFMT+16, FFMT+17, FFMT+18, FFMT+19, FWRT+1, FWRT+3, FWRT+4, FWRT+6! , SFMT+2, SFMT+5, SFMT+6, SFMT+8, SFMT+9, SFMT+10, SFMT+11, SFMT+12, SFMT+13, SWRT+1 , SWRT+9, SWRT+11!, TFMT+2, TFMT+4, TFMT+6, TFMT+7*, TWRT+1, TWRT+7, TWRT+9!, KILLVS+1!
CNTR	OUTPAT+2, OUTPAT+6, OUTPAT+13, ENVS+1, ENVS+5, FIRST+3, FWRT+5, SECOND+3, SWRT+10, THIRD+4* , TWRT+8*, KILLVS+1!
CNTR("HOLDER"	FIRST+3*, SECOND+3, THIRD+4
END	OUTPAT+4, ENVS+3, FIRST+16, FWRT+5, SECOND+3, SECOND+9, SWRT+10, THIRD+4, THIRD+8, TWRT+8* , KILLVS+1!
GMRVSTR	OUTPAT+1~, OUTPAT+5, ENVS+4
GMRVSTR("LT"	OUTPAT+7*, ENVS+2!
GMRVSTR(0	OUTPAT+6, ENVS+5
GMT	FIRST+16, FLOOP+2, FFMT+1, SECOND+9, SLOOP+1, SFMT+1, THIRD+8*, TLOOP+1, TFMT+1, KILLVS+1!
GMTAB	FFMT+3, FFMT+4, FFMT+5, FFMT+6, FFMT+7, FFMT+8, FFMT+9, FFMT+10, FFMT+11, FFMT+12 , FFMT+13, FFMT+14, FFMT+15, FFMT+16, FFMT+17, FFMT+18, FFMT+19, SFMT+3, SFMT+4, SFMT+5 , SFMT+6, SFMT+7, SFMT+8, SFMT+9, SFMT+10, SFMT+11, SFMT+12, SFMT+13, TFMT+3*, TFMT+4 , TFMT+5, TFMT+6, TFMT+7, KILLVS+1!
>> GMTSBEG	OUTPAT+4, ENVS+3
GMTSCCNT	FIRST+3~, FIRST+16, FIRST+17, FWRT+1, SECOND+3~, SECOND+10, SWRT+8, THIRD+4~, THIRD+9, TWRT+6
GMTSCTL	FIRST+3~, FLOOP+1, FFMT+19, SECOND+3~, SLOOP+1, SFMT+13, THIRD+4~, TLOOP+1, TFMT+7
>> GMTSEND	OUTPAT+4, ENVS+3
GMTSMVF	OUTPAT+14, ENVS+7, FIRST+7, FIRST+13, FFMT+5, FFMT+6, FFMT+8, FFMT+9, FFMT+11, FFMT+12 , SECOND+6, SFMT+5, SFMT+6, SFMT+8, SFMT+9, SWRT+5, KILLVS+2!
>> GMTSNDM	OUTPAT+2, ENVS+1
>> GMTSNPG	SWRT+3, TWRT+3
>> GMTSQIT	OUTPAT+12, FIRST+4, FIRST+5, FIRST+6, FIRST+9, FIRST+10, FIRST+11, FIRST+12, FIRST+15, FWRT+2 , SECOND+4, SWRT+2, THIRD+5, TWRT+2
GMTSVMVR	OUTPAT+15, ENVS+8, FIRST+3*, FIRST+4, FIRST+10, FWRT+3, FWRT+4, KILLVS+1!
GMTSVS	FFMT+1, FFMT+2, FFMT+5, FFMT+6, FFMT+8, FFMT+9, FFMT+11, FFMT+12, FFMT+13, FFMT+14 , FFMT+15, FFMT+18, SFMT+1, SFMT+2, SFMT+5, SFMT+6, SFMT+8, SFMT+9, SFMT+10, SFMT+11 , SFMT+12, TFMT+1*, TFMT+2, TFMT+4, KILLVS+1!
GMTSVT	FLOOP+1, FLOOP+2, FFMT+1, FFMT+3, SLOOP+1, SFMT+1, SFMT+3, TLOOP+1, TFMT+1, TFMT+3 , KILLVS+1!
GMW	FIRST+3~, SECOND+3~, THIRD+4~
IEN	FLOOP+2, FFMT+1, SLOOP+1, SFMT+1, TLOOP+1*, TFMT+1, KILLVS+1!
LF	OUTPAT+4, ENVS+3, KILLVS+1!
T1	OUTPAT+4, OUTPAT+6, ENVS+3, ENVS+5, KILLVS+1!
T2	OUTPAT+4, OUTPAT+6, ENVS+3, ENVS+5, KILLVS+1!
TDT	FFMT+1, FFMT+2, SFMT+2, TFMT+2, KILLVS+1!
TI	FFMT+2, SFMT+2, TFMT+2*, KILLVS+1!
TN	OUTPAT+4, ENVS+3, KILLVS+1!
U	OUTPAT+6, ENVS+5, FFMT+1, FFMT+2, FFMT+5, FFMT+6, FFMT+8, FFMT+9, FFMT+11, FFMT+12 , FFMT+13, FFMT+14, FFMT+15, FFMT+16, FFMT+17, FFMT+18, FFMT+19, FWRT+1, FWRT+3, FWRT+4 , SFMT+2, SFMT+5, SFMT+6, SFMT+8, SFMT+9, SFMT+10, SFMT+11, SFMT+12, SFMT+13, SWRT+1 , SWRT+9, TFMT+2, TFMT+4, TFMT+6, TFMT+7, TWRT+1, TWRT+7
VAL	FN+1~*, FN+2
X	FFMT+1, FFMT+2, SFMT+2, TFMT+2, KILLVS+1!, FN~, FN+1, FN+2*
Y	FN~, FN+1*, FN+2

Customize PDF page

Package: Health Summary

Routine: GMTSVS

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: