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

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

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+13, FIRST+5, FIRST+6, FIRST+7, FIRST+9, FIRST+10, FIRST+11, FWRT+2, SECOND+4, SWRT+2 , THIRD+5, TWRT+2
EN1^GMVHS	OUTPAT+9, ENVS+7
$$VERSION^XPDUTL	FIRST+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "* No Outpatient measurements *",!! Line Location: OUTPAT+13
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,"F(C)",?55,"IN(CM)",?68,"LB(KG)",! Line Location: FIRST+6
Function Call: WRITE	Prompt: ?20,"----",?29,"-----",?36,"----",?45,"--",?55,"------",?68,"------",!! Line Location: FIRST+7
Function Call: WRITE	Prompt: "Measurement DT",?18,"TEMP",?30,"PULSE",?36,"RESP",?41,"BP",?53,"HT",?63,"WT",! Line Location: FIRST+9
Function Call: WRITE	Prompt: ?18,"F(C)",?53,"IN(CM)",?63,"LB(KG)[BMI]",! Line Location: FIRST+10
Function Call: WRITE	Prompt: ?18,"----",?30,"-----",?36,"----",?41,"--",?53,"------",?63,"-----------",!! Line Location: FIRST+11
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,"CMH20(MMHG)",?32,"(L/MIN)(%)",?45,"IN(CM)",!,?18,"-----------",?32,"----------",?45,"------",!! Line Location: SECOND+6
Function Call: WRITE	Prompt: !,"Measurement DT",?18,"CVP",?34,"POx",?46,"CG" Line Location: SWRT+4
Function Call: WRITE	Prompt: !,?18,"CMH20(MMHG)",?32,"(L/MIN)(%)",?45,"IN(CM)",!,?18,"-----------",?32,"----------",?45,"------",!! Line Location: SWRT+5
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+7
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+12, ENVS+2!, ENVS+7, FIRST+12, FLOOP+2, FFMT+1, SECOND+7, SLOOP+1, SFMT+1 , THIRD+8, TLOOP+1, TFMT+1, KILLVS+2!

Label References

Name	Line Occurrences
$$FN	FFMT+4, FFMT+5, FFMT+6, SFMT+7, TFMT+6
ENVS	OUTPAT+14
FFMT	FLOOP+2
FIRST	OUTPAT+15, ENVS+8
FLOOP	FIRST+12
FWRT	FIRST+12
KILLVS	OUTPAT+15, ENVS+7, ENVS+8
SECOND	OUTPAT+15, ENVS+8
SFMT	SLOOP+1
SLOOP	SECOND+7
SWRT	SECOND+7
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+4, FFMT+5, FFMT+6, FFMT+7, FFMT+8, FFMT+9, FFMT+10 , FFMT+11, FFMT+13, FFMT+14, FWRT+1, FWRT+3, FWRT+4, FWRT+6!, SFMT+2, SFMT+4, SFMT+5 , SFMT+6, SFMT+7, SFMT+8, SWRT+1, SWRT+7, SWRT+9!, TFMT+2, TFMT+4, TFMT+6, TFMT+7* , TWRT+1, TWRT+7, TWRT+9!, KILLVS+1!
CNTR	OUTPAT+2, OUTPAT+6, OUTPAT+14, ENVS+1, ENVS+5, FIRST+3, FWRT+5, SECOND+3, SWRT+8, THIRD+4* , TWRT+8*, KILLVS+1!
CNTR("HOLDER"	FIRST+3*, SECOND+3, THIRD+4
END	OUTPAT+4, ENVS+3, FIRST+12, FWRT+5, SECOND+3, SECOND+7, SWRT+8, 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+12, FLOOP+2, FFMT+1, SECOND+7, 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+13 , FFMT+14, SFMT+3, SFMT+4, SFMT+5, SFMT+6, SFMT+7, SFMT+8, TFMT+3*, TFMT+4, TFMT+5 , TFMT+6, TFMT+7, KILLVS+1!
>> GMTSBEG	OUTPAT+4, ENVS+3
GMTSCCNT	FIRST+3~, FIRST+12, FIRST+13, FWRT+1, SECOND+3~, SECOND+8, SWRT+6, THIRD+4~, THIRD+9, TWRT+6
GMTSCTL	FIRST+3~, FLOOP+1, FFMT+14, SECOND+3~, SLOOP+1, SFMT+8, THIRD+4~, TLOOP+1, TFMT+7
>> GMTSEND	OUTPAT+4, ENVS+3
>> GMTSNDM	OUTPAT+2, ENVS+1
>> GMTSNPG	SWRT+3, TWRT+3
>> GMTSQIT	OUTPAT+13, FIRST+4, FIRST+5, FIRST+6, FIRST+7, FIRST+8, FIRST+9, FIRST+10, FIRST+11, FWRT+2 , SECOND+4, SWRT+2, THIRD+5, TWRT+2
GMTSVMVR	OUTPAT+15, ENVS+8, FIRST+3*, FIRST+4, FIRST+8, FWRT+3, FWRT+4, KILLVS+1!
GMTSVS	FFMT+1, FFMT+2, FFMT+4, FFMT+5, FFMT+6, FFMT+7, FFMT+8, FFMT+9, FFMT+13, SFMT+1 , SFMT+2, SFMT+4, SFMT+5, SFMT+6, SFMT+7, 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	FFMT+1, FFMT+2, FFMT+4, FFMT+5, FFMT+6, FFMT+7, FFMT+8, FFMT+9, FFMT+10, FFMT+11 , FFMT+13, FFMT+14, FWRT+1, FWRT+3, FWRT+4, SFMT+2, SFMT+4, SFMT+5, SFMT+6, SFMT+7 , SFMT+8, SWRT+1, SWRT+7, 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: 4

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: