LEGACY UB-92 (746) IB FORM FIELD CONTENT (364.7)
Name
Value
FORM FIELD REFERENCE
LEGACY UB-92
SECURITY LEVEL
NATIONAL,NO EDIT
DATA ELEMENT
N-GET FROM PREVIOUS EXTRACT
PAD CHARACTER
NO PAD REQUIRED
FORMAT CODE
I $D(IBXSAVE("DX",3)) S IBXDATA=$P($G(^ICD9(+IBXSAVE("DX",3),0)),U) K IBXSAVE("DX",3)
FORMAT CODE DESCRIPTION
If there is a third diagnosis, print its name.