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",6)) S IBXDATA=$P($G(^ICD9(+IBXSAVE("DX",6),0)),U) K IBXSAVE("DX",6) |
FORMAT CODE DESCRIPTION | If there is a sixth diagnosis, print its name. |