IBCRU6 ;ALB/ARH - RATES: UTILITIES (SPECIAL GROUPS); 10-OCT-1998
Source file <IBCRU6.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 |
---|---|---|
CSSG(CS,BR,TYPE,ARR) | ; search for special group(s) of TYPE this CS belongs, returns IFN of first group found TYPE
; outputs ARR(order)=group ifn ^ groups 0 node, if passed by reference |
|
CSSGQ | ||
RVLNK(ITM,BR,CS,ARR) | ; return the ifn^revenue code for a particular ITEM as defined by the Billing Rates Revenue Code links
|
|
RVLNKQ | ||
GRVLNK(ITM,GRP,ARR) | ; return the ifn^revenue code for a particular ITEM as defined in a single group
; Output: if ARR=1 on entry and passed by reference, then the array ARR will be defined on output ; ARR(IFN of Rv Cd link in 363.33) = IFN of Rv Cd link in 363.33 ^ revenue code ; (since ranges and specific individual ITEMs can be defined, one ITEM may be set up for more than one revenue ; code, the one used on the bills will be the return value, any others will be in the array) |
|
GRVLNKQ | ||
PRVTYP(PRV,IBDT) | ; find the provider type/discount group of a provider on a given date
; returns prv type ifn (363.34) ^ provider person class ifn ^ provider type ^ special group ^ percent |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^IBE(363.1 - [#363.1] | CSSG+3, RVLNK+2 |
^IBE(363.3 - [#363.3] | RVLNK+3 |
^IBE(363.32 - [#363.32] | CSSG+5, CSSG+6, CSSG+7, CSSG+8 |
^IBE(363.33 - [#363.33] | GRVLNK+9, GRVLNK+10, GRVLNK+13, GRVLNK+14, GRVLNK+15, GRVLNK+19, GRVLNK+20, GRVLNK+21 |
^IBE(363.34 - [#363.34] | PRVTYP+4, PRVTYP+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ARR | CSSG~, CSSG+2!, RVLNK~, RVLNK+1, RVLNK+6, GRVLNK~, GRVLNK+7 |
ARR( | CSSG+9, CSSG+10, CSSG+11*, CSSG+12, GRVLNK+10*, GRVLNK+16*, GRVLNK+23* |
ARR(0 | CSSG+12 |
ARR(99999 | CSSG+10 |
ARR1 | CSSG+2~! |
ARR1( | CSSG+11* |
BR | CSSG~, CSSG+3, RVLNK~, RVLNK+2 |
CS | CSSG~, CSSG+3, CSSG+8, RVLNK~, RVLNK+2, RVLNK+5 |
DT | PRVTYP+2 |
GRP | GRVLNK~, GRVLNK+7*, GRVLNK+9, GRVLNK+13, GRVLNK+14, GRVLNK+19, GRVLNK+20 |
IBALL | RVLNK+1~*, RVLNK+5, GRVLNK+6~, GRVLNK+7*, GRVLNK+10, GRVLNK+13, GRVLNK+14, GRVLNK+19, GRVLNK+20 |
IBBR | CSSG+2~, CSSG+3*, CSSG+5, CSSG+7, RVLNK+1~, RVLNK+2*, RVLNK+3, RVLNK+5 |
IBC | GRVLNK+6~, GRVLNK+18*, GRVLNK+23 |
IBC1 | GRVLNK+6~, GRVLNK+22*, GRVLNK+23 |
IBC2 | GRVLNK+6~, GRVLNK+22*, GRVLNK+23 |
IBDT | PRVTYP~, PRVTYP+2*, PRVTYP+3 |
IBEND | GRVLNK+6~, GRVLNK+13*, GRVLNK+14, GRVLNK+19*, GRVLNK+20 |
IBFND | CSSG+2~*, CSSG+12*, CSSGQ |
IBORDER | CSSG+2~, CSSG+9*, CSSG+10*, CSSG+11, CSSG+12*, RVLNK+1~, RVLNK+5*, RVLNK+6 |
IBPC | PRVTYP+2~, PRVTYP+3*, PRVTYP+4, PRVTYP+6 |
IBPD0 | PRVTYP+2~, PRVTYP+5*, PRVTYP+6 |
IBPDIFN | PRVTYP+2~, PRVTYP+4*, PRVTYP+5, PRVTYP+6 |
IBPT | PRVTYP+2~*, PRVTYP+6*, PRVTYP+7 |
IBRV | RVLNK+1~, RVLNK+6*, GRVLNK+6~, GRVLNK+10*, GRVLNK+16*, GRVLNK+23* |
IBRVD | RVLNK+1~*, RVLNK+5, RVLNK+6*, RVLNKQ, GRVLNK+6~, GRVLNK+7*, GRVLNK+10*, GRVLNK+13, GRVLNK+14, GRVLNK+16* , GRVLNK+19, GRVLNK+20, GRVLNK+23*, GRVLNKQ |
IBSG0 | CSSG+2~, CSSG+6*, CSSG+11 |
IBSG10 | CSSG+2~, CSSG+8*, CSSG+9 |
IBSGFN | CSSG+2~, CSSG+5*, CSSG+6, CSSG+7, CSSG+8, CSSG+11, RVLNK+1~, RVLNK+6* |
IBSGFN1 | CSSG+2~, CSSG+7*, CSSG+8 |
IBX | GRVLNK+6~, GRVLNK+9*, GRVLNK+10, GRVLNK+14*, GRVLNK+15, GRVLNK+16, GRVLNK+20*, GRVLNK+21, GRVLNK+23 |
IBXRF | GRVLNK+6~, GRVLNK+9*, GRVLNK+12*, GRVLNK+13, GRVLNK+14, GRVLNK+18*, GRVLNK+19, GRVLNK+20 |
IBY | GRVLNK+6~, GRVLNK+15*, GRVLNK+16, GRVLNK+21*, GRVLNK+22, GRVLNK+23 |
ITM | RVLNK~, RVLNK+1, RVLNK+6, GRVLNK~, GRVLNK+7*, GRVLNK+9, GRVLNK+12, GRVLNK+13, GRVLNK+16, GRVLNK+18 |
PRV | PRVTYP~, PRVTYP+3 |
SGARR | RVLNK+1~, RVLNK+5 |
SGARR( | RVLNK+5, RVLNK+6 |
TYPE | CSSG~, CSSG+6 |
U | CSSG+3, CSSG+6, CSSG+8, CSSG+9, CSSG+11, RVLNK+2, RVLNK+3, GRVLNK+10, GRVLNK+16, GRVLNK+22 , GRVLNK+23, PRVTYP+6 |