IBAUTL2 ;ALB/CPM-MEANS TEST BILLING UTILITIES ;30-AUG-91
Source file <IBAUTL2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CHFIND | ; Find open charge for a billable event
; Input: IBEVDA, IBX (C=copay/P=per diem) ; Output: IBCH*DA=0/ien of charge also IBCH* if IBCH*DA>0 |
|
| CHADD | ; Add a new IB Action in #350
|
|
| CHADDQ | ||
| CHUPD | ; Update an IB Action charge
; Input: IBCHTOTL, IBCHFR, IBDT, IBX(P/C), IBN, IBCHG, DUZ, IBGMTR(opt) |
|
| SERV | ; Find the service pointer for MAS.
|
|
| TYPE | ; Find the IB action type and rate for per diem and OPT co-payment charges.
; Input: IBDT, IBBS (if IBX=P), IBX (O=opt copay/P=per diem) ; IBTYPE (only if outpatient, specify Basic or Specialty) ; Output: IBATYP, IBCHG, IBDESC, IBRTED |
|
| TYPEQ | ||
| COST | ; - find per diem charge. Input: IBATYP, IBDT Output: IBCHG
|
|
| COPAY | ; Find the Inpatient/NHCU daily copay rate and IB action type
; Input: IBBS, IBDT, IBCS (for the opt copay only) ; Output: IBATYP, IBCHG, IBDESC, IBRTED |
|
| COPAYQ |
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | Classic Fileman Calls |
