IBYPSA1 ;ALB/ARH - IB*2.0*245 POST INIT: REASONABLE CHARGES V2.0 CONT; 10-OCT-2003
Source file <IBYPSA1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ADDRB | ; Add Billable Service (399.1, .2=1)
 | 
|
| RBQ | ||
| ADDBS | ; Add Bedsection (399.1, .12=1)
 | 
|
| BSQ | ||
| ADDBI | ; Add Billing Items (363.21)
 | 
|
| BIQ | ||
| ADDBR | ; Add Billing Rates (363.3)
 | 
|
| BRQ | ||
| ADDRS | ; add Rate Schedules (363) for Reasonable Charges, if this is the first time the patch is installed
 ; (charge sets will be added when rates are uploaded)  | 
|
| RSQ | ||
| MCCRUTL(X,P) | ; returns IFN of item in 399.1 if Name is found and piece P is true
 | 
|
| MSG(X) | ;
 | 
|
| RBF | ; billable services (399.1,.2)
 | 
|
| BSF | ;  Bedsections (399.1,.12)
 | 
|
| BIF | ;  Billing Items (363.21)
 | 
|
| BRF | ;  Billing Rates File (363.3)
 | 
|
| RSF | ;  Rate Schedules (363)
 | 
| FileNo | Call Tags | 
|---|---|
| ^IBE(363 - [#363] | Classic Fileman Calls | 
| ^IBA(363.21 - [#363.21] | Classic Fileman Calls | 
| ^IBE(363.3 - [#363.3] | Classic Fileman Calls | 
| ^DGCR(399.1 - [#399.1] | Classic Fileman Calls |