ATXXA20 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 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,"S90.812A ")
;;7324
;;21,"S90.819A ")
;;7325
;;21,"S90.841A ")
;;7326
;;21,"S90.842A ")
;;7327
;;21,"S90.849A ")
;;7328
;;21,"S90.851A ")
;;7329
;;21,"S90.852A ")
;;7330
;;21,"S90.859A ")
;;7331
;;21,"S90.871A ")
;;7332
;;21,"S90.872A ")
;;7333
;;21,"S90.879A ")
;;7334
;;21,"S90.911A ")
;;7335
;;21,"S90.912A ")
;;7336
;;21,"S90.919A ")
;;7337
;;21,"S90.921A ")
;;7338
;;21,"S90.922A ")
;;7339
;;21,"S90.929A ")
;;7340
;;21,"S90.931A ")
;;7341
;;21,"S90.932A ")
;;7342
;;21,"S90.933A ")
;;7343
;;21,"S90.934A ")
;;7344
;;21,"S90.935A ")
;;7345
;;21,"S90.936A ")
;;7346
;;21,"S91.001A ")
;;7347
;;21,"S91.002A ")
;;7348
;;21,"S91.009A ")
;;7349
;;21,"S91.011A ")
;;7350
;;21,"S91.012A ")
;;7351
;;21,"S91.019A ")
;;7352
;;21,"S91.021A ")
;;7353
;;21,"S91.022A ")
;;7354
;;21,"S91.029A ")
;;7355
;;21,"S91.031A ")
;;7356
;;21,"S91.032A ")
;;7357
;;21,"S91.039A ")
;;7358
;;21,"S91.041A ")
;;7359
;;21,"S91.042A ")
;;7360
;;21,"S91.049A ")
;;7361
;;21,"S91.051A ")
;;7362
;;21,"S91.052A ")
;;7363
;;21,"S91.059A ")
;;7364
;;21,"S91.101A ")
;;7365
;;21,"S91.102A ")
;;7366
;;21,"S91.103A ")
;;7367
;;21,"S91.104A ")
;;7368
;;21,"S91.105A ")
;;7369
;;21,"S91.106A ")
;;7370
;;21,"S91.109A ")
;;7371
;;21,"S91.111A ")
;;7372
;;21,"S91.112A ")
;;7373
;;21,"S91.113A ")
;;7374
;;21,"S91.114A ")
;;7375
;;21,"S91.115A ")
;;7376
;;21,"S91.116A ")
;;7377
;;21,"S91.119A ")
;;7378
;;21,"S91.121A ")
;;7379
;;21,"S91.122A ")
;;7380
;;21,"S91.123A ")
;;7381
;;21,"S91.124A ")
;;7382
;;21,"S91.125A ")
;;7383
;;21,"S91.126A ")
;;7384
;;21,"S91.129A ")
;;7385
;;21,"S91.131A ")
;;7386
;;21,"S91.132A ")
;;7387
;;21,"S91.133A ")
;;7388
;;21,"S91.134A ")
;;7389
;;21,"S91.135A ")
;;7390
;;21,"S91.136A ")
;;7391
;;21,"S91.139A ")
;;7392
;;21,"S91.141A ")
;;7393
;;21,"S91.142A ")
;;7394
;;21,"S91.143A ")
;;7395
;;21,"S91.144A ")
;;7396
;;21,"S91.145A ")
;;7397
;;21,"S91.146A ")
;;7398
;;21,"S91.149A ")
;;7399
;;21,"S91.151A ")
;;7400
;;21,"S91.152A ")
;;7401
;;21,"S91.153A ")
;;7402
;;21,"S91.154A ")
;;7403
;;21,"S91.155A ")
;;7404
;;21,"S91.156A ")
;;7405
;;21,"S91.159A ")
;;7406
;;21,"S91.201A ")
;;7407
;;21,"S91.202A ")
;;7408
;;21,"S91.203A ")
;;7409
;;21,"S91.204A ")
;;7410
;;21,"S91.205A ")
;;7411
;;21,"S91.206A ")
;;7412
;;21,"S91.209A ")
;;7413
;;21,"S91.211A ")
;;7414
;;21,"S91.212A ")
;;7415
;;21,"S91.213A ")
;;7416
;;21,"S91.214A ")
;;7417
;;21,"S91.215A ")
;;7418
;;21,"S91.216A ")
;;7419
;;21,"S91.219A ")
;;7420
;;21,"S91.221A ")
;;7421
;;21,"S91.222A ")
;;7422
;;21,"S91.223A ")
;;7423
;;21,"S91.224A ")
;;7424
;;21,"S91.225A ")
;;7425
;;21,"S91.226A ")
;;7426
;;21,"S91.229A ")
;;7427
;;21,"S91.231A ")
;;7428
;;21,"S91.232A ")
;;7429
;;21,"S91.233A ")
;;7430
;;21,"S91.234A ")
;;7431
;;21,"S91.235A ")
;;7432
;;21,"S91.236A ")
;;7433
;;21,"S91.239A ")
;;7434
;;21,"S91.241A ")
;;7435
;;21,"S91.242A ")
;;7436
;;21,"S91.243A ")
;;7437
;;21,"S91.244A ")
;;7438
;;21,"S91.245A ")
;;7439
;;21,"S91.246A ")
;;7440
;;21,"S91.249A ")
;;7441
;;21,"S91.251A ")
;;7442
;;21,"S91.252A ")
;;7443
;;21,"S91.253A ")
;;7444
;;21,"S91.254A ")
;;7445
;;21,"S91.255A ")
;;7446
;;21,"S91.256A ")
;;7447
;;21,"S91.259A ")
;;7448
;;21,"S91.301A ")
;;7449
;;21,"S91.302A ")
;;7450
;;21,"S91.309A ")
;;7451
;;21,"S91.311A ")
;;7452
;;21,"S91.312A ")
;;7453
;;21,"S91.319A ")
;;7454
;;21,"S91.321A ")
;;7455
;;21,"S91.322A ")
;;7456
;;21,"S91.329A ")
;;7457
;;21,"S91.331A ")
;;7458
;;21,"S91.332A ")
;;7459
;;21,"S91.339A ")
;;7460
;;21,"S91.341A ")
;;7461
;;21,"S91.342A ")
;;7462
;;21,"S91.349A ")
;;7463
;;21,"S91.351A ")
;;7464
;;21,"S91.352A ")
;;7465
;;21,"S91.359A ")
;;7466
;;21,"S92.001A ")
;;7467
;;21,"S92.001B ")
;;7468
;;21,"S92.002A ")
;;7469
;;21,"S92.002B ")
;;7470
;;21,"S92.009A ")
;;7471
;;21,"S92.009B ")
;;7472
;;21,"S92.011A ")
;;7473
;;21,"S92.011B ")
;;7474
;;21,"S92.012A ")
;;7475
;;21,"S92.012B ")
;;7476
;;21,"S92.013A ")
;;7477
;;21,"S92.013B ")
;;7478
;;21,"S92.014A ")
;;7479
;;21,"S92.014B ")
;;7480
;;21,"S92.015A ")
;;7481
;;21,"S92.015B ")
;;7482
;;21,"S92.016A ")
;;7483
;;21,"S92.016B ")
;;7484
;;21,"S92.021A ")
;;7485
;;21,"S92.021B ")
;;7486
;;21,"S92.022A ")
;;7487
;;21,"S92.022B ")
;;7488
;;21,"S92.023A ")
;;7489
;;21,"S92.023B ")
;;7490
;;21,"S92.024A ")
;;7491
;;21,"S92.024B ")
;;7492
;;21,"S92.025A ")
;;7493
;;21,"S92.025B ")
;;7494
;;21,"S92.026A ")
;;7495
;;21,"S92.026B ")
;;7496
;;21,"S92.031A ")
;;7497
;;21,"S92.031B ")
;;7498
;;21,"S92.032A ")
;;7499
;;21,"S92.032B ")
;;7500
;;21,"S92.033A ")
;;7501
;;21,"S92.033B ")
;;7502
;;21,"S92.034A ")
;;7503
;;21,"S92.034B ")
;;7504
;;21,"S92.035A ")
;;7505
;;21,"S92.035B ")
;;7506
;;21,"S92.036A ")
;;7507
;;21,"S92.036B ")
;;7508
;;21,"S92.041A ")
;;7509
;;21,"S92.041B ")
;;7510
;;21,"S92.042A ")
;;7511
;;21,"S92.042B ")
;;7512
;;21,"S92.043A ")
;;7513
;;21,"S92.043B ")
;;7514
;;21,"S92.044A ")
;;7515
;;21,"S92.044B ")
;;7516
;;21,"S92.045A ")
;;7517
;;21,"S92.045B ")
;;7518
;;21,"S92.046A ")
;;7519
;;21,"S92.046B ")
;;7520
;;21,"S92.051A ")
;;7521
;;21,"S92.051B ")
;;7522
;;21,"S92.052A ")
;;7523
;;21,"S92.052B ")
;;7524
;;21,"S92.053A ")
;;7525
;;21,"S92.053B ")
;;7526
;;21,"S92.054A ")
;;7527
;;21,"S92.054B ")
;;7528
;;21,"S92.055A ")
;;7529
;;21,"S92.055B ")
;;7530
;;21,"S92.056A ")
;;7531
;;21,"S92.056B ")
;;7532
;;21,"S92.061A ")
;;7533
;;21,"S92.061B ")
;;7534
;;21,"S92.062A ")
;;7535
;;21,"S92.062B ")
;;7536
;;21,"S92.063A ")
;;7537
;;21,"S92.063B ")
;;7538
;;21,"S92.064A ")
;;7539
;;21,"S92.064B ")
;;7540
;;21,"S92.065A ")
;;7541
;;21,"S92.065B ")
;;7542
;;21,"S92.066A ")
;;7543
;;21,"S92.066B ")
;;7544
;;21,"S92.101A ")
;;7545
;;21,"S92.101B ")
;;7546
;;21,"S92.102A ")
;;7547
;;21,"S92.102B ")
;;7548
;;21,"S92.109A ")
;;7549
;;21,"S92.109B ")
;;7550
;;21,"S92.111A ")
;;7551
;;21,"S92.111B ")
;;7552
;;21,"S92.112A ")
;;7553
;;21,"S92.112B ")
;;7554
;;21,"S92.113A ")
;;7555
;;21,"S92.113B ")
;;7556
;;21,"S92.114A ")
;;7557
;;21,"S92.114B ")
;;7558
;;21,"S92.115A ")
;;7559
;;21,"S92.115B ")
;;7560
;;21,"S92.116A ")
;;7561
;;21,"S92.116B ")
;;7562
;;21,"S92.121A ")
;;7563
;;21,"S92.121B ")
;;7564
;;21,"S92.122A ")
;;7565
;;21,"S92.122B ")
;;7566
;;21,"S92.123A ")
;;7567
;;21,"S92.123B ")
;;7568
;;21,"S92.124A ")
;;7569
;;21,"S92.124B ")
;;7570
;;21,"S92.125A ")
;;7571
;;21,"S92.125B ")
;;7572
;;21,"S92.126A ")
;;7573
;;21,"S92.126B ")
;;7574
;;21,"S92.131A ")
;;7575
;;21,"S92.131B ")
;;7576
;;21,"S92.132A ")
;;7577
;;21,"S92.132B ")
;;7578
;;21,"S92.133A ")
;;7579
;;21,"S92.133B ")
;;7580
;;21,"S92.134A ")
;;7581
;;21,"S92.134B ")
;;7582
;;21,"S92.135A ")
;;7583
;;21,"S92.135B ")
;;7584
;;21,"S92.136A ")
;;7585
;;21,"S92.136B ")
;;7586
;;21,"S92.141A ")
;;7587
;;21,"S92.141B ")
;;7588
;;21,"S92.142A ")
;;7589
;;21,"S92.142B ")
;;7590
;;21,"S92.143A ")
;;7591
;;21,"S92.143B ")
;;7592
;;21,"S92.144A ")
;;7593
;;21,"S92.144B ")
;;7594
;;21,"S92.145A ")
;;7595
;;21,"S92.145B ")
;;7596
;;21,"S92.146A ")
;;7597
;;21,"S92.146B ")
;;7598
;;21,"S92.151A ")
;;7599
;;21,"S92.151B ")
;;7600
;;21,"S92.152A ")
;;7601
;;21,"S92.152B ")
;;7602
;;21,"S92.153A ")
;;7603
;;21,"S92.153B ")
;;7604
;;21,"S92.154A ")
;;7605
;;21,"S92.154B ")
;;7606
;;21,"S92.155A ")
;;7607
;;21,"S92.155B ")
;;7608
;;21,"S92.156A ")
;;7609
;;21,"S92.156B ")
;;7610
;;21,"S92.191A ")
;;7611
;;21,"S92.191B ")
;;7612
;;21,"S92.192A ")
;;7613
;;21,"S92.192B ")
;;7614
;;21,"S92.199A ")
;;7615
;;21,"S92.199B ")
;;7616
;;21,"S92.201A ")
;;7617
;;21,"S92.201B ")
;;7618
;;21,"S92.202A ")
;;7619
;;21,"S92.202B ")
;;7620
;;21,"S92.209A ")
;;7621
;;21,"S92.209B ")
;;7622
;;21,"S92.211A ")
;;7623
;;21,"S92.211B ")
;;7624
;;21,"S92.212A ")
;;7625
;;21,"S92.212B ")
;;7626
;;21,"S92.213A ")
;;7627
;;21,"S92.213B ")
;;7628
;;21,"S92.214A ")
;;7629
;;21,"S92.214B ")
;;7630
;;21,"S92.215A ")
;;7631
;;21,"S92.215B ")
;;7632
;;21,"S92.216A ")
;;7633
;;21,"S92.216B ")
;;7634
;;21,"S92.221A ")
;;7635
;;21,"S92.221B ")
;;7636
;;21,"S92.222A ")
;;7637
;;21,"S92.222B ")
;;7638
;;21,"S92.223A ")
;;7639
;;21,"S92.223B ")
;;7640
;;21,"S92.224A ")
;;7641
;;21,"S92.224B ")
;;7642
;;21,"S92.225A ")
;;7643
;;21,"S92.225B ")
;;7644
;;21,"S92.226A ")
;;7645
;;21,"S92.226B ")
;;7646
;;21,"S92.231A ")
;;7647
;;21,"S92.231B ")
;;7648
;;21,"S92.232A ")
;;7649
;;21,"S92.232B ")
;;7650
;;21,"S92.233A ")
;;7651
;;21,"S92.233B ")
;;7652
;;21,"S92.234A ")
;;7653
;;21,"S92.234B ")
;;7654
;;21,"S92.235A ")
;;7655
;;21,"S92.235B ")
;;7656
;;21,"S92.236A ")
;;7657
;;21,"S92.236B ")
;;7658
;;21,"S92.241A ")
;;7659
;;21,"S92.241B ")
;;7660
;;21,"S92.242A ")
;;7661
;;21,"S92.242B ")
;;7662
;;21,"S92.243A ")
;;7663
;;21,"S92.243B ")
;;7664
;;21,"S92.244A ")
;;7665
;;21,"S92.244B ")
;;7666
;;21,"S92.245A ")
;;7667
;;21,"S92.245B ")
;;7668
;;21,"S92.246A ")
;;7669
;;21,"S92.246B ")
;;7670
;;21,"S92.251A ")
;;7671
;;21,"S92.251B ")
;;7672
;;21,"S92.252A ")
;;7673
;;21,"S92.252B ")
;;7674
;;21,"S92.253A ")
;;7675
;;21,"S92.253B ")
;;7676
;;21,"S92.254A ")
;;7677
;;21,"S92.254B ")
;;7678
;;21,"S92.255A ")
;;7679
;;21,"S92.255B ")
;;7680
;;21,"S92.256A ")
;;7681
;;21,"S92.256B ")
;;7682
;;21,"S92.301A ")
;;7683
;;21,"S92.301B ")
;;7684
;;21,"S92.302A ")
;;7685
;;21,"S92.302B ")
;;7686
;;21,"S92.309A ")
;;7687
;;21,"S92.309B ")
;;7688
;;21,"S92.311A ")
;;7689
;;21,"S92.311B ")
;;7690
;;21,"S92.312A ")
;;7691
;;21,"S92.312B ")
;;7692
;;21,"S92.313A ")
;;7693
;;21,"S92.313B ")
;;7694
;;21,"S92.314A ")
;;7695
;;21,"S92.314B ")
;;7696
;;21,"S92.315A ")
;;7697
;;21,"S92.315B ")
;;7698
;;21,"S92.316A ")
;;7699
;;21,"S92.316B ")
;;7700
;;21,"S92.321A ")
;;7701
;;21,"S92.321B ")
;;7702
;;21,"S92.322A ")
;;7703
;;21,"S92.322B ")
;;7704
;;21,"S92.323A ")
;;7705
;;21,"S92.323B ")
;;7706
;;21,"S92.324A ")
;;7707
ATXXA20 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 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,"S90.812A ")
+2 ;;7324
+3 ;;21,"S90.819A ")
+4 ;;7325
+5 ;;21,"S90.841A ")
+6 ;;7326
+7 ;;21,"S90.842A ")
+8 ;;7327
+9 ;;21,"S90.849A ")
+10 ;;7328
+11 ;;21,"S90.851A ")
+12 ;;7329
+13 ;;21,"S90.852A ")
+14 ;;7330
+15 ;;21,"S90.859A ")
+16 ;;7331
+17 ;;21,"S90.871A ")
+18 ;;7332
+19 ;;21,"S90.872A ")
+20 ;;7333
+21 ;;21,"S90.879A ")
+22 ;;7334
+23 ;;21,"S90.911A ")
+24 ;;7335
+25 ;;21,"S90.912A ")
+26 ;;7336
+27 ;;21,"S90.919A ")
+28 ;;7337
+29 ;;21,"S90.921A ")
+30 ;;7338
+31 ;;21,"S90.922A ")
+32 ;;7339
+33 ;;21,"S90.929A ")
+34 ;;7340
+35 ;;21,"S90.931A ")
+36 ;;7341
+37 ;;21,"S90.932A ")
+38 ;;7342
+39 ;;21,"S90.933A ")
+40 ;;7343
+41 ;;21,"S90.934A ")
+42 ;;7344
+43 ;;21,"S90.935A ")
+44 ;;7345
+45 ;;21,"S90.936A ")
+46 ;;7346
+47 ;;21,"S91.001A ")
+48 ;;7347
+49 ;;21,"S91.002A ")
+50 ;;7348
+51 ;;21,"S91.009A ")
+52 ;;7349
+53 ;;21,"S91.011A ")
+54 ;;7350
+55 ;;21,"S91.012A ")
+56 ;;7351
+57 ;;21,"S91.019A ")
+58 ;;7352
+59 ;;21,"S91.021A ")
+60 ;;7353
+61 ;;21,"S91.022A ")
+62 ;;7354
+63 ;;21,"S91.029A ")
+64 ;;7355
+65 ;;21,"S91.031A ")
+66 ;;7356
+67 ;;21,"S91.032A ")
+68 ;;7357
+69 ;;21,"S91.039A ")
+70 ;;7358
+71 ;;21,"S91.041A ")
+72 ;;7359
+73 ;;21,"S91.042A ")
+74 ;;7360
+75 ;;21,"S91.049A ")
+76 ;;7361
+77 ;;21,"S91.051A ")
+78 ;;7362
+79 ;;21,"S91.052A ")
+80 ;;7363
+81 ;;21,"S91.059A ")
+82 ;;7364
+83 ;;21,"S91.101A ")
+84 ;;7365
+85 ;;21,"S91.102A ")
+86 ;;7366
+87 ;;21,"S91.103A ")
+88 ;;7367
+89 ;;21,"S91.104A ")
+90 ;;7368
+91 ;;21,"S91.105A ")
+92 ;;7369
+93 ;;21,"S91.106A ")
+94 ;;7370
+95 ;;21,"S91.109A ")
+96 ;;7371
+97 ;;21,"S91.111A ")
+98 ;;7372
+99 ;;21,"S91.112A ")
+100 ;;7373
+101 ;;21,"S91.113A ")
+102 ;;7374
+103 ;;21,"S91.114A ")
+104 ;;7375
+105 ;;21,"S91.115A ")
+106 ;;7376
+107 ;;21,"S91.116A ")
+108 ;;7377
+109 ;;21,"S91.119A ")
+110 ;;7378
+111 ;;21,"S91.121A ")
+112 ;;7379
+113 ;;21,"S91.122A ")
+114 ;;7380
+115 ;;21,"S91.123A ")
+116 ;;7381
+117 ;;21,"S91.124A ")
+118 ;;7382
+119 ;;21,"S91.125A ")
+120 ;;7383
+121 ;;21,"S91.126A ")
+122 ;;7384
+123 ;;21,"S91.129A ")
+124 ;;7385
+125 ;;21,"S91.131A ")
+126 ;;7386
+127 ;;21,"S91.132A ")
+128 ;;7387
+129 ;;21,"S91.133A ")
+130 ;;7388
+131 ;;21,"S91.134A ")
+132 ;;7389
+133 ;;21,"S91.135A ")
+134 ;;7390
+135 ;;21,"S91.136A ")
+136 ;;7391
+137 ;;21,"S91.139A ")
+138 ;;7392
+139 ;;21,"S91.141A ")
+140 ;;7393
+141 ;;21,"S91.142A ")
+142 ;;7394
+143 ;;21,"S91.143A ")
+144 ;;7395
+145 ;;21,"S91.144A ")
+146 ;;7396
+147 ;;21,"S91.145A ")
+148 ;;7397
+149 ;;21,"S91.146A ")
+150 ;;7398
+151 ;;21,"S91.149A ")
+152 ;;7399
+153 ;;21,"S91.151A ")
+154 ;;7400
+155 ;;21,"S91.152A ")
+156 ;;7401
+157 ;;21,"S91.153A ")
+158 ;;7402
+159 ;;21,"S91.154A ")
+160 ;;7403
+161 ;;21,"S91.155A ")
+162 ;;7404
+163 ;;21,"S91.156A ")
+164 ;;7405
+165 ;;21,"S91.159A ")
+166 ;;7406
+167 ;;21,"S91.201A ")
+168 ;;7407
+169 ;;21,"S91.202A ")
+170 ;;7408
+171 ;;21,"S91.203A ")
+172 ;;7409
+173 ;;21,"S91.204A ")
+174 ;;7410
+175 ;;21,"S91.205A ")
+176 ;;7411
+177 ;;21,"S91.206A ")
+178 ;;7412
+179 ;;21,"S91.209A ")
+180 ;;7413
+181 ;;21,"S91.211A ")
+182 ;;7414
+183 ;;21,"S91.212A ")
+184 ;;7415
+185 ;;21,"S91.213A ")
+186 ;;7416
+187 ;;21,"S91.214A ")
+188 ;;7417
+189 ;;21,"S91.215A ")
+190 ;;7418
+191 ;;21,"S91.216A ")
+192 ;;7419
+193 ;;21,"S91.219A ")
+194 ;;7420
+195 ;;21,"S91.221A ")
+196 ;;7421
+197 ;;21,"S91.222A ")
+198 ;;7422
+199 ;;21,"S91.223A ")
+200 ;;7423
+201 ;;21,"S91.224A ")
+202 ;;7424
+203 ;;21,"S91.225A ")
+204 ;;7425
+205 ;;21,"S91.226A ")
+206 ;;7426
+207 ;;21,"S91.229A ")
+208 ;;7427
+209 ;;21,"S91.231A ")
+210 ;;7428
+211 ;;21,"S91.232A ")
+212 ;;7429
+213 ;;21,"S91.233A ")
+214 ;;7430
+215 ;;21,"S91.234A ")
+216 ;;7431
+217 ;;21,"S91.235A ")
+218 ;;7432
+219 ;;21,"S91.236A ")
+220 ;;7433
+221 ;;21,"S91.239A ")
+222 ;;7434
+223 ;;21,"S91.241A ")
+224 ;;7435
+225 ;;21,"S91.242A ")
+226 ;;7436
+227 ;;21,"S91.243A ")
+228 ;;7437
+229 ;;21,"S91.244A ")
+230 ;;7438
+231 ;;21,"S91.245A ")
+232 ;;7439
+233 ;;21,"S91.246A ")
+234 ;;7440
+235 ;;21,"S91.249A ")
+236 ;;7441
+237 ;;21,"S91.251A ")
+238 ;;7442
+239 ;;21,"S91.252A ")
+240 ;;7443
+241 ;;21,"S91.253A ")
+242 ;;7444
+243 ;;21,"S91.254A ")
+244 ;;7445
+245 ;;21,"S91.255A ")
+246 ;;7446
+247 ;;21,"S91.256A ")
+248 ;;7447
+249 ;;21,"S91.259A ")
+250 ;;7448
+251 ;;21,"S91.301A ")
+252 ;;7449
+253 ;;21,"S91.302A ")
+254 ;;7450
+255 ;;21,"S91.309A ")
+256 ;;7451
+257 ;;21,"S91.311A ")
+258 ;;7452
+259 ;;21,"S91.312A ")
+260 ;;7453
+261 ;;21,"S91.319A ")
+262 ;;7454
+263 ;;21,"S91.321A ")
+264 ;;7455
+265 ;;21,"S91.322A ")
+266 ;;7456
+267 ;;21,"S91.329A ")
+268 ;;7457
+269 ;;21,"S91.331A ")
+270 ;;7458
+271 ;;21,"S91.332A ")
+272 ;;7459
+273 ;;21,"S91.339A ")
+274 ;;7460
+275 ;;21,"S91.341A ")
+276 ;;7461
+277 ;;21,"S91.342A ")
+278 ;;7462
+279 ;;21,"S91.349A ")
+280 ;;7463
+281 ;;21,"S91.351A ")
+282 ;;7464
+283 ;;21,"S91.352A ")
+284 ;;7465
+285 ;;21,"S91.359A ")
+286 ;;7466
+287 ;;21,"S92.001A ")
+288 ;;7467
+289 ;;21,"S92.001B ")
+290 ;;7468
+291 ;;21,"S92.002A ")
+292 ;;7469
+293 ;;21,"S92.002B ")
+294 ;;7470
+295 ;;21,"S92.009A ")
+296 ;;7471
+297 ;;21,"S92.009B ")
+298 ;;7472
+299 ;;21,"S92.011A ")
+300 ;;7473
+301 ;;21,"S92.011B ")
+302 ;;7474
+303 ;;21,"S92.012A ")
+304 ;;7475
+305 ;;21,"S92.012B ")
+306 ;;7476
+307 ;;21,"S92.013A ")
+308 ;;7477
+309 ;;21,"S92.013B ")
+310 ;;7478
+311 ;;21,"S92.014A ")
+312 ;;7479
+313 ;;21,"S92.014B ")
+314 ;;7480
+315 ;;21,"S92.015A ")
+316 ;;7481
+317 ;;21,"S92.015B ")
+318 ;;7482
+319 ;;21,"S92.016A ")
+320 ;;7483
+321 ;;21,"S92.016B ")
+322 ;;7484
+323 ;;21,"S92.021A ")
+324 ;;7485
+325 ;;21,"S92.021B ")
+326 ;;7486
+327 ;;21,"S92.022A ")
+328 ;;7487
+329 ;;21,"S92.022B ")
+330 ;;7488
+331 ;;21,"S92.023A ")
+332 ;;7489
+333 ;;21,"S92.023B ")
+334 ;;7490
+335 ;;21,"S92.024A ")
+336 ;;7491
+337 ;;21,"S92.024B ")
+338 ;;7492
+339 ;;21,"S92.025A ")
+340 ;;7493
+341 ;;21,"S92.025B ")
+342 ;;7494
+343 ;;21,"S92.026A ")
+344 ;;7495
+345 ;;21,"S92.026B ")
+346 ;;7496
+347 ;;21,"S92.031A ")
+348 ;;7497
+349 ;;21,"S92.031B ")
+350 ;;7498
+351 ;;21,"S92.032A ")
+352 ;;7499
+353 ;;21,"S92.032B ")
+354 ;;7500
+355 ;;21,"S92.033A ")
+356 ;;7501
+357 ;;21,"S92.033B ")
+358 ;;7502
+359 ;;21,"S92.034A ")
+360 ;;7503
+361 ;;21,"S92.034B ")
+362 ;;7504
+363 ;;21,"S92.035A ")
+364 ;;7505
+365 ;;21,"S92.035B ")
+366 ;;7506
+367 ;;21,"S92.036A ")
+368 ;;7507
+369 ;;21,"S92.036B ")
+370 ;;7508
+371 ;;21,"S92.041A ")
+372 ;;7509
+373 ;;21,"S92.041B ")
+374 ;;7510
+375 ;;21,"S92.042A ")
+376 ;;7511
+377 ;;21,"S92.042B ")
+378 ;;7512
+379 ;;21,"S92.043A ")
+380 ;;7513
+381 ;;21,"S92.043B ")
+382 ;;7514
+383 ;;21,"S92.044A ")
+384 ;;7515
+385 ;;21,"S92.044B ")
+386 ;;7516
+387 ;;21,"S92.045A ")
+388 ;;7517
+389 ;;21,"S92.045B ")
+390 ;;7518
+391 ;;21,"S92.046A ")
+392 ;;7519
+393 ;;21,"S92.046B ")
+394 ;;7520
+395 ;;21,"S92.051A ")
+396 ;;7521
+397 ;;21,"S92.051B ")
+398 ;;7522
+399 ;;21,"S92.052A ")
+400 ;;7523
+401 ;;21,"S92.052B ")
+402 ;;7524
+403 ;;21,"S92.053A ")
+404 ;;7525
+405 ;;21,"S92.053B ")
+406 ;;7526
+407 ;;21,"S92.054A ")
+408 ;;7527
+409 ;;21,"S92.054B ")
+410 ;;7528
+411 ;;21,"S92.055A ")
+412 ;;7529
+413 ;;21,"S92.055B ")
+414 ;;7530
+415 ;;21,"S92.056A ")
+416 ;;7531
+417 ;;21,"S92.056B ")
+418 ;;7532
+419 ;;21,"S92.061A ")
+420 ;;7533
+421 ;;21,"S92.061B ")
+422 ;;7534
+423 ;;21,"S92.062A ")
+424 ;;7535
+425 ;;21,"S92.062B ")
+426 ;;7536
+427 ;;21,"S92.063A ")
+428 ;;7537
+429 ;;21,"S92.063B ")
+430 ;;7538
+431 ;;21,"S92.064A ")
+432 ;;7539
+433 ;;21,"S92.064B ")
+434 ;;7540
+435 ;;21,"S92.065A ")
+436 ;;7541
+437 ;;21,"S92.065B ")
+438 ;;7542
+439 ;;21,"S92.066A ")
+440 ;;7543
+441 ;;21,"S92.066B ")
+442 ;;7544
+443 ;;21,"S92.101A ")
+444 ;;7545
+445 ;;21,"S92.101B ")
+446 ;;7546
+447 ;;21,"S92.102A ")
+448 ;;7547
+449 ;;21,"S92.102B ")
+450 ;;7548
+451 ;;21,"S92.109A ")
+452 ;;7549
+453 ;;21,"S92.109B ")
+454 ;;7550
+455 ;;21,"S92.111A ")
+456 ;;7551
+457 ;;21,"S92.111B ")
+458 ;;7552
+459 ;;21,"S92.112A ")
+460 ;;7553
+461 ;;21,"S92.112B ")
+462 ;;7554
+463 ;;21,"S92.113A ")
+464 ;;7555
+465 ;;21,"S92.113B ")
+466 ;;7556
+467 ;;21,"S92.114A ")
+468 ;;7557
+469 ;;21,"S92.114B ")
+470 ;;7558
+471 ;;21,"S92.115A ")
+472 ;;7559
+473 ;;21,"S92.115B ")
+474 ;;7560
+475 ;;21,"S92.116A ")
+476 ;;7561
+477 ;;21,"S92.116B ")
+478 ;;7562
+479 ;;21,"S92.121A ")
+480 ;;7563
+481 ;;21,"S92.121B ")
+482 ;;7564
+483 ;;21,"S92.122A ")
+484 ;;7565
+485 ;;21,"S92.122B ")
+486 ;;7566
+487 ;;21,"S92.123A ")
+488 ;;7567
+489 ;;21,"S92.123B ")
+490 ;;7568
+491 ;;21,"S92.124A ")
+492 ;;7569
+493 ;;21,"S92.124B ")
+494 ;;7570
+495 ;;21,"S92.125A ")
+496 ;;7571
+497 ;;21,"S92.125B ")
+498 ;;7572
+499 ;;21,"S92.126A ")
+500 ;;7573
+501 ;;21,"S92.126B ")
+502 ;;7574
+503 ;;21,"S92.131A ")
+504 ;;7575
+505 ;;21,"S92.131B ")
+506 ;;7576
+507 ;;21,"S92.132A ")
+508 ;;7577
+509 ;;21,"S92.132B ")
+510 ;;7578
+511 ;;21,"S92.133A ")
+512 ;;7579
+513 ;;21,"S92.133B ")
+514 ;;7580
+515 ;;21,"S92.134A ")
+516 ;;7581
+517 ;;21,"S92.134B ")
+518 ;;7582
+519 ;;21,"S92.135A ")
+520 ;;7583
+521 ;;21,"S92.135B ")
+522 ;;7584
+523 ;;21,"S92.136A ")
+524 ;;7585
+525 ;;21,"S92.136B ")
+526 ;;7586
+527 ;;21,"S92.141A ")
+528 ;;7587
+529 ;;21,"S92.141B ")
+530 ;;7588
+531 ;;21,"S92.142A ")
+532 ;;7589
+533 ;;21,"S92.142B ")
+534 ;;7590
+535 ;;21,"S92.143A ")
+536 ;;7591
+537 ;;21,"S92.143B ")
+538 ;;7592
+539 ;;21,"S92.144A ")
+540 ;;7593
+541 ;;21,"S92.144B ")
+542 ;;7594
+543 ;;21,"S92.145A ")
+544 ;;7595
+545 ;;21,"S92.145B ")
+546 ;;7596
+547 ;;21,"S92.146A ")
+548 ;;7597
+549 ;;21,"S92.146B ")
+550 ;;7598
+551 ;;21,"S92.151A ")
+552 ;;7599
+553 ;;21,"S92.151B ")
+554 ;;7600
+555 ;;21,"S92.152A ")
+556 ;;7601
+557 ;;21,"S92.152B ")
+558 ;;7602
+559 ;;21,"S92.153A ")
+560 ;;7603
+561 ;;21,"S92.153B ")
+562 ;;7604
+563 ;;21,"S92.154A ")
+564 ;;7605
+565 ;;21,"S92.154B ")
+566 ;;7606
+567 ;;21,"S92.155A ")
+568 ;;7607
+569 ;;21,"S92.155B ")
+570 ;;7608
+571 ;;21,"S92.156A ")
+572 ;;7609
+573 ;;21,"S92.156B ")
+574 ;;7610
+575 ;;21,"S92.191A ")
+576 ;;7611
+577 ;;21,"S92.191B ")
+578 ;;7612
+579 ;;21,"S92.192A ")
+580 ;;7613
+581 ;;21,"S92.192B ")
+582 ;;7614
+583 ;;21,"S92.199A ")
+584 ;;7615
+585 ;;21,"S92.199B ")
+586 ;;7616
+587 ;;21,"S92.201A ")
+588 ;;7617
+589 ;;21,"S92.201B ")
+590 ;;7618
+591 ;;21,"S92.202A ")
+592 ;;7619
+593 ;;21,"S92.202B ")
+594 ;;7620
+595 ;;21,"S92.209A ")
+596 ;;7621
+597 ;;21,"S92.209B ")
+598 ;;7622
+599 ;;21,"S92.211A ")
+600 ;;7623
+601 ;;21,"S92.211B ")
+602 ;;7624
+603 ;;21,"S92.212A ")
+604 ;;7625
+605 ;;21,"S92.212B ")
+606 ;;7626
+607 ;;21,"S92.213A ")
+608 ;;7627
+609 ;;21,"S92.213B ")
+610 ;;7628
+611 ;;21,"S92.214A ")
+612 ;;7629
+613 ;;21,"S92.214B ")
+614 ;;7630
+615 ;;21,"S92.215A ")
+616 ;;7631
+617 ;;21,"S92.215B ")
+618 ;;7632
+619 ;;21,"S92.216A ")
+620 ;;7633
+621 ;;21,"S92.216B ")
+622 ;;7634
+623 ;;21,"S92.221A ")
+624 ;;7635
+625 ;;21,"S92.221B ")
+626 ;;7636
+627 ;;21,"S92.222A ")
+628 ;;7637
+629 ;;21,"S92.222B ")
+630 ;;7638
+631 ;;21,"S92.223A ")
+632 ;;7639
+633 ;;21,"S92.223B ")
+634 ;;7640
+635 ;;21,"S92.224A ")
+636 ;;7641
+637 ;;21,"S92.224B ")
+638 ;;7642
+639 ;;21,"S92.225A ")
+640 ;;7643
+641 ;;21,"S92.225B ")
+642 ;;7644
+643 ;;21,"S92.226A ")
+644 ;;7645
+645 ;;21,"S92.226B ")
+646 ;;7646
+647 ;;21,"S92.231A ")
+648 ;;7647
+649 ;;21,"S92.231B ")
+650 ;;7648
+651 ;;21,"S92.232A ")
+652 ;;7649
+653 ;;21,"S92.232B ")
+654 ;;7650
+655 ;;21,"S92.233A ")
+656 ;;7651
+657 ;;21,"S92.233B ")
+658 ;;7652
+659 ;;21,"S92.234A ")
+660 ;;7653
+661 ;;21,"S92.234B ")
+662 ;;7654
+663 ;;21,"S92.235A ")
+664 ;;7655
+665 ;;21,"S92.235B ")
+666 ;;7656
+667 ;;21,"S92.236A ")
+668 ;;7657
+669 ;;21,"S92.236B ")
+670 ;;7658
+671 ;;21,"S92.241A ")
+672 ;;7659
+673 ;;21,"S92.241B ")
+674 ;;7660
+675 ;;21,"S92.242A ")
+676 ;;7661
+677 ;;21,"S92.242B ")
+678 ;;7662
+679 ;;21,"S92.243A ")
+680 ;;7663
+681 ;;21,"S92.243B ")
+682 ;;7664
+683 ;;21,"S92.244A ")
+684 ;;7665
+685 ;;21,"S92.244B ")
+686 ;;7666
+687 ;;21,"S92.245A ")
+688 ;;7667
+689 ;;21,"S92.245B ")
+690 ;;7668
+691 ;;21,"S92.246A ")
+692 ;;7669
+693 ;;21,"S92.246B ")
+694 ;;7670
+695 ;;21,"S92.251A ")
+696 ;;7671
+697 ;;21,"S92.251B ")
+698 ;;7672
+699 ;;21,"S92.252A ")
+700 ;;7673
+701 ;;21,"S92.252B ")
+702 ;;7674
+703 ;;21,"S92.253A ")
+704 ;;7675
+705 ;;21,"S92.253B ")
+706 ;;7676
+707 ;;21,"S92.254A ")
+708 ;;7677
+709 ;;21,"S92.254B ")
+710 ;;7678
+711 ;;21,"S92.255A ")
+712 ;;7679
+713 ;;21,"S92.255B ")
+714 ;;7680
+715 ;;21,"S92.256A ")
+716 ;;7681
+717 ;;21,"S92.256B ")
+718 ;;7682
+719 ;;21,"S92.301A ")
+720 ;;7683
+721 ;;21,"S92.301B ")
+722 ;;7684
+723 ;;21,"S92.302A ")
+724 ;;7685
+725 ;;21,"S92.302B ")
+726 ;;7686
+727 ;;21,"S92.309A ")
+728 ;;7687
+729 ;;21,"S92.309B ")
+730 ;;7688
+731 ;;21,"S92.311A ")
+732 ;;7689
+733 ;;21,"S92.311B ")
+734 ;;7690
+735 ;;21,"S92.312A ")
+736 ;;7691
+737 ;;21,"S92.312B ")
+738 ;;7692
+739 ;;21,"S92.313A ")
+740 ;;7693
+741 ;;21,"S92.313B ")
+742 ;;7694
+743 ;;21,"S92.314A ")
+744 ;;7695
+745 ;;21,"S92.314B ")
+746 ;;7696
+747 ;;21,"S92.315A ")
+748 ;;7697
+749 ;;21,"S92.315B ")
+750 ;;7698
+751 ;;21,"S92.316A ")
+752 ;;7699
+753 ;;21,"S92.316B ")
+754 ;;7700
+755 ;;21,"S92.321A ")
+756 ;;7701
+757 ;;21,"S92.321B ")
+758 ;;7702
+759 ;;21,"S92.322A ")
+760 ;;7703
+761 ;;21,"S92.322B ")
+762 ;;7704
+763 ;;21,"S92.323A ")
+764 ;;7705
+765 ;;21,"S92.323B ")
+766 ;;7706
+767 ;;21,"S92.324A ")
+768 ;;7707