IBRFN2 ;ALB/AAS - PASS INSURANCE/BEDSECTION DATA TO A/R FOR MCCR/NDB ; 8-OCT-93
Source file <IBRFN2.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 3 | IBAMTV4 IBCEMU2 IBCOIVM1 |
| Accounts Receivable | 1 | RCRJRCOL |
| 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 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | POL+6 |
| ^DGCR(399 - [#399] | CRIT+27, TYPOL+4, HOWID+4, BEDSC+5, BEDSC+8, BEDSC+9, BEDSC+10, POL+2, POL+4, POL+5 |
| ^DGCR(399.1 - [#399.1] | BEDSC+19 |
| ^DPT - [#2] | TYPOL+4, HOWID+4 |
| ^IBA(355.3 - [#355.3] | TYPOL+7 |
| ^IBE(355.1 - [#355.1] | TYPOL+7 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DFN | POL+1~, POL+5*, POL+6 |
| IBBS | BEDSC+2~, BEDSC+10*, BEDSC+11, BEDSC+12 |
| IBBS( | BEDSC+12*, BEDSC+17 |
| IBCDFN | TYPOL+1~, TYPOL+3*, TYPOL+4, HOWID+1~, HOWID+3*, HOWID+4, POL+1~, POL+2*, POL+3, POL+8* , POLQ |
| >> IBCNS | POL+4*, POL+8 |
| IBCPOL | TYPOL+1~, TYPOL+4*, TYPOL+5, TYPOL+6, TYPOL+7 |
| IBDD | POL+1~, POL+7 |
| IBDD( | POL+8 |
| IBIFN | CRIT~, CRIT+27, CRIT+30, CRIT+31, CRIT+32, TYPOL~, TYPOL+3, TYPOL+4, HOWID~, HOWID+3 , HOWID+4, BEDSC~, BEDSC+4, BEDSC+5, BEDSC+8, BEDSC+9, BEDSC+10, POL~, POL+2, POL+4 , POL+5 |
| IBMAX | BEDSC+2~, BEDSC+16*, BEDSC+17*, BEDSC+19 |
| IBRC | BEDSC+2~, BEDSC+8*, BEDSC+9, BEDSC+10 |
| IBUN | BEDSC+2~, BEDSC+9*, BEDSC+12 |
| IBX | CRIT+22~, CRIT+23*, CRIT+28*, CRIT+30*, CRIT+31*, CRIT+32*, CRITQ, TYPOL+1~, TYPOL+2*, TYPOL+5* , TYPOL+8*, TYPOLQ*, TYPOLQ+1, HOWID+1~, HOWID+2*, HOWID+4*, HOWIDQ*, HOWIDQ+1, BEDSC+2~, BEDSC+3* , BEDSC+5*, BEDSC+19*, BEDSCQ*, BEDSCQ+1 |
| TYPE | TYPOL+1~, TYPOL+7*, TYPOL+8 |
| X | BEDSC+17*, POL+1~, POL+6*, POL+8* |
| Y | POL+1~ |
