D:'$D(IBXSAVE("IDEM")) F^IBCEF("N-CURR INSURED DEMOGRAPHICS") S IBXDATA=$P($G(IBXSAVE("IDEM")),U,5)
DESCRIPTION
If the variable IBXSAVE("IDEM") exists, the 5th '^' piece of this data
contains the value for this field. If it doesn't exist, extract the field
that sets it.