Name | Value |
---|---|
NAME | N-OTH INSURED NAMES SUFF |
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 FULL NAMES","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)=$$GETNMEL^IBCEF7($G(IBZ(Z1)),"SUFFIX") |
DESCRIPTION | returns array of suf for "other insured" names |