
| Name | Value |
|---|---|
| NAME | N-CONDITION CODES |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| TYPE OF ELEMENT | EXTRACTED VIA CODE |
| ELEMENT CATEGORY | GROUP ELEMENT |
| BASE FILE | BILL/CLAIMS |
| EXTRACT CODE | N IBI,IBX,IBY S (IBI,IBX)=0 F S IBX=$O(^DGCR(399,IBXIEN,"CC",IBX)) Q:'IBX S IBY=+$G(^(IBX,0)),IBY=$P($G(^DGCR(399.1,+IBY,0)),U,2) I IBY'="" S IBI=IBI+1,IBFL(24,IBI)=IBY |
| ARRAY ROOT | IBFL(24) |
| DESCRIPTION | The condition codes 0-nodes for bill IBXIEN. Data (external) is returned in an array IBFL(24,1-n). |