VPR MARITAL STATUS (28)    ENTITY (1.5)

Name Value
NAME VPR MARITAL STATUS
DEFAULT FILE NUMBER 11.99
DATA MODEL SDA
DISPLAY NAME MaritalStatus
ITEM
  • Code
    SEQUENCE:   4
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   11.99
    FIELD NUMBER:   1
    RETURN INTERNAL VALUE:   YES
    GET ACTION:   I $G(DATA) N X S X=$$GET1^DIQ(11,+DATA,2,"I"),VALUE=$S(X="S":"A",X="N":"S",1:X)
  • Description
    SEQUENCE:   5
    ITEM TYPE:   SIMPLE FIELD
    FILE NUMBER:   11.99
    FIELD NUMBER:   .01
    GET ACTION:   I $G(DATA) N X S X=$P(DATA,U,2),VALUE=$S(X="NEVER MARRIED":"Single",1:$$LOWER^VALM1(X))
  • SDACodingStandard
    SEQUENCE:   1
    ITEM TYPE:   FIXED STRING
    FIXED RESPONSE:   HL7
DESCRIPTION
This entity supports VPR PATIENT, and expects the Master Marital Status
file #11.99 ien as the ID. If the local variable DATA is defined (i.e.,
the Master Marital Status record cannot be identified), it will contain 
the #11 ien^name and be converted manually to HL7 table values.
GET ID ACTION I DIEN'>0,'$G(DATA) S DDEOUT=1