VPR INSURANCE (2)    ENTITY (1.5)

• EnteredBy
  SEQUENCE:   1
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2.312
  FIELD NUMBER:   1.02
  RETURN INTERNAL VALUE:   YES
  ENTITY:   VPR USER
• PrescriptionCoverage
  SEQUENCE:   21
  ITEM TYPE:   FIXED STRING
  GET ACTION:   N X S X=$G(VPRINS(VPRP,15)),VALUE=$S(X="":3,+X:1,1:2) ;1=YES, 2=NO, 3=UNK
• PrimaryInsuranceIndicator
  SEQUENCE:   22
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   .2
  RETURN INTERNAL VALUE:   YES
  OUTPUT TRANSFORM:   S VALUE=$S(+VALUE=1:1,VALUE:4,1:3) ;1=YES,3=UNK,4=OTHER
  GET ACTION:   S VALUE=$G(VPRINS(VPRP,7))
• PlanSpecificSubscriberID
  SEQUENCE:   26
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   7.02
  GET ACTION:   S VALUE=$G(VPRINS(VPRP,14))
• HealthFund
  SEQUENCE:   30
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2.312
  ENTITY:   VPR INSURANCE PLAN
  GET ACTION:   S VALUE=+$G(VPRINS(VPRP,8)),VPRPIEN=DIEN
• MemberEnrollmentNumber
  SEQUENCE:   10
  ITEM TYPE:   FIXED STRING
  GET ACTION:   S VALUE=+$G(VPRINS(VPRP,1))_";"_+$G(VPRINS(VPRP,8))_";"_$G(VPRINS(VPRP,14)) ; = Company#;Policy#;SubscriberID
• Extension
  SEQUENCE:   31
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2.312
  ENTITY:   VPR INSURANCE EXTENSION
  GET ACTION:   S VALUE=DIEN
• UpdatedOn
  SEQUENCE:   4
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   1.03
  RETURN INTERNAL VALUE:   YES
  OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
  GET ACTION:   S VALUE=$G(VPRINS(VPRP,25))
• EnteredAt
  SEQUENCE:   2
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2.312
  ENTITY:   VPR FACILITY
  GET ACTION:   S VALUE=$G(VASITE) ; default #4 ien
• EnteredOn
  SEQUENCE:   3
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   1.01
  RETURN INTERNAL VALUE:   YES
  OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
• FromTime
  SEQUENCE:   5
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   8
  RETURN INTERNAL VALUE:   YES
  OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
  GET ACTION:   S VALUE=$G(VPRINS(VPRP,10))
• ToTime
  SEQUENCE:   6
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   3
  RETURN INTERNAL VALUE:   YES
  OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
  GET ACTION:   S VALUE=$G(VPRINS(VPRP,11))
• CarrierSpecificMemberID
  SEQUENCE:   12
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   5.01
• InsuranceTypeOrProductCode
  SEQUENCE:   15
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2.312
  FIELD NUMBER:   .18
  EXTENDED POINTER LKUP:   .09
  ENTITY:   VPR CODE TABLE
  OUTPUT TRANSFORM:   S VALUE=VALUE_"^^VHAT"
  GET ACTION:   S VALUE=$P($G(VPRINS(VPRP,21)),U,2)
• IndividualRelationshipCode
  SEQUENCE:   17
  ITEM TYPE:   ENTITY
  FILE NUMBER:   2.312
  FIELD NUMBER:   16
  ENTITY:   VPR CODE TABLE
  OUTPUT TRANSFORM:   S VALUE=VALUE_"^^VHAT"
  GET ACTION:   S VALUE=$P($G(VPRINS(VPRP,19)),U,2)
• InsuredGroupOrPolicyNumber
  SEQUENCE:   18
  ITEM TYPE:   SIMPLE FIELD
  FILE NUMBER:   2.312
  FIELD NUMBER:   .18
  EXTENDED POINTER LKUP:   .04
  GET ACTION:   S VALUE=$G(VPRINS(VPRP,18))

This entity populates the Member Enrollment container in HealthShare from
the PATIENT INSURANCE TYPE (#2.312) sub-file. It expects the record IENS
string as the ID (DIEN).
 
This entity is supported by code in routine VPRSDAIB, which uses the
supported IBBAPI call to extract insurance information. Data is maintained
by monitoring the IBCN NEW INSURANCE EVENTS protocol event.