Routine: GMRVUT3

Information

GMRVUT3 ;HIRMFO/YH,FT-VITAL MEASUREMENT SITE/QUALIFIER SELECTIO ;6/13/01 10:12

Package	Total	Call Graph
General Medical Record - Vitals	1	LISTQ^GMRVQUAL
Kernel	1	$$UP^XLFSTR
VA Fileman	1	YN^DICN

Package	Total	Caller Graph
General Medical Record - Vitals	4	GMRVED3 GMRVED6 GMRVEE2 GMRVUT1

Name	Comments	DBIA/ICR reference
ASKM1
O2DATA(I,J)	;
ASKO2
CVP	;INPUT TRANSFORM FOR CVP
CHECK	;
ASKM
ASKINF
ROOMSEL	;
SETSITE	;SET THE V/M SITE FOR THE VARIAVLE GMRSITE
ASK
O2	;SUPPLEMENTAL O2 FOR PULSE OXIMETRY
GIRTH	;INPUT TRANSFORM FOR CIRCUMFERENCE/GIRTH

Name	Line Occurrences
Function Call: WRITE	Prompt: !,?5,G_". "_GMRV(+G) Line Location: ASK+0
Function Call: READ	Timeout: DTIME Variable: G(1) Line Location: ASK+1
Function Call: WRITE	Prompt: ?33,I(3),". ",$G(GMRMSL(I(3))) Condition for execution: $G(GMRMSL($G(I(2))))'="" ?16,I(2),". ",$G(GMRMSL(I(2))) W:$G(GMRMSL($G(I(3))))'="" Line Location: ROOMSEL+1
Function Call: WRITE	Prompt: !,"Is the patient on supplemental oxygen" Line Location: ASKO2+0
Function Call: WRITE	Prompt: !!,"Enter the numeric value(s) for amount of supplemental oxygen provided",!,"(Separate values with a ',') : " Line Location: ASKINF+0
Function Call: READ	Timeout: DTIME Variable: GMRV Line Location: ASKINF+1
Function Call: WRITE	Prompt: !!,"Enter a number between 0.5-20 for liters/minute, and/or ",!,?23,"21-100 for percent of oxygen concentration.",!,"If you wish to enter both rates, separate the values with a ','.",! Line Location: ASKINF+3
Function Call: WRITE	Prompt: !!,"ERROR ENTRY!",! Line Location: ASKINF+5
Function Call: WRITE	Prompt: !!,"ERROR ENTRY!" Line Location: ASKINF+6
Function Call: WRITE	Prompt: !,"Oxygen is supplied by",! Line Location: ASKM1+1
Function Call: WRITE	Prompt: !,?5,I_" "_$P(GCHART1(I),"^") Line Location: ASKM1+2
Function Call: READ	Timeout: DTIME Variable: GMRV Line Location: ASKM1+3

Name	Field # of Occurrence
%	O2+1~, ASKO2*, ASKO2+1, ASKO2+2
DTIME	ASK+1, ASKINF+1, ASKM1+3
G	SETSITE+2~, ASK
G(1	ASK+1*, ASK+2, ASK+3, ASK+4
>> GCHART1	ASKINF+13
>> GCHART1(	ASKM1+2, ASKM1+5, ASKM1+6
>> GCOUNT(1	ASKM, ASKM1+2
>> GLVL	ASKINF+12*
>> GMRINF(	O2+1*
>> GMRMSL(	ROOMSEL+1, ROOMSEL+2
>> GMRO2(	O2+1, ASKINF+11
>> GMROUT	ASK+1, ASKO2, ASKINF+1, ASKM1+3
>> GMRSITE	SETSITE+2, SETSITE+3, ASK+4
>> GMRSITE(	SETSITE+3, ASK+4, O2+1, ASKM1+5
GMRV	SETSITE+2, SETSITE+3, ASK+1, O2+1~, ASKINF+1, ASKINF+2, ASKINF+3, ASKINF+4, ASKM, ASKM+2 , ASKM1, ASKM1+2, ASKM1+3*, ASKM1+4, ASKM1+5, ASKM1+6, ASKM1+7, CHECK+1
GMRV(	SETSITE+2*, SETSITE+3, ASK, ASK+3, ASK+4
>> GMRVIT(1	ASK
>> GMRVITY	SETSITE+3, ASK+4, O2+1, ASKINF+11, ASKM1+5
GMRVPO	ASKINF+8~, ASKINF+9*
GMRVSAVE	ASKM+1~, ASKM+2*, ASKM1
>> GMRW(	SETSITE+2, SETSITE+3, ASK+4
GMRX	O2+1~, ASKINF+6, ASKINF+9, ASKINF+11, CHECK+1, CHECK+2
GMRY	O2+1~, ASKINF+6, ASKINF+7, ASKINF+9, ASKINF+11, CHECK+1, CHECK+3
GMRZ	O2+1~, ASKINF+5*, CHECK+2, CHECK+3
I	ASKM1+2, O2DATA~, O2DATA+1, O2DATA+2, O2DATA+3*
I(1	ROOMSEL+1, ROOMSEL+3*
I(2	ROOMSEL+1, ROOMSEL+3*
I(3	ROOMSEL+1, ROOMSEL+3*
I(4	ROOMSEL+2, ROOMSEL+3*
I(5	ROOMSEL+2, ROOMSEL+3*
J	O2DATA~, O2DATA+1, O2DATA+4
UNIT	GIRTH+1~, GIRTH+2, GIRTH+3, CVP+1~*, CVP+2
X	GIRTH+1, GIRTH+2, GIRTH+3!, GIRTH+4!, CVP+1!, CVP+2*, CVP+3!