Name | Value |
---|---|
FORM FIELD REFERENCE | IB 837 TRANSMISSION |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-OTH INSURANCE SEQUENCE |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | N IBZ,Z,Z0 M IBZ=IBXDATA K IBXDATA I $O(IBXSAVE(1,0)) S (Z,Z0)=0 F S Z=$O(IBXSAVE(1,Z)) Q:'Z S Z0=Z0+1,IBXDATA(Z0)=IBXSAVE(1,Z) I Z0>1 D ID^IBCEF2(Z0,"OI1 ") |
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. The IBXSAVE(1) variable holds the indicator of which insurance [(P)rimary/(S)econdary/(T)ertiary] is currently responsible for the bill. Using this data as a guide, the next insurance for the primary is secondary, then tertiary. For secondary, it's primary then tertiary, and for tertiary, it's primary, then secondary. For other than the first occurrence, the RECORD ID 'OI1 ' must be output. |