IB20P515 ;ALB/CXW - UPDATE MCCR UTILITY & REVENUE & POS ; 01/02/2013
Source file <IB20P515.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ;
; Update value/occurrence/condition codes in mccr utility file 399.1 ; Update revenue codes in revenue code file 399.2 ; Update pos code in place of service file 353.1 |
|
| MCR | ; 3 types of codes
|
|
| MFILE | ; store in mccr utility file
|
|
| EXCODE(IBCOD,IBPE) | ; Returns IEN if code found in the IBPE piece
|
|
| RVC | ; Revenue code in fields #1/piece 2, #3/piece 4
|
|
| RFILE | ; Revenue file
|
|
| POS | ; Place Of Service in fields #.01/piece 1, #.02/piece 2, #.03/piece 3
|
|
| RVCU | ; Revenue code^abbreviation^name (1)
|
|
| RVCA | ; Revenue code delimited by semi-colon for activation (143)
|
|
| VALU | ; Value code^name^remove (9)
|
|
| OCCPU | ; Occurrence span code^name (1)
|
|
| CONU | ; Condition code^name (3)
|
|
| POSU | ; Place of Service code^name^abbreviation^remove (1)
|
| FileNo | Call Tags |
|---|---|
| ^IBE(353.1 - [#353.1] | Classic Fileman Calls |
| ^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] | MFILE+6, EXCODE+2 |
| ^DGCR(399.2 - [#399.2] | RVC+6, RVC+7, RVC+14, RVC+15 |
| ^IBE(353.1 - [#353.1] | POS+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | MFILE+1~, MFILE+5*, MFILE+8*, MFILE+10*, RFILE+1~, RFILE+4*, POS+1~, POS+8* |
| DD | MFILE+1~, MFILE+4!, RFILE+1~ |
| DIC | MFILE+1~, MFILE+4*, MFILE+5 |
| DIC(0 | MFILE+4* |
| DIE | MFILE+1~, MFILE+5*, MFILE+8*, RFILE+1~, RFILE+4* |
| DIK | MFILE+1~, MFILE+10*, POS+1~, POS+8* |
| DLAYGO | MFILE+1~, MFILE+4* |
| DO | MFILE+1~, MFILE+4!, RFILE+1~ |
| DR | MFILE+1~, MFILE+5*, MFILE+8*, RFILE+1~, RFILE+2*, RFILE+3* |
| IBCNT | MCR+1~, MCR+3*, MCR+17, MFILE+11*, RVC+1~, RVC+2*, RVC+21, RFILE+5*, POS+2*, POS+9* , POS+10 |
| IBCOD | MCR+1~, EXCODE~, EXCODE+2 |
| IBFD | MCR+1~, MCR+3*, MCR+8*, MCR+13*, MFILE+5 |
| IBFD2 | MCR+1~*, MCR+13* |
| IBFLG | MFILE+1~, MFILE+2*, MFILE+3, MFILE+6, MFILE+9, RVC+1~, RVC+2*, RVC+5*, RVC+12*, RFILE+2 , RFILE+3, RFILE+5, POS+1~, POS+7* |
| IBFN | MFILE+1~, MFILE+2*, MFILE+3, MFILE+6, MFILE+8, MFILE+9, MFILE+10 |
| IBI | MCR+1~, MCR+5*, MCR+10*, MCR+15*, RVC+1~, RVC+4*, RVC+12*, POS+1~, POS+4* |
| IBJ | RVC+1~, RVC+13* |
| IBMS | MFILE+1~, MFILE+2*, MFILE+5*, MFILE+8*, MFILE+10*, MFILE+11, RFILE+1~*, RFILE+2*, RFILE+3*, RFILE+5 |
| IBPE | MCR+1~, MCR+3*, MCR+8*, MCR+13*, MFILE+2, MFILE+4, EXCODE~, EXCODE+2 |
| IBRES | RVC+1~ |
| IBX | MCR+1~, MCR+5*, MCR+10*, MCR+15*, MFILE+2, MFILE+4, MFILE+5, MFILE+7, MFILE+8, MFILE+11 , EXCODE+1~, EXCODE+2*, RVC+1~, RVC+4*, RVC+5, RVC+9, RVC+12*, RVC+13, RFILE+2, RFILE+5 , POS+1~, POS+4*, POS+5, POS+6, POS+7, POS+9 |
| IBX3 | MFILE+1~, MFILE+6*, MFILE+7, RVC+1~, RVC+2*, RVC+7*, RVC+9, RVC+15*, RVC+17, RVC+18 , RVC+19*, RFILE+5 |
| IBY | EXCODE+1~*, EXCODE+2*, EXCODE+3, RVC+1~, RVC+5*, RVC+6, RVC+13*, RVC+14, RFILE+5, POS+1~ , POS+5*, POS+6*, POS+8 |
| IBZ | RVC+1~, RVC+6*, RVC+7, RVC+14*, RVC+15, RFILE+4 |
| U | POST+4~*, MFILE+2, MFILE+4, MFILE+5, MFILE+7, MFILE+8, MFILE+11, EXCODE+2, RVC+5, RVC+9 , RVC+17, RVC+18, RVC+19, RFILE+2, RFILE+5, POS+5, POS+6, POS+7, POS+9 |
| X | MFILE+1~, MFILE+4*, RFILE+1~ |
| Y | MFILE+1~, MFILE+4, MFILE+5, RFILE+1~ |
