VPR VITAL TYPE (42)    ENTITY (1.5)

• 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)

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.