VPR VITAL TYPE (42) ENTITY (1.5)

Name	Value
NAME	VPR VITAL TYPE
DEFAULT FILE NUMBER	120.51
DATA MODEL	SDA
DISPLAY NAME	ObservationCode
ITEM	SDACodingStandard SEQUENCE: 1 ITEM TYPE: FIXED STRING FIXED RESPONSE: VA120.51 GET ACTION: S:$G(VPRVUID) VALUE="VHAT" Code SEQUENCE: 6 ITEM TYPE: ID FILE NUMBER: 120.51 GET ACTION: S:$G(VPRVUID) VALUE=VPRVUID Description SEQUENCE: 7 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 120.51 FIELD NUMBER: .01 GET ACTION: S VALUE=$$FIELD^GMVGETVT(IEN,1) ObservationValueUnits SEQUENCE: 8 ITEM TYPE: ENTITY FILE NUMBER: 120.51 ENTITY: VPR CODE TABLE OUTPUT TRANSFORM: S VALUE=$S(VALUE="F":"[degF]",VALUE="in":"[in_us]",VALUE="lb":"[lb_av]",1:VALUE)_"^^UCUM" GET ACTION: S VALUE=$$UNIT^VPRDGMV($G(VPRTYPE)),DATA=VALUE S:VALUE="" DDEOUT=1 OriginalText SEQUENCE: 3 ITEM TYPE: SIMPLE FIELD FILE NUMBER: 120.51 FIELD NUMBER: 1 GET ACTION: S VALUE=$G(VPRTYPE)
DESCRIPTION	This entity supports VPR VITAL MEASUREMENT. It expects a pointer to the GMRV VITAL TYPE (#120.51) file and returns a coded element. If a VUID has been assigned, it will be returned as the Code with a coding system of VHAT. This entity also expects the variable VPRTYPE, defined by the main GET ID ACTION.
GET EXIT ACTION	K VPRVUID
GET ID ACTION	S VPRVUID=$$VUID^VPRD(+DIEN,120.51)