IBCU3 ;ALB/AAS - BILLING UTILITY ROUTINE (CONTINUED) ; 4/4/03 8:49am
Source file <IBCU3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| SC(DFN) | ; returns 1 if service connection indicated, 0 otherwise (based on VAEL(3))
|
|
| APPT(DATE,DFN,DISP) | ;Check date to see if patient has any visit data
|
|
| APPTE | ||
| BDT(DFN,DATE) | ; returns primary bill defined for an event date, "" if none
|
|
| BDTE | ||
| BILLED(PTF) | ;returns bill "IFN^^rate group" if PTF record is already associated with an uncancelled final bill
|
|
| BILLEDQ | ||
| FTN(FT) | ;returns name of the form type passed in, "" if not defined
|
|
| FT(IFN,IBRESET) | ;return the correct form type for a bill (trigger code in 399 to set .19)
; if IBRESET is not a positive value ('IBRESET), returns the bills current form type (if defined) ; if IBRESET is a positive value (+IBRESET), interpret form type according to following rules (for triggers): ; first use if bill is inst (UB) or prof (1500) (399,.27), then current (399,.19), then UB |
|
| FTQ | ||
| FNT(FTN) | ;returns the ifn of the form type name passed in, must be exact match, 0 if none found
|
|
| BILLDEV(IFN,PRT) | ;returns the default device for a bill's form type, if PRT is passed as true then returns the AR follow up device, otherwise the billing device
|
|
| RXDUP(RX,DATE,IFN,DISP,DFN,RTG) | ;returns bill ifn if rx # exists on another bill
|
|
| RXDUPE | ||
| BCOB(IBIFN,IBCOB) | ; returns an array of all bills related COB to the bill passed in
; includes prior bills defined on this bill then checks the Primary, Secondary and Tertiary Bills and adds ; all the prior bills defined on them ; ARR(BILL SEQUENCE (1,2,3), INSURANCE CO, BILL #)="" |
|
| BINS(IBIFN) | ; return list of billable insurance carriers on a bill (COB)
; output: sequence:carrier:policy ^ sequence:carrier:policy ^ sequence:carrier:policy |
|
| BOTHER(IBIFN,IBDT) | ; return Bedsection of Type of Care if date is Other Type of care, based on "OT" multiple
; Other care is not inpatient or outpatient, SNF and Sub-Acute became distinct with RC v2.0 ; as with all other bedsection movements, the last date is not included since that is the date they left |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
