IBCEF22 ;ALB/TMP - FORMATTER SPECIFIC BILL FUNCTIONS ;06-FEB-96
Source file <IBCEF22.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
HOS(IBIFN) | ; Extract rev codes for episode billed on a UB-04 into IBXDATA
; IBIFN = bill ien ; Format: IBXDATA(n) = ; rev cd ptr ^ CPT CODE ptr ^ unit chg ^ units ^ tot charge ; ^ tot uncov ^ FL49 value ; ^ ien of rev code multiple entry(s) (separated by ";") ; ^ modifiers specific to rev code/proc (separated by ",") ; ^ rev code date, if it can be determined by a corresponding proc ; ^ NDC from "CP" node of claim ^ Units/Quantity from "CP" node - vd/IB*2*577 ; ^ Units/Basis of Measurement for Drugs - vd/IB*2*577 |
|
ACCRV(X) | ; Returns 1 if X is an accomodation RC, 0 if not
|
|
RC2CP(IBIFN,IBRCIEN) | ; returns "CP" multiple pointer that corresponds to a given "RC" multiple pointer in file 399
; IBIFN - ien in file 399, top level ; IBRCIEN, ien in sub-file 399.042 (REVENUE CODE) |
|
SPLIT | ||
VC80I(LN) |
FileNo | Call Tags |
---|---|
^DGCR(399 - [#399] | GET1^DIQ |