IBYPPT ;ALB/ARH - IB*2*134 POST INIT: UPDATE PROVIDER DISCOUNT AND REVENUE CODES AND CONDITION CODES ; 05/25/00
Source file <IBYPPT.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ;
|
|
| RVN | ; add 2 new Revenue Codes (399.2)
; (update abbreviation and description to match current NUBC, previously all reserved) |
|
| RVNQ | ||
| MSG(X) | ;
|
|
| FRVN | ; New Revenue Codes
|
|
| MCCRUTL(X,P) | ; returns IFN of item in 399.1 if Code is found and piece P is true
|
|
| CCE | ; Edit Condition Codes in 399.1 (#.22 - p15) update Name field (.01)
|
|
| CCEQ | ||
| CCA | ; Add Condition Codes to 399.1 (#.22 - p15)
; due to the conversion the condition codes must have IFNs greater than 79 |
|
| CCAQ | ||
| FCCA | ; add condition codes (399.1)
|
|
| FCCE | ; edit condition codes (399.1)
|
| FileNo | Call Tags |
|---|---|
| ^DGCR(399.1 - [#399.1] | Classic Fileman Calls |
| ^DGCR(399.2 - [#399.2] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399.1 - [#399.1] | MCCRUTL+3, CCA+4, CCA+10 |
| ^DGCR(399.2 - [#399.2] | RVN+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | RVN+2~, RVN+10*!, CCE+1~, CCE+8*!, CCA+2~, CCA+16*! |
| DD | RVN+2~, CCE+1~, CCA+2~, CCA+12! |
| DIC | RVN+2~, RVN+10!, CCE+1~, CCA+2~, CCA+12*! |
| DIC(0 | CCA+12* |
| DIE | RVN+2~, RVN+10*!, CCE+1~, CCE+8*!, CCA+2~, CCA+16*! |
| DINUM | CCE+1~, CCA+2~, CCA+12* |
| DLAYGO | CCE+1~, CCA+2~, CCA+12* |
| DO | RVN+2~, CCE+1~, CCA+2~, CCA+12! |
| DR | RVN+2~, RVN+10*!, CCE+1~, CCE+7*, CCE+8!, CCA+2~, CCA+15*, CCA+16! |
| IBA | POST+1~, POST+2!, POST+11!, RVN+2~, RVNQ+1, CCE+1~, CCEQ+1, CCA+2~, CCAQ+1 |
| IBA( | MSG+2* |
| IBA(1 | POST+2*, POST+11*, RVNQ*, CCEQ*, CCAQ* |
| IBA(2 | POST+2*, POST+11* |
| IBA(3 | POST+2*, POST+11* |
| IBA(999999 | MSG+1 |
| IBCNG | RVN+2~*, RVN+9*, RVN+12 |
| IBCNT | RVN+2~*, RVN+9*, RVN+12, RVNQ, CCE+1~*, CCE+8*, CCEQ, CCA+2~*, CCA+13*, CCAQ |
| IBDNM | CCE+1~, CCA+2~, CCA+4*, CCA+10*, CCA+12 |
| IBFN | CCE+1~, CCE+5*, CCE+8, CCA+2~, CCA+13*, CCA+16 |
| IBI | RVN+2~, RVN+4*, RVN+12*, CCE+1~, CCE+3*, CCA+2~, CCA+6* |
| IBJ | RVN+2~, RVN+12*, CCE+1~, CCA+2~, CCA+10* |
| IBLN | RVN+2~, RVN+4*, RVN+6, RVN+10, RVN+12*, CCE+1~, CCE+3*, CCE+5, CCE+7, CCA+2~ , CCA+6*, CCA+8, CCA+12, CCA+15 |
| IBRV | RVN+2~, RVN+6*, RVN+7, RVN+9 |
| IBRVFN | RVN+2~, RVN+7*, RVN+10 |
| IBX | MSG+1~*, MSG+2, MCCRUTL+2~, MCCRUTL+3* |
| IBY | MCCRUTL+2~*, MCCRUTL+3*, MCCRUTL+4 |
| P | MCCRUTL~, MCCRUTL+3 |
| U | RVN+6, RVN+10, MCCRUTL+3, CCE+5, CCE+7, CCA+8, CCA+12, CCA+15 |
| X | RVN+2~, RVN+10!, MSG~, MSG+2, MCCRUTL~, MCCRUTL+3, CCE+1~, CCE+8!, CCA+2~, CCA+12*! , CCA+16! |
| Y | RVN+2~, RVN+10!, CCE+1~, CCE+8!, CCA+2~, CCA+12!, CCA+13, CCA+16! |
