IBAUTL2 ;ALB/CPM-MEANS TEST BILLING UTILITIES ;30-AUG-91
Source file <IBAUTL2.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399.1 - [#399.1] | TYPE+11, COPAY+5 |
| ^DIC(49 - [#49] | SERV+1 |
| ^IB - [#350] | CHFIND+4, CHADD+2*, CHADD+3*, CHADD+4*, CHUPD+5*, CHUPD+6* |
| ^IB("ACT" | CHFIND+4 |
| ^IBE(350.1 - [#350.1] | TYPE+11, COPAY+6 |
| ^IBE(350.2 - [#350.2] | COST+1 |
| ^IBE(350.9 - [#350.9] | SERV+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | CHADD+4, CHUPD+5 |
| DA | CHADD+5*!, CHUPD+7*! |
| >> DFN | CHADD+2 |
| DIK | CHADD+5*!, CHUPD+7*! |
| DUZ | CHADD+4, CHUPD+5 |
| >> IBATYP | CHADD+2, TYPE+11*, TYPE+12, COST+1, COPAY+4*, COPAY+5*, COPAY+6 |
| >> IBBS | TYPE+6*, TYPE+11, COPAY+5, COPAY+10 |
| >> IBCHFR | CHFIND+5*, CHUPD+3 |
| >> IBCHG | CHADD+2, CHUPD+3, CHUPD+4, TYPE+4*, TYPE+13, COST+2*, COPAY+4*, COPAY+10*, COPAY+11*, COPAY+13 |
| >> IBCHTO | CHFIND+5* |
| >> IBCHTOTL | CHFIND+5*, CHUPD+4 |
| IBCS | TYPE+7*, COPAY+9*, COPAY+10, COPAYQ! |
| >> IBDESC | CHADD+2, TYPE+4*, COPAY+4* |
| >> IBDT | CHADD+2, CHUPD+3, CHUPD+5, COST+1, COPAY+10 |
| >> IBEVDA | CHFIND+4, CHADD+2 |
| >> IBFAC | CHADD+2 |
| >> IBGMTR | CHADD+3, CHUPD+6 |
| >> IBN | CHADD+2, CHADD+3, CHADD+4, CHADD+5, CHUPD+5, CHUPD+6, CHUPD+7 |
| IBOLDBS | TYPE+4~, TYPE+8*, COPAY+5 |
| >> IBRTED | COPAY+11* |
| >> IBSERV | SERV+1* |
| >> IBSL | CHADD+2 |
| >> IBTYPE | TYPE+6 |
| >> IBX | CHFIND+4, CHFIND+6, CHUPD+3, CHUPD+4, TYPE+5, TYPE+11 |
| >> IBY | CHADD+1*, SERV+1*, TYPE+12*, TYPE+13*, COPAY+5*, COPAY+13* |
| J | CHFIND+3~*, CHFIND+4*, CHFIND+5, CHFIND+6, TYPE+4~ |
| TOT | CHUPD+2~, CHUPD+3*, CHUPD+4*, CHUPD+5 |
| UNIT | CHUPD+2~*, CHUPD+3*, CHUPD+5 |
| X | CHFIND+3~, CHFIND+4*, CHFIND+5, CHUPD+3, COST+1~*, COST+2 |
| >> X1 | CHUPD+3* |
| >> X2 | CHUPD+3* |
| >> Y | CHADD+1 |
