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 |