Name | Value |
---|---|
FORM FIELD REFERENCE | IB 837 TRANSMISSION |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-OTH INSURED ID |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | N Z,IBZ M IBZ=IBXDATA K IBXDATA,IBXSAVE("OIID") F Z=1,2 I $D(^DGCR(399,IBXIEN,"I"_(Z+1))),$G(IBZ(Z))'="" S IBZ(Z)=$$NOPUNCT^IBCEF(IBZ(Z)) I IBZ(Z)'="" S IBXDATA(Z)=IBZ(Z),IBXSAVE("OIID",Z)=1 |
FORMAT CODE DESCRIPTION | This is a group data element so more than 1 occurrence of a value is possible other payers on the bill (F Z=1,2). If that other insurance exists on the claim and the subscriber ID is not nil after stripping out the punctuation marks, then build IBXDATA(Z) array and also save the IBXSAVE("OIID",Z) array entry to indicate that a valid ID is being output for this other payer Z. This is so the qualifier in OI2-11 can be output because we have the ID#. possible for the data element in the IBXDATA array. If any other insured ID data is found, the data is output. OI2-3 2330A/NM109 Merge IBZ=IBXDATA which is the list of other payer subscriber ID's returned from data element N-OTH INSURED ID. Loop thru each of the |