IB20P469 ;ALB/CXW - UPDATE MCCR UTILITY/REVENUE CODE; 01/10/2012
Source file <IB20P469.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 |
|
| MCR | ; 3 types of codes
|
|
| DIS | ;
|
|
| DIS1 | ;
|
|
| MFILE | ; Mccr file
|
|
| EXCODE(X,P) | ; Returns IEN if code found in the P piece
|
|
| RVC | ; Revenue code in field 1/piece 2, field 3/piece 4
|
|
| RFILE | ; Revenue file
|
|
| RVCN | ; New revenue code (1)^abbreviation^description
|
|
| RVCO | ; Old revenue code (2)^abbreviation^description
|
|
| RVCR | ; Old revenue code delimited by semi-colon for reservation (7)
|
|
| RVCA | ; Old revenue code delimited by semi-colon for activation (61)
|
|
| VALN | ; New value code (11)^description
|
|
| VALO | ; Old value code (4)^description
|
|
| OCCN | ; New occurrence code (1)^description
|
|
| OCCO | ; Old occurrence code (21)^description
|
|
| CONN | ; New condition code (9)^description
|
|
| CONO | ; Old condition code (9)^description
|
| 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] | EXCODE+2 |
| ^DGCR(399.2 - [#399.2] | RVC+6, RVC+14, RVC+20, RVC+22, RVC+28, RVC+29 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | MCR+1~, MFILE+5*!, MFILE+8*!, RVC+1~, RFILE+5*! |
| DD | MCR+1~, MFILE+4! |
| DIC | MCR+1~, MFILE+4*! |
| DIC(0 | MFILE+4* |
| DIE | MCR+1~, MFILE+5*!, MFILE+8*!, RVC+1~, RFILE+5*! |
| DLAYGO | MCR+1~, MFILE+4*! |
| DO | MCR+1~, MFILE+4! |
| DR | MCR+1~, MFILE+5*!, MFILE+8*!, RVC+1~, RFILE+1*, RFILE+3*, RFILE+4*, RFILE+5! |
| IBACT | MCR+1~, MCR+5*, MCR+7*, MCR+13*, MCR+15*, MCR+21*, MCR+23*, DIS+1, MFILE+3, MFILE+7 , RVC+1~, RVC+4*, RVC+12*, RVC+17*, RVC+25*, RFILE+1, RFILE+3, RFILE+4, RFILE+7 |
| IBCNT | MCR+1~, MCR+4*, MCR+12*, MCR+20*, DIS1+1, MFILE+6*, MFILE+9*, RVC+1~, RVC+3*, RFILE+6* |
| IBCOD | MCR+1~, MCR+4*, MCR+12*, MCR+20*, DIS+1, DIS1+1, RVC+1~, RVC+3* |
| IBFD | MCR+1~, MCR+4*, MCR+12*, MCR+20*, MFILE+5 |
| IBFN | MFILE+1~, MFILE+2*, MFILE+3, MFILE+7, MFILE+8 |
| IBI | MCR+1~, MCR+6*, MCR+8*, MCR+14*, MCR+16*, MCR+22*, MCR+24*, RVC+1~, RVC+5*, RVC+13* , RVC+18*, RVC+26* |
| IBJ | RVC+1~, RVC+19*, RVC+27* |
| IBPE | MCR+1~, MCR+4*, MCR+12*, MCR+20*, MFILE+2 |
| IBRES | RVC+1~, RVC+3*, RVC+8, RVC+22, RVC+31, RFILE+3, RFILE+7 |
| IBX | MCR+1~, MCR+6*, MCR+8*, MCR+14*, MCR+16*, MCR+22*, MCR+24*, MFILE+2, MFILE+4, MFILE+5 , MFILE+6, MFILE+8, MFILE+9, EXCODE+1~, EXCODE+2*, RVC+1~, RVC+5*, RVC+6, RVC+13*, RVC+14 , RVC+18*, RVC+19, RVC+26*, RVC+27, RFILE+1, RFILE+7 |
| IBX3 | RVC+1~, RVC+3*, RVC+29*, RVC+31, RVC+32, RVC+33*, RFILE+7 |
| IBY | EXCODE+1~*, EXCODE+2*, EXCODE+3, RVC+1~, RVC+6*, RVC+8, RVC+14*, RVC+19*, RVC+20, RVC+27* , RVC+28 |
| IBZ | RVC+1~, RVC+6*, RVC+8, RVC+9*, RVC+14*, RVC+20*, RVC+22, RVC+28*, RVC+29, RFILE+5 , RFILE+7 |
| P | EXCODE~, EXCODE+2 |
| U | POST+3~*, MFILE+2, MFILE+4, MFILE+5, MFILE+6, MFILE+8, MFILE+9, EXCODE+2, RVC+6, RVC+8 , RVC+14, RVC+22, RVC+31, RVC+32, RVC+33, RFILE+1, RFILE+7 |
| X | MCR+1~, MFILE+4*!, MFILE+5!, MFILE+8!, EXCODE~, EXCODE+2, RVC+1~, RFILE+5! |
| Y | MCR+1~, MFILE+4!, MFILE+5!, MFILE+8!, RVC+1~, RFILE+5! |
