IBCNSC01 ;ALB/NLR - INSURANCE COMPANY EDIT ;6/1/05 10:06am
Source file <IBCNSC01.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PARAM | ; -- Insurance company parameters region
|
|
PHONE(IBCNS13) | ; -- Compute precert company phone
|
|
REDOX | ||
PHONEQ | ||
PORTAL(IBCNS13) | ||
PORT | ;
|
|
PORTALQ | ||
MAIN | ; -- Insurance company main address
|
|
MAINAD | ; KDM US2487 IB*2.0*592 call in tag from IBCNSI
|
|
PAYER | ; This procedure builds the display for the payer associated with
; this insurance company. ; /vd-IB-2-687 - The following module has been restructured with new code to modify ; the display for how the payer and the "EIV" and "IIU" payer ; applications are displayed. ; - 08/31/20 - IIU project ; - 2/4/13 - remove ePharmacy references (IB*2*494) ; - 9/9/09 - eIV updated ; ESG - 7/29/02 - IIV project |
|
REMARKS | ;
|
|
SYN | ;
|
|
YESNO(VAL) | ;Translate to a YES or NO value. - /vd - IB*2.0*687
; INPUT: VAL = Either 0 or 1 ; OUTPUT: 'YES' (for VAL=1), 'NO' (for VAL=0) |
FileNo | Call Tags |
---|---|
^IBA(355.98 - [#355.98] | GET1^DIQ |
^DIC(36 - [#36] | GET1^DIQ |
^IBE(365.12 - [#365.12] | GET1^DIQ |
^IBE(365.13 - [#365.13] | FIND1^DIC |