I $D(IBXSAVE("DX",15)) S IBXDATA=$S($$INPAT^IBCEF(IBXIEN):$P(IBXSAVE("DX",15),U,2),1:" ") K IBXSAVE("DX",15)
FORMAT CODE DESCRIPTION
This is the present on admissions indicator. The value "U" (No
Information in the Record) is sent for INPATIENT claims if no
POA indicator is available.