| Name | Value |
|---|---|
| NAME | N-EOB OTHER PAYER INFO |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| TYPE OF ELEMENT | EXTRACTED VIA CODE |
| ELEMENT CATEGORY | GROUP ELEMENT |
| BASE FILE | EXPLANATION OF BENEFITS |
| EXTRACT CODE | N Z,Z0,Z1,Z2,IBZ D F^IBCEF("N-EOB ENTRIES","IBZ") S Z=$$COBN^IBCEF(IBXIEN) S Z0=0 F Z1=1:1:3 I Z1'=Z S Z2=$O(IBZ(Z1,""),-1) I Z2 S Z0=Z0+1,IBXDATA(Z0)=IBZ(Z1,Z2) |