N-DIAGNOSIS CODE REFS (170)    IB DATA ELEMENT DEFINITION (364.5)

Name Value
NAME N-DIAGNOSIS CODE REFS
SECURITY LEVEL NATIONAL,NO EDIT
TYPE OF ELEMENT EXTRACTED VIA CODE
ELEMENT CATEGORY GROUP ELEMENT
BASE FILE BILL/CLAIMS
EXTRACT CODE D:'$D(IBXSAVE("BOX24")) B24^IBCEF3(.IBXSAVE,IBXIEN) D TEXT24^IBCEU3("E",.IBXSAVE,.IBXDATA)
DESCRIPTION
Data element relies on the data previously extracted in array
IBXSAVE("BOX24") from HCFA 1500 SERVICES PRINT.  Returns the array of
Dx code references for each procedure being billed in IBXDATA(n).  Since
each procedure has 2 lines of data, if there is a text line present for a
procedure (IBXSAVE("BOX24",n,"TEXT") is defined), the data is returned on
the upper line and the characters 42-48 of the text are returned on the
bottom line.  If there is no text, the upper line is returned as null and
the data extracted is returned on the second line.