IBYPPR ;ALB/ARH - IB*2.0*106 PRE/POST INIT: REASONABLE CHARGES ; 10-OCT-1998
Source file <IBYPPR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PRE | ; in 399, delete all xrefs for certain fields, these fields are all exported with this patch
; they must be deleted before the build inserts the updated fields because the xrefs have changed |
|
| POST | ;
|
|
| DELCT | ; Delete Charge Type from all Non-Reasonable Charges Charge Sets (363.1,.04)
|
|
| DCQ | ||
| 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 | ||
| SGBR | ; add Billing Rates to the Special Groups (363.32,11,.01)
|
|
| SGBRQ | ||
| RVACT | ; activate (30) Revenue Codes exported in RV-CPT links (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 (59) Activate (399.2,2)
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | SGBR+9 |
| ^DIE | PRE+29, DELCT+7, RSINDT+14, RVACT+10 |
| ^DIK | PRE+10, PRE+17 |
| $$PROD^IBCORC | RSINDT+7 |
| ADDBE^IBYPPR1 | POST+8 |
| ADDBI^IBYPPR1 | POST+9 |
| ADDBR^IBYPPR1 | POST+11 |
| ADDBS^IBYPPR1 | POST+7 |
| ADDRS^IBYPPR1 | POST+10 |
| BMES^XPDUTL | PRE+4, PRE+33 |
| MES^XPDUTL | PRE+11, PRE+18, PRE+31, POST+2, POST+16, DCQ+1, RSINQ+1, SGBRQ+1, RVAQ+1 |
| FileNo | Call Tags |
|---|---|
| ^IBE(363 - [#363] | Classic Fileman Calls |
| ^IBE(363.1 - [#363.1] | Classic Fileman Calls |
| ^IBA(364.7 - [#364.7] | Classic Fileman Calls |
| ^DGCR(399.2 - [#399.2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD(399 | PRE+8 |
| ^DD(399.0304 | PRE+15 |
| ^DGCR(399.1 - [#399.1] | MCCRUTL+2 |
| ^DGCR(399.2 - [#399.2] | RVACT+7 |
| ^IBA(364.5 - [#364.5] | PRE+27, PRE+28 |
| ^IBA(364.7 - [#364.7] | PRE+29 |
| ^IBE(363 - [#363] | RSINDT+9, RSINDT+10 |
| ^IBE(363.1 - [#363.1] | DELCT+3, DELCT+4 |
| ^IBE(363.3 - [#363.3] | DELCT+5, RSINDT+5, SGBR+5 |
| ^IBE(363.32 - [#363.32] | SGBR+4, SGBR+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | PRE+2~, PRE+9*, PRE+10!, PRE+16*, PRE+17!, PRE+26*, PRE+29, DELCT+1~, DELCT+7*!, RSINDT+3~ , RSINDT+14*!, SGBR+1~, RVACT+1~, RVACT+10*! |
| DA(1 | PRE+9*, PRE+16*, SGBR+9* |
| DA(2 | PRE+9*, PRE+16* |
| DD | RSINDT+3~, SGBR+1~, RVACT+1~ |
| DIC | PRE+22~, DELCT+1~, RSINDT+3~, SGBR+1~, SGBR+9*!, RVACT+1~ |
| DIC("P" | SGBR+9* |
| DIC(0 | SGBR+9* |
| DIE | PRE+22~, PRE+29*, DELCT+1~, DELCT+7*!, RSINDT+3~, RSINDT+14*!, SGBR+1~, SGBR+9!, RVACT+1~, RVACT+10*! |
| DIK | PRE+2~, PRE+9*, PRE+10!, PRE+16*, PRE+17! |
| DINUM | SGBR+1~ |
| DLAYGO | SGBR+1~, SGBR+9* |
| DO | RSINDT+3~, SGBR+1~, RVACT+1~ |
| DR | PRE+22~, PRE+29*, DELCT+1~, DELCT+7*!, RSINDT+3~, RSINDT+14*!, SGBR+1~, RVACT+1~, RVACT+10*! |
| IBA | POST+1~, POST+2!, POST+16!, DELCT+1~, DCQ+1, RSINDT+3~, RSINQ+1, SGBR+1~, SGBRQ+1, RVACT+1~ , RVAQ+1 |
| IBA( | MSG+2* |
| IBA(1 | POST+2*, POST+16*, DCQ*, RSINQ*, SGBRQ*, RVAQ* |
| IBA(2 | POST+2*, POST+16* |
| IBA(3 | POST+2*, POST+16* |
| IBA(999999 | MSG+1 |
| IBACT | RVACT+1~*, RVACT+9*, RVACT+12 |
| IBBR | SGBR+1~, SGBR+5*, SGBR+9 |
| IBBRFN | SGBR+1~, SGBR+5*, SGBR+7 |
| IBBRN | DELCT+1~, DELCT+5* |
| IBCNT | RSINDT+3~*, RSINDT+14*, RSINQ, SGBR+1~*, SGBR+9*, SGBRQ, RVACT+1~*, RVACT+10*, RVACT+12, RVAQ |
| IBCS | DELCT+1~, DELCT+3*, DELCT+4, DELCT+7 |
| IBFLD | PRE+2~, PRE+6*, PRE+8, PRE+9, PRE+11, PRE+13*, PRE+15, PRE+16, PRE+18 |
| IBI | RVACT+1~, RVACT+5*, RVACT+12* |
| IBJ | RVACT+1~, RVACT+12* |
| IBLN | DELCT+1~, DELCT+4*, DELCT+5, RVACT+1~, RVACT+3*, RVACT+5, RVACT+12* |
| IBRS0 | RSINDT+3~, RSINDT+10*, RSINDT+12 |
| IBRSFN | RSINDT+3~, RSINDT+9*, RSINDT+10, RSINDT+14 |
| 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+7, SGBR+9 |
| IBSTDT | RSINDT+3~*, RSINDT+7*, RSINDT+14, RSINQ |
| IBX | PRE+2~, PRE+11*, PRE+18*, PRE+31*, MCCRUTL+1~, MCCRUTL+2*, MSG+1~*, MSG+2 |
| IBXREF | PRE+2~, PRE+8*, PRE+9, PRE+15*, PRE+16 |
| IBY | MCCRUTL+1~*, MCCRUTL+2*, MCCRUTL+3 |
| NEW | PRE+22~, PRE+28*, PRE+29 |
| OLD | PRE+22~, PRE+27*, PRE+29 |
| P | MCCRUTL~, MCCRUTL+2 |
| U | PRE+29, DELCT+4, DELCT+5, RSINDT+12, SGBR+4, SGBR+5, RVACT+7, MCCRUTL+2 |
| X | PRE+2~, PRE+22~, DELCT+1~, DELCT+7!, RSINDT+3~, RSINDT+14!, SGBR+1~, SGBR+9*, RVACT+1~, RVACT+10! , MCCRUTL~, MCCRUTL+2, MSG~, MSG+2 |
| Y | PRE+2~, PRE+22~, DELCT+1~, DELCT+7!, RSINDT+3~, RSINDT+14!, SGBR+1~, RVACT+1~, RVACT+10! |
| Name | Field # of Occurrence |
|---|---|
| $T(RVF+1 | RVACT+3 |