Name | Value |
---|---|
NAME | N-ALL ATT/RENDERING PROV ID |
SECURITY LEVEL | NATIONAL,NO EDIT |
TYPE OF ELEMENT | EXTRACTED VIA CODE |
ELEMENT CATEGORY | GROUP ELEMENT |
BASE FILE | BILL/CLAIMS |
EXTRACT CODE | N Z,IBZ,IBZ0 S IBZ0=$S($$FT^IBCEF(IBXIEN)=3:4,1:3) D GETPRV^IBCEU(IBXIEN,IBZ0,.IBZ) S IBXDATA=IBZ0 F Z=1:1:3 Q:'$D(^DGCR(399,IBXIEN,"I"_Z)) S IBXDATA=IBXDATA_U_$S($G(IBZ(IBZ0,1,Z))'="":IBZ(IBZ0,1,Z),1:$P($G(IBZ(IBZ0)),U,2)) |
DESCRIPTION | Extracts the id numbers for all insurance companies for the attending (UB92) or rendering (HCFA 1500) provider. |