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)
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | SGBR+14 |
| ^DIE | RSINDT+15, UPDBR+4, UPDBR+8, RVACT+10 |
| $$VERSEDT^IBCRHBRV | RSINDT+7 |
| ADDBI^IBYPSA1 | POST+10 |
| ADDBR^IBYPSA1 | POST+12 |
| ADDBS^IBYPSA1 | POST+9 |
| ADDRB^IBYPSA1 | POST+8 |
| ADDRS^IBYPSA1 | POST+11 |
| CHGINA^IBYPSA2 | POST+17 |
| MES^XPDUTL | POST+2, POST+19, RSINQ+1, UPDBR+12, SGBRQ+1, RVAQ+1 |
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399.1 - [#399.1] | MCCRUTL+2 |
| ^DGCR(399.2 - [#399.2] | RVACT+7 |
| ^IBE(363 - [#363] | RSINDT+9, RSINDT+10 |
| ^IBE(363.3 - [#363.3] | RSINDT+5, UPDBR+3, UPDBR+7, SGBR+7, SGBR+9, SGBR+10 |
| ^IBE(363.32 - [#363.32] | SGBR+4, SGBR+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | RSINDT+3~, RSINDT+15*!, UPDBR+1~, UPDBR+3*, UPDBR+4!, UPDBR+7*, UPDBR+8!, SGBR+1~, RVACT+1~, RVACT+10*! |
| DA(1 | SGBR+14* |
| DD | RSINDT+3~, UPDBR+1~, SGBR+1~, RVACT+1~ |
| DIC | RSINDT+3~, UPDBR+1~, SGBR+1~, SGBR+14*!, RVACT+1~ |
| DIC("P" | SGBR+14* |
| DIC(0 | SGBR+14* |
| DIE | RSINDT+3~, RSINDT+15*!, UPDBR+1~, UPDBR+4*!, UPDBR+8*!, SGBR+1~, SGBR+14!, RVACT+1~, RVACT+10*! |
| DINUM | UPDBR+1~, SGBR+1~ |
| DLAYGO | UPDBR+1~, SGBR+1~, SGBR+14* |
| DO | RSINDT+3~, UPDBR+1~, SGBR+1~, RVACT+1~ |
| DR | RSINDT+3~, RSINDT+15*!, UPDBR+1~, UPDBR+4*!, UPDBR+8*!, SGBR+1~, RVACT+1~, RVACT+10*! |
| IBA | POST+1~, POST+2!, POST+19!, RSINDT+3~, RSINQ+1, UPDBR+1~, UPDBR+12, SGBR+1~, SGBRQ+1, RVACT+1~ , RVAQ+1 |
| IBA( | MSG+2* |
| IBA(1 | POST+2*, POST+19*, RSINQ*, UPDBR+11*, SGBRQ*, RVAQ* |
| IBA(2 | POST+2*, POST+19* |
| IBA(3 | POST+2*, POST+19* |
| IBA(999999 | MSG+1 |
| IBACT | RVACT+1~*, RVACT+9*, RVACT+12 |
| IBBR | SGBR+1~, SGBR+5*, SGBR+7 |
| IBBRFN | SGBR+1~, SGBR+9*, SGBR+10, SGBR+12 |
| IBBRNM | SGBR+1~, SGBR+7*, SGBR+9, SGBR+14 |
| IBCNT | RSINDT+3~*, RSINDT+15*, RSINQ, UPDBR+1~*, UPDBR+5*, UPDBR+9*, UPDBR+11, SGBR+1~*, SGBR+14*, SGBRQ , RVACT+1~*, RVACT+10*, RVACT+12, RVAQ |
| IBDA | UPDBR+1~ |
| IBI | RVACT+1~, RVACT+5*, RVACT+12* |
| IBJ | RVACT+1~, RVACT+12* |
| IBLN | RVACT+1~, RVACT+3*, RVACT+5, RVACT+12* |
| IBRS0 | RSINDT+3~, RSINDT+10*, RSINDT+12, RSINDT+13 |
| IBRSFN | RSINDT+3~, RSINDT+9*, RSINDT+10, RSINDT+15 |
| IBRSN | RSINDT+3~, RSINDT+10*, RSINDT+11 |
| IBRVFN | RVACT+1~, RVACT+5*, RVACT+7, RVACT+9, RVACT+10 |
| IBSET | SGBR+1~, SGBR+3*, SGBR+4, SGBR+5 |
| IBSG | SGBR+1~, SGBR+4* |
| IBSGFN | SGBR+1~, SGBR+4*, SGBR+12, SGBR+14 |
| IBSTDT | RSINDT+3~*, RSINDT+7*, RSINDT+12, RSINDT+15, RSINQ |
| IBX | MCCRUTL+1~, MCCRUTL+2*, MSG+1~*, MSG+2 |
| IBY | MCCRUTL+1~*, MCCRUTL+2*, MCCRUTL+3 |
| P | MCCRUTL~, MCCRUTL+2 |
| U | RSINDT+12, RSINDT+13, SGBR+4, SGBR+5, SGBR+10, RVACT+7, MCCRUTL+2 |
| X | RSINDT+3~, RSINDT+15!, UPDBR+1~, UPDBR+4!, UPDBR+8!, SGBR+1~, SGBR+14*, RVACT+1~, RVACT+10!, MCCRUTL~ , MCCRUTL+2, MSG~, MSG+2 |
| Y | RSINDT+3~, RSINDT+15!, UPDBR+1~, UPDBR+4!, UPDBR+8!, SGBR+1~, RVACT+1~, RVACT+10! |
| Name | Field # of Occurrence |
|---|---|
| $T(RVF+1 | RVACT+3 |
