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). |