IBYPSA ;ALB/ARH - IB*2.0*245 POST INIT: REASONABLE CHARGES V2.0 ; 10-OCT-2003
Source file <IBYPSA.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ;
|
|
RSINDT | ; add an inactive date to rate schedules if this is the first time the load is completed (363, .06)
; Reimbursable Ins, No Fault, and Workers Comp only ; if test account use 9/30/98, if production account use 8/31/99 |
|
RSINQ | ||
UPDBR | ; Update Billing Rate Names
|
|
SGBR | ; add new Billing Rates to the Special Groups (363.32,11,.01)
|
|
SGBRQ | ||
RVACT | ; activate (3) Revenue Codes exported in as defaults for new Charge Sets (399.2,2)
|
|
RVAQ | ||
MCCRUTL(X,P) | ; returns IFN of item in 399.1 if Name is found and piece P is true
|
|
MSG(X) | ;
|
|
RVF | ; Revenue Codes to (3) Activate (399.2,2)
|
FileNo | Call Tags |
---|---|
^IBE(363 - [#363] | Classic Fileman Calls |
^IBE(363.3 - [#363.3] | Classic Fileman Calls |
^DGCR(399.2 - [#399.2] | Classic Fileman Calls |