N-ALL AUTH CODES (265) IB DATA ELEMENT DEFINITION (364.5)

Name	Value
NAME	N-ALL AUTH CODES
SECURITY LEVEL	NATIONAL,NO EDIT
TYPE OF ELEMENT	EXTRACTED VIA CODE
ELEMENT CATEGORY	GROUP ELEMENT
BASE FILE	BILL/CLAIMS
EXTRACT CODE	N Z,IBZ F Z=1:1:3 I $S(Z=1:1,1:$D(^DGCR(399,IBXIEN,"I"_Z))) D F^IBCEF("N-"_$P("PRIMARY^SECONDARY^TERTIARY",U,Z)_" AUTH CODE","IBZ",,IBXIEN) S IBXDATA(Z)=IBZ K IBZ
DESCRIPTION	Extracts the 3 authorization codes for bill IBXIEN into IBXDATA(1), IBXDATA(2), IBXDATA(3).