IBCU5 ;ALB/AAS - MCCR MAILING ADDRESS UTILITY ROUTINE ;26-FEB-90
Source file <IBCU5.m>
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 |