IB20P543 ;ALB/CXW - UPDATE MCCR UTILITY & REVENUE & POS ; 01/22/2015
Source file <IB20P543.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
|
|
MFILEQ | ||
EXCODE(IBCOD,IBPE) | ; Returns IEN if code found in the IBPE piece
|
|
RVC | ; Revenue code in fields #1/piece 2, #3/piece 4
|
|
RVCQ | ||
POS | ; Place Of Service in fields #.01/piece 1, #.02/piece 2, #.03/piece 3
|
|
FORM | ; 364.6 entry modified to increase the length in field #.9/piece 9
|
|
FORMQ | ||
MSG(IBZ) | ;
|
|
RVCU | ; Revenue code^standard abbreviation^description^update^inactivate (24)
|
|
VALU | ; Value code^name^update (9)
|
|
CONU | ; Condition code^name^update (11)
|
|
OCCPU | ; Occurrence span code^name^update (11)
|
|
POSU | ; Place of Service code^name^abbreviation^remove (3)
|
FileNo | Call Tags |
---|---|
^IBE(353.1 - [#353.1] | Classic Fileman Calls |
^IBA(364.6 - [#364.6] | Classic Fileman Calls |
^DGCR(399.1 - [#399.1] | Classic Fileman Calls |
^DGCR(399.2 - [#399.2] | Classic Fileman Calls |