IBCRBG2 ;ALB/ARH - RATES: BILL SOURCE EVENTS (INPT CONT) ; 01-OCT-03
Source file <IBCRBG2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| INPTRSET(IBIFN,CS) | ; reset Inpatient data due to bedsection Tort 03 and Other Type of Care RC v2.0
; (based on INPTPTF since that deals with timeframe and end of bill) |
|
| INPTBS(IBIFN,RC) | ; with output from INPTPTF^IBCRBG, reset bedsections due to changes with Tort 03 and RC
; - Some Specialties are changed to PRRTP bedsection (beginning with Tort 03) ; - Some Specialties are changed to ICU bedsection for RC only (beginning with RC v2.0) ; - Nursing Home Care and Observation bedsections are not billable with RC DRG (per diem) so remove DRG ; (based on INPTPTF since that deals with timeframe and end of bill) |
|
| INPTOTH(IBIFN,RC) | ; with output from INPTPTF^IBCRBG, reset Other type of care and Tort 03 changes
; - If type of care is Other then bedsection is replaced and DRG deleted (began with RC v2.0) ; (based on INPTPTF since that deals with timeframe and end of bill) |
|
| BSUPD(SPCLTY,DATE,RC) | ; return updated bedsection name for specialty passed in (42.4 ifn)
; beginning with TORT 2003 some specialties were moved to new PRRTP bedsection ; beginning with RC v2.0 some specialties were moved to a new ICU bedsection, only applies to RC charges |
|
| TORT03() | ; return effective date of TORT 2003, date when PRRTP bedsection specialties changed
|
|
| TORT11() | ; return effective date when POLYTRAUMA bedsection specialty changed
|
|
| RC20() | ; return effective date of RC v2.0, date when ICU bedsection specialties changed
|
|
| NODRG(SPCLTY) | ; return specialty ifn followed by bedsection name if the specialty should not be charged a DRG charge
|
