VPR VIETNAM SERVICE (184)    ENTITY (1.5)

Name Value
NAME VPR VIETNAM SERVICE
DEFAULT FILE NUMBER 2
DATA MODEL SDA
DISPLAY NAME Conflict
ITEM
  • IsIndicated
    SEQUENCE:   1
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   2
    FIELD NUMBER:   .32101
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$S(VALUE:"true",VALUE="Y":"true",1:"false")
    GET ACTION:   S VALUE=+$G(VASV(1))
  • FromTime
    SEQUENCE:   2
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   2
    FIELD NUMBER:   .32104
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(VASV(1,1)),U) I VALUE="",'$G(VASV(1)) S DDEOUT=1
  • ToTime
    SEQUENCE:   3
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   2
    FIELD NUMBER:   .32105
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(VASV(1,2)),U) I VALUE="",'$G(VASV(1)) S DDEOUT=1
DESCRIPTION
This entity supports VPR PATIENT EXTENSION, adding information about the 
patient's service in the Vietnam conflict. It expects the VASV array.