Name | Value |
---|---|
NAME | N-OTH INSURED PT RELATION |
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 INSURED PT RELATION","IBZ") S Z=$$COBN^IBCEF(IBXIEN) S Z0=0 F Z1=1:1:3 I Z1'=Z,$D(^DGCR(399,IBXIEN,"I"_Z1)) S Z0=Z0+1,IBXDATA(Z0)=$G(IBZ(Z1)) |
DESCRIPTION | All other insured's relationship to patient codes for bill entry IBXIEN. Data is returned in an array IBXDATA(1-n). This is a group element and 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 insured relation to pt are returned. If the secondary insurance is the current responsible, the primary and tertiary insurance insured relation to pt are returned. If the tertiary insurance is the current responsible, the primary and secondary insurance insured relation to pt are returned. |