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