| Name | Value |
|---|---|
| FORM FIELD REFERENCE | UB-04 |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| DATA ELEMENT | N-GET FROM PREVIOUS EXTRACT |
| PAD CHARACTER | NO PAD REQUIRED |
| FORMAT CODE | K IBXDATA N IBZ,Z,Z0,C D F^IBCEF("N-DIAGNOSES","IBZ",,IBXIEN) S (C,Z)=0 F S Z=$O(IBZ(Z)) Q:'Z I $$ECODE^IBCEU4(+IBZ(Z),.Z0),$G(Z0)'="" S C=C+1,IBXSAVE("DX-E",C)=Z0_U_$$GETPOA^IBCEU4($P(IBZ(Z),U,2),1) S:C=1 IBXDATA=$TR(Z0,".") Q:C=3 |
| FORMAT CODE DESCRIPTION | This data element creates an array containing E-code diagnoses for the bill and corresponding POA indicators. IBXDATA is set to the first 'E-code' dx found. ICD-9 only. |