| Name | Value |
|---|---|
| NAME | N-PRIOR BILLS |
| SECURITY LEVEL | NATIONAL,NO EDIT |
| TYPE OF ELEMENT | EXTRACTED VIA CODE |
| ELEMENT CATEGORY | GROUP ELEMENT |
| BASE FILE | BILL/CLAIMS |
| EXTRACT CODE | N Z,Z0,Z1 S Z0=$P($G(^DGCR(399,IBXIEN,"M1")),U,5,7),IBXDATA=$J("",13) F Z=1:1:3 I $D(^DGCR(399,IBXIEN,"I"_Z)) S Z1=$E($S($P(Z0,U,Z):$$BN1^PRCAFN($P(Z0,U,Z)),1:"")_$J("",14),1,14),IBXDATA=IBXDATA_Z1 |
| DESCRIPTION | Extracts the Prior Bill Numbers and places them in the proper format for printing in the UB-92 Form Locator 56. |