IB20P570 ;ALB/CXW - IB*2*570 POST INIT:COST-BASED/INTERAGENCY/CONDITION;7/7/16
Source file <IB20P570.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)
|
|
MCCRUTL(IBC,IBPE) | ; returns IEN in 399.1 if Name is found and piece P is true
|
|
EXCODE(IBC,IBPE) | ; returns IEN in 399.1 if Code is found and piece P is true
|
|
RVCD(RVCD) | ; returns IFN if revenue code is valid and active
|
|
MCCR | ; Condition code flag in field #.22/piece 15
|
|
MSG(IBA) | ;
|
|
CONU | ; Condition code^name
|
|
CIF | ; 68 Charge Items (363.2): Bedsection ^ Charge Set ^Effective Date ^ Revenue Code ^ Charge
|
|
TORT | ;; Cost Based (Tortiously Liable) - All Inclusive
|
|
IA | ;; Interagency
|
FileNo | Call Tags |
---|---|
^IBA(363.2 - [#363.2] | Classic Fileman Calls |
^DGCR(399.1 - [#399.1] | Classic Fileman Calls |