VPR VXAM EXTENSION (237)    ENTITY (1.5)

• DataSource
  SEQUENCE:   1
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   9000010.13
  FIELD NUMBER:   81203
  GET ACTION:   S VALUE=$P($G(VPRXM("DATA SOURCE")),U,2)
• Package
  SEQUENCE:   2
  ITEM TYPE:   ENTITY
  FILE NUMBER:   9000010.13
  FIELD NUMBER:   81203
  RETURN INTERNAL VALUE:   YES
  ENTITY:   VPR PACKAGE
  GET ACTION:   S VALUE=$P($G(VPRXM("PACKAGE")),U)
• ResultValue
  SEQUENCE:   3
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   9000010.13
  FIELD NUMBER:   220
  GET ACTION:   S VALUE=$P($G(VPRXM("MEASUREMENT")),U)
• Units
  SEQUENCE:   4
  ITEM TYPE:   ENTITY
  FILE NUMBER:   9000010.13
  FIELD NUMBER:   221
  RETURN INTERNAL VALUE:   YES
  ENTITY:   VPR UNITS
  GET ACTION:   S VALUE=$P($G(VPRXM("MEASUREMENT")),U,2)

This entity extends VPR V EXAM; it expects VPRVST, VPRVST0, and the
VPRXM array.