DVB458P3.m

DVB458P3 ;ALB/RBS - POST-INSTALL FOR PATCH DVB*4*58 (CONT.) ; 1/3/07 2:19pm

 ;;4.0;HINQ;**58**;03/25/92;Build 29

 ;

 Q  ;no direct entry

 ;

 ;

 ;NOTE:

 ;The following TEXT lines are a combination of a single 4 digit VBA

 ;rated disabilities code (DX CODE) on one line followed by on the

 ;next sequential line(s), all of the related ICD9 DIAGNOSIS codes

 ;that are to be mapped together.  Each IDC9 code also has a (1/0)

 ;match value that will be filed with it.

 ;

 ;Example:

 ;   ;;5000  = a single (VBA) Rated Disabilities (VA) DX CODE

 ;   ;;003.24~1^376.03~1^730.00~1^... = string of ICD9 DIAGNOSIS CODES

 ;                                      (delimited by (^) up-arrow)

 ;   Each (^) piece contains 2 pieces of data delimited by (~):

 ;     $P(1) = a single ICD9 diagnosis code

 ;     $P(2) = (1/0) match code value

 ;

 ;   Note: If the TEXT line ends with a (;) semi-colon, this means the

 ;         next sequential line is associated with the same DX CODE.

 ;         (No sequential line(s) are carried over to the next

 ;          post-install Routine.)

 ;

TEXT ;;6205

 ;;386.00~1^386.01~1^386.02~1^386.03~1^386.04~1

 ;;6208

 ;;160.1~0

 ;;6210

 ;;112.82~0^380.14~0^380.15~0^380.16~0^380.23~0

 ;;6211

 ;;384.20~0^384.21~0^384.22~0^384.23~0^384.24~0^384.25~0^872.61~0^872.71~0

 ;;6260

 ;;388.30~1^388.31~1^388.32~1

 ;;6300

 ;;001.0~1^001.1~1^001.9~1^V06.0~1

 ;;6301

 ;;085.0~1

 ;;6302

 ;;030.0~1^030.1~1^030.2~1^030.3~1^030.8~1^030.9~1

 ;;6304

 ;;084.0~1^084.1~1^084.2~1^084.3~1^084.4~1^084.5~1^084.6~1^084.8~1^084.9~1^647.40~1^647.41~1^647.42~1^647.43~1^647.44~1

 ;;6305

 ;;125.0~1^125.1~1^125.2~1^125.3~1^125.4~1^125.5~1^125.6~1^125.7~1^125.9~1

 ;;6306

 ;;088.0~1

 ;;6307

 ;;020.0~1^020.1~1^020.2~1^020.3~1^020.4~1^020.5~1^020.8~1^020.9~1

 ;;6308

 ;;087.0~1^087.1~1^087.9~1

 ;;6309

 ;;390.~1^391.0~1^391.1~1^391.2~1^391.8~1^391.9~1

 ;;6310

 ;;091.0~1^091.1~1^091.2~1^091.3~1^091.4~1^091.7~1^091.82~1^091.89~1^091.9~1^095.0~1^095.1~1^095.2~1^095.3~1^095.4~1^095.5~1^095.7~1^095.8~1^095.9~1^097.9~1^102.0~1^102.1~1^102.2~1^102.3~1^102.4~1^;

 ;;102.5~1^102.6~1^102.7~1^102.9~1^104.0~1

 ;;6311

 ;;018.00~1^018.01~1^018.02~1^018.03~1^018.04~1^018.05~1^018.06~1^018.80~1^018.81~1^018.82~1^018.83~1^018.84~1^018.85~1^018.86~1^018.90~1^018.91~1^018.92~1^018.93~1^018.94~1^018.95~1^018.96~1

 ;;6313

 ;;264.8~1^264.9~1

 ;;6314

 ;;265.0~1

 ;;6315

 ;;265.2~1

 ;;6316

 ;;023.0~1^023.1~1^023.2~1^023.3~1^023.8~1^023.9~1

 ;;6317

 ;;081.2~1

 ;;6318

 ;;025.~1

 ;;6319

 ;;088.81~1

 ;;6320

 ;;120.0~0^120.1~0^120.2~0^120.3~0^120.8~0^120.9~0^121.0~0^121.1~0^121.2~0^121.3~0^121.4~0^121.5~0^121.8~0^121.9~0^122.0~0^122.1~0^122.2~0^122.3~0^122.4~0^122.5~0^122.6~0^122.7~0^122.8~0^122.9~0^124.~0^;

 ;;126.0~0^126.1~0^126.2~0^126.3~0^126.8~0^126.9~0^127.1~0^127.2~0^127.3~0^127.5~0^127.6~0^127.7~0^127.8~0^127.9~0^136.8~0

 ;;6350

 ;;710.0~1

 ;;6351

 ;;042.~1^079.53~1^795.71~1^V08.~1

 ;;6354

 ;;780.71~1

 ;;6510

 ;;473.8~1

 ;;6511

 ;;473.2~1

 ;;6512

 ;;473.1~1

 ;;6513

 ;;473.0~1

 ;;6514

 ;;473.3~1

 ;;6515

 ;;012.30~1^012.31~1^012.32~1^012.33~1^012.34~1^012.35~1^012.36~1

 ;;6516

 ;;476.0~1

 ;;6519

 ;;784.41~1

 ;;6520

 ;;478.74~1

 ;;6522

 ;;477.0~1^477.1~1^477.8~1^477.9~1

 ;;6523

 ;;040.1~1

 ;;6524

 ;;117.0~1^472.0~1

 ;;6600

 ;;491.0~1^491.1~1^491.20~1^491.21~1^491.8~1^491.9~1

 ;;6601

 ;;011.50~1^011.51~1^011.52~1^011.53~1^011.54~1^011.55~1^011.56~1^494.0~1^494.1~1

 ;;6602

 ;;493.00~1^493.01~1^493.02~1^493.10~1^493.11~1^493.12~1^493.20~1^493.21~1^493.22~1^493.81~1^493.82~1^493.90~1^493.91~1^493.92~1

 ;;6603

 ;;492.0~1^492.8~1

 ;;6604

 ;;496.~1

 ;;6704

 ;;011.00~1^011.01~1^011.02~1^011.03~1^011.04~1^011.05~1^011.06~1^011.10~1^011.11~1^011.12~1^011.13~1^011.14~1^011.15~1^011.16~1^011.20~1^011.21~1^011.22~1^011.23~1^011.24~1^011.25~1^011.26~1^011.30~1^;

 ;;011.31~1^011.32~1^011.33~1^011.34~1^011.35~1^011.36~1^011.40~1^011.41~1^011.42~1^011.43~1^011.44~1^011.45~1^011.46~1^011.50~1^011.51~1^011.52~1^011.53~1^011.54~1^011.55~1^011.56~1^011.60~1^011.61~1^;

 ;;011.62~1^011.63~1^011.64~1^011.65~1^011.66~1^011.70~1^011.71~1^011.72~1^011.73~1^011.74~1^011.75~1^011.76~1^011.80~1^011.81~1^011.82~1^011.83~1^011.84~1^011.85~1^011.86~1^011.90~1^011.91~1^011.92~1^;

 ;;011.93~1^011.94~1^011.95~1^011.96~1^012.20~1^012.21~1^012.22~1^012.23~1^012.24~1^012.25~1^012.26~1

 ;;6724

 ;;137.0~0

 ;;6730

 ;;011.00~1^011.01~1^011.02~1^011.03~1^011.04~1^011.05~1^011.06~1^011.10~1^011.11~1^011.12~1^011.14~1^011.15~1^011.16~1^011.20~1^011.21~1^011.22~1^011.23~1^011.24~1^011.25~1^011.26~1^011.30~1^011.31~1^;

 ;;011.32~1^011.33~1^011.34~1^011.35~1^011.36~1^011.40~1^011.41~1^011.42~1^011.43~1^011.44~1^011.45~1^011.46~1^011.50~1^011.51~1^011.52~1^011.53~1^011.54~1^011.55~1^011.56~1^011.60~1^011.61~1^011.62~1^;

 ;;011.63~1^011.64~1^011.65~1^011.66~1^011.70~1^011.71~1^011.72~1^011.73~1^011.74~1^011.75~1^011.76~1^011.80~1^011.81~1^011.83~1^011.84~1^011.85~1^011.86~1^011.90~1^011.91~1^011.92~1^011.93~1^011.94~1^;

 ;;011.95~1^011.96~1^012.20~1^012.21~1^012.22~1^012.23~1^012.24~1^012.25~1^012.26~1

 ;;6732

 ;;010.10~1^010.11~1^010.12~1^010.13~1^010.14~1^010.15~1^010.16~1^012.00~1^012.01~1^012.02~1^012.03~1^012.04~1^012.05~1^012.06~1

 ;;6817

 ;;416.0~1

 ;;6819

 ;;146.0~0^146.1~0^146.2~0^146.3~0^146.4~0^146.5~0^146.6~0^146.7~0^146.8~0^146.9~0^147.0~0^147.1~0^147.2~0^147.3~0^147.8~0^147.9~0^148.0~0^148.1~0^148.2~0^148.3~0^148.8~0^148.9~0^149.0~0^149.1~0^160.0~0^;

 ;;160.1~0^160.2~0^160.3~0^160.4~0^160.5~0^160.8~0^160.9~0^161.0~0^161.1~0^161.8~0^161.9~0^162.0~0^162.2~0^162.3~0^162.4~0^162.5~0^162.8~0^162.9~0^163.0~0^163.1~0^163.8~0^163.9~0^164.2~0^164.3~0^165.0~0^;

 ;;165.8~0^165.9~0^197.0~0^197.2~0^197.3~0^231.0~0^231.1~0^231.2~0^231.8~0^231.9~0

 ;;6820

 ;;212.0~0^212.1~0^212.2~0^212.3~0^212.4~0^212.8~0^212.9~0^214.2~0^471.0~0^471.8~0^471.9~0

 ;;6822

 ;;039.1~1

 ;;6823

 ;;039.1~1

 ;;6824

 ;;006.4~1^513.0~1

 ;;6825

 ;;515.~1^516.3~1

 ;;6827

 ;;516.0~1

 ;;6829

 ;;508.8~0^518.7~1

 ;;6830

 ;;508.0~1^508.1~1

 ;;6831

 ;;495.0~1^495.1~1^495.2~1^495.3~1^495.4~1^495.5~1^495.6~1^495.7~1^495.8~1^495.9~1

 ;;6832

 ;;500.~1^502.~1^503.~1^504.~1^505.~1

 ;;6833

 ;;501.~1

 ;;6834

 ;;115.05~1^115.15~1^115.95~1

 ;;6835

 ;;114.0~1^114.3~1^114.4~1^114.5~1

 ;;6836

 ;;116.0~1

 ;;6837

 ;;117.5~1

 ;;6838

 ;;484.6~1^518.6~1

 ;;6839

 ;;117.7~1

 ;;6840

 ;;519.4~0

 ;;6844

 ;;512.1~1^518.5~0

 ;;6845

 ;;510.0~1^510.9~1^511.1~1^511.8~1^511.9~1^515.~1

 ;;6846

 ;;135.~1

 ;;6847

 ;;327.20~1^327.21~1^327.23~1^327.27~1^327.29~1^780.51~1^780.53~1^780.57~1

 ;;7000

 ;;394.0~0^394.1~0^394.2~0^394.9~0^395.0~0^395.1~0^395.2~0^395.9~0^396.0~0^396.1~0^396.2~0^396.3~0^396.8~0^396.9~0^397.0~0^397.1~0^397.9~0^424.0~0^424.1~0^424.2~0^424.3~0

 ;;7001

 ;;036.42~0^074.22~0^098.84~0^112.81~0^115.04~0^115.14~0^115.94~0^421.0~0^421.1~0^421.9~0

 ;;7002

 ;;036.41~0^074.21~0^098.83~0^115.03~0^115.13~0^115.93~0^391.0~0^393.~0^411.0~0^420.0~0^420.90~0^420.91~0^420.99~0^423.2~0

 ;;7003

 ;;423.1~0

 ;;7004

 ;;093.0~1^093.1~1^093.20~1^093.21~1^093.23~1^093.24~1^093.81~1^093.82~1^093.89~1^093.9~1

 ;;7005

 ;;411.1~1^411.81~1^411.89~1^414.00~1^414.01~1^414.02~1^414.03~1^414.04~1^414.05~1^414.8~0^414.9~0^429.2~1

 ;;7006

 ;;410.00~1^410.01~1^410.02~1^410.10~1^410.11~1^410.12~1^410.20~1^410.21~1^410.22~1^410.30~1^410.31~1^410.32~1^410.40~1^410.41~1^410.42~1^410.50~1^410.51~1^410.52~1^410.60~1^410.61~1^410.62~1^410.70~1^;

 ;;410.71~1^410.72~1^410.80~1^410.81~1^410.82~1^410.90~1^410.91~1^410.92~1

 ;;7007

 ;;402.00~1^402.01~1^402.10~1^402.11~1

 ;;7010

 ;;427.0~1^427.31~1^427.32~1^427.61~1

 ;;7011

 ;;427.41~1^427.42~1^427.69~0

 ;;7015

 ;;426.0~1^426.10~1^426.11~1^426.12~1^426.13~1^426.2~1^426.3~1^426.4~1^426.50~1^426.51~1^426.52~1^426.53~1^426.54~1

 ;;7016

 ;;V42.2~1^V43.3~1

 ;;7017

 ;;414.02~1^414.03~1^414.04~1^414.05~1^414.07~1^996.03~1^996.61~0^996.72~0^V45.81~1

 ;;7018

 ;;996.01~1^996.61~0^996.72~0^V45.01~1^V53.31~1

 ;;7019

 ;;996.83~1^V42.1~1

 ;;7020

 ;;086.0~1^425.0~1^425.1~1^425.2~1^425.3~1^425.4~1^425.5~1^425.7~1^425.8~1^425.9~1

 ;;7101

 ;;401.0~1^401.1~1^401.9~1^405.09~1^405.19~1^405.99~1

 ;;7110

 ;;093.0~1^441.00~1^441.01~1^441.02~1^441.03~1^441.1~1^441.2~1^441.3~1^441.4~1^441.5~1^441.6~1^441.7~1^441.9~1

 ;;7111

 ;;442.1~0^442.2~0^442.3~0^442.82~0

 ;;7112

 ;;414.11~0

 ;;7114

 ;;440.20~0^440.21~0^440.22~0^440.23~0^440.24~0^440.29~0^440.30~0^440.31~0^440.32~0^445.01~0^445.02~0

 ;;7115

 ;;443.1~1

 ;;7117

 ;;443.0~1

 ;;7118

 ;;995.1~1

 ;;7119

 ;;443.82~1

 ;;7120

 ;;454.0~0^454.1~0^454.2~0^454.8~0

 ;;7121

 ;;459.10~0^459.11~0^459.12~0^459.13~0^459.19~0

 ;;7122

 ;;991.0~1^991.1~1^991.2~1^991.3~1^991.4~1^991.5~1^991.6~0^991.8~0^991.9~0

 ;;$EXIT