IBYPPS ;ALB/ARH - IB*2*119 POST INIT: UPDATE REVENUE CODES AND LINKS ; 09/07/99
Source file <IBYPPS.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | FILE^DICN ^DIE |
Integrated Billing | 1 | ^IBYPPS1 |
Kernel | 1 | MES^XPDUTL |
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ;
|
|
RVA | ; activate 3 Revenue Codes exported in RV-CPT links (399.2,2), if currently inactive
; (771 and 904 links exported with RC patch but rv not activated because was not defined) |
|
RVAQ | ||
RVI | ; inactivate 10 Revenue Codes (399.2,2)
; (no longer valid revenue codes according to NUBC) |
|
RVIQ | ||
RVU | ; update 50 Revenue Codes (399.2)
; (update abbreviation and description to match current NUBC, previously different definitions) |
|
RVUQ | ||
RVN | ; add 38 new Revenue Codes (399.2)
; (update abbreviation and description to match current NUBC, previously all reserved) |
|
RVNQ | ||
RVL | ; add 4 Revenue Codes - CPT links for observation care (363.33)
|
|
RVLQ | ||
MSG(X) | ;
|
FileNo | Call Tags |
---|---|
^IBE(363.33 - [#363.33] | Classic Fileman Calls |
^DGCR(399.2 - [#399.2] | Classic Fileman Calls |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | RVA+2~, RVA+13*!, RVI+2~, RVI+12*!, RVU+2~, RVU+10*!, RVN+2~, RVN+10*!, RVL+1~ |
DD | RVA+2~, RVI+2~, RVU+2~, RVN+2~, RVL+1~, RVL+22! |
DIC | RVA+2~, RVA+13!, RVI+2~, RVI+12!, RVU+2~, RVU+10!, RVN+2~, RVN+10!, RVL+1~, RVL+22*! |
DIC("DR" | RVL+21* |
DIC(0 | RVL+22* |
DIE | RVA+2~, RVA+13*!, RVI+2~, RVI+12*!, RVU+2~, RVU+10*!, RVN+2~, RVN+10*!, RVL+1~ |
DLAYGO | RVL+1~, RVL+22* |
DO | RVA+2~, RVI+2~, RVU+2~, RVN+2~, RVL+1~, RVL+22! |
DR | RVA+2~, RVA+13*!, RVI+2~, RVI+12*!, RVU+2~, RVU+10*!, RVN+2~, RVN+10*!, RVL+1~ |
IBA | POST+1~, POST+2!, POST+10!, RVA+2~, RVAQ+1, RVI+2~, RVIQ+1, RVU+2~, RVUQ+1, RVN+2~ , RVNQ+1, RVL+1~, RVLQ+1 |
IBA( | MSG+2* |
IBA(1 | POST+2*, POST+10*, RVAQ*, RVIQ*, RVUQ*, RVNQ*, RVLQ* |
IBA(2 | POST+2*, POST+10* |
IBA(3 | POST+2*, POST+10* |
IBA(999999 | MSG+1 |
IBCNG | RVA+2~*, RVA+12*, RVA+15, RVI+2~*, RVI+11*, RVI+14, RVU+2~*, RVU+9*, RVU+12, RVN+2~* , RVN+9*, RVN+12 |
IBCNT | RVA+2~*, RVA+12*, RVA+15, RVAQ, RVI+2~*, RVI+11*, RVI+14, RVIQ, RVU+2~*, RVU+9* , RVU+12, RVUQ, RVN+2~*, RVN+9*, RVN+12, RVNQ, RVL+1~*, RVL+20*, RVLQ |
IBI | RVA+2~, RVA+6*, RVA+15*, RVI+2~, RVI+4*, RVI+14*, RVU+2~, RVU+4*, RVU+12*, RVN+2~ , RVN+4*, RVN+12*, RVL+1~, RVL+5* |
IBJ | RVA+2~, RVA+15*, RVI+2~, RVI+14*, RVU+2~, RVU+12*, RVN+2~, RVN+12* |
IBLINK | RVL+1~, RVL+8*, RVL+18, RVL+24 |
IBLN | RVA+2~, RVA+4*, RVA+6, RVA+15*, RVI+2~, RVI+4*, RVI+6, RVI+14*, RVU+2~, RVU+4* , RVU+6, RVU+10, RVU+12*, RVN+2~, RVN+4*, RVN+6, RVN+10, RVN+12*, RVL+1~, RVL+5* , RVL+7, RVL+8, RVL+14, RVL+15, RVL+16, RVL+18 |
IBP1 | RVL+1~, RVL+15*, RVL+18, RVL+21 |
IBP2 | RVL+1~, RVL+16*, RVL+21 |
IBRV | RVA+2~, RVA+6*, RVA+8, RVA+12, RVI+2~, RVI+6*, RVI+8, RVI+11, RVU+2~, RVU+6* , RVU+7, RVU+9, RVN+2~, RVN+6*, RVN+7, RVN+9, RVL+1~, RVL+7*, RVL+8, RVL+10 |
IBRVFN | RVA+2~, RVA+8*, RVA+9, RVA+13, RVI+2~, RVI+8*, RVI+9, RVI+12, RVU+2~, RVU+7* , RVU+10, RVN+2~, RVN+7*, RVN+10, RVL+1~, RVL+10*, RVL+11, RVL+22 |
IBRVLN | RVA+2~, RVA+9*, RVA+10, RVI+2~, RVI+9*, RVL+1~, RVL+11*, RVL+12 |
IBSGFN | RVL+1~, RVL+3*, RVL+5, RVL+18, RVL+21 |
IBX | MSG+1~*, MSG+2 |
U | RVA+10, RVI+6, RVU+6, RVU+10, RVN+6, RVN+10, RVL+7, RVL+8, RVL+12, RVL+14 , RVL+15, RVL+16, RVL+18 |
X | RVA+2~, RVA+13!, RVI+2~, RVI+12!, RVU+2~, RVU+10!, RVN+2~, RVN+10!, RVL+1~, RVL+22*! , MSG~, MSG+2 |
Y | RVA+2~, RVA+13!, RVI+2~, RVI+12!, RVU+2~, RVU+10!, RVN+2~, RVN+10!, RVL+1~, RVL+22! |