| NAME |
VPR PATIENT ELIGIBILITY |
| DEFAULT FILE NUMBER |
8 |
| DATA MODEL |
SDA |
| DISPLAY NAME |
Eligibility |
| ITEM |
-
- Name
- SEQUENCE: 1
- ITEM TYPE: SIMPLE FIELD
- FILE NUMBER: 8
- FIELD NUMBER: .01
- GET ACTION: S VALUE=$P($G(VPRELIG),U)
-
- IsPrimary
- SEQUENCE: 2
- ITEM TYPE: FIXED STRING
- GET ACTION: S VALUE=$S($P($G(VPRELIG),U,2):"true",1:"false")
|
| DESCRIPTION |
This entity supports VPR PATIENT, returning an eligibility for which the
patient is entitled to care. Since this data is usually extracted via
VADPT, the string ien^name^primary may be passed in as the ID and the
properties will look for the existence of these pieces first.
|
| GET EXIT ACTION |
K VPRELIG |
| GET ID ACTION |
S VPRELIG=$P(DIEN,U,2,3),DIEN=+DIEN |
