IBRFN2 ;ALB/AAS - PASS INSURANCE/BEDSECTION DATA TO A/R FOR MCCR/NDB ; 8-OCT-93
Source file <IBRFN2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| CRIT(IBIFN) | ; Pass AR insurance data for MCCR/NDB
; Input: IBIFN -- Internal entry of Bill (ptr to #399) ; (should be same as ptr to 430) |
|
| CRITQ | ||
| TYPOL(IBIFN) | ; -- compute type of policy for a bill
|
|
| TYPOLQ | ||
| HOWID(IBIFN) | ; -- compute how policy was identified
|
|
| HOWIDQ | ||
| BEDSC(IBIFN) | ; -- compute primary bedsection for a bill
; -- based on greatest length of stay |
|
| BEDSCQ | ||
| POL(IBIFN) | ; -- compute internal policy id for a bill
|
|
| POLQ |
