VPR PATIENT ECON (74)    ENTITY (1.5)

• Name
  SEQUENCE:   2
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2
  FIELD NUMBER:   .331
  ENTITY:   VPR NAME
  GET ACTION:   S VALUE=$G(VAOA(9))
• Address
  SEQUENCE:   6
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2
  ENTITY:   VPR PATIENT ECON ADDRESS
  GET ACTION:   S VALUE=DIEN
• ContactInfo
  SEQUENCE:   7
  ITEM TYPE:   COMPLEX GROUP

  COMPLEX TYPE:

  • COMPLEX ITEM SEQUENCE:   2
    COMPLEX ITEM NAME:   HomePhoneNumber
  • COMPLEX ITEM SEQUENCE:   3
    COMPLEX ITEM NAME:   WorkPhoneNumber

• HomePhoneNumber
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2
  FIELD NUMBER:   .339
  GET ACTION:   S VALUE=$G(VAOA(8))
• WorkPhoneNumber
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2
  FIELD NUMBER:   .33011
• Relationship
  SEQUENCE:   8
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2
  FIELD NUMBER:   .332
  ENTITY:   VPR TEXT ONLY
  GET ACTION:   S VALUE=$G(VAOA(10)) S:VALUE="" VALUE=$G(VAOA(12))
• ContactType
  SEQUENCE:   9
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2
  ENTITY:   VPR CODE TABLE
  GET ACTION:   S VALUE="ECON^Emergency Contact"
• PrimaryContact
  SEQUENCE:   10
  ITEM TYPE:   FIXED STRING
  FIXED RESPONSE:   true
• EnteredAt
  SEQUENCE:   13
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2
  ENTITY:   VPR FACILITY
  GET ACTION:   S VALUE=$G(VASITE) ;default #4 ien

This entity supports VPR PATIENT, and expects the Patient file #2 ien
as the ID. It returns the patient's Emergency Contact.