VPR PATIENT ADDRESS EXTENSION (155)    ENTITY (1.5)

Name Value
NAME VPR PATIENT ADDRESS EXTENSION
DEFAULT FILE NUMBER 2
DATA MODEL SDA
DISPLAY NAME AddressExtension
ITEM
  • BadAddressIndicator
    SEQUENCE:   1
    ITEM TYPE:   FIXED STRING
    GET ACTION:   N X S X=$$BADADR^DGUTL3(DIEN),VALUE=$S(X:$$EXTERNAL^DILFD(2,.121,,X),1:"OK") ;send "" to delete value
DESCRIPTION 
This entity supports VPR PATIENT ADDRESS; it expects the patient DFN as 
the ID.