Routine: GMTSVSS

Package	Total	Call Graph
Health Summary	3	REGDTM4^GMTSU CKP^GMTSUP $$IMDSORD^GMTSVS
General Medical Record - Vitals	2	$$FIELD^GMVGETVT EN1^GMVHS
Kernel	1	$$VERSION^XPDUTL
VA FileMan	1	%XY^%RCR

Name	Comments	DBIA/ICR reference
OUTPAT	; Outpatient Select Vitals Signs Main control
ENVS	; Set up for extraction routine
BLDSTR	; Builds GMRVSTR string for extract call
BLDHDR	; Builds the HDR array
WRTHDR	; Writes Header
WRTHDR1	; Writes 2nd line of header
WRT	; Writes vitals record for one observation time
NXTROW	; Get the Next Row of Vital Signs

Name	Field # of Occurrence
%XY^%RCR	NXTROW+1
REGDTM4^GMTSU	WRT+2
CKP^GMTSUP	OUTPAT+13, OUTPAT+17, OUTPAT+21, ENVS+12, ENVS+16, WRTHDR+2, WRTHDR+3, WRTHDR+5, WRTHDR+7, WRTHDR1+2 , WRTHDR1+6, WRTHDR1+13, WRT+3, WRT+6, WRT+17
$$IMDSORD^GMTSVS	OUTPAT+10, ENVS+9
$$FIELD^GMVGETVT	BLDSTR+3
EN1^GMVHS	OUTPAT+9, ENVS+7
$$VERSION^XPDUTL	BLDSTR+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: "* No Outpatient measurements *",!! Line Location: OUTPAT+13
Function Call: WRITE	Prompt: ! Line Location: OUTPAT+17
Function Call: WRITE	Prompt: !! Line Location: OUTPAT+20
Function Call: WRITE	Prompt: ! Line Location: OUTPAT+21
Function Call: WRITE	Prompt: ! Line Location: ENVS+12
Function Call: WRITE	Prompt: !! Line Location: ENVS+15
Function Call: WRITE	Prompt: ! Line Location: ENVS+16
Function Call: WRITE	Prompt: "Measurement DT" Line Location: WRTHDR+2
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$P(HDR(GMI),U,2) Line Location: WRTHDR+4
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$P(HDR(GMI),U,2) Line Location: WRTHDR+6
Function Call: WRITE	Prompt: ! Line Location: WRTHDR+7
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"CM(IN)",1:"IN(CM)") Line Location: WRTHDR1+3
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"KG(LB)",1:"LB(KG)") Line Location: WRTHDR1+4
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"C(F)",1:"F(C)") Line Location: WRTHDR1+5
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"CM(IN)",1:"IN(CM)") Line Location: WRTHDR1+7
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"KG(LB)",1:"LB(KG)")_"[BMI]" Line Location: WRTHDR1+8
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"C(F)",1:"F(C)") Line Location: WRTHDR1+9
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"MMHG(CMH2O)",1:"CMH2O(MMHG)") Line Location: WRTHDR1+10
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),"(L/MIN)(%)" Line Location: WRTHDR1+11
Function Call: WRITE	Prompt: ?$P(COL,U,GMI+1),$S(GMTSMVF:"CM(IN)",1:"IN(CM)") Line Location: WRTHDR1+12
Function Call: WRITE	Prompt: !! Line Location: WRTHDR1+13
Function Call: WRITE	Prompt: GMTDT Line Location: WRT+3
Function Call: WRITE	Prompt: ?$P(COL,U,GMTSI+1),GMTSVAL Line Location: WRT+9
Function Call: WRITE	Prompt: "("_GMTSMET_")" Line Location: WRT+12
Function Call: WRITE	Prompt: ?$P(COL,U,GMTSI+1),GMTSVAL Line Location: WRT+22
Function Call: WRITE	Prompt: "("_GMTSMET_")" Line Location: WRT+29
Function Call: WRITE	Prompt: "["_GMTSBMI_"]" Line Location: WRT+30
Function Call: WRITE	Prompt: "["_GMTSLMIN_"]["_GMTSPERC_"]" Line Location: WRT+31
Function Call: WRITE	Prompt: "["_GMTSQUAL_"]" Line Location: WRT+32

Name	Line Occurrences (* Changed, ! Killed)
^UTILITY($J	OUTPAT+3!, OUTPAT+12, OUTPAT+17, OUTPAT+21, OUTPAT+22!, ENVS+2!, ENVS+8, ENVS+12, ENVS+16, ENVS+17! , WRT+5, WRT+7, WRT+8, WRT+10, WRT+11, WRT+16, WRT+18, WRT+19, WRT+23, WRT+27

Name	Line Occurrences
BLDHDR	OUTPAT+9, ENVS+7
BLDSTR	OUTPAT+4, ENVS+4
ENVS	OUTPAT+14
NXTROW	OUTPAT+15, OUTPAT+19, ENVS+10, ENVS+14
WRT	OUTPAT+17, OUTPAT+21, ENVS+12, ENVS+16
WRTHDR	OUTPAT+16, OUTPAT+20, ENVS+11, ENVS+15, WRT+3
WRTHDR1	OUTPAT+16, OUTPAT+20, ENVS+11, ENVS+15, WRT+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%X	NXTROW+1*, NXTROW+2!
%Y	NXTROW+1*, NXTROW+2!
ABB	BLDHDR+1~, BLDHDR+3*, BLDHDR+5
CNT	OUTPAT+1~, ENVS+1~, BLDHDR+13, BLDHDR+18, BLDHDR+19, BLDHDR+21, BLDHDR+24, BLDHDR+25
COL	OUTPAT+1~, ENVS+1~, BLDHDR+1, BLDHDR+9, BLDHDR+10, BLDHDR+11, WRTHDR+4, WRTHDR+6, WRTHDR1+3, WRTHDR1+4 , WRTHDR1+5, WRTHDR1+7, WRTHDR1+8, WRTHDR1+9, WRTHDR1+10, WRTHDR1+11, WRTHDR1+12, WRT+9, WRT+22, NXTROW+2
COL(	OUTPAT+18, ENVS+13, BLDHDR+13, BLDHDR+17, BLDHDR+21, BLDHDR+23, NXTROW+2
COLL	OUTPAT+1~, ENVS+1~, BLDHDR+9, BLDHDR+11, BLDHDR+12, BLDHDR+13, BLDHDR+15, BLDHDR+16, BLDHDR+17, BLDHDR+21 , BLDHDR+22*, BLDHDR+23
GMI	WRTHDR+1~, WRTHDR+3, WRTHDR+4, WRTHDR+5, WRTHDR+6, WRTHDR1+1~, WRTHDR1+2, WRTHDR1+3, WRTHDR1+4, WRTHDR1+5 , WRTHDR1+6, WRTHDR1+7, WRTHDR1+8, WRTHDR1+9, WRTHDR1+10, WRTHDR1+11, WRTHDR1+12
GMLEN	WRT+1~
GMRVSTR	OUTPAT+1~, OUTPAT+5, ENVS+5, BLDSTR+4*, BLDHDR+2, BLDHDR+3
GMRVSTR("LT"	OUTPAT+8*, ENVS+2!
GMRVSTR(0	OUTPAT+6, ENVS+6
GMTDT	WRT+1~, WRT+2*, WRT+3
>> GMTSBEG	OUTPAT+6, ENVS+6
GMTSBMI	WRT+1~, WRT+26*, WRT+30
GMTSDA	OUTPAT+1~, OUTPAT+4, ENVS+1~, ENVS+4, BLDSTR+3
GMTSDT	OUTPAT+1~, OUTPAT+17, OUTPAT+21, ENVS+1~, ENVS+12, ENVS+16, WRT+2, WRT+5, WRT+7, WRT+8 , WRT+10, WRT+11, WRT+16, WRT+18, WRT+19, WRT+23, WRT+27
>> GMTSEG(	OUTPAT+4, ENVS+4
>> GMTSEGN	OUTPAT+4, ENVS+4
>> GMTSEND	OUTPAT+6, ENVS+6
GMTSF	OUTPAT+1~, OUTPAT+17, OUTPAT+21, ENVS+1~, ENVS+12, ENVS+16
GMTSI	OUTPAT+1~, OUTPAT+4, ENVS+1~, ENVS+4, BLDHDR+1~, BLDHDR+2, BLDHDR+3, BLDHDR+4, BLDHDR+5, BLDHDR+7 , BLDHDR+9, BLDHDR+12, WRT+1~, WRT+4, WRT+9, WRT+15*, WRT+22
GMTSLMIN	WRT+1~, WRT+24*, WRT+31
GMTSMET	WRT+1~, WRT+10, WRT+11, WRT+12, WRT+23, WRT+24, WRT+25, WRT+26, WRT+27, WRT+28* , WRT+29
GMTSMVF	OUTPAT+2~, OUTPAT+10, ENVS+1~, ENVS+9, WRTHDR1+3, WRTHDR1+4, WRTHDR1+5, WRTHDR1+7, WRTHDR1+8, WRTHDR1+9 , WRTHDR1+10, WRTHDR1+12, WRT+7, WRT+10, WRT+18, WRT+27
>> GMTSNDM	OUTPAT+3, ENVS+3
>> GMTSNPG	WRT+3
GMTSPERC	WRT+1~, WRT+24*, WRT+31
>> GMTSQIT	OUTPAT+13, OUTPAT+17, OUTPAT+18, OUTPAT+21, ENVS+12, ENVS+13, ENVS+16, WRTHDR+2, WRTHDR+3, WRTHDR+5 , WRTHDR+7, WRTHDR1+2, WRTHDR1+6, WRTHDR1+13, WRT+3, WRT+4, WRT+6, WRT+15, WRT+17
GMTSQUAL	WRT+1~, WRT+25*, WRT+32
GMTSVAL	WRT+1~, WRT+7, WRT+8, WRT+9, WRT+18, WRT+19, WRT+20, WRT+21, WRT+22
GMTSVI	WRT+1~, WRT+2, WRT+4, WRT+5, WRT+15*, WRT+16
GMTSVMVR	OUTPAT+22!, ENVS+17!, BLDSTR+2*, WRTHDR+3, WRTHDR+5, WRTHDR1+2, WRTHDR1+6, WRT+4, WRT+15
GMTSVT	WRT+1~, WRT+5, WRT+7, WRT+8, WRT+10, WRT+11, WRT+16, WRT+18, WRT+19, WRT+20 , WRT+21, WRT+23, WRT+27, WRT+32
GMW	OUTPAT+1~, ENVS+1~
HDR	OUTPAT+1~, ENVS+1~, NXTROW+1!
HDR(	BLDHDR+3, BLDHDR+4, BLDHDR+5, BLDHDR+7, BLDHDR+12, BLDHDR+14, BLDHDR+15, BLDHDR+16, BLDHDR+18, BLDHDR+20! , BLDHDR+22, BLDHDR+24, BLDHDR+26!, WRTHDR+3, WRTHDR+4, WRTHDR+5, WRTHDR+6, WRTHDR1+2, WRTHDR1+3, WRTHDR1+4 , WRTHDR1+5, WRTHDR1+6, WRTHDR1+7, WRTHDR1+8, WRTHDR1+9, WRTHDR1+10, WRTHDR1+11, WRTHDR1+12, WRT+4, WRT+5 , WRT+15, WRT+16
HDR1	ENVS+1~
HDR1(	BLDHDR+18, BLDHDR+24
IEN	WRT+1~, WRT+5, WRT+6, WRT+7, WRT+8, WRT+10, WRT+11, WRT+16, WRT+17, WRT+18 , WRT+19, WRT+23, WRT+27
LOOP	OUTPAT+1~, ENVS+1~, BLDHDR+14*, BLDHDR+15, BLDHDR+16, BLDHDR+18, BLDHDR+20, BLDHDR+22, BLDHDR+24, BLDHDR+26
MAX	OUTPAT+1~, OUTPAT+3, OUTPAT+6, OUTPAT+14, OUTPAT+17, OUTPAT+21, ENVS+3*, ENVS+6, ENVS+12, ENVS+16
ROW	OUTPAT+1~, OUTPAT+15, OUTPAT+18, ENVS+1~, ENVS+10, ENVS+13, BLDHDR+13, BLDHDR+17, BLDHDR+18, BLDHDR+21 , BLDHDR+23, BLDHDR+24, NXTROW+1, NXTROW+2
U	OUTPAT+6, ENVS+6, BLDHDR+4, BLDHDR+8, BLDHDR+9, BLDHDR+10, BLDHDR+12, BLDHDR+15, BLDHDR+16, BLDHDR+17 , BLDHDR+22, BLDHDR+23, WRTHDR+4, WRTHDR+6, WRTHDR1+3, WRTHDR1+4, WRTHDR1+5, WRTHDR1+7, WRTHDR1+8, WRTHDR1+9 , WRTHDR1+10, WRTHDR1+11, WRTHDR1+12, WRT+5, WRT+7, WRT+8, WRT+9, WRT+10, WRT+11, WRT+16 , WRT+18, WRT+19, WRT+22, WRT+23, WRT+24, WRT+25, WRT+26, WRT+27, WRT+28
VIT	BLDSTR+1~, BLDSTR+3*, BLDSTR+4
WIDTH	OUTPAT+1~, ENVS+1~, BLDHDR+7, BLDHDR+8, BLDHDR+9, BLDHDR+12
X	WRT+1~, WRT+2*

Customize PDF page

Package: Health Summary

Routine: GMTSVSS

Information

Source Information

Call Graph

Call Graph Total: 7

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: