IBCRBC ;ALB/ARH - RATES: BILL CALCULATION OF CHARGES ; 22-MAY-1996
Source file <IBCRBC.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 |
|---|---|---|
| BILL(IBIFN,IBRSARR) | ; given a bill number calculate and store all charges
; if IBRSARR is defined it will be used to create charges rather than the standard set for the bills Rate Type |
|
| END | ||
| MAILADD(IBIFN,BTYPE) | ; update the bill mailing address: it may be based on the types of charges
; an outpatient bill may go to either the opt or rx mailing addresses depending on the types of charges |
|
| BILLITEM(IBIFN,IBITMARR) | ; add selected unassociated item charges to the bill
|
| Name | Field # of Occurrence |
|---|---|
| UPDT^DGPTUTL | BILL+24 |
| $$INPAT^IBCEF | BILL+17 |
| $$CURR^IBCEF2 | BILL+20 |
| CPT^IBCRBC1 | BILL+42 |
| INPTBS^IBCRBC1 | BILL+37 |
| OPTVST^IBCRBC1 | BILL+39 |
| PI^IBCRBC1 | BILL+41 |
| RX^IBCRBC1 | BILL+40 |
| INPTDRG^IBCRBC11 | BILL+38 |
| UNASSOC^IBCRBC11 | BILLITEM+7 |
| ADDBCHGS^IBCRBC3 | BILL+48, BILLITEM+11 |
| CLEANRX^IBCRBC3 | END |
| DSPDL^IBCRBC3 | BILL+27 |
| SORTCI^IBCRBC3 | BILL+46, BILLITEM+9 |
| DELALLRC^IBCRBF | BILL+27 |
| $$EMUTL^IBCRU1 | BILL+35, BILLITEM+5 |
| RT^IBCRU3 | BILL+30 |
| $$CHGTYPE^IBCU | MAILADD+3 |
| MAILA^IBCU5 | MAILADD+3 |
| $$MCRWNR^IBEFUNC | BILL+20 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | BILL+16, BILL+20 |
| ^DGPT - [#45] | BILL+23 |
| ^IBA(362.4 - [#362.4] | MAILADD+3 |
| ^IBE(363.1 - [#363.1] | BILL+35, BILLITEM+5 |
| ^TMP("IBCRRX" | END |
| ^TMP($J | BILL+14!, BILL+44, BILL+46, END+1!, BILLITEM+1!, BILLITEM+9, BILLITEM+11, BILLITEM+13! |
| Name | Line Occurrences |
|---|---|
| END | BILL+30, BILL+44, BILL+46 |
| MAILADD | BILL+50 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BTYPE | MAILADD~, MAILADD+3 |
| DA | MAILADD+2~, MAILADD+3* |
| DFN | BILL+13~, BILL+17* |
| >> DGPTUPDT | BILL+23, BILL+24* |
| IB0 | BILL+13~, BILL+16*, BILL+17, BILL+20, BILL+23 |
| IB01 | MAILADD+2~ |
| IB02 | MAILADD+2~ |
| >> IBAUTO | MAILADD+4 |
| IBBEVNT | BILL+13~, BILL+35*, BILL+37, BILL+38, BILL+39, BILL+40, BILL+41, BILL+42, BILLITEM+1~, BILLITEM+5* , BILLITEM+7 |
| IBBRT | BILL+13~, BILL+17*, BILL+30 |
| IBBTYPE | BILL+13~, BILL+17*, BILL+23, BILL+30, BILL+50 |
| IBCS | BILL+13~, BILL+34*, BILL+35, BILL+37, BILL+38, BILL+39, BILL+40, BILL+41, BILL+42, BILLITEM+1~ , BILLITEM+4*, BILLITEM+5, BILLITEM+7 |
| IBCTYPE | BILL+13~, BILL+17*, BILL+30 |
| IBDGPT | BILL+13~, BILL+23*, BILL+24 |
| IBIFN | BILL~, BILL+13, BILL+16, BILL+17, BILL+20, BILL+27, BILL+37, BILL+38, BILL+39, BILL+40 , BILL+41, BILL+42, BILL+48, BILL+50, END, MAILADD~, MAILADD+3, BILLITEM~, BILLITEM+7, BILLITEM+11 |
| IBITMARR | BILLITEM~, BILLITEM+7 |
| IBITMARR( | BILLITEM+3, BILLITEM+4 |
| >> IBNOCALC | BILL+11* |
| IBRS | BILL+13~, BILL+33*, BILL+34, BILL+37, BILL+38, BILL+39, BILL+40, BILL+41, BILL+42, BILLITEM+1~ , BILLITEM+3*, BILLITEM+4, BILLITEM+7 |
| IBRSARR | BILL~, BILL+30 |
| IBRSARR( | BILL+33, BILL+34 |
| IBU | BILL+13~, BILL+16*, BILL+30 |
| PTF | BILL+13~, BILL+23* |
| U | BILL+17, BILL+20, BILL+23, BILL+24, BILL+30, BILL+35, BILLITEM+5 |
| >> ZTQUEUED | MAILADD+4 |