IBR ;ALB/AAS - INTEGRATED BILLING - A/R INTERFACE ;25-FEB-91
Source file <IBR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| V | ;;2.0;INTEGRATED BILLING;**52,70,93,113,132,51,715,630**;21-MAR-94;Build 39
|
|
| 1 | ; -pass new entries to a/r
|
|
| UP1 | ; -update IB data and reindex
|
|
| 2 | ||
| UP2 | ; -update IB data and reindex
|
|
| 3 | ||
| UP3 | ; -update status of all previous bills to updated
|
|
| UP4(IBN,IBIL) | ; update field 350/.11 and "ABIL" xref IB*2.0*715
|
|
| ERR | ||
| END | ;
|
|
| TRCHK | ; - if entry has an ar transaction number take out of list
|
|
| AR | ; Pass charges which need separate bills to Accounts Receivable.
; Variable input: DFN -- Pointer to the patient in file #2 ; IBSITE -- Facility number ; IBATYP -- Pointer to the action type in file #350.1 ; IBFR -- 'Bill From' Date ; IBCHG -- Charge amount ; IBN -- Pointer to the charge in file #350 ; IBY -- Set to 1 to denote potential success ; IBSERV -- Pointer to the service in file #49 |
|
| SET | ; Set up stub receivable in AR.
|
|
| REL | ; Release the charge to AR.
|
|
| RELQ |
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | Classic Fileman Calls |