Name | Value |
---|---|
FORM FIELD REFERENCE | LEGACY HCFA-1500 |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-HCFA 1500 CHARGES |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | N Z,Z0,IBZ M IBZ=IBXDATA K IBXDATA S Z=0 F S Z=$O(IBZ(Z)) Q:'Z S Z0=$S('$G(IBZ(Z,"T")):$S(IBZ(Z)?0.1"-"1N.N0.1".".N:$J(IBZ(Z),9,2),1:IBZ(Z)),1:IBZ(Z)) S:Z'>12 IBXDATA(Z)=Z0 I Z>12 D PG^IBCEF3(Z0,Z) |
FORMAT CODE DESCRIPTION | Print total charge (units * rate) only if not 0. Format numeric values with 2 decimal points. If more than 6 service dates (12 lines) exist for the bill, this outputs the rest on additional bill pages. |