Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: IBCRU3

Package: Integrated Billing

Routine: IBCRU3


Information

IBCRU3 ;ALB/ARH - RATES: UTILITIES (CS/BR) ;22-MAY-1996

Source Information

Source file <IBCRU3.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Integrated Billing 1 ($$EMUTL,$$EXPAND,$$MCCRUTL)^IBCRU1  

Caller Graph

Caller Graph Total: 33

Package Total Caller Graph
Integrated Billing 33 IBAUTL2  IBCA  IBCBB1  IBCCCB0  IBCD2  IBCD5  IBCRBC  IBCRBC1  
IBCRBC11  IBCRBE  IBCRBH1  IBCRBH2  IBCRCC  IBCRCI  IBCRCU1  IBCREC  
IBCREF  IBCREQ  IBCRHD  IBCRHL  IBCRHU1  IBCRU2  IBCRU4  IBCSC5A  
IBCU65  IBCU73  IBCU7A  IBJDB21  IBNCPDP1  IBNCPDPU  IBNCPUT3  IBTOSUM1  
IBTUBO2  

Entry Points

Name Comments DBIA/ICR reference
CSBR(CS) ; return data on a charge set: billable event ^ BE IFN ^ billing rate IFN ^ billable item ^ charge method
CSDV(CS,DIV,DDIV) ; check if the division is covered by this charge set
; "" if - Charge Set has no region defined (ie. covers all divisions)
; div if - division passed in and it is one of the divisions of the region defined for the Charge Set
; - no division but default division is one of the divisions of the region defined for the Set
; -1 - otherwise: division not covered by CS
CSBI(CS) ; returns a Charge Set rates Billable Item (363.3,.04): 0 or BI ^ bi name
CSDVQ
CSN(N) ; returns the IFN of the Charge Set name passed in
RT(RT,BT,EFDT,ARR,BE,CT) ; return array of all rate schedules and charge sets for a rate type and bill type and date
; EFDT may be passed as 'begin dt^end dt' to get CSs active within a date range, like a bill's date range
; output ARR = number of rate schedule-charge set combinations found
; ARR(rate sched IFN,charge set IFN) = 1 if charges for set are auto added
PERDIEM(RT,BT,EVDT) ; return true (BR ifn) if the charges for the rate and bill type are perdiem charges
; - one of the auto add Charge Sets (except RX or Pros) must be either Tort Liable or Interagency
BILLRATE(RT,BT,EVDT,FNDRATE) ; return true if the bill is a FND rate bill
; - one of the auto add Charge Sets must be a FND Billing Rate
EVNTITM(RT,BT,BE,EFDT,ARR) ; return the billable item (363.3, .04) for a particular Rate Type and Billable Event (399.1) auto added
; EFDT may be passed as 'begin dt^end dt' to get CSs active within a date range, like a bill's date range
; returns: string of billing items (code;name;quantity) separated by ^ (3;NDC #;3^1;BEDSECTION;1)
; for VA Cost, code = 'VA COST' so returns 'VA COST;VA COST;2'
; output (if ARR passed by reference): ARR(billable item code, rate sched IFN, charge set IFN)=""

External References

Name Field # of Occurrence
$$EMUTL^IBCRU1 CSBR+2, RT+7, PERDIEM+9
$$EXPAND^IBCRU1 CSBI+3, EVNTITM+13
$$MCCRUTL^IBCRU1 RT+7

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^IBE(363 - [#363] RT+8, RT+9, RT+10, RT+11
^IBE(363.1 - [#363.1] CSN+1, CSBI+2, CSBR+2, CSDV+7, RT+13, RT+14, BILLRATE+8, PERDIEM+8, EVNTITM+11
^IBE(363.3 - [#363.3] CSBI+2, CSBR+3, BILLRATE+8, PERDIEM+8, EVNTITM+11
^IBE(363.31 - [#363.31] CSDV+10, CSDV+11

Label References

Name Line Occurrences
CSDVQ CSDV+7, CSDV+9, CSDV+10, CSDV+11
RT BILLRATE+4, PERDIEM+4, EVNTITM+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ARR RT~, RT+4!*, RT+15*, EVNTITM~, EVNTITM+5!
ARR( RT+15*, EVNTITM+13*
BE RT~, RT+7*, EVNTITM~, EVNTITM+7
BT RT~, RT+5*, RT+8, BILLRATE~, BILLRATE+4, PERDIEM~, PERDIEM+4, EVNTITM~, EVNTITM+7
CS CSBI~, CSBI+2, CSBR~, CSBR+2, CSDV~, CSDV+7
CT RT~, RT+5*, RT+14
DDIV CSDV~, CSDV+6*, CSDV+11
DIV CSDV~, CSDV+6*, CSDV+10, CSDV+11
EFDT RT~, RT+5*, RT+6, RT+9, EVNTITM~, EVNTITM+7
EVDT BILLRATE~, BILLRATE+4, PERDIEM~, PERDIEM+4
FNDRATE BILLRATE~, BILLRATE+6, BILLRATE+9
IBAA RT+4~, RT+12*, RT+14*, RT+15
IBBE RT+4~*, RT+7*, RT+8, RT+13
IBBEG RT+4~, RT+6*, RT+9
IBBEVNT CSBR+1~, CSBR+2*, CSBR+4, PERDIEM+2~, PERDIEM+9*
IBBI CSBI+1~, CSBI+2*, CSBI+3, EVNTITM+5~, EVNTITM+12*, EVNTITM+13
IBBR PERDIEM+2~, PERDIEM+8*, PERDIEM+10
IBBR0 BILLRATE+2~, BILLRATE+8*, BILLRATE+9, EVNTITM+5~, EVNTITM+11*, EVNTITM+12, EVNTITM+13
IBBRFN CSBR+1~, CSBR+2*, CSBR+3, CSBR+4
IBBRN PERDIEM+2~, PERDIEM+8*, PERDIEM+10
IBCS BILLRATE+2~, BILLRATE+7*, BILLRATE+8, PERDIEM+2~, PERDIEM+7*, PERDIEM+8, EVNTITM+5~, EVNTITM+10*, EVNTITM+11, EVNTITM+13
IBCS0 CSBI+1~, CSBI+2*, CSDV+6~, CSDV+7*, BILLRATE+2~, BILLRATE+8*, PERDIEM+2~, PERDIEM+8*, PERDIEM+9, EVNTITM+5~
, EVNTITM+11*
IBCSI RT+4~, RT+10*, RT+11
IBEND RT+4~, RT+6*, RT+9
IBFND BILLRATE+2~*, BILLRATE+6, BILLRATE+7, BILLRATE+9*, BILLRATE+11, PERDIEM+2~*, PERDIEM+6, PERDIEM+7, PERDIEM+10*, PERDIEM+12
, EVNTITM+5~*, EVNTITM+13*, EVNTITM+14
IBLN CSBR+1~, CSBR+2*, CSBR+4, RT+4~, RT+11*, RT+12, RT+13, RT+14, RT+15
IBLN1 CSBR+1~, CSBR+3*, CSBR+4
IBRGFN CSDV+6~, CSDV+7*, CSDV+9, CSDV+10, CSDV+11
IBRS BILLRATE+2~, BILLRATE+6*, BILLRATE+7, PERDIEM+2~, PERDIEM+6*, PERDIEM+7, EVNTITM+5~, EVNTITM+9*, EVNTITM+10, EVNTITM+13
IBRS0 RT+4~, RT+9*
IBRSARR BILLRATE+2~, BILLRATE+4, PERDIEM+2~, PERDIEM+4, EVNTITM+5~, EVNTITM+7
IBRSARR( BILLRATE+6, BILLRATE+7, PERDIEM+6, PERDIEM+7, EVNTITM+9, EVNTITM+10
IBRSFN RT+4~, RT+8*, RT+9, RT+10, RT+11, RT+15
IBX CSBI+1~*, CSBI+3*, CSBI+4, CSBR+1~*, CSBR+4*, CSBR+5, CSDV+6~*, CSDV+9*, CSDV+10*, CSDV+11*
, CSDVQ
N CSN~, CSN+1
RT RT~, RT+5*, RT+8, BILLRATE~, BILLRATE+4, PERDIEM~, PERDIEM+4, EVNTITM~, EVNTITM+7
U CSBI+2, CSBI+3, CSBR+2, CSBR+4, CSDV+7, RT+6, RT+9, RT+12, RT+13, RT+14
, BILLRATE+8, BILLRATE+9, PERDIEM+8, PERDIEM+9, EVNTITM+11, EVNTITM+12, EVNTITM+13
X CSN+1~*, CSN+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  All