Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points
Print Page as PDF
Routine: IB20P240

Package: Integrated Billing

Routine: IB20P240


Information

IB20P240 ;ALB/RLC - Post-Init routine for IB*2.0*240; 8/19/2003

Source Information

Source file <IB20P240.m>

Entry Points

Name Comments DBIA/ICR reference
EN ; entry point for post-init process
EN1 ; root name ^IBE - files 350.1, 351.7, 355.1, 355.2, 355.97 and 363
F3501 ; for file 350.1 must also update fields .02 and .08, and cross-
; references "D" and "E". Also, need to change external value for
; set of codes in field .11 to Tricare for internal code 7.
F3551 ; for file 355.1 must also update field .02, and "D" cross-reference
F35510 ; change references to Champus in description field
F3552 ; must also update field .02 from CHS to TRI and "C" cross-reference
EN2 ; root name ^IBA - file 355.3 change .03 field, along with "D", "ACCP"
; and "AGNA" cross references. Files 364.5 and 364.7 change references
; from Champus to Tricare in word-processing field
EN21 ; update file 355.3
EN22 ; update files 364.5 and 364.7
EN3 ; root name ^DGCR - files 399.1 and 399.3
EN4 ; update .01 field in file 36
EN5 ; change all occurrences of CHAMPUS to TRICARE for IB Menu option
; text displays.
IBJD ; change text display for menu option
DESC ; change any references from Champus to Tricare in the
; word-processing description multiple field
EN6 ; search for all records in file 355.3 that contain internal code
; CH in field .15 (Electronic Plan Type) and change it to TR.
; The external value for this field has been changed from CHAMPUS
; to TRICARE.
FILE1 ; file numbers with root name ^IBE that need to be updated
FILE2 ; file numbers with root name ^IBA that need to be updated
FILE3 ; file numbers with root name ^DGCR that need to be updated
Info |  Source |  Entry Points