VPR INS COMPANY ADDRESS (67)    ENTITY (1.5)

Name Value
NAME VPR INS COMPANY ADDRESS
DEFAULT FILE NUMBER 36
DATA MODEL SDA
DISPLAY NAME Address
ITEM
  • Street
    SEQUENCE:   4
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   36
    FIELD NUMBER:   .111
    GET ACTION:   S VALUE=$G(VPRINS(VPRP,2)) S:$L($G(VPRINS(VPRP,23))) VALUE=VALUE_";"_$G(VPRINS(VPRP,23)) S:$L($G(VPRINS(VPRP,24))) VALUE=VALUE_";"_$G(VPRINS(VPRP,24))
  • City
    SEQUENCE:   5
    ITEM TYPE:   ENTITY
    FILE NUMBER:   36
    FIELD NUMBER:   .114
    ENTITY:   VPR CODE ONLY
    OUTPUT TRANSFORM:   S VALUE=$E(VALUE,1,50)
    GET ACTION:   S VALUE=$G(VPRINS(VPRP,3))
  • State
    SEQUENCE:   6
    ITEM TYPE:   ENTITY
    FILE NUMBER:   36
    FIELD NUMBER:   .115
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR STATE
    GET ACTION:   S VALUE=$P($G(VPRINS(VPRP,4)),U)
  • Zip
    SEQUENCE:   7
    ITEM TYPE:   ENTITY
    FILE NUMBER:   36
    FIELD NUMBER:   .116
    ENTITY:   VPR CODE ONLY
    GET ACTION:   S VALUE=$G(VPRINS(VPRP,5))
DESCRIPTION 
This entity support VPR INSURANCE and VPR INSURANCE COMPANY by returning
the address components from an entry in 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.