| Name | Value |
|---|---|
| NAME | N-ALL INSURED EMPLOYER INFO |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| TYPE OF ELEMENT | EXTRACTED VIA CODE |
| ELEMENT CATEGORY | GROUP ELEMENT |
| BASE FILE | BILL/CLAIMS |
| EXTRACT CODE | N Z,Z1,Z2 F Z=1:1:3 I $S(Z=1:1,1:$D(^DGCR(399,IBXIEN,"I"_Z))) S Z2=$$ESGHPNL^IBCEF21(IBXIEN,Z),Z1=$P(Z2,U,2,999) S:'Z2 Z1=$$INSEMPL^IBCEF(IBXIEN,Z) S IBXDATA(Z)=Z1 |
| DESCRIPTION | Extracts the primary, secondary, and tertiary insurance company insured's employment info into the IBXDATA(1),(2),(3) array for bill entry IBXIEN. Format is employer name^city^state abbreviation^state ien^street address 1. If the plan is Employer Sponsored (ESGHP) then extracts Employer Name/Location of the employer that sponsors the plan. Otherwise extracts the insured's current employer name/location (if spouse or veteran only). |