DVB458P1 ;ALB/RBS - POST-INSTALL FOR PATCH DVB*4*58 (CONT.) ; 4/24/07 3:53pm
Source file <DVB458P1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
POST(DVBTMP,DVBTOT) | ;post-install driver for updating the (#31) file
|
|
BLDXRF(DVBRTN,DVBTMP,DVBTOT) | ;call each routine to file VBA/ICD9 codes
|
|
BLDVBA(DVBVBA,DVBLINE,DVBTOT) | ;extract ICD9 codes from text line
|
|
FILEICD(DVBIEN,DVBICDEN,DVBMATCH) | ;file code mapping to (#31) file
|
|
DELETE | ;delete (#20) field sub-file (#31.01) ICD9 entries
|
|
TEXT | ;;5000
|