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

ATXD2N2.m

Go to the documentation of this file.
ATXD2N2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON OCT 28, 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)
 ;;9002226.02101,"1083,042. ",.02)
 ;;044.9 
 ;;9002226.02101,"1083,042. ",.03)
 ;;1
 ;;9002226.02101,"1083,079.53 ",.01)
 ;;079.53 
 ;;9002226.02101,"1083,079.53 ",.02)
 ;;079.53 
 ;;9002226.02101,"1083,079.53 ",.03)
 ;;1
 ;;9002226.02101,"1083,250.00 ",.01)
 ;;250.00 
 ;;9002226.02101,"1083,250.00 ",.02)
 ;;250.93 
 ;;9002226.02101,"1083,250.00 ",.03)
 ;;1
 ;;9002226.02101,"1083,393. ",.01)
 ;;393. 
 ;;9002226.02101,"1083,393. ",.02)
 ;;398.99 
 ;;9002226.02101,"1083,393. ",.03)
 ;;1
 ;;9002226.02101,"1083,402.00 ",.01)
 ;;402.00 
 ;;9002226.02101,"1083,402.00 ",.02)
 ;;402.91 
 ;;9002226.02101,"1083,402.00 ",.03)
 ;;1
 ;;9002226.02101,"1083,404.0 ",.01)
 ;;404.0 
 ;;9002226.02101,"1083,404.0 ",.02)
 ;;404.93 
 ;;9002226.02101,"1083,404.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,410.0 ",.01)
 ;;410.0 
 ;;9002226.02101,"1083,410.0 ",.02)
 ;;416.9 
 ;;9002226.02101,"1083,410.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,424.0 ",.01)
 ;;424.0 
 ;;9002226.02101,"1083,424.0 ",.02)
 ;;425.9 
 ;;9002226.02101,"1083,424.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,428.0 ",.01)
 ;;428.0 
 ;;9002226.02101,"1083,428.0 ",.02)
 ;;428.9 
 ;;9002226.02101,"1083,428.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,429.2 ",.01)
 ;;429.2 
 ;;9002226.02101,"1083,429.2 ",.02)
 ;;429.2 
 ;;9002226.02101,"1083,429.2 ",.03)
 ;;1
 ;;9002226.02101,"1083,491.0 ",.01)
 ;;491.0 
 ;;9002226.02101,"1083,491.0 ",.02)
 ;;493.91 
 ;;9002226.02101,"1083,491.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,494.0 ",.01)
 ;;494.0 
 ;;9002226.02101,"1083,494.0 ",.02)
 ;;505. 
 ;;9002226.02101,"1083,494.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,571.0 ",.01)
 ;;571.0 
 ;;9002226.02101,"1083,571.0 ",.02)
 ;;571.9 
 ;;9002226.02101,"1083,571.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,581.0 ",.01)
 ;;581.0 
 ;;9002226.02101,"1083,581.0 ",.02)
 ;;581.9 
 ;;9002226.02101,"1083,581.0 ",.03)
 ;;1
 ;;9002226.02101,"1083,585.60 ",.01)
 ;;585.60 
 ;;9002226.02101,"1083,585.60 ",.02)
 ;;585.90 
 ;;9002226.02101,"1083,585.60 ",.03)
 ;;1
 ;;9002226.02101,"1083,996.80 ",.01)
 ;;996.80 
 ;;9002226.02101,"1083,996.80 ",.02)
 ;;996.89 
 ;;9002226.02101,"1083,996.80 ",.03)
 ;;1
 ;;9002226.02101,"1083,B20. ",.01)
 ;;B20.
 ;;9002226.02101,"1083,B20. ",.02)
 ;;B20.
 ;;9002226.02101,"1083,B20. ",.03)
 ;;30
 ;;9002226.02101,"1083,B52.0 ",.01)
 ;;B52.0
 ;;9002226.02101,"1083,B52.0 ",.02)
 ;;B52.0
 ;;9002226.02101,"1083,B52.0 ",.03)
 ;;30
 ;;9002226.02101,"1083,B97.35 ",.01)
 ;;B97.35
 ;;9002226.02101,"1083,B97.35 ",.02)
 ;;B97.35
 ;;9002226.02101,"1083,B97.35 ",.03)
 ;;30
 ;;9002226.02101,"1083,E08.21 ",.01)
 ;;E08.21
 ;;9002226.02101,"1083,E08.21 ",.02)
 ;;E08.21
 ;;9002226.02101,"1083,E08.21 ",.03)
 ;;30
 ;;9002226.02101,"1083,E08.22 ",.01)
 ;;E08.22
 ;;9002226.02101,"1083,E08.22 ",.02)
 ;;E08.22
 ;;9002226.02101,"1083,E08.22 ",.03)
 ;;30
 ;;9002226.02101,"1083,E08.29 ",.01)
 ;;E08.29
 ;;9002226.02101,"1083,E08.29 ",.02)
 ;;E08.29
 ;;9002226.02101,"1083,E08.29 ",.03)
 ;;30
 ;;9002226.02101,"1083,E09.21 ",.01)
 ;;E09.21
 ;;9002226.02101,"1083,E09.21 ",.02)
 ;;E09.21
 ;;9002226.02101,"1083,E09.21 ",.03)
 ;;30
 ;;9002226.02101,"1083,E09.22 ",.01)
 ;;E09.22
 ;;9002226.02101,"1083,E09.22 ",.02)
 ;;E09.22
 ;;9002226.02101,"1083,E09.22 ",.03)
 ;;30
 ;;9002226.02101,"1083,E09.29 ",.01)
 ;;E09.29
 ;;9002226.02101,"1083,E09.29 ",.02)
 ;;E09.29
 ;;9002226.02101,"1083,E09.29 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.10 ",.01)
 ;;E10.10
 ;;9002226.02101,"1083,E10.10 ",.02)
 ;;E10.10
 ;;9002226.02101,"1083,E10.10 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.11 ",.01)
 ;;E10.11
 ;;9002226.02101,"1083,E10.11 ",.02)
 ;;E10.11
 ;;9002226.02101,"1083,E10.11 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.21 ",.01)
 ;;E10.21
 ;;9002226.02101,"1083,E10.21 ",.02)
 ;;E10.21
 ;;9002226.02101,"1083,E10.21 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.22 ",.01)
 ;;E10.22
 ;;9002226.02101,"1083,E10.22 ",.02)
 ;;E10.22
 ;;9002226.02101,"1083,E10.22 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.29 ",.01)
 ;;E10.29
 ;;9002226.02101,"1083,E10.29 ",.02)
 ;;E10.29
 ;;9002226.02101,"1083,E10.29 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.311 ",.01)
 ;;E10.311
 ;;9002226.02101,"1083,E10.311 ",.02)
 ;;E10.311
 ;;9002226.02101,"1083,E10.311 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.319 ",.01)
 ;;E10.319
 ;;9002226.02101,"1083,E10.319 ",.02)
 ;;E10.319
 ;;9002226.02101,"1083,E10.319 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.321 ",.01)
 ;;E10.321
 ;;9002226.02101,"1083,E10.321 ",.02)
 ;;E10.321
 ;;9002226.02101,"1083,E10.321 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.329 ",.01)
 ;;E10.329
 ;;9002226.02101,"1083,E10.329 ",.02)
 ;;E10.329
 ;;9002226.02101,"1083,E10.329 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.331 ",.01)
 ;;E10.331
 ;;9002226.02101,"1083,E10.331 ",.02)
 ;;E10.331
 ;;9002226.02101,"1083,E10.331 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.339 ",.01)
 ;;E10.339
 ;;9002226.02101,"1083,E10.339 ",.02)
 ;;E10.339
 ;;9002226.02101,"1083,E10.339 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.341 ",.01)
 ;;E10.341
 ;;9002226.02101,"1083,E10.341 ",.02)
 ;;E10.341
 ;;9002226.02101,"1083,E10.341 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.349 ",.01)
 ;;E10.349
 ;;9002226.02101,"1083,E10.349 ",.02)
 ;;E10.349
 ;;9002226.02101,"1083,E10.349 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.351 ",.01)
 ;;E10.351
 ;;9002226.02101,"1083,E10.351 ",.02)
 ;;E10.351
 ;;9002226.02101,"1083,E10.351 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.359 ",.01)
 ;;E10.359
 ;;9002226.02101,"1083,E10.359 ",.02)
 ;;E10.359
 ;;9002226.02101,"1083,E10.359 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.36 ",.01)
 ;;E10.36
 ;;9002226.02101,"1083,E10.36 ",.02)
 ;;E10.36
 ;;9002226.02101,"1083,E10.36 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.39 ",.01)
 ;;E10.39
 ;;9002226.02101,"1083,E10.39 ",.02)
 ;;E10.39
 ;;9002226.02101,"1083,E10.39 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.40 ",.01)
 ;;E10.40
 ;;9002226.02101,"1083,E10.40 ",.02)
 ;;E10.40
 ;;9002226.02101,"1083,E10.40 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.41 ",.01)
 ;;E10.41
 ;;9002226.02101,"1083,E10.41 ",.02)
 ;;E10.41
 ;;9002226.02101,"1083,E10.41 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.42 ",.01)
 ;;E10.42
 ;;9002226.02101,"1083,E10.42 ",.02)
 ;;E10.42
 ;;9002226.02101,"1083,E10.42 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.43 ",.01)
 ;;E10.43
 ;;9002226.02101,"1083,E10.43 ",.02)
 ;;E10.43
 ;;9002226.02101,"1083,E10.43 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.44 ",.01)
 ;;E10.44
 ;;9002226.02101,"1083,E10.44 ",.02)
 ;;E10.44
 ;;9002226.02101,"1083,E10.44 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.49 ",.01)
 ;;E10.49
 ;;9002226.02101,"1083,E10.49 ",.02)
 ;;E10.49
 ;;9002226.02101,"1083,E10.49 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.51 ",.01)
 ;;E10.51
 ;;9002226.02101,"1083,E10.51 ",.02)
 ;;E10.51
 ;;9002226.02101,"1083,E10.51 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.52 ",.01)
 ;;E10.52
 ;;9002226.02101,"1083,E10.52 ",.02)
 ;;E10.52
 ;;9002226.02101,"1083,E10.52 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.59 ",.01)
 ;;E10.59
 ;;9002226.02101,"1083,E10.59 ",.02)
 ;;E10.59
 ;;9002226.02101,"1083,E10.59 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.610 ",.01)
 ;;E10.610
 ;;9002226.02101,"1083,E10.610 ",.02)
 ;;E10.610
 ;;9002226.02101,"1083,E10.610 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.618 ",.01)
 ;;E10.618
 ;;9002226.02101,"1083,E10.618 ",.02)
 ;;E10.618
 ;;9002226.02101,"1083,E10.618 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.620 ",.01)
 ;;E10.620
 ;;9002226.02101,"1083,E10.620 ",.02)
 ;;E10.620
 ;;9002226.02101,"1083,E10.620 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.621 ",.01)
 ;;E10.621
 ;;9002226.02101,"1083,E10.621 ",.02)
 ;;E10.621
 ;;9002226.02101,"1083,E10.621 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.622 ",.01)
 ;;E10.622
 ;;9002226.02101,"1083,E10.622 ",.02)
 ;;E10.622
 ;;9002226.02101,"1083,E10.622 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.628 ",.01)
 ;;E10.628
 ;;9002226.02101,"1083,E10.628 ",.02)
 ;;E10.628
 ;;9002226.02101,"1083,E10.628 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.630 ",.01)
 ;;E10.630
 ;;9002226.02101,"1083,E10.630 ",.02)
 ;;E10.630
 ;;9002226.02101,"1083,E10.630 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.638 ",.01)
 ;;E10.638
 ;;9002226.02101,"1083,E10.638 ",.02)
 ;;E10.638
 ;;9002226.02101,"1083,E10.638 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.641 ",.01)
 ;;E10.641
 ;;9002226.02101,"1083,E10.641 ",.02)
 ;;E10.641
 ;;9002226.02101,"1083,E10.641 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.649 ",.01)
 ;;E10.649
 ;;9002226.02101,"1083,E10.649 ",.02)
 ;;E10.649
 ;;9002226.02101,"1083,E10.649 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.65 ",.01)
 ;;E10.65
 ;;9002226.02101,"1083,E10.65 ",.02)
 ;;E10.65
 ;;9002226.02101,"1083,E10.65 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.69 ",.01)
 ;;E10.69
 ;;9002226.02101,"1083,E10.69 ",.02)
 ;;E10.69
 ;;9002226.02101,"1083,E10.69 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.8 ",.01)
 ;;E10.8
 ;;9002226.02101,"1083,E10.8 ",.02)
 ;;E10.8
 ;;9002226.02101,"1083,E10.8 ",.03)
 ;;30
 ;;9002226.02101,"1083,E10.9 ",.01)
 ;;E10.9
 ;;9002226.02101,"1083,E10.9 ",.02)
 ;;E10.9
 ;;9002226.02101,"1083,E10.9 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.00 ",.01)
 ;;E11.00
 ;;9002226.02101,"1083,E11.00 ",.02)
 ;;E11.00
 ;;9002226.02101,"1083,E11.00 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.01 ",.01)
 ;;E11.01
 ;;9002226.02101,"1083,E11.01 ",.02)
 ;;E11.01
 ;;9002226.02101,"1083,E11.01 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.21 ",.01)
 ;;E11.21
 ;;9002226.02101,"1083,E11.21 ",.02)
 ;;E11.21
 ;;9002226.02101,"1083,E11.21 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.22 ",.01)
 ;;E11.22
 ;;9002226.02101,"1083,E11.22 ",.02)
 ;;E11.22
 ;;9002226.02101,"1083,E11.22 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.29 ",.01)
 ;;E11.29
 ;;9002226.02101,"1083,E11.29 ",.02)
 ;;E11.29
 ;;9002226.02101,"1083,E11.29 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.311 ",.01)
 ;;E11.311
 ;;9002226.02101,"1083,E11.311 ",.02)
 ;;E11.311
 ;;9002226.02101,"1083,E11.311 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.319 ",.01)
 ;;E11.319
 ;;9002226.02101,"1083,E11.319 ",.02)
 ;;E11.319
 ;;9002226.02101,"1083,E11.319 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.321 ",.01)
 ;;E11.321
 ;;9002226.02101,"1083,E11.321 ",.02)
 ;;E11.321
 ;;9002226.02101,"1083,E11.321 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.329 ",.01)
 ;;E11.329
 ;;9002226.02101,"1083,E11.329 ",.02)
 ;;E11.329
 ;;9002226.02101,"1083,E11.329 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.331 ",.01)
 ;;E11.331
 ;;9002226.02101,"1083,E11.331 ",.02)
 ;;E11.331
 ;;9002226.02101,"1083,E11.331 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.339 ",.01)
 ;;E11.339
 ;;9002226.02101,"1083,E11.339 ",.02)
 ;;E11.339
 ;;9002226.02101,"1083,E11.339 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.341 ",.01)
 ;;E11.341
 ;;9002226.02101,"1083,E11.341 ",.02)
 ;;E11.341
 ;;9002226.02101,"1083,E11.341 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.349 ",.01)
 ;;E11.349
 ;;9002226.02101,"1083,E11.349 ",.02)
 ;;E11.349
 ;;9002226.02101,"1083,E11.349 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.351 ",.01)
 ;;E11.351
 ;;9002226.02101,"1083,E11.351 ",.02)
 ;;E11.351
 ;;9002226.02101,"1083,E11.351 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.359 ",.01)
 ;;E11.359
 ;;9002226.02101,"1083,E11.359 ",.02)
 ;;E11.359
 ;;9002226.02101,"1083,E11.359 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.36 ",.01)
 ;;E11.36
 ;;9002226.02101,"1083,E11.36 ",.02)
 ;;E11.36
 ;;9002226.02101,"1083,E11.36 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.39 ",.01)
 ;;E11.39
 ;;9002226.02101,"1083,E11.39 ",.02)
 ;;E11.39
 ;;9002226.02101,"1083,E11.39 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.40 ",.01)
 ;;E11.40
 ;;9002226.02101,"1083,E11.40 ",.02)
 ;;E11.40
 ;;9002226.02101,"1083,E11.40 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.41 ",.01)
 ;;E11.41
 ;;9002226.02101,"1083,E11.41 ",.02)
 ;;E11.41
 ;;9002226.02101,"1083,E11.41 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.42 ",.01)
 ;;E11.42
 ;;9002226.02101,"1083,E11.42 ",.02)
 ;;E11.42
 ;;9002226.02101,"1083,E11.42 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.43 ",.01)
 ;;E11.43
 ;;9002226.02101,"1083,E11.43 ",.02)
 ;;E11.43
 ;;9002226.02101,"1083,E11.43 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.44 ",.01)
 ;;E11.44
 ;;9002226.02101,"1083,E11.44 ",.02)
 ;;E11.44
 ;;9002226.02101,"1083,E11.44 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.49 ",.01)
 ;;E11.49
 ;;9002226.02101,"1083,E11.49 ",.02)
 ;;E11.49
 ;;9002226.02101,"1083,E11.49 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.51 ",.01)
 ;;E11.51
 ;;9002226.02101,"1083,E11.51 ",.02)
 ;;E11.51
 ;;9002226.02101,"1083,E11.51 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.52 ",.01)
 ;;E11.52
 ;;9002226.02101,"1083,E11.52 ",.02)
 ;;E11.52
 ;;9002226.02101,"1083,E11.52 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.59 ",.01)
 ;;E11.59
 ;;9002226.02101,"1083,E11.59 ",.02)
 ;;E11.59
 ;;9002226.02101,"1083,E11.59 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.610 ",.01)
 ;;E11.610
 ;;9002226.02101,"1083,E11.610 ",.02)
 ;;E11.610
 ;;9002226.02101,"1083,E11.610 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.618 ",.01)
 ;;E11.618
 ;;9002226.02101,"1083,E11.618 ",.02)
 ;;E11.618
 ;;9002226.02101,"1083,E11.618 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.620 ",.01)
 ;;E11.620
 ;;9002226.02101,"1083,E11.620 ",.02)
 ;;E11.620
 ;;9002226.02101,"1083,E11.620 ",.03)
 ;;30
 ;;9002226.02101,"1083,E11.621 ",.01)
 ;;E11.621