| Name | Value |
|---|---|
| NAME | N-OTH INSURANCE SEQUENCE |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| TYPE OF ELEMENT | EXTRACTED VIA CODE |
| ELEMENT CATEGORY | GROUP ELEMENT |
| BASE FILE | BILL/CLAIMS |
| EXTRACT CODE | K IBXSAVE(1) N Z,C,D,Q S Z=$P($G(^DGCR(399,IBXIEN,0)),U,21) I $D(^("I2"))!$D(^("I3")) S IBXSAVE(1)=Z,Q=$S("P"[Z:"23","S"[Z:"13",1:"12") F C=1,2 S D=$E(Q,C),IBXDATA(C)=$E("PST",D) S:$D(^DGCR(399,IBXIEN,"I"_D)) IBXSAVE(1,D)=IBXDATA(C) |
| DESCRIPTION | The sequence (P)rimary, (S)econdary, (T)ertiary indicators for all other insurance for bill entry IBXIEN. This is a group element and up to up to 2 data elements are returned in the IBXDATA(n) array. If the primary insurance is the current responsible, the secondary and tertiary insurance sequence indicators are returned. If the secondary insurance is the current responsible, the primary and tertiary insurance sequence indicators are returned. If the tertiary insurance is the current responsible, the primary and secondary insurance sequence indicators are returned. |