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