IBAMTV2 ;ALB/CPM - CREATE CHARGES FOR BILLABLE EPISODES ; 01-JUN-94
Source file <IBAMTV2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BLD | ; Create back charges for an array of episodes.
|
|
| BLDQ | ||
| INPT | ; Bill inpatient care.
|
|
| INPTQ | ||
| OPT | ; Bill the Outpatient copayment.
; Input: IBEPSTR -- 1^2^3, where ; 1 => visit date ; 2 => null ; 3 => softlink (may be null) ; DFN -- Pointer to the patient in file #2 |
|
| OPTQ | ||
| OLDCL(DFN,IBDT) | ; Can an old billing clock be used?
; Input: DFN -- Pointer to the patient in file #2 ; IBDT -- Date of first potentially billable episode ; Output: 0 -- No old billing clock available ; >0 -- Pointer to old billing clock in file #351 |
|
| OLDCLQ | ||
| UPD(IBN) | ; Place the charge in a review status.
; Input: IBN -- Pointer to the charge in file #350 |
|
| CLEV() | ; Should the event record be closed?
; Input: variables IBEVDA -- Pointer to event in file #350 ; IBEND -- Last date through which to bill ; Output: 1 -- yes, close event ; 0 -- don't close event |
|
| CLEVQ |
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | Classic Fileman Calls |
