Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
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>

Entry Points

Name Comments DBIA/ICR reference
CSN(N) ; returns the IFN of the Charge Set name passed in
CSBI(CS) ; returns a Charge Set rates Billable Item (363.3,.04): 0 or BI ^ bi name
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
CSDVQ
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
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
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
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)=""
Info |  Source |  Entry Points