VPR INSURANCE COMPANY (4)    ENTITY (1.5)

• SDACodingStandard
  SEQUENCE:   1
  ITEM TYPE:   FIXED STRING
  FIXED RESPONSE:   VA36
• Code
  SEQUENCE:   6
  ITEM TYPE:   ID
• Description
  SEQUENCE:   7
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   36
  FIELD NUMBER:   .01
  GET ACTION:   S VALUE=$P($G(VPRINS(VPRP,1)),U,2)
• Address
  SEQUENCE:   8
  ITEM TYPE:   ENTITY
  FILE NUMBER:   36
  ENTITY:   VPR INS COMPANY ADDRESS
  GET ACTION:   S VALUE=DIEN
• ContactInfo
  SEQUENCE:   10
  ITEM TYPE:   COMPLEX GROUP

  COMPLEX TYPE:

  • COMPLEX ITEM SEQUENCE:   3
    COMPLEX ITEM NAME:   WorkPhoneNumber

• WorkPhoneNumber
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   36
  FIELD NUMBER:   .131
  GET ACTION:   S VALUE=$G(VPRINS(VPRP,6))

This entity supports VPR INSURANCE by returning data from the INSURANCE
COMPANY (#36) file. It expects the company IEN as the ID (DIEN), and the
VPRINS array that contains the results of the IBBAPI call.