Name | Value |
---|---|
NAME | VPR PATIENT NOK |
DEFAULT FILE NUMBER | 2 |
DATA MODEL | SDA |
DISPLAY NAME | SupportContact |
ITEM |
|
DESCRIPTION | This entity supports VPR PATIENT, and expects the Patient file #2 ien as the ID. It returns the patient's Next of Kin. |
GET ENTRY ACTION | S VAOA("A")="",DFN=DIEN D OAD^VADPT |
GET EXIT ACTION | K VAOA |
GET ID ACTION | S:$G(VAOA(9))="" DDEOUT=1 |