Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Routine: ATXD5Q2

ATXD5Q2.m

Go to the documentation of this file.
ATXD5Q2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
 ;;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,"T49.91XA ")
 ;;456
 ;;21,"T49.91XD ")
 ;;457
 ;;21,"T49.91XS ")
 ;;458
 ;;21,"T50.0X1A ")
 ;;459
 ;;21,"T50.0X1D ")
 ;;460
 ;;21,"T50.0X1S ")
 ;;461
 ;;21,"T50.1X1A ")
 ;;462
 ;;21,"T50.1X1D ")
 ;;463
 ;;21,"T50.1X1S ")
 ;;464
 ;;21,"T50.2X1A ")
 ;;465
 ;;21,"T50.2X1D ")
 ;;466
 ;;21,"T50.2X1S ")
 ;;467
 ;;21,"T50.3X1A ")
 ;;468
 ;;21,"T50.3X1D ")
 ;;469
 ;;21,"T50.3X1S ")
 ;;470
 ;;21,"T50.4X1A ")
 ;;471
 ;;21,"T50.4X1D ")
 ;;472
 ;;21,"T50.4X1S ")
 ;;473
 ;;21,"T50.5X1A ")
 ;;474
 ;;21,"T50.5X1D ")
 ;;475
 ;;21,"T50.5X1S ")
 ;;476
 ;;21,"T50.6X1A ")
 ;;477
 ;;21,"T50.6X1D ")
 ;;478
 ;;21,"T50.6X1S ")
 ;;479
 ;;21,"T50.7X1A ")
 ;;480
 ;;21,"T50.7X1D ")
 ;;481
 ;;21,"T50.7X1S ")
 ;;482
 ;;21,"T50.8X1A ")
 ;;483
 ;;21,"T50.8X1D ")
 ;;484
 ;;21,"T50.8X1S ")
 ;;485
 ;;21,"T50.901A ")
 ;;486
 ;;21,"T50.901D ")
 ;;487
 ;;21,"T50.901S ")
 ;;488
 ;;21,"T50.991A ")
 ;;489
 ;;21,"T50.991D ")
 ;;490
 ;;21,"T50.991S ")
 ;;491
 ;;21,"T50.A11A ")
 ;;492
 ;;21,"T50.A11D ")
 ;;493
 ;;21,"T50.A11S ")
 ;;494
 ;;21,"T50.A21A ")
 ;;495
 ;;21,"T50.A21D ")
 ;;496
 ;;21,"T50.A21S ")
 ;;497
 ;;21,"T50.A91A ")
 ;;498
 ;;21,"T50.A91D ")
 ;;499
 ;;21,"T50.A91S ")
 ;;500
 ;;21,"T50.B11A ")
 ;;501
 ;;21,"T50.B11D ")
 ;;502
 ;;21,"T50.B11S ")
 ;;503
 ;;21,"T50.B91A ")
 ;;504
 ;;21,"T50.B91D ")
 ;;505
 ;;21,"T50.B91S ")
 ;;506
 ;;21,"T50.Z11A ")
 ;;507
 ;;21,"T50.Z11D ")
 ;;508
 ;;21,"T50.Z11S ")
 ;;509
 ;;21,"T50.Z91A ")
 ;;510
 ;;21,"T50.Z91D ")
 ;;511
 ;;21,"T50.Z91S ")
 ;;512
 ;;21,"T51.0X1A ")
 ;;513
 ;;21,"T51.0X1D ")
 ;;514
 ;;21,"T51.0X1S ")
 ;;515
 ;;21,"T51.1X1A ")
 ;;516
 ;;21,"T51.1X1D ")
 ;;517
 ;;21,"T51.1X1S ")
 ;;518
 ;;21,"T51.2X1A ")
 ;;519
 ;;21,"T51.2X1D ")
 ;;520
 ;;21,"T51.2X1S ")
 ;;521
 ;;21,"T51.3X1A ")
 ;;522
 ;;21,"T51.3X1D ")
 ;;523
 ;;21,"T51.3X1S ")
 ;;524
 ;;21,"T51.8X1A ")
 ;;525
 ;;21,"T51.8X1D ")
 ;;526
 ;;21,"T51.8X1S ")
 ;;527
 ;;21,"T51.91XA ")
 ;;528
 ;;21,"T51.91XD ")
 ;;529
 ;;21,"T51.91XS ")
 ;;530
 ;;21,"T52.0X1A ")
 ;;531
 ;;21,"T52.0X1D ")
 ;;532
 ;;21,"T52.0X1S ")
 ;;533
 ;;21,"T52.1X1A ")
 ;;534
 ;;21,"T52.1X1D ")
 ;;535
 ;;21,"T52.1X1S ")
 ;;536
 ;;21,"T52.2X1A ")
 ;;537
 ;;21,"T52.2X1D ")
 ;;538
 ;;21,"T52.2X1S ")
 ;;539
 ;;21,"T52.3X1A ")
 ;;540
 ;;21,"T52.3X1D ")
 ;;541
 ;;21,"T52.3X1S ")
 ;;542
 ;;21,"T52.4X1A ")
 ;;543
 ;;21,"T52.4X1D ")
 ;;544
 ;;21,"T52.4X1S ")
 ;;545
 ;;21,"T52.8X1A ")
 ;;546
 ;;21,"T52.8X1D ")
 ;;547
 ;;21,"T52.8X1S ")
 ;;548
 ;;21,"T52.91XA ")
 ;;549
 ;;21,"T52.91XD ")
 ;;550
 ;;21,"T52.91XS ")
 ;;551
 ;;21,"T53.0X1A ")
 ;;552
 ;;21,"T53.0X1D ")
 ;;553
 ;;21,"T53.0X1S ")
 ;;554
 ;;21,"T53.1X1A ")
 ;;555
 ;;21,"T53.1X1D ")
 ;;556
 ;;21,"T53.1X1S ")
 ;;557
 ;;21,"T53.2X1A ")
 ;;558
 ;;21,"T53.2X1D ")
 ;;559
 ;;21,"T53.2X1S ")
 ;;560
 ;;21,"T53.3X1A ")
 ;;561
 ;;21,"T53.3X1D ")
 ;;562
 ;;21,"T53.3X1S ")
 ;;563
 ;;21,"T53.4X1A ")
 ;;564
 ;;21,"T53.4X1D ")
 ;;565
 ;;21,"T53.4X1S ")
 ;;566
 ;;21,"T53.5X1A ")
 ;;567
 ;;21,"T53.5X1D ")
 ;;568
 ;;21,"T53.5X1S ")
 ;;569
 ;;21,"T53.6X1A ")
 ;;570
 ;;21,"T53.6X1D ")
 ;;571
 ;;21,"T53.6X1S ")
 ;;572
 ;;21,"T53.7X1A ")
 ;;573
 ;;21,"T53.7X1D ")
 ;;574
 ;;21,"T53.7X1S ")
 ;;575
 ;;21,"T53.91XA ")
 ;;576
 ;;21,"T53.91XD ")
 ;;577
 ;;21,"T53.91XS ")
 ;;578
 ;;21,"T54.0X1A ")
 ;;579
 ;;21,"T54.0X1D ")
 ;;580
 ;;21,"T54.0X1S ")
 ;;581
 ;;21,"T54.1X1A ")
 ;;582
 ;;21,"T54.1X1D ")
 ;;583
 ;;21,"T54.1X1S ")
 ;;584
 ;;21,"T54.2X1A ")
 ;;585
 ;;21,"T54.2X1D ")
 ;;586
 ;;21,"T54.2X1S ")
 ;;587
 ;;21,"T54.3X1A ")
 ;;588
 ;;21,"T54.3X1D ")
 ;;589
 ;;21,"T54.3X1S ")
 ;;590
 ;;21,"T54.91XA ")
 ;;591
 ;;21,"T54.91XD ")
 ;;592
 ;;21,"T54.91XS ")
 ;;593
 ;;21,"T55.0X1A ")
 ;;594
 ;;21,"T55.0X1D ")
 ;;595
 ;;21,"T55.0X1S ")
 ;;596
 ;;21,"T55.1X1A ")
 ;;597
 ;;21,"T55.1X1D ")
 ;;598
 ;;21,"T55.1X1S ")
 ;;599
 ;;21,"T56.0X1A ")
 ;;600
 ;;21,"T56.0X1D ")
 ;;601
 ;;21,"T56.0X1S ")
 ;;602
 ;;21,"T56.1X1A ")
 ;;603
 ;;21,"T56.1X1D ")
 ;;604
 ;;21,"T56.1X1S ")
 ;;605
 ;;21,"T56.2X1A ")
 ;;606
 ;;21,"T56.2X1D ")
 ;;607
 ;;21,"T56.2X1S ")
 ;;608
 ;;21,"T56.3X1A ")
 ;;609
 ;;21,"T56.3X1D ")
 ;;610
 ;;21,"T56.3X1S ")
 ;;611
 ;;21,"T56.4X1A ")
 ;;612
 ;;21,"T56.4X1D ")
 ;;613
 ;;21,"T56.4X1S ")
 ;;614
 ;;21,"T56.5X1A ")
 ;;615
 ;;21,"T56.5X1D ")
 ;;616
 ;;21,"T56.5X1S ")
 ;;617
 ;;21,"T56.6X1A ")
 ;;618
 ;;21,"T56.6X1D ")
 ;;619
 ;;21,"T56.6X1S ")
 ;;620
 ;;21,"T56.7X1A ")
 ;;621
 ;;21,"T56.7X1D ")
 ;;622
 ;;21,"T56.7X1S ")
 ;;623
 ;;21,"T56.811A ")
 ;;624
 ;;21,"T56.811D ")
 ;;625
 ;;21,"T56.811S ")
 ;;626
 ;;21,"T56.891A ")
 ;;627
 ;;21,"T56.891D ")
 ;;628
 ;;21,"T56.891S ")
 ;;629
 ;;21,"T56.91XA ")
 ;;630
 ;;21,"T56.91XD ")
 ;;631
 ;;21,"T56.91XS ")
 ;;632
 ;;21,"T57.0X1A ")
 ;;633
 ;;21,"T57.0X1D ")
 ;;634
 ;;21,"T57.0X1S ")
 ;;635
 ;;21,"T57.1X1A ")
 ;;636
 ;;21,"T57.1X1D ")
 ;;637
 ;;21,"T57.1X1S ")
 ;;638
 ;;21,"T57.2X1A ")
 ;;639
 ;;21,"T57.2X1D ")
 ;;640
 ;;21,"T57.2X1S ")
 ;;641
 ;;21,"T57.3X1A ")
 ;;642
 ;;21,"T57.3X1D ")
 ;;643
 ;;21,"T57.3X1S ")
 ;;644
 ;;21,"T57.8X1A ")
 ;;645
 ;;21,"T57.8X1D ")
 ;;646
 ;;21,"T57.8X1S ")
 ;;647
 ;;21,"T57.91XA ")
 ;;648
 ;;21,"T57.91XD ")
 ;;649
 ;;21,"T57.91XS ")
 ;;650
 ;;21,"T58.01XA ")
 ;;651
 ;;21,"T58.01XD ")
 ;;652
 ;;21,"T58.01XS ")
 ;;653
 ;;21,"T58.11XA ")
 ;;654
 ;;21,"T58.11XD ")
 ;;655
 ;;21,"T58.11XS ")
 ;;656
 ;;21,"T58.2X1A ")
 ;;657
 ;;21,"T58.2X1D ")
 ;;658
 ;;21,"T58.2X1S ")
 ;;659
 ;;21,"T58.8X1A ")
 ;;660
 ;;21,"T58.8X1D ")
 ;;661
 ;;21,"T58.8X1S ")
 ;;662
 ;;21,"T58.91XA ")
 ;;663
 ;;21,"T58.91XD ")
 ;;664
 ;;21,"T58.91XS ")
 ;;665
 ;;21,"T59.0X1A ")
 ;;666
 ;;21,"T59.0X1D ")
 ;;667
 ;;21,"T59.0X1S ")
 ;;668
 ;;21,"T59.1X1A ")
 ;;669
 ;;21,"T59.1X1D ")
 ;;670
 ;;21,"T59.1X1S ")
 ;;671
 ;;21,"T59.2X1A ")
 ;;672
 ;;21,"T59.2X1D ")
 ;;673
 ;;21,"T59.2X1S ")
 ;;674
 ;;21,"T59.3X1A ")
 ;;675
 ;;21,"T59.3X1D ")
 ;;676
 ;;21,"T59.3X1S ")
 ;;677
 ;;21,"T59.4X1A ")
 ;;678
 ;;21,"T59.4X1D ")
 ;;679
 ;;21,"T59.4X1S ")
 ;;680
 ;;21,"T59.5X1A ")
 ;;681
 ;;21,"T59.5X1D ")
 ;;682
 ;;21,"T59.5X1S ")
 ;;683
 ;;21,"T59.6X1A ")
 ;;684
 ;;21,"T59.6X1D ")
 ;;685
 ;;21,"T59.6X1S ")
 ;;686
 ;;21,"T59.7X1A ")
 ;;687
 ;;21,"T59.7X1D ")
 ;;688
 ;;21,"T59.7X1S ")
 ;;689
 ;;21,"T59.811A ")
 ;;690
 ;;21,"T59.811D ")
 ;;691
 ;;21,"T59.811S ")
 ;;692
 ;;21,"T59.891A ")
 ;;693
 ;;21,"T59.891D ")
 ;;694
 ;;21,"T59.891S ")
 ;;695
 ;;21,"T59.91XA ")
 ;;696
 ;;21,"T59.91XD ")
 ;;697
 ;;21,"T59.91XS ")
 ;;698
 ;;21,"T60.0X1A ")
 ;;699
 ;;21,"T60.0X1D ")
 ;;700
 ;;21,"T60.0X1S ")
 ;;701
 ;;21,"T60.1X1A ")
 ;;702
 ;;21,"T60.1X1D ")
 ;;703
 ;;21,"T60.1X1S ")
 ;;704
 ;;21,"T60.2X1A ")
 ;;705
 ;;21,"T60.2X1D ")
 ;;706
 ;;21,"T60.2X1S ")
 ;;707
 ;;21,"T60.3X1A ")
 ;;708
 ;;21,"T60.3X1D ")
 ;;709
 ;;21,"T60.3X1S ")
 ;;710
 ;;21,"T60.4X1A ")
 ;;711
 ;;21,"T60.4X1D ")
 ;;712
 ;;21,"T60.4X1S ")
 ;;713
 ;;21,"T60.8X1A ")
 ;;714
 ;;21,"T60.8X1D ")
 ;;715
 ;;21,"T60.8X1S ")
 ;;716
 ;;21,"T60.91XA ")
 ;;717
 ;;21,"T60.91XD ")
 ;;718
 ;;21,"T60.91XS ")
 ;;719
 ;;21,"T61.01XA ")
 ;;720
 ;;21,"T61.01XD ")
 ;;721
 ;;21,"T61.01XS ")
 ;;722
 ;;21,"T61.11XA ")
 ;;723
 ;;21,"T61.11XD ")
 ;;724
 ;;21,"T61.11XS ")
 ;;725
 ;;21,"T61.771A ")
 ;;726
 ;;21,"T61.771D ")
 ;;727
 ;;21,"T61.771S ")
 ;;728
 ;;21,"T61.781A ")
 ;;729
 ;;21,"T61.781D ")
 ;;730
 ;;21,"T61.781S ")
 ;;731
 ;;21,"T61.8X1A ")
 ;;732
 ;;21,"T61.8X1D ")
 ;;733
 ;;21,"T61.8X1S ")
 ;;734
 ;;21,"T61.91XA ")
 ;;735
 ;;21,"T61.91XD ")
 ;;736
 ;;21,"T61.91XS ")
 ;;737
 ;;21,"T62.0X1A ")
 ;;738
 ;;21,"T62.0X1D ")
 ;;739
 ;;21,"T62.0X1S ")
 ;;740
 ;;21,"T62.1X1A ")
 ;;741
 ;;21,"T62.1X1D ")
 ;;742
 ;;21,"T62.1X1S ")
 ;;743
 ;;21,"T62.2X1A ")
 ;;744
 ;;21,"T62.2X1D ")
 ;;745
 ;;21,"T62.2X1S ")
 ;;746
 ;;21,"T62.8X1A ")
 ;;747
 ;;21,"T62.8X1D ")
 ;;748
 ;;21,"T62.8X1S ")
 ;;749
 ;;21,"T62.91XA ")
 ;;750
 ;;21,"T62.91XD ")
 ;;751
 ;;21,"T62.91XS ")
 ;;752
 ;;21,"T63.001A ")
 ;;753
 ;;21,"T63.001D ")
 ;;754
 ;;21,"T63.001S ")
 ;;755
 ;;21,"T63.011A ")
 ;;756
 ;;21,"T63.011D ")
 ;;757
 ;;21,"T63.011S ")
 ;;758
 ;;21,"T63.021A ")
 ;;759
 ;;21,"T63.021D ")
 ;;760
 ;;21,"T63.021S ")
 ;;761
 ;;21,"T63.031A ")
 ;;762
 ;;21,"T63.031D ")
 ;;763
 ;;21,"T63.031S ")
 ;;764
 ;;21,"T63.041A ")
 ;;765
 ;;21,"T63.041D ")
 ;;766
 ;;21,"T63.041S ")
 ;;767
 ;;21,"T63.061A ")
 ;;768
 ;;21,"T63.061D ")
 ;;769
 ;;21,"T63.061S ")
 ;;770
 ;;21,"T63.071A ")
 ;;771
 ;;21,"T63.071D ")
 ;;772
 ;;21,"T63.071S ")
 ;;773
 ;;21,"T63.081A ")
 ;;774
 ;;21,"T63.081D ")
 ;;775
 ;;21,"T63.081S ")
 ;;776
 ;;21,"T63.091A ")
 ;;777
 ;;21,"T63.091D ")
 ;;778
 ;;21,"T63.091S ")
 ;;779
 ;;21,"T63.111A ")
 ;;780
 ;;21,"T63.111D ")
 ;;781
 ;;21,"T63.111S ")
 ;;782
 ;;21,"T63.121A ")
 ;;783
 ;;21,"T63.121D ")
 ;;784
 ;;21,"T63.121S ")
 ;;785
 ;;21,"T63.191A ")
 ;;786
 ;;21,"T63.191D ")
 ;;787
 ;;21,"T63.191S ")
 ;;788
 ;;21,"T63.2X1A ")
 ;;789
 ;;21,"T63.2X1D ")
 ;;790
 ;;21,"T63.2X1S ")
 ;;791
 ;;21,"T63.301A ")
 ;;792
 ;;21,"T63.301D ")
 ;;793
 ;;21,"T63.301S ")
 ;;794
 ;;21,"T63.311A ")
 ;;795
 ;;21,"T63.311D ")
 ;;796
 ;;21,"T63.311S ")
 ;;797
 ;;21,"T63.321A ")
 ;;798
 ;;21,"T63.321D ")
 ;;799
 ;;21,"T63.321S ")
 ;;800
 ;;21,"T63.331A ")
 ;;801
 ;;21,"T63.331D ")
 ;;802
 ;;21,"T63.331S ")
 ;;803
 ;;21,"T63.391A ")
 ;;804
 ;;21,"T63.391D ")
 ;;805
 ;;21,"T63.391S ")
 ;;806
 ;;21,"T63.411A ")
 ;;807
 ;;21,"T63.411D ")
 ;;808
 ;;21,"T63.411S ")
 ;;809
 ;;21,"T63.421A ")
 ;;810
 ;;21,"T63.421D ")
 ;;811
 ;;21,"T63.421S ")
 ;;812
 ;;21,"T63.431A ")
 ;;813
 ;;21,"T63.431D ")
 ;;814
 ;;21,"T63.431S ")
 ;;815
 ;;21,"T63.441A ")
 ;;816
 ;;21,"T63.441D ")
 ;;817
 ;;21,"T63.441S ")
 ;;818
 ;;21,"T63.451A ")
 ;;819
 ;;21,"T63.451D ")
 ;;820
 ;;21,"T63.451S ")
 ;;821
 ;;21,"T63.461A ")
 ;;822
 ;;21,"T63.461D ")
 ;;823
 ;;21,"T63.461S ")
 ;;824
 ;;21,"T63.481A ")
 ;;825
 ;;21,"T63.481D ")
 ;;826
 ;;21,"T63.481S ")
 ;;827
 ;;21,"T63.511A ")
 ;;828
 ;;21,"T63.511D ")
 ;;829
 ;;21,"T63.511S ")
 ;;830
 ;;21,"T63.591A ")
 ;;831
 ;;21,"T63.591D ")
 ;;832
 ;;21,"T63.591S ")
 ;;833
 ;;21,"T63.611A ")
 ;;834
 ;;21,"T63.611D ")
 ;;835
 ;;21,"T63.611S ")
 ;;836
 ;;21,"T63.621A ")
 ;;837
 ;;21,"T63.621D ")
 ;;838
 ;;21,"T63.621S ")
 ;;839
 ;;21,"T63.631A ")
 ;;840
 ;;21,"T63.631D ")
 ;;841
 ;;21,"T63.631S ")
 ;;842
 ;;21,"T63.691A ")
 ;;843
 ;;21,"T63.691D ")
 ;;844
 ;;21,"T63.691S ")
 ;;845
 ;;21,"T63.711A ")
 ;;846
 ;;21,"T63.711D ")
 ;;847
 ;;21,"T63.711S ")
 ;;848
 ;;21,"T63.791A ")
 ;;849
 ;;21,"T63.791D ")
 ;;850
 ;;21,"T63.791S ")
 ;;851
 ;;21,"T63.811A ")
 ;;852
 ;;21,"T63.811D ")
 ;;853
 ;;21,"T63.811S ")
 ;;854
 ;;21,"T63.821A ")
 ;;855
 ;;21,"T63.821D ")
 ;;856
 ;;21,"T63.821S ")
 ;;857
 ;;21,"T63.831A ")
 ;;858
 ;;21,"T63.831D ")
 ;;859
 ;;21,"T63.831S ")
 ;;860
 ;;21,"T63.891A ")
 ;;861
 ;;21,"T63.891D ")
 ;;862
 ;;21,"T63.891S ")
 ;;863
 ;;21,"T63.91XA ")
 ;;864
 ;;21,"T63.91XD ")
 ;;865
 ;;21,"T63.91XS ")
 ;;866
 ;;21,"T64.01XA ")
 ;;867
 ;;21,"T64.01XD ")
 ;;868
 ;;21,"T64.01XS ")
 ;;869
 ;;21,"T64.81XA ")
 ;;870
 ;;21,"T64.81XD ")
 ;;871
 ;;21,"T64.81XS ")
 ;;872
 ;;21,"T65.0X1A ")
 ;;873
 ;;21,"T65.0X1D ")
 ;;874
 ;;21,"T65.0X1S ")
 ;;875
 ;;21,"T65.1X1A ")
 ;;876
 ;;21,"T65.1X1D ")
 ;;877
 ;;21,"T65.1X1S ")
 ;;878
 ;;21,"T65.211A ")
 ;;879
 ;;21,"T65.211D ")
 ;;880
 ;;21,"T65.211S ")
 ;;881
 ;;21,"T65.221A ")
 ;;882
 ;;21,"T65.221D ")
 ;;883
 ;;21,"T65.221S ")
 ;;884
 ;;21,"T65.291A ")
 ;;885
 ;;21,"T65.291D ")
 ;;886
 ;;21,"T65.291S ")
 ;;887
 ;;21,"T65.3X1A ")
 ;;888
 ;;21,"T65.3X1D ")
 ;;889
 ;;21,"T65.3X1S ")
 ;;890
 ;;21,"T65.4X1A ")
 ;;891
 ;;21,"T65.4X1D ")
 ;;892
 ;;21,"T65.4X1S ")
 ;;893
 ;;21,"T65.5X1A ")
 ;;894
 ;;21,"T65.5X1D ")
 ;;895
 ;;21,"T65.5X1S ")
 ;;896
 ;;21,"T65.6X1A ")
 ;;897
 ;;21,"T65.6X1D ")
 ;;898
 ;;21,"T65.6X1S ")
 ;;899
 ;;21,"T65.811A ")
 ;;900
 ;;21,"T65.811D ")
 ;;901
 ;;21,"T65.811S ")
 ;;902
 ;;21,"T65.821A ")
 ;;903
 ;;21,"T65.821D ")
 ;;904
 ;;21,"T65.821S ")
 ;;905
 ;;21,"T65.831A ")
 ;;906
 ;;21,"T65.831D ")
 ;;907
 ;;21,"T65.831S ")
 ;;908
 ;;21,"T65.891A ")
 ;;909
 ;;21,"T65.891D ")
 ;;910
 ;;21,"T65.891S ")
 ;;911
 ;;21,"T65.91XA ")
 ;;912
 ;;21,"T65.91XD ")
 ;;913