VPR COMBAT SERVICE (192)    ENTITY (1.5)

Name Value
NAME VPR COMBAT SERVICE
DEFAULT FILE NUMBER 2
DATA MODEL SDA
DISPLAY NAME Conflict
ITEM
  • IsIndicated
    SEQUENCE:   1
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   2
    FIELD NUMBER:   .5291
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$S(VALUE:"true",1:"false")
    GET ACTION:   S VALUE=+$G(VASV(5))
  • FromTime
    SEQUENCE:   2
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   2
    FIELD NUMBER:   .5293
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(VASV(5,1)),U) I VALUE="",'$G(VASV(5)) S DDEOUT=1
  • ToTime
    SEQUENCE:   3
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   2
    FIELD NUMBER:   .5294
    RETURN INTERNAL VALUE:   YES
    OUTPUT TRANSFORM:   S VALUE=$$DATE^VPRSDA(VALUE)
    GET ACTION:   S VALUE=$P($G(VASV(5,2)),U) I VALUE="",'$G(VASV(5)) S DDEOUT=1
  • Period
    SEQUENCE:   4
    ITEM TYPE:   ENTITY
    FILE NUMBER:   2
    FIELD NUMBER:   .5292
    RETURN INTERNAL VALUE:   YES
    ENTITY:   VPR COMBAT PERIOD
    GET ACTION:   S VALUE=$G(VASV(5,3)) I VALUE="",'$G(VASV(5)) S DDEOUT=1
DESCRIPTION
This entity supports VPR PATIENT EXTENSION, adding information about the 
patient's service in combat.