Name | Value |
---|---|
NAME | N-HCFA 1500 CHARGES |
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("F",.IBXSAVE,.IBXDATA) |
DESCRIPTION | Data element relies on the data previously extracted in array second line. IBXSAVE("BOX24") from HCFA 1500 SERVICES PRINT. Returns the array of raw charges (unformatted) for each procedure being billed in IBXDATA(n). This data is calculated by taking the unit charge * units to get the total charge for the line item. 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 49-58 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 |