Name | Value |
---|---|
FORM FIELD REFERENCE | IB 837 TRANSMISSION |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-UB-04 PROCEDURES |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | K:$$FT^IBCEF(IBXIEN)=2!($$FT^IBCEF(IBXIEN)=7)!'$$INPAT^IBCEF(IBXIEN) IBXDATA N Z S Z=0 F S Z=$O(IBXDATA(Z)) K:'Z IBXDATA Q:'Z I '$D(IBXDATA(Z,"M")) S IBXSAVE("PROC",Z)=IBXDATA(Z) I Z'<25 K IBXDATA Q |
FORMAT CODE DESCRIPTION | This is a group data element so more than 1 occurrence of a value is possible for the data element in the IBXDATA array. If an institutional bill or if the bill is professional and the procedure being extracted was not added as a result of being a modifier with a 5-digit code starting with 0 ("M" node does not exist), save in an IBXSAVE array for later use. No output. |