IBCU5 ;ALB/AAS - MCCR MAILING ADDRESS UTILITY ROUTINE ;26-FEB-90
Source file <IBCU5.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 2 | $$ADD^IBCNADD ALL^IBCNS1 |
| Registration | 1 | (ADD,DEM)^VADPT |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;Entry from X-REF from who's responsible
|
|
| ENQ | ||
| EN1 | ;Now Trigger of primary insurance policy from who's responsible
|
|
| EN1Q | ||
| MAILA | ;Store Mailing Address for Bill Payer Carrier (and if not copying bill or bill not authorized,
; insert Attending Physican Id [36,.1] into Form Locator 92 [399,213] |
|
| MAILQ | ||
| UPDMA(DA,IB01,IB02) | ; Update insurance company mailing address in file 399
; DA = bill ifn |
|
| MAILIN | ;Store Mailing Address for Institution
|
|
| MAILINQ | ||
| MAILP | ;Store Patient Mailing address
|
|
| MAILPQ | ||
| INSUR | ;
|
|
| DEL |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | EN+2, EN+4, EN+5, EN1+9, MAILA+4, MAILA+5, MAILA+7, UPDMA+4*, UPDMA+7*, UPDMA+9* , MAILIN+1, MAILIN+3*, MAILIN+4*, MAILP+3, MAILP+7*, MAILP+9*, MAILP+10*, MAILP+12*, MAILP+13*, DEL* |
| ^DIC(11 - [#11] | MAILP+6 |
| ^DIC(36 - [#36] | MAILA+8, UPDMA+4 |
| ^DIC(4 - [#4] | EN+4, MAILIN+1, MAILIN+2 |
| ^DPT - [#2] | MAILP+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | EN+2, EN+4, EN+5, EN1+9, MAILA+3*, MAILA+4, MAILA+5, MAILA+7, MAILA+10, MAILA+12 , UPDMA~, UPDMA+4, UPDMA+7, UPDMA+9, MAILIN+1*, MAILP+2*, MAILP+3, MAILP+7, MAILP+9, MAILP+10 , MAILP+12, MAILP+13, DEL |
| DFN | EN1+10, MAILP+1~, MAILP+3*, MAILP+6 |
| DGNAM | MAILP+1~, MAILP+5*, MAILP+6*, MAILP+7 |
| DGTAG | EN+4*, ENQ! |
| DT | EN1+9 |
| IB01 | MAILA+7*, MAILA+8, MAILA+12, MAILQ!, UPDMA~, UPDMA+4, MAILIN+2*, MAILIN+3, MAILINQ! |
| IB02 | MAILA+10*, MAILA+12, MAILQ!, UPDMA~, UPDMA+4, UPDMA+7, UPDMA+9, MAILIN+2*, MAILIN+3, MAILINQ! |
| IB03 | MAILQ!, MAILINQ! |
| >> IBAC | EN1+7 |
| IBCONF | MAILP+1~, MAILP+4*, MAILP+8, MAILP+11 |
| IBDD | EN1Q! |
| IBDD(0 | EN1+11 |
| >> IBIDS(151 | EN1+9 |
| >> IBIFN | MAILA+3, MAILIN+1, MAILIN+3, MAILIN+4, MAILP+2 |
| IBIN | EN1Q! |
| >> IBINDT | EN1+9*, EN1+10 |
| IBINS | EN1Q! |
| U | MAILA+4, MAILA+5, UPDMA+9, MAILIN+3, MAILP+4, MAILP+9, MAILP+12 |
| >> VADM(1 | MAILP+5 |
| >> VADM(5 | MAILP+6 |
| VAPA | MAILP+1~ |
| VAPA("P" | MAILP+3* |
| VAPA(1 | MAILP+12 |
| VAPA(11 | MAILP+12 |
| VAPA(12 | MAILP+4 |
| VAPA(13 | MAILP+9 |
| VAPA(14 | MAILP+9 |
| VAPA(15 | MAILP+10 |
| VAPA(16 | MAILP+9 |
| VAPA(17 | MAILP+9 |
| VAPA(18 | MAILP+9 |
| VAPA(2 | MAILP+12 |
| VAPA(22 | MAILP+4 |
| VAPA(3 | MAILP+13 |
| VAPA(4 | MAILP+12 |
| VAPA(5 | MAILP+12 |
| >> X | EN+2*, EN+3, EN+4, EN+5, EN1+6*, EN1+11*, EN1+15*, MAILIN+1*, MAILIN+2 |