ATXD8Q2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 12, 2014;
;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
;
START ;
K:'$G(ATXPGMC) ^TMP("ATX",$J)
S ATXPGMC=$G(ATXPGMC)+1
F ATXI=1:1 S X=$P($T(TMP+ATXI),";;",2,99) Q:X="" S X="^TMP(""ATX"",$J,"_X,ATXI=ATXI+1,Y=$P($T(TMP+ATXI),";;",2,99) S @X=Y
Q
;
TMP ;;TAXONOMY (WITH BULLETIN)
;;21,"O69.1XX0 ")
;;414
;;21,"O69.1XX1 ")
;;415
;;21,"O69.1XX2 ")
;;416
;;21,"O69.1XX3 ")
;;417
;;21,"O69.1XX4 ")
;;418
;;21,"O69.1XX5 ")
;;419
;;21,"O69.1XX9 ")
;;420
;;21,"O69.2XX0 ")
;;421
;;21,"O69.2XX1 ")
;;422
;;21,"O69.2XX2 ")
;;423
;;21,"O69.2XX3 ")
;;424
;;21,"O69.2XX4 ")
;;425
;;21,"O69.2XX5 ")
;;426
;;21,"O69.2XX9 ")
;;427
;;21,"O69.3XX0 ")
;;428
;;21,"O69.3XX1 ")
;;429
;;21,"O69.3XX2 ")
;;430
;;21,"O69.3XX3 ")
;;431
;;21,"O69.3XX4 ")
;;432
;;21,"O69.3XX5 ")
;;433
;;21,"O69.3XX9 ")
;;434
;;21,"O69.4XX0 ")
;;435
;;21,"O69.4XX1 ")
;;436
;;21,"O69.4XX2 ")
;;437
;;21,"O69.4XX3 ")
;;438
;;21,"O69.4XX4 ")
;;439
;;21,"O69.4XX5 ")
;;440
;;21,"O69.4XX9 ")
;;441
;;21,"O69.5XX0 ")
;;442
;;21,"O69.5XX1 ")
;;443
;;21,"O69.5XX2 ")
;;444
;;21,"O69.5XX3 ")
;;445
;;21,"O69.5XX4 ")
;;446
;;21,"O69.5XX5 ")
;;447
;;21,"O69.5XX9 ")
;;448
;;21,"O69.81X0 ")
;;449
;;21,"O69.81X1 ")
;;450
;;21,"O69.81X2 ")
;;451
;;21,"O69.81X3 ")
;;452
;;21,"O69.81X4 ")
;;453
;;21,"O69.81X5 ")
;;454
;;21,"O69.81X9 ")
;;455
;;21,"O69.82X0 ")
;;456
;;21,"O69.82X1 ")
;;457
;;21,"O69.82X2 ")
;;458
;;21,"O69.82X3 ")
;;459
;;21,"O69.82X4 ")
;;460
;;21,"O69.82X5 ")
;;461
;;21,"O69.82X9 ")
;;462
;;21,"O69.89X0 ")
;;463
;;21,"O69.89X1 ")
;;464
;;21,"O69.89X2 ")
;;465
;;21,"O69.89X3 ")
;;466
;;21,"O69.89X4 ")
;;467
;;21,"O69.89X5 ")
;;468
;;21,"O69.89X9 ")
;;469
;;21,"O69.9XX0 ")
;;470
;;21,"O69.9XX1 ")
;;471
;;21,"O69.9XX2 ")
;;472
;;21,"O69.9XX3 ")
;;473
;;21,"O69.9XX4 ")
;;474
;;21,"O69.9XX5 ")
;;475
;;21,"O69.9XX9 ")
;;476
;;21,"O70.0 ")
;;477
;;21,"O70.1 ")
;;478
;;21,"O70.2 ")
;;479
;;21,"O70.3 ")
;;480
;;21,"O70.4 ")
;;481
;;21,"O70.9 ")
;;482
;;21,"O71.82 ")
;;483
;;21,"O74.0 ")
;;484
;;21,"O74.1 ")
;;485
;;21,"O74.2 ")
;;486
;;21,"O74.3 ")
;;487
;;21,"O74.4 ")
;;488
;;21,"O74.5 ")
;;489
;;21,"O74.6 ")
;;490
;;21,"O74.7 ")
;;491
;;21,"O74.8 ")
;;492
;;21,"O74.9 ")
;;493
;;21,"O75.0 ")
;;494
;;21,"O75.1 ")
;;495
;;21,"O75.5 ")
;;496
;;21,"O75.81 ")
;;497
;;21,"O75.89 ")
;;498
;;21,"O75.9 ")
;;499
;;21,"O80. ")
;;500
;;21,"O82. ")
;;501
;;21,"O86.0 ")
;;502
;;21,"O86.11 ")
;;503
;;21,"O86.13 ")
;;504
;;21,"O86.19 ")
;;505
;;21,"O86.20 ")
;;506
;;21,"O86.21 ")
;;507
;;21,"O86.22 ")
;;508
;;21,"O86.29 ")
;;509
;;21,"O86.4 ")
;;510
;;21,"O86.89 ")
;;511
;;21,"O87.0 ")
;;512
;;21,"O87.1 ")
;;513
;;21,"O87.2 ")
;;514
;;21,"O87.3 ")
;;515
;;21,"O87.4 ")
;;516
;;21,"O87.8 ")
;;517
;;21,"O87.9 ")
;;518
;;21,"O88.111 ")
;;519
;;21,"O89.09 ")
;;520
;;21,"O89.1 ")
;;521
;;21,"O89.2 ")
;;522
;;21,"O89.3 ")
;;523
;;21,"O89.4 ")
;;524
;;21,"O89.5 ")
;;525
;;21,"O89.6 ")
;;526
;;21,"O89.8 ")
;;527
;;21,"O89.9 ")
;;528
;;21,"O90.0 ")
;;529
;;21,"O90.1 ")
;;530
;;21,"O90.2 ")
;;531
;;21,"O90.3 ")
;;532
;;21,"O90.4 ")
;;533
;;21,"O90.5 ")
;;534
;;21,"O90.6 ")
;;535
;;21,"O90.81 ")
;;536
;;21,"O90.89 ")
;;537
;;21,"O90.9 ")
;;538
;;21,"O94. ")
;;539
;;21,"O98.512 ")
;;574
;;21,"O98.834 ")
;;540
;;21,"O98.835 ")
;;541
;;21,"V24.0 ")
;;542
;;21,"V27.0 ")
;;543
;;21,"Z37.0 ")
;;544
;;21,"Z37.1 ")
;;545
;;21,"Z37.2 ")
;;546
;;21,"Z37.3 ")
;;547
;;21,"Z37.4 ")
;;548
;;21,"Z37.50 ")
;;549
;;21,"Z37.51 ")
;;550
;;21,"Z37.52 ")
;;551
;;21,"Z37.53 ")
;;552
;;21,"Z37.54 ")
;;553
;;21,"Z37.59 ")
;;554
;;21,"Z37.60 ")
;;555
;;21,"Z37.61 ")
;;556
;;21,"Z37.62 ")
;;557
;;21,"Z37.63 ")
;;558
;;21,"Z37.64 ")
;;559
;;21,"Z37.69 ")
;;560
;;21,"Z37.7 ")
;;561
;;21,"Z37.9 ")
;;562
;;21,"Z38.01 ")
;;563
;;21,"Z38.31 ")
;;564
;;21,"Z38.62 ")
;;565
;;21,"Z38.64 ")
;;566
;;21,"Z38.66 ")
;;567
;;21,"Z38.69 ")
;;568
;;21,"Z38.8 ")
;;569
;;21,"Z39.0 ")
;;570
;;21,"Z39.1 ")
;;571
;;21,"Z39.2 ")
;;572
;;9002226,911,.01)
;;SURVEILLANCE H1N1 DELIVERY DX
;;9002226,911,.02)
;;@
;;9002226,911,.04)
;;n
;;9002226,911,.06)
;;@
;;9002226,911,.08)
;;0
;;9002226,911,.09)
;;3131113
;;9002226,911,.11)
;;@
;;9002226,911,.12)
;;31
;;9002226,911,.13)
;;1
;;9002226,911,.14)
;;@
;;9002226,911,.15)
;;80
;;9002226,911,.16)
;;@
;;9002226,911,.17)
;;@
;;9002226,911,3101)
;;@
;;9002226.02101,"911,640.01 ",.01)
;;640.01
;;9002226.02101,"911,640.01 ",.02)
;;640.01
;;9002226.02101,"911,640.01 ",.03)
;;1
;;9002226.02101,"911,640.81 ",.01)
;;640.81
;;9002226.02101,"911,640.81 ",.02)
;;640.81
;;9002226.02101,"911,640.81 ",.03)
;;1
;;9002226.02101,"911,640.91 ",.01)
;;640.91
;;9002226.02101,"911,640.91 ",.02)
;;640.91
;;9002226.02101,"911,640.91 ",.03)
;;1
;;9002226.02101,"911,641.01 ",.01)
;;641.01
;;9002226.02101,"911,641.01 ",.02)
;;641.01
;;9002226.02101,"911,641.01 ",.03)
;;1
;;9002226.02101,"911,641.11 ",.01)
;;641.11
;;9002226.02101,"911,641.11 ",.02)
;;641.11
;;9002226.02101,"911,641.11 ",.03)
;;1
;;9002226.02101,"911,641.21 ",.01)
;;641.21
;;9002226.02101,"911,641.21 ",.02)
;;641.21
;;9002226.02101,"911,641.21 ",.03)
;;1
;;9002226.02101,"911,641.31 ",.01)
;;641.31
;;9002226.02101,"911,641.31 ",.02)
;;641.31
;;9002226.02101,"911,641.31 ",.03)
;;1
;;9002226.02101,"911,641.81 ",.01)
;;641.81
;;9002226.02101,"911,641.81 ",.02)
;;641.81
;;9002226.02101,"911,641.81 ",.03)
;;1
;;9002226.02101,"911,641.91 ",.01)
;;641.91
;;9002226.02101,"911,641.91 ",.02)
;;641.91
;;9002226.02101,"911,641.91 ",.03)
;;1
;;9002226.02101,"911,642.01 ",.01)
;;642.01
;;9002226.02101,"911,642.01 ",.02)
;;642.02
;;9002226.02101,"911,642.01 ",.03)
;;1
;;9002226.02101,"911,642.04 ",.01)
;;642.04
;;9002226.02101,"911,642.04 ",.02)
;;642.04
;;9002226.02101,"911,642.04 ",.03)
;;1
;;9002226.02101,"911,642.11 ",.01)
;;642.11
;;9002226.02101,"911,642.11 ",.02)
;;642.12
;;9002226.02101,"911,642.11 ",.03)
;;1
;;9002226.02101,"911,642.14 ",.01)
;;642.14
;;9002226.02101,"911,642.14 ",.02)
;;642.14
;;9002226.02101,"911,642.14 ",.03)
;;1
;;9002226.02101,"911,642.21 ",.01)
;;642.21
;;9002226.02101,"911,642.21 ",.02)
;;642.22
;;9002226.02101,"911,642.21 ",.03)
;;1
;;9002226.02101,"911,642.24 ",.01)
;;642.24
;;9002226.02101,"911,642.24 ",.02)
;;642.24
;;9002226.02101,"911,642.24 ",.03)
;;1
;;9002226.02101,"911,642.31 ",.01)
;;642.31
;;9002226.02101,"911,642.31 ",.02)
;;642.32
;;9002226.02101,"911,642.31 ",.03)
;;1
;;9002226.02101,"911,642.34 ",.01)
;;642.34
;;9002226.02101,"911,642.34 ",.02)
;;642.34
;;9002226.02101,"911,642.34 ",.03)
;;1
;;9002226.02101,"911,642.41 ",.01)
;;642.41
;;9002226.02101,"911,642.41 ",.02)
;;642.42
;;9002226.02101,"911,642.41 ",.03)
;;1
;;9002226.02101,"911,642.44 ",.01)
;;642.44
;;9002226.02101,"911,642.44 ",.02)
;;642.44
;;9002226.02101,"911,642.44 ",.03)
;;1
;;9002226.02101,"911,642.51 ",.01)
;;642.51
;;9002226.02101,"911,642.51 ",.02)
;;642.52
;;9002226.02101,"911,642.51 ",.03)
;;1
;;9002226.02101,"911,642.54 ",.01)
;;642.54
;;9002226.02101,"911,642.54 ",.02)
;;642.54
;;9002226.02101,"911,642.54 ",.03)
;;1
;;9002226.02101,"911,642.61 ",.01)
;;642.61
;;9002226.02101,"911,642.61 ",.02)
;;642.62
;;9002226.02101,"911,642.61 ",.03)
;;1
;;9002226.02101,"911,642.64 ",.01)
;;642.64
;;9002226.02101,"911,642.64 ",.02)
;;642.64
;;9002226.02101,"911,642.64 ",.03)
;;1
;;9002226.02101,"911,642.71 ",.01)
;;642.71
;;9002226.02101,"911,642.71 ",.02)
;;642.72
;;9002226.02101,"911,642.71 ",.03)
;;1
;;9002226.02101,"911,642.74 ",.01)
;;642.74
;;9002226.02101,"911,642.74 ",.02)
;;642.74
;;9002226.02101,"911,642.74 ",.03)
;;1
;;9002226.02101,"911,642.91 ",.01)
;;642.91
;;9002226.02101,"911,642.91 ",.02)
;;642.92
;;9002226.02101,"911,642.91 ",.03)
;;1
;;9002226.02101,"911,642.94 ",.01)
;;642.94
;;9002226.02101,"911,642.94 ",.02)
;;642.94
;;9002226.02101,"911,642.94 ",.03)
;;1
;;9002226.02101,"911,643.01 ",.01)
;;643.01
;;9002226.02101,"911,643.01 ",.02)
;;643.01
;;9002226.02101,"911,643.01 ",.03)
;;1
;;9002226.02101,"911,643.11 ",.01)
;;643.11
;;9002226.02101,"911,643.11 ",.02)
;;643.11
;;9002226.02101,"911,643.11 ",.03)
;;1
;;9002226.02101,"911,643.21 ",.01)
;;643.21
;;9002226.02101,"911,643.21 ",.02)
;;643.21
;;9002226.02101,"911,643.21 ",.03)
;;1
;;9002226.02101,"911,643.81 ",.01)
;;643.81
;;9002226.02101,"911,643.81 ",.02)
;;643.81
;;9002226.02101,"911,643.81 ",.03)
;;1
;;9002226.02101,"911,643.91 ",.01)
;;643.91
;;9002226.02101,"911,643.91 ",.02)
;;643.91
;;9002226.02101,"911,643.91 ",.03)
;;1
;;9002226.02101,"911,644.20 ",.01)
;;644.20
;;9002226.02101,"911,644.20 ",.02)
;;644.21
;;9002226.02101,"911,644.20 ",.03)
;;1
;;9002226.02101,"911,645.11 ",.01)
;;645.11
;;9002226.02101,"911,645.11 ",.02)
;;645.11
;;9002226.02101,"911,645.11 ",.03)
;;1
;;9002226.02101,"911,645.21 ",.01)
;;645.21
;;9002226.02101,"911,645.21 ",.02)
;;645.21
;;9002226.02101,"911,645.21 ",.03)
;;1
;;9002226.02101,"911,646.01 ",.01)
;;646.01
;;9002226.02101,"911,646.01 ",.02)
;;646.01
;;9002226.02101,"911,646.01 ",.03)
;;1
;;9002226.02101,"911,646.11 ",.01)
;;646.11
;;9002226.02101,"911,646.11 ",.02)
;;646.12
;;9002226.02101,"911,646.11 ",.03)
;;1
;;9002226.02101,"911,646.14 ",.01)
;;646.14
;;9002226.02101,"911,646.14 ",.02)
;;646.14
;;9002226.02101,"911,646.14 ",.03)
;;1
;;9002226.02101,"911,646.21 ",.01)
;;646.21
;;9002226.02101,"911,646.21 ",.02)
;;646.22
;;9002226.02101,"911,646.21 ",.03)
;;1
;;9002226.02101,"911,646.24 ",.01)
;;646.24
;;9002226.02101,"911,646.24 ",.02)
;;646.24
;;9002226.02101,"911,646.24 ",.03)
;;1
;;9002226.02101,"911,646.31 ",.01)
;;646.31
;;9002226.02101,"911,646.31 ",.02)
;;646.31
;;9002226.02101,"911,646.31 ",.03)
;;1
;;9002226.02101,"911,646.41 ",.01)
;;646.41
;;9002226.02101,"911,646.41 ",.02)
;;646.42
;;9002226.02101,"911,646.41 ",.03)
;;1
;;9002226.02101,"911,646.44 ",.01)
;;646.44
;;9002226.02101,"911,646.44 ",.02)
;;646.44
;;9002226.02101,"911,646.44 ",.03)
;;1
;;9002226.02101,"911,646.51 ",.01)
;;646.51
;;9002226.02101,"911,646.51 ",.02)
;;646.52
;;9002226.02101,"911,646.51 ",.03)
;;1
;;9002226.02101,"911,646.54 ",.01)
;;646.54
;;9002226.02101,"911,646.54 ",.02)
;;646.54
;;9002226.02101,"911,646.54 ",.03)
;;1
;;9002226.02101,"911,646.61 ",.01)
;;646.61
;;9002226.02101,"911,646.61 ",.02)
;;646.62
;;9002226.02101,"911,646.61 ",.03)
;;1
;;9002226.02101,"911,646.64 ",.01)
;;646.64
;;9002226.02101,"911,646.64 ",.02)
;;646.64
;;9002226.02101,"911,646.64 ",.03)
;;1
;;9002226.02101,"911,646.71 ",.01)
;;646.71
;;9002226.02101,"911,646.71 ",.02)
;;646.71
;;9002226.02101,"911,646.71 ",.03)
;;1
ATXD8Q2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 12, 2014;
+1 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
+2 ;
START ;
+1 IF '$GET(ATXPGMC)
KILL ^TMP("ATX",$JOB)
+2 SET ATXPGMC=$GET(ATXPGMC)+1
+3 FOR ATXI=1:1
SET X=$PIECE($TEXT(TMP+ATXI),";;",2,99)
IF X=""
QUIT
SET X="^TMP(""ATX"",$J,"_X
SET ATXI=ATXI+1
SET Y=$PIECE($TEXT(TMP+ATXI),";;",2,99)
SET @X=Y
+4 QUIT
+5 ;
TMP ;;TAXONOMY (WITH BULLETIN)
+1 ;;21,"O69.1XX0 ")
+2 ;;414
+3 ;;21,"O69.1XX1 ")
+4 ;;415
+5 ;;21,"O69.1XX2 ")
+6 ;;416
+7 ;;21,"O69.1XX3 ")
+8 ;;417
+9 ;;21,"O69.1XX4 ")
+10 ;;418
+11 ;;21,"O69.1XX5 ")
+12 ;;419
+13 ;;21,"O69.1XX9 ")
+14 ;;420
+15 ;;21,"O69.2XX0 ")
+16 ;;421
+17 ;;21,"O69.2XX1 ")
+18 ;;422
+19 ;;21,"O69.2XX2 ")
+20 ;;423
+21 ;;21,"O69.2XX3 ")
+22 ;;424
+23 ;;21,"O69.2XX4 ")
+24 ;;425
+25 ;;21,"O69.2XX5 ")
+26 ;;426
+27 ;;21,"O69.2XX9 ")
+28 ;;427
+29 ;;21,"O69.3XX0 ")
+30 ;;428
+31 ;;21,"O69.3XX1 ")
+32 ;;429
+33 ;;21,"O69.3XX2 ")
+34 ;;430
+35 ;;21,"O69.3XX3 ")
+36 ;;431
+37 ;;21,"O69.3XX4 ")
+38 ;;432
+39 ;;21,"O69.3XX5 ")
+40 ;;433
+41 ;;21,"O69.3XX9 ")
+42 ;;434
+43 ;;21,"O69.4XX0 ")
+44 ;;435
+45 ;;21,"O69.4XX1 ")
+46 ;;436
+47 ;;21,"O69.4XX2 ")
+48 ;;437
+49 ;;21,"O69.4XX3 ")
+50 ;;438
+51 ;;21,"O69.4XX4 ")
+52 ;;439
+53 ;;21,"O69.4XX5 ")
+54 ;;440
+55 ;;21,"O69.4XX9 ")
+56 ;;441
+57 ;;21,"O69.5XX0 ")
+58 ;;442
+59 ;;21,"O69.5XX1 ")
+60 ;;443
+61 ;;21,"O69.5XX2 ")
+62 ;;444
+63 ;;21,"O69.5XX3 ")
+64 ;;445
+65 ;;21,"O69.5XX4 ")
+66 ;;446
+67 ;;21,"O69.5XX5 ")
+68 ;;447
+69 ;;21,"O69.5XX9 ")
+70 ;;448
+71 ;;21,"O69.81X0 ")
+72 ;;449
+73 ;;21,"O69.81X1 ")
+74 ;;450
+75 ;;21,"O69.81X2 ")
+76 ;;451
+77 ;;21,"O69.81X3 ")
+78 ;;452
+79 ;;21,"O69.81X4 ")
+80 ;;453
+81 ;;21,"O69.81X5 ")
+82 ;;454
+83 ;;21,"O69.81X9 ")
+84 ;;455
+85 ;;21,"O69.82X0 ")
+86 ;;456
+87 ;;21,"O69.82X1 ")
+88 ;;457
+89 ;;21,"O69.82X2 ")
+90 ;;458
+91 ;;21,"O69.82X3 ")
+92 ;;459
+93 ;;21,"O69.82X4 ")
+94 ;;460
+95 ;;21,"O69.82X5 ")
+96 ;;461
+97 ;;21,"O69.82X9 ")
+98 ;;462
+99 ;;21,"O69.89X0 ")
+100 ;;463
+101 ;;21,"O69.89X1 ")
+102 ;;464
+103 ;;21,"O69.89X2 ")
+104 ;;465
+105 ;;21,"O69.89X3 ")
+106 ;;466
+107 ;;21,"O69.89X4 ")
+108 ;;467
+109 ;;21,"O69.89X5 ")
+110 ;;468
+111 ;;21,"O69.89X9 ")
+112 ;;469
+113 ;;21,"O69.9XX0 ")
+114 ;;470
+115 ;;21,"O69.9XX1 ")
+116 ;;471
+117 ;;21,"O69.9XX2 ")
+118 ;;472
+119 ;;21,"O69.9XX3 ")
+120 ;;473
+121 ;;21,"O69.9XX4 ")
+122 ;;474
+123 ;;21,"O69.9XX5 ")
+124 ;;475
+125 ;;21,"O69.9XX9 ")
+126 ;;476
+127 ;;21,"O70.0 ")
+128 ;;477
+129 ;;21,"O70.1 ")
+130 ;;478
+131 ;;21,"O70.2 ")
+132 ;;479
+133 ;;21,"O70.3 ")
+134 ;;480
+135 ;;21,"O70.4 ")
+136 ;;481
+137 ;;21,"O70.9 ")
+138 ;;482
+139 ;;21,"O71.82 ")
+140 ;;483
+141 ;;21,"O74.0 ")
+142 ;;484
+143 ;;21,"O74.1 ")
+144 ;;485
+145 ;;21,"O74.2 ")
+146 ;;486
+147 ;;21,"O74.3 ")
+148 ;;487
+149 ;;21,"O74.4 ")
+150 ;;488
+151 ;;21,"O74.5 ")
+152 ;;489
+153 ;;21,"O74.6 ")
+154 ;;490
+155 ;;21,"O74.7 ")
+156 ;;491
+157 ;;21,"O74.8 ")
+158 ;;492
+159 ;;21,"O74.9 ")
+160 ;;493
+161 ;;21,"O75.0 ")
+162 ;;494
+163 ;;21,"O75.1 ")
+164 ;;495
+165 ;;21,"O75.5 ")
+166 ;;496
+167 ;;21,"O75.81 ")
+168 ;;497
+169 ;;21,"O75.89 ")
+170 ;;498
+171 ;;21,"O75.9 ")
+172 ;;499
+173 ;;21,"O80. ")
+174 ;;500
+175 ;;21,"O82. ")
+176 ;;501
+177 ;;21,"O86.0 ")
+178 ;;502
+179 ;;21,"O86.11 ")
+180 ;;503
+181 ;;21,"O86.13 ")
+182 ;;504
+183 ;;21,"O86.19 ")
+184 ;;505
+185 ;;21,"O86.20 ")
+186 ;;506
+187 ;;21,"O86.21 ")
+188 ;;507
+189 ;;21,"O86.22 ")
+190 ;;508
+191 ;;21,"O86.29 ")
+192 ;;509
+193 ;;21,"O86.4 ")
+194 ;;510
+195 ;;21,"O86.89 ")
+196 ;;511
+197 ;;21,"O87.0 ")
+198 ;;512
+199 ;;21,"O87.1 ")
+200 ;;513
+201 ;;21,"O87.2 ")
+202 ;;514
+203 ;;21,"O87.3 ")
+204 ;;515
+205 ;;21,"O87.4 ")
+206 ;;516
+207 ;;21,"O87.8 ")
+208 ;;517
+209 ;;21,"O87.9 ")
+210 ;;518
+211 ;;21,"O88.111 ")
+212 ;;519
+213 ;;21,"O89.09 ")
+214 ;;520
+215 ;;21,"O89.1 ")
+216 ;;521
+217 ;;21,"O89.2 ")
+218 ;;522
+219 ;;21,"O89.3 ")
+220 ;;523
+221 ;;21,"O89.4 ")
+222 ;;524
+223 ;;21,"O89.5 ")
+224 ;;525
+225 ;;21,"O89.6 ")
+226 ;;526
+227 ;;21,"O89.8 ")
+228 ;;527
+229 ;;21,"O89.9 ")
+230 ;;528
+231 ;;21,"O90.0 ")
+232 ;;529
+233 ;;21,"O90.1 ")
+234 ;;530
+235 ;;21,"O90.2 ")
+236 ;;531
+237 ;;21,"O90.3 ")
+238 ;;532
+239 ;;21,"O90.4 ")
+240 ;;533
+241 ;;21,"O90.5 ")
+242 ;;534
+243 ;;21,"O90.6 ")
+244 ;;535
+245 ;;21,"O90.81 ")
+246 ;;536
+247 ;;21,"O90.89 ")
+248 ;;537
+249 ;;21,"O90.9 ")
+250 ;;538
+251 ;;21,"O94. ")
+252 ;;539
+253 ;;21,"O98.512 ")
+254 ;;574
+255 ;;21,"O98.834 ")
+256 ;;540
+257 ;;21,"O98.835 ")
+258 ;;541
+259 ;;21,"V24.0 ")
+260 ;;542
+261 ;;21,"V27.0 ")
+262 ;;543
+263 ;;21,"Z37.0 ")
+264 ;;544
+265 ;;21,"Z37.1 ")
+266 ;;545
+267 ;;21,"Z37.2 ")
+268 ;;546
+269 ;;21,"Z37.3 ")
+270 ;;547
+271 ;;21,"Z37.4 ")
+272 ;;548
+273 ;;21,"Z37.50 ")
+274 ;;549
+275 ;;21,"Z37.51 ")
+276 ;;550
+277 ;;21,"Z37.52 ")
+278 ;;551
+279 ;;21,"Z37.53 ")
+280 ;;552
+281 ;;21,"Z37.54 ")
+282 ;;553
+283 ;;21,"Z37.59 ")
+284 ;;554
+285 ;;21,"Z37.60 ")
+286 ;;555
+287 ;;21,"Z37.61 ")
+288 ;;556
+289 ;;21,"Z37.62 ")
+290 ;;557
+291 ;;21,"Z37.63 ")
+292 ;;558
+293 ;;21,"Z37.64 ")
+294 ;;559
+295 ;;21,"Z37.69 ")
+296 ;;560
+297 ;;21,"Z37.7 ")
+298 ;;561
+299 ;;21,"Z37.9 ")
+300 ;;562
+301 ;;21,"Z38.01 ")
+302 ;;563
+303 ;;21,"Z38.31 ")
+304 ;;564
+305 ;;21,"Z38.62 ")
+306 ;;565
+307 ;;21,"Z38.64 ")
+308 ;;566
+309 ;;21,"Z38.66 ")
+310 ;;567
+311 ;;21,"Z38.69 ")
+312 ;;568
+313 ;;21,"Z38.8 ")
+314 ;;569
+315 ;;21,"Z39.0 ")
+316 ;;570
+317 ;;21,"Z39.1 ")
+318 ;;571
+319 ;;21,"Z39.2 ")
+320 ;;572
+321 ;;9002226,911,.01)
+322 ;;SURVEILLANCE H1N1 DELIVERY DX
+323 ;;9002226,911,.02)
+324 ;;@
+325 ;;9002226,911,.04)
+326 ;;n
+327 ;;9002226,911,.06)
+328 ;;@
+329 ;;9002226,911,.08)
+330 ;;0
+331 ;;9002226,911,.09)
+332 ;;3131113
+333 ;;9002226,911,.11)
+334 ;;@
+335 ;;9002226,911,.12)
+336 ;;31
+337 ;;9002226,911,.13)
+338 ;;1
+339 ;;9002226,911,.14)
+340 ;;@
+341 ;;9002226,911,.15)
+342 ;;80
+343 ;;9002226,911,.16)
+344 ;;@
+345 ;;9002226,911,.17)
+346 ;;@
+347 ;;9002226,911,3101)
+348 ;;@
+349 ;;9002226.02101,"911,640.01 ",.01)
+350 ;;640.01
+351 ;;9002226.02101,"911,640.01 ",.02)
+352 ;;640.01
+353 ;;9002226.02101,"911,640.01 ",.03)
+354 ;;1
+355 ;;9002226.02101,"911,640.81 ",.01)
+356 ;;640.81
+357 ;;9002226.02101,"911,640.81 ",.02)
+358 ;;640.81
+359 ;;9002226.02101,"911,640.81 ",.03)
+360 ;;1
+361 ;;9002226.02101,"911,640.91 ",.01)
+362 ;;640.91
+363 ;;9002226.02101,"911,640.91 ",.02)
+364 ;;640.91
+365 ;;9002226.02101,"911,640.91 ",.03)
+366 ;;1
+367 ;;9002226.02101,"911,641.01 ",.01)
+368 ;;641.01
+369 ;;9002226.02101,"911,641.01 ",.02)
+370 ;;641.01
+371 ;;9002226.02101,"911,641.01 ",.03)
+372 ;;1
+373 ;;9002226.02101,"911,641.11 ",.01)
+374 ;;641.11
+375 ;;9002226.02101,"911,641.11 ",.02)
+376 ;;641.11
+377 ;;9002226.02101,"911,641.11 ",.03)
+378 ;;1
+379 ;;9002226.02101,"911,641.21 ",.01)
+380 ;;641.21
+381 ;;9002226.02101,"911,641.21 ",.02)
+382 ;;641.21
+383 ;;9002226.02101,"911,641.21 ",.03)
+384 ;;1
+385 ;;9002226.02101,"911,641.31 ",.01)
+386 ;;641.31
+387 ;;9002226.02101,"911,641.31 ",.02)
+388 ;;641.31
+389 ;;9002226.02101,"911,641.31 ",.03)
+390 ;;1
+391 ;;9002226.02101,"911,641.81 ",.01)
+392 ;;641.81
+393 ;;9002226.02101,"911,641.81 ",.02)
+394 ;;641.81
+395 ;;9002226.02101,"911,641.81 ",.03)
+396 ;;1
+397 ;;9002226.02101,"911,641.91 ",.01)
+398 ;;641.91
+399 ;;9002226.02101,"911,641.91 ",.02)
+400 ;;641.91
+401 ;;9002226.02101,"911,641.91 ",.03)
+402 ;;1
+403 ;;9002226.02101,"911,642.01 ",.01)
+404 ;;642.01
+405 ;;9002226.02101,"911,642.01 ",.02)
+406 ;;642.02
+407 ;;9002226.02101,"911,642.01 ",.03)
+408 ;;1
+409 ;;9002226.02101,"911,642.04 ",.01)
+410 ;;642.04
+411 ;;9002226.02101,"911,642.04 ",.02)
+412 ;;642.04
+413 ;;9002226.02101,"911,642.04 ",.03)
+414 ;;1
+415 ;;9002226.02101,"911,642.11 ",.01)
+416 ;;642.11
+417 ;;9002226.02101,"911,642.11 ",.02)
+418 ;;642.12
+419 ;;9002226.02101,"911,642.11 ",.03)
+420 ;;1
+421 ;;9002226.02101,"911,642.14 ",.01)
+422 ;;642.14
+423 ;;9002226.02101,"911,642.14 ",.02)
+424 ;;642.14
+425 ;;9002226.02101,"911,642.14 ",.03)
+426 ;;1
+427 ;;9002226.02101,"911,642.21 ",.01)
+428 ;;642.21
+429 ;;9002226.02101,"911,642.21 ",.02)
+430 ;;642.22
+431 ;;9002226.02101,"911,642.21 ",.03)
+432 ;;1
+433 ;;9002226.02101,"911,642.24 ",.01)
+434 ;;642.24
+435 ;;9002226.02101,"911,642.24 ",.02)
+436 ;;642.24
+437 ;;9002226.02101,"911,642.24 ",.03)
+438 ;;1
+439 ;;9002226.02101,"911,642.31 ",.01)
+440 ;;642.31
+441 ;;9002226.02101,"911,642.31 ",.02)
+442 ;;642.32
+443 ;;9002226.02101,"911,642.31 ",.03)
+444 ;;1
+445 ;;9002226.02101,"911,642.34 ",.01)
+446 ;;642.34
+447 ;;9002226.02101,"911,642.34 ",.02)
+448 ;;642.34
+449 ;;9002226.02101,"911,642.34 ",.03)
+450 ;;1
+451 ;;9002226.02101,"911,642.41 ",.01)
+452 ;;642.41
+453 ;;9002226.02101,"911,642.41 ",.02)
+454 ;;642.42
+455 ;;9002226.02101,"911,642.41 ",.03)
+456 ;;1
+457 ;;9002226.02101,"911,642.44 ",.01)
+458 ;;642.44
+459 ;;9002226.02101,"911,642.44 ",.02)
+460 ;;642.44
+461 ;;9002226.02101,"911,642.44 ",.03)
+462 ;;1
+463 ;;9002226.02101,"911,642.51 ",.01)
+464 ;;642.51
+465 ;;9002226.02101,"911,642.51 ",.02)
+466 ;;642.52
+467 ;;9002226.02101,"911,642.51 ",.03)
+468 ;;1
+469 ;;9002226.02101,"911,642.54 ",.01)
+470 ;;642.54
+471 ;;9002226.02101,"911,642.54 ",.02)
+472 ;;642.54
+473 ;;9002226.02101,"911,642.54 ",.03)
+474 ;;1
+475 ;;9002226.02101,"911,642.61 ",.01)
+476 ;;642.61
+477 ;;9002226.02101,"911,642.61 ",.02)
+478 ;;642.62
+479 ;;9002226.02101,"911,642.61 ",.03)
+480 ;;1
+481 ;;9002226.02101,"911,642.64 ",.01)
+482 ;;642.64
+483 ;;9002226.02101,"911,642.64 ",.02)
+484 ;;642.64
+485 ;;9002226.02101,"911,642.64 ",.03)
+486 ;;1
+487 ;;9002226.02101,"911,642.71 ",.01)
+488 ;;642.71
+489 ;;9002226.02101,"911,642.71 ",.02)
+490 ;;642.72
+491 ;;9002226.02101,"911,642.71 ",.03)
+492 ;;1
+493 ;;9002226.02101,"911,642.74 ",.01)
+494 ;;642.74
+495 ;;9002226.02101,"911,642.74 ",.02)
+496 ;;642.74
+497 ;;9002226.02101,"911,642.74 ",.03)
+498 ;;1
+499 ;;9002226.02101,"911,642.91 ",.01)
+500 ;;642.91
+501 ;;9002226.02101,"911,642.91 ",.02)
+502 ;;642.92
+503 ;;9002226.02101,"911,642.91 ",.03)
+504 ;;1
+505 ;;9002226.02101,"911,642.94 ",.01)
+506 ;;642.94
+507 ;;9002226.02101,"911,642.94 ",.02)
+508 ;;642.94
+509 ;;9002226.02101,"911,642.94 ",.03)
+510 ;;1
+511 ;;9002226.02101,"911,643.01 ",.01)
+512 ;;643.01
+513 ;;9002226.02101,"911,643.01 ",.02)
+514 ;;643.01
+515 ;;9002226.02101,"911,643.01 ",.03)
+516 ;;1
+517 ;;9002226.02101,"911,643.11 ",.01)
+518 ;;643.11
+519 ;;9002226.02101,"911,643.11 ",.02)
+520 ;;643.11
+521 ;;9002226.02101,"911,643.11 ",.03)
+522 ;;1
+523 ;;9002226.02101,"911,643.21 ",.01)
+524 ;;643.21
+525 ;;9002226.02101,"911,643.21 ",.02)
+526 ;;643.21
+527 ;;9002226.02101,"911,643.21 ",.03)
+528 ;;1
+529 ;;9002226.02101,"911,643.81 ",.01)
+530 ;;643.81
+531 ;;9002226.02101,"911,643.81 ",.02)
+532 ;;643.81
+533 ;;9002226.02101,"911,643.81 ",.03)
+534 ;;1
+535 ;;9002226.02101,"911,643.91 ",.01)
+536 ;;643.91
+537 ;;9002226.02101,"911,643.91 ",.02)
+538 ;;643.91
+539 ;;9002226.02101,"911,643.91 ",.03)
+540 ;;1
+541 ;;9002226.02101,"911,644.20 ",.01)
+542 ;;644.20
+543 ;;9002226.02101,"911,644.20 ",.02)
+544 ;;644.21
+545 ;;9002226.02101,"911,644.20 ",.03)
+546 ;;1
+547 ;;9002226.02101,"911,645.11 ",.01)
+548 ;;645.11
+549 ;;9002226.02101,"911,645.11 ",.02)
+550 ;;645.11
+551 ;;9002226.02101,"911,645.11 ",.03)
+552 ;;1
+553 ;;9002226.02101,"911,645.21 ",.01)
+554 ;;645.21
+555 ;;9002226.02101,"911,645.21 ",.02)
+556 ;;645.21
+557 ;;9002226.02101,"911,645.21 ",.03)
+558 ;;1
+559 ;;9002226.02101,"911,646.01 ",.01)
+560 ;;646.01
+561 ;;9002226.02101,"911,646.01 ",.02)
+562 ;;646.01
+563 ;;9002226.02101,"911,646.01 ",.03)
+564 ;;1
+565 ;;9002226.02101,"911,646.11 ",.01)
+566 ;;646.11
+567 ;;9002226.02101,"911,646.11 ",.02)
+568 ;;646.12
+569 ;;9002226.02101,"911,646.11 ",.03)
+570 ;;1
+571 ;;9002226.02101,"911,646.14 ",.01)
+572 ;;646.14
+573 ;;9002226.02101,"911,646.14 ",.02)
+574 ;;646.14
+575 ;;9002226.02101,"911,646.14 ",.03)
+576 ;;1
+577 ;;9002226.02101,"911,646.21 ",.01)
+578 ;;646.21
+579 ;;9002226.02101,"911,646.21 ",.02)
+580 ;;646.22
+581 ;;9002226.02101,"911,646.21 ",.03)
+582 ;;1
+583 ;;9002226.02101,"911,646.24 ",.01)
+584 ;;646.24
+585 ;;9002226.02101,"911,646.24 ",.02)
+586 ;;646.24
+587 ;;9002226.02101,"911,646.24 ",.03)
+588 ;;1
+589 ;;9002226.02101,"911,646.31 ",.01)
+590 ;;646.31
+591 ;;9002226.02101,"911,646.31 ",.02)
+592 ;;646.31
+593 ;;9002226.02101,"911,646.31 ",.03)
+594 ;;1
+595 ;;9002226.02101,"911,646.41 ",.01)
+596 ;;646.41
+597 ;;9002226.02101,"911,646.41 ",.02)
+598 ;;646.42
+599 ;;9002226.02101,"911,646.41 ",.03)
+600 ;;1
+601 ;;9002226.02101,"911,646.44 ",.01)
+602 ;;646.44
+603 ;;9002226.02101,"911,646.44 ",.02)
+604 ;;646.44
+605 ;;9002226.02101,"911,646.44 ",.03)
+606 ;;1
+607 ;;9002226.02101,"911,646.51 ",.01)
+608 ;;646.51
+609 ;;9002226.02101,"911,646.51 ",.02)
+610 ;;646.52
+611 ;;9002226.02101,"911,646.51 ",.03)
+612 ;;1
+613 ;;9002226.02101,"911,646.54 ",.01)
+614 ;;646.54
+615 ;;9002226.02101,"911,646.54 ",.02)
+616 ;;646.54
+617 ;;9002226.02101,"911,646.54 ",.03)
+618 ;;1
+619 ;;9002226.02101,"911,646.61 ",.01)
+620 ;;646.61
+621 ;;9002226.02101,"911,646.61 ",.02)
+622 ;;646.62
+623 ;;9002226.02101,"911,646.61 ",.03)
+624 ;;1
+625 ;;9002226.02101,"911,646.64 ",.01)
+626 ;;646.64
+627 ;;9002226.02101,"911,646.64 ",.02)
+628 ;;646.64
+629 ;;9002226.02101,"911,646.64 ",.03)
+630 ;;1
+631 ;;9002226.02101,"911,646.71 ",.01)
+632 ;;646.71
+633 ;;9002226.02101,"911,646.71 ",.02)
+634 ;;646.71
+635 ;;9002226.02101,"911,646.71 ",.03)
+636 ;;1