IB20P555 ;ALB/CXW - IB*2*555 POST INIT: DENTAL COST-BASED/INTERAGENCY RATE; 09/12/2015
Source file <IB20P555.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST | ;
|
|
ADDCI(IBEFFDT) | ; Add Charge Items (363.2) needs Charge Sets, pass in the effective date of the new charges
|
|
CIQ | ||
SETCI | ; set Charge Item (duplicates based on item, CS, eff dt, rev cd)
|
|
ADDRS | ; add Charge Sets to Rate Schedules (363)
|
|
RSQ | ;
|
|
MCCRUTL(X,P) | ; returns IFN of item in 399.1 if Name is found and piece P is true
|
|
RVCD(RVCD) | ; returns IFN if revenue code is valid and active
|
|
MSG(IBA) | ;
|
|
CIF | ; Dental Tortiously Liable/Interagency: Bedsection^Charge Set^Effective Date^Revenue Code^Charge
|
|
RSF | ; Rate Schedule: Name^Rate Type^Bill Type^Effective Date^Inactive Date^Charge Set
|
FileNo | Call Tags |
---|---|
^IBA(363.2 - [#363.2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCR(399.1 - [#399.1] | MCCRUTL+2 |
^DGCR(399.2 - [#399.2] | RVCD+2 |
^IBA(363.2 - [#363.2] | SETCI+9 |
^IBE(363 - [#363] | ADDRS+9, ADDRS+10, ADDRS+11, ADDRS+15, ADDRS+17, ADDRS+18 |
^IBE(363.1 - [#363.1] | SETCI+2, ADDRS+6, ADDRS+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | ADDCI+1~, SETCI+18*!, ADDRS+1~, ADDRS+12*, ADDRS+20! |
DA(1 | ADDRS+12*, ADDRS+20* |
DD | ADDCI+1~, SETCI+13!, ADDRS+1~, ADDRS+20! |
DIC | ADDCI+1~, SETCI+13*!, ADDRS+1~, ADDRS+20*! |
DIC("P" | ADDRS+20* |
DIC(0 | SETCI+13*, ADDRS+20* |
DIE | ADDCI+1~, SETCI+18*!, ADDRS+1~, ADDRS+12* |
DLAYGO | ADDCI+1~, SETCI+13*!, ADDRS+1~, ADDRS+20*! |
DO | ADDCI+1~, SETCI+13!, ADDRS+1~, ADDRS+20! |
DR | ADDCI+1~, SETCI+17*, SETCI+18!, ADDRS+1~, ADDRS+13* |
IBA | POST+1~, MSG~, MSG+1 |
IBCHG | ADDCI+1~, SETCI+6*, SETCI+10, SETCI+14, SETCI+17 |
IBCHZ | ADDCI+1~, SETCI+10* |
IBCI | ADDCI+1~, SETCI+3*, SETCI+9, SETCI+10*, SETCI+11, SETCI+13 |
IBCNT | ADDCI+1~, ADDCI+4*, CIQ, SETCI+15*, ADDRS+1~, ADDRS+2*, ADDRS+22*, RSQ+1 |
IBCNT1 | ADDCI+1~, ADDCI+4*, SETCI+10* |
IBCS | ADDCI+1~, SETCI+2*, SETCI+7, SETCI+14, SETCI+17, ADDRS+1~, ADDRS+5*, ADDRS+6, ADDRS+7, ADDRS+16 , ADDRS+17, ADDRS+18, ADDRS+21 |
IBCS0 | ADDCI+1~, SETCI+2*, SETCI+10 |
IBCSY | ADDRS+1~, ADDRS+6*, ADDRS+7, ADDRS+18, ADDRS+20 |
IBDFLTDT | ADDCI+1~, ADDCI+4*, ADDCI+5, SETCI+4 |
IBDT | ADDCI+1~, SETCI+4*, SETCI+9, SETCI+17 |
IBEFFDT | POST+1~, POST+3*, POST+4, ADDCI~, ADDCI+4 |
IBFN | ADDCI+1~, SETCI+15*, SETCI+18 |
IBI | ADDCI+1~, ADDCI+7*, ADDRS+1~, ADDRS+3* |
IBLN | ADDCI+1~, ADDCI+7*, SETCI+2, SETCI+3, SETCI+4, SETCI+5, SETCI+6, ADDRS+1~, ADDRS+3*, ADDRS+4 , ADDRS+5 |
IBRS | ADDRS+1~, ADDRS+4*, ADDRS+9, ADDRS+10, ADDRS+15, ADDRS+16, ADDRS+17, ADDRS+18, ADDRS+21 |
IBRSN | ADDRS+1~, ADDRS+9*, ADDRS+10, ADDRS+11, ADDRS+12, ADDRS+15*, ADDRS+16, ADDRS+17, ADDRS+18, ADDRS+20 |
IBRVCD | ADDCI+1~, SETCI+5*, SETCI+9, SETCI+17 |
IBX | ADDCI+1~, SETCI+9*, ADDRS+1~, ADDRS+11*, ADDRS+12, MCCRUTL+1~, MCCRUTL+2*, RVCD+1~, RVCD+2* |
IBXRF | ADDCI+1~, SETCI+7*, SETCI+9 |
IBY | MCCRUTL+1~*, MCCRUTL+2*, MCCRUTL+3, RVCD+1~*, RVCD+2*, RVCD+3 |
IBZ | ADDCI+1~, SETCI+9*, SETCI+10 |
P | MCCRUTL~, MCCRUTL+2 |
RVCD | RVCD~, RVCD+2 |
U | POST+1~*, SETCI+2, SETCI+3, SETCI+4, SETCI+5, SETCI+6, SETCI+9, SETCI+10, ADDRS+4, ADDRS+5 , ADDRS+17, MCCRUTL+2, RVCD+2 |
X | ADDCI+1~, SETCI+13*, SETCI+14!, SETCI+18!, ADDRS+1~, ADDRS+20*, ADDRS+21!, MCCRUTL~, MCCRUTL+2 |
Y | ADDCI+1~, SETCI+14!, SETCI+15, SETCI+18!, ADDRS+1~, ADDRS+21! |
Name | Field # of Occurrence |
---|---|
$T(CIF+IBI | ADDCI+7 |
$T(RSF+IBI | ADDRS+3 |