| Name | Value |
|---|---|
| NAME | N-OTHER PAYER REF NUM |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| TYPE OF ELEMENT | EXTRACTED VIA CODE |
| ELEMENT CATEGORY | GROUP ELEMENT |
| BASE FILE | BILL/CLAIMS |
| EXTRACT CODE | N Z,Z0,Z1,IBZ D F^IBCEF("N-ALL REFERRAL NUMBERS","IBZ") S Z=$$COBN^IBCEF(IBXIEN) S Z0=0 F Z1=1:1:3 I Z1'=Z,($G(IBZ(Z1))]"") S Z0=Z0+1,IBXDATA(Z0)=$G(IBZ(Z1)) |