DVB458P4.m

DVB458P4 ;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 ;;7200

 ;;873.70~0^873.71~0^873.72~0^873.74~0^873.75~0

 ;;7203

 ;;530.0~1^530.3~1^530.6~1

 ;;7301

 ;;567.21~0^567.22~1^567.23~0^567.29~0^567.31~0^567.38~0^567.39~0^567.81~0^567.82~0^567.89~0^567.9~0^568.0~1

 ;;7304

 ;;531.00~1^531.01~1^531.10~1^531.11~1^531.20~1^531.21~1^531.40~1^531.41~1^531.50~1^531.51~1^531.60~1^531.61~1^531.70~1^531.90~1^531.91~1

 ;;7305

 ;;532.00~1^532.01~1^532.10~1^532.11~1^532.20~1^532.21~1^532.30~1^532.31~1^532.40~1^532.41~1^532.50~1^532.51~1^532.60~1^532.61~1^532.70~1^532.71~1^532.90~1^532.91~1

 ;;7306

 ;;534.00~1^534.01~1^534.10~1^534.11~1^534.20~1^534.21~1^534.30~1^534.31~1^534.40~1^534.41~1^534.50~1^534.51~1^534.60~1^534.61~1^534.70~1^534.71~1^534.90~1^534.91~1

 ;;7307

 ;;535.10~1^535.11~1^535.20~1^535.21~1

 ;;7308

 ;;564.2~1

 ;;7309

 ;;537.6~1

 ;;7310

 ;;536.2~0^536.3~0^536.8~0^537.5~0^537.6~0^908.1~0

 ;;7311

 ;;573.0~0^573.4~0^573.8~0^908.1~0

 ;;7312

 ;;571.2~1^571.5~1^571.6~1

 ;;7314

 ;;574.10~1^574.11~1^574.70~1^574.71~1^574.80~1^574.81~1^575.11~1^575.12~1

 ;;7315

 ;;574.00~1^574.01~1^574.20~1^574.21~1^574.50~1^574.51~1^574.90~1^574.91~1

 ;;7316

 ;;576.1~1

 ;;7317

 ;;575.2~0^575.3~0^575.4~0^575.5~0^575.8~0^908.1~0

 ;;7319

 ;;564.1~1

 ;;7321

 ;;006.0~1^006.1~1^006.2~1^006.9~1

 ;;7322

 ;;004.0~1^004.1~1^004.2~1^004.3~1^004.8~1^004.9~1

 ;;7323

 ;;556.0~1^556.1~1^556.2~1^556.3~1^556.4~1^556.5~1^556.6~1^556.8~1^556.9~1

 ;;7324

 ;;121.9~1

 ;;7325

 ;;555.0~1

 ;;7326

 ;;008.45~0

 ;;7327

 ;;562.11~1^562.13~1

 ;;7328

 ;;579.2~1^579.3~1

 ;;7330

 ;;569.81~1

 ;;7331

 ;;014.00~1^014.01~1^014.02~1^014.03~1^014.04~1^014.05~1^014.06~1

 ;;7332

 ;;787.6~1

 ;;7333

 ;;569.2~1

 ;;7334

 ;;569.1~1

 ;;7335

 ;;565.1~1

 ;;7336

 ;;455.0~1^455.1~1^455.2~1^455.3~1^455.4~1^455.5~1^455.6~1^455.7~1^455.8~1

 ;;7337

 ;;698.0~1

 ;;7338

 ;;550.00~0^550.01~0^550.02~1^550.03~1^550.10~0^550.11~0^550.12~1^550.13~1^550.90~0^550.91~0^550.92~1^550.93~1

 ;;7339

 ;;551.21~0^552.21~0^553.21~0

 ;;7340

 ;;551.00~0^551.01~0^551.02~1^551.03~1^552.00~0^552.01~0^552.02~1^552.03~1^553.00~0^553.01~0^553.02~1^553.03~1

 ;;7343

 ;;141.0~0^141.1~0^142.0~0^142.2~0^142.8~0^142.9~0^143.0~0^143.1~0^143.8~0^143.9~0^144.0~0^144.1~0^144.8~0^144.9~0^145.0~0^145.1~0^145.2~0^145.3~0^145.4~0^145.5~0^145.6~0^145.8~0^145.9~0^149.8~0^149.9~0^;

 ;;150.0~0^150.1~0^150.2~0^150.3~0^150.4~0^150.5~0^150.8~0^150.9~0^151.0~0^151.1~0^151.2~0^151.3~0^151.4~0^151.5~0^151.6~0^151.8~0^151.9~0^152.0~0^152.1~0^152.2~0^152.3~0^152.8~0^152.9~0^153.0~0^153.1~0^;

 ;;153.2~0^153.3~0^153.4~0^153.5~0^153.6~0^153.7~0^153.8~0^153.9~0^154.0~0^154.1~0^154.2~0^154.3~0^154.8~0^155.0~0^155.1~0^155.2~0^156.0~0^156.1~0^156.2~0^156.8~0^156.9~0^157.0~0^157.1~0^157.2~0^157.3~0^;

 ;;157.8~0^157.9~0^158.0~0^158.8~0^158.9~0^159.0~0^159.1~0^159.8~0^159.9~0^197.4~0^197.5~0^197.6~0^197.7~0^197.8~0^230.0~0^230.1~0^230.2~0^230.3~0^230.4~0^230.5~0^230.6~0^230.7~0^230.8~0^230.9~0

 ;;7344

 ;;210.4~0^211.0~0^211.1~0^211.2~0^211.3~0^211.4~0^211.5~0^211.6~0^211.8~0^211.9~1

 ;;7345

 ;;070.22~1^070.23~1^070.32~1^070.33~1^571.40~1^571.41~1^571.49~1^571.8~0^571.9~0^573.1~1^573.3~0

 ;;7346

 ;;551.3~1^552.3~1^553.3~1

 ;;7347

 ;;577.0~1^577.1~1

 ;;7351

 ;;996.82~1^V42.7~1

 ;;7354

 ;;070.41~1^070.44~1^070.51~1^070.54~1

 ;;7501

 ;;590.2~1

 ;;7502

 ;;582.0~1^582.1~1^582.2~1^582.4~1^582.81~1^582.89~1^582.9~1

 ;;7504

 ;;590.00~1^590.01~1

 ;;7505

 ;;016.00~1^016.01~1^016.02~1^016.03~1^016.04~1^016.05~1^016.06~1

 ;;7507

 ;;403.00~0^403.10~0^403.90~0^404.00~0^404.01~0^404.10~0^404.11~0^404.90~0^404.91~0

 ;;7508

 ;;274.11~1^592.0~1

 ;;7509

 ;;591.~0

 ;;7510

 ;;592.1~0

 ;;7511

 ;;593.3~0

 ;;7512

 ;;016.10~1^016.11~1^016.12~1^016.13~1^016.14~1^016.15~1^016.16~1^098.31~1^595.1~1^595.2~1^595.3~1^595.4~1^595.81~1^595.82~1^595.89~1

 ;;7515

 ;;594.0~1^594.1~1

 ;;7516

 ;;596.2~1

 ;;7518

 ;;598.00~1^598.01~1^598.1~1^598.2~1^598.8~1^598.9~1

 ;;7519

 ;;599.1~1

 ;;7523

 ;;608.3~1

 ;;7525

 ;;098.33~1

 ;;7527

 ;;098.32~1^600.00~1^600.01~1^600.10~1^600.11~1^600.20~1^600.21~1^601.1~1^601.2~1^601.4~1

 ;;7528

 ;;186.0~0^186.9~0^187.1~0^187.2~0^187.3~0^187.4~0^187.5~0^187.6~0^187.7~0^187.8~0^187.9~0^188.0~0^188.1~0^188.2~0^188.3~0^188.4~0^188.5~0^188.6~0^188.7~0^188.8~0^188.9~0^189.0~0^189.1~0^189.2~0^189.3~0^;

 ;;189.4~0^189.8~0^189.9~0^198.0~0^198.1~0^233.4~0^233.5~0^233.6~0^233.7~0^233.9~0

 ;;7529

 ;;214.4~0^222.0~0^222.1~0^222.2~0^222.3~0^222.4~0^222.8~0^222.9~0^223.0~0^223.1~0^223.2~0^223.3~0^223.9~0

 ;;7530

 ;;403.01~0^403.11~0^403.91~0^404.02~0^404.03~0^404.12~0^404.13~0^404.92~0^404.93~0^585.6~1^V56.0~1^V56.1~1^V56.31~1^V56.32~1^V56.8~1

 ;;7531

 ;;996.81~1^V42.0~1

 ;;7532

 ;;255.13~1^271.4~1^584.5~1^270.0~1

 ;;7533

 ;;593.2~1^753.10~1^753.12~1^753.13~1^753.14~1^753.15~1^753.16~1^753.17~1^753.19~1

 ;;7534

 ;;440.1~1^445.81~1

 ;;7535

 ;;584.5~0

 ;;7536

 ;;581.0~1^581.1~1^581.2~1^581.3~1^581.81~1^581.9~1^582.0~1^582.1~1^582.2~1^582.4~1^582.81~1^582.89~1^582.9~1

 ;;7538

 ;;583.7~1

 ;;7539

 ;;277.39~0^583.81~0

 ;;7540

 ;;286.6~0^583.6~0

 ;;7541

 ;;250.40~1^250.41~1^250.42~1^250.43~1^282.60~0^282.61~0^282.62~0^282.63~0^282.64~0^282.68~0^282.69~0^446.21~1^581.81~1^710.0~0

 ;;7542

 ;;344.61~1^596.53~1^596.54~1

 ;;7610

 ;;098.2~0^616.10~0^616.11~0^616.4~0^616.50~0^616.51~0^624.0~0^624.1~0^624.2~0^624.3~0^624.4~0^624.5~0^624.6~0^624.8~0^624.9~0^939.2~0^616.81~0^616.89~0

 ;;7611

 ;;616.10~0^616.11~0^616.2~0^616.3~0^623.0~0^623.1~0^623.2~0^623.3~0^623.4~0^623.5~0^623.6~0^623.7~0^623.8~0^623.9~0^939.2~0^616.81~0^616.89~0

 ;;7612

 ;;616.0~0^622.0~0^622.10~0^622.11~0^622.12~0^622.2~0^622.3~0^622.4~0^622.5~0^622.6~0^622.7~0^622.8~0^622.9~0^616.81~0^616.89~0

 ;;7613

 ;;016.70~0^016.71~0^016.72~0^016.73~0^016.74~0^016.75~0^098.36~0^615.1~0^621.0~0^621.1~0^621.2~0^621.30~0^621.31~0^621.32~0^621.33~0^621.4~0^621.5~0^621.6~0^621.7~0^621.8~0^621.9~0^939.1~0

 ;;7614

 ;;016.60~0^016.61~0^016.62~0^016.63~0^016.64~0^016.65~0^016.66~0^614.1~0^614.4~0^614.7~0^620.3~0^620.4~0^620.5~0^620.8~0

 ;;7615

 ;;016.60~0^016.61~0^016.62~0^016.63~0^016.64~0^016.65~0^614.1~0^620.1~0^620.2~0^620.3~0^620.4~0^620.5~0^620.8~0

 ;;7621

 ;;618.01~0^618.02~0^618.03~0^618.04~0^618.05~0^618.1~1^618.2~1^618.3~1^618.4~1^618.6~0^618.89~1^618.84~1

 ;;7622

 ;;621.6~1

 ;;7623

 ;;618.01~0^618.02~0^618.03~0^618.04~0^618.05~0^618.89~0^677.~1

 ;;7627

 ;;174.0~0^174.1~0^174.2~0^174.3~0^174.4~0^174.5~0^174.6~0^174.8~0^174.9~0^179.~0^180.0~0^180.1~0^180.8~0^180.9~0^181.~0^182.0~0^182.1~0^182.8~0^183.0~0^183.2~0^183.3~0^183.4~0^183.5~0^183.8~0^183.9~0^;

 ;;184.0~0^184.1~0^184.2~0^184.3~0^184.4~0^184.8~0^184.9~0^198.6~0^198.81~0^233.0~0^233.1~0^233.2~0^233.3~0

 ;;7628

 ;;217.~0^218.0~0^218.1~0^218.2~0^218.9~0^219.0~0^219.1~0^219.8~0^219.9~0^220.~0^221.0~0^221.1~0^221.2~0^221.8~0

 ;;7629

 ;;617.1~1^617.2~1^617.3~1^617.4~1^617.5~1^617.6~1^617.8~1^617.9~1

 ;;7700

 ;;280.0~0^280.1~0^280.8~0^280.9~0^281.0~0^281.1~0^281.2~0^281.3~0^281.4~0^281.8~0^281.9~0^283.0~0^283.10~0^283.11~0^283.19~0^283.2~0^283.9~0^285.0~0^285.22~0^285.29~0

 ;;7702

 ;;288.00~1^288.02~1^288.03~1^288.04~1^288.09~1

 ;;7703

 ;;204.00~1^204.10~1^204.20~1^204.80~1^204.90~1^205.00~1^205.10~1^205.20~1^205.80~1^205.90~1^206.00~1^206.10~1^206.20~1^206.80~1^206.90~1^207.00~1^207.10~1^207.20~1^207.80~1^208.00~1^208.10~1^208.20~1^208.80~1^208.90~1

 ;;7704

 ;;238.4~1

 ;;7705

 ;;287.30~1^287.31~1^287.39~1^287.4~1^287.5~1

 ;;7709

 ;;201.00~1^201.01~1^201.03~1^201.04~1^201.05~1^201.06~1^201.07~1^201.08~1^201.10~1^201.11~1^201.12~1^201.13~1^201.14~1^201.15~1^201.16~1^201.17~1^201.18~1^201.20~1^201.21~1^201.22~1^201.23~1^201.24~1^;

 ;;201.25~1^201.26~1^201.27~1^201.28~1^201.41~1^201.42~1^201.43~1^201.44~1^201.45~1^201.46~1^201.47~1^201.48~1^201.51~1^201.52~1^201.53~1^201.54~1^201.55~1^201.56~1^201.57~1^201.58~1^201.61~1^201.62~1^;

 ;;201.63~1^201.64~1^201.65~1^201.66~1^201.67~1^201.68~1^201.71~1^201.72~1^201.73~1^201.74~1^201.75~1^201.76~1^201.77~1^201.78~1^201.90~1^201.91~1^201.92~1^201.93~1^201.94~1^201.95~1^201.96~1^201.97~1^201.98~1

 ;;$EXIT