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

ATXFCD3.m

Go to the documentation of this file.
ATXFCD3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON DEC 18, 2017;
 ;;5.1;TAXONOMY;**25**;FEB 04, 1997;Build 47
 ;
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,"2230,C81.28 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.29 ",.01)
 ;;C81.29 
 ;;9002226.02101,"2230,C81.29 ",.02)
 ;;C81.29 
 ;;9002226.02101,"2230,C81.29 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.30 ",.01)
 ;;C81.30 
 ;;9002226.02101,"2230,C81.30 ",.02)
 ;;C81.30 
 ;;9002226.02101,"2230,C81.30 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.31 ",.01)
 ;;C81.31 
 ;;9002226.02101,"2230,C81.31 ",.02)
 ;;C81.31 
 ;;9002226.02101,"2230,C81.31 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.32 ",.01)
 ;;C81.32 
 ;;9002226.02101,"2230,C81.32 ",.02)
 ;;C81.32 
 ;;9002226.02101,"2230,C81.32 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.33 ",.01)
 ;;C81.33 
 ;;9002226.02101,"2230,C81.33 ",.02)
 ;;C81.33 
 ;;9002226.02101,"2230,C81.33 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.34 ",.01)
 ;;C81.34 
 ;;9002226.02101,"2230,C81.34 ",.02)
 ;;C81.34 
 ;;9002226.02101,"2230,C81.34 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.35 ",.01)
 ;;C81.35 
 ;;9002226.02101,"2230,C81.35 ",.02)
 ;;C81.35 
 ;;9002226.02101,"2230,C81.35 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.36 ",.01)
 ;;C81.36 
 ;;9002226.02101,"2230,C81.36 ",.02)
 ;;C81.36 
 ;;9002226.02101,"2230,C81.36 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.37 ",.01)
 ;;C81.37 
 ;;9002226.02101,"2230,C81.37 ",.02)
 ;;C81.37 
 ;;9002226.02101,"2230,C81.37 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.38 ",.01)
 ;;C81.38 
 ;;9002226.02101,"2230,C81.38 ",.02)
 ;;C81.38 
 ;;9002226.02101,"2230,C81.38 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.39 ",.01)
 ;;C81.39 
 ;;9002226.02101,"2230,C81.39 ",.02)
 ;;C81.39 
 ;;9002226.02101,"2230,C81.39 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.40 ",.01)
 ;;C81.40 
 ;;9002226.02101,"2230,C81.40 ",.02)
 ;;C81.40 
 ;;9002226.02101,"2230,C81.40 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.41 ",.01)
 ;;C81.41 
 ;;9002226.02101,"2230,C81.41 ",.02)
 ;;C81.41 
 ;;9002226.02101,"2230,C81.41 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.42 ",.01)
 ;;C81.42 
 ;;9002226.02101,"2230,C81.42 ",.02)
 ;;C81.42 
 ;;9002226.02101,"2230,C81.42 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.43 ",.01)
 ;;C81.43 
 ;;9002226.02101,"2230,C81.43 ",.02)
 ;;C81.43 
 ;;9002226.02101,"2230,C81.43 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.44 ",.01)
 ;;C81.44 
 ;;9002226.02101,"2230,C81.44 ",.02)
 ;;C81.44 
 ;;9002226.02101,"2230,C81.44 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.45 ",.01)
 ;;C81.45 
 ;;9002226.02101,"2230,C81.45 ",.02)
 ;;C81.45 
 ;;9002226.02101,"2230,C81.45 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.46 ",.01)
 ;;C81.46 
 ;;9002226.02101,"2230,C81.46 ",.02)
 ;;C81.46 
 ;;9002226.02101,"2230,C81.46 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.47 ",.01)
 ;;C81.47 
 ;;9002226.02101,"2230,C81.47 ",.02)
 ;;C81.47 
 ;;9002226.02101,"2230,C81.47 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.48 ",.01)
 ;;C81.48 
 ;;9002226.02101,"2230,C81.48 ",.02)
 ;;C81.48 
 ;;9002226.02101,"2230,C81.48 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.49 ",.01)
 ;;C81.49 
 ;;9002226.02101,"2230,C81.49 ",.02)
 ;;C81.49 
 ;;9002226.02101,"2230,C81.49 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.70 ",.01)
 ;;C81.70 
 ;;9002226.02101,"2230,C81.70 ",.02)
 ;;C81.70 
 ;;9002226.02101,"2230,C81.70 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.71 ",.01)
 ;;C81.71 
 ;;9002226.02101,"2230,C81.71 ",.02)
 ;;C81.71 
 ;;9002226.02101,"2230,C81.71 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.72 ",.01)
 ;;C81.72 
 ;;9002226.02101,"2230,C81.72 ",.02)
 ;;C81.72 
 ;;9002226.02101,"2230,C81.72 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.73 ",.01)
 ;;C81.73 
 ;;9002226.02101,"2230,C81.73 ",.02)
 ;;C81.73 
 ;;9002226.02101,"2230,C81.73 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.74 ",.01)
 ;;C81.74 
 ;;9002226.02101,"2230,C81.74 ",.02)
 ;;C81.74 
 ;;9002226.02101,"2230,C81.74 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.75 ",.01)
 ;;C81.75 
 ;;9002226.02101,"2230,C81.75 ",.02)
 ;;C81.75 
 ;;9002226.02101,"2230,C81.75 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.76 ",.01)
 ;;C81.76 
 ;;9002226.02101,"2230,C81.76 ",.02)
 ;;C81.76 
 ;;9002226.02101,"2230,C81.76 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.77 ",.01)
 ;;C81.77 
 ;;9002226.02101,"2230,C81.77 ",.02)
 ;;C81.77 
 ;;9002226.02101,"2230,C81.77 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.78 ",.01)
 ;;C81.78 
 ;;9002226.02101,"2230,C81.78 ",.02)
 ;;C81.78 
 ;;9002226.02101,"2230,C81.78 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.79 ",.01)
 ;;C81.79 
 ;;9002226.02101,"2230,C81.79 ",.02)
 ;;C81.79 
 ;;9002226.02101,"2230,C81.79 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.90 ",.01)
 ;;C81.90 
 ;;9002226.02101,"2230,C81.90 ",.02)
 ;;C81.90 
 ;;9002226.02101,"2230,C81.90 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.91 ",.01)
 ;;C81.91 
 ;;9002226.02101,"2230,C81.91 ",.02)
 ;;C81.91 
 ;;9002226.02101,"2230,C81.91 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.92 ",.01)
 ;;C81.92 
 ;;9002226.02101,"2230,C81.92 ",.02)
 ;;C81.92 
 ;;9002226.02101,"2230,C81.92 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.93 ",.01)
 ;;C81.93 
 ;;9002226.02101,"2230,C81.93 ",.02)
 ;;C81.93 
 ;;9002226.02101,"2230,C81.93 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.94 ",.01)
 ;;C81.94 
 ;;9002226.02101,"2230,C81.94 ",.02)
 ;;C81.94 
 ;;9002226.02101,"2230,C81.94 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.95 ",.01)
 ;;C81.95 
 ;;9002226.02101,"2230,C81.95 ",.02)
 ;;C81.95 
 ;;9002226.02101,"2230,C81.95 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.96 ",.01)
 ;;C81.96 
 ;;9002226.02101,"2230,C81.96 ",.02)
 ;;C81.96 
 ;;9002226.02101,"2230,C81.96 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.97 ",.01)
 ;;C81.97 
 ;;9002226.02101,"2230,C81.97 ",.02)
 ;;C81.97 
 ;;9002226.02101,"2230,C81.97 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.98 ",.01)
 ;;C81.98 
 ;;9002226.02101,"2230,C81.98 ",.02)
 ;;C81.98 
 ;;9002226.02101,"2230,C81.98 ",.03)
 ;;30
 ;;9002226.02101,"2230,C81.99 ",.01)
 ;;C81.99 
 ;;9002226.02101,"2230,C81.99 ",.02)
 ;;C81.99 
 ;;9002226.02101,"2230,C81.99 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.00 ",.01)
 ;;C82.00 
 ;;9002226.02101,"2230,C82.00 ",.02)
 ;;C82.00 
 ;;9002226.02101,"2230,C82.00 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.01 ",.01)
 ;;C82.01 
 ;;9002226.02101,"2230,C82.01 ",.02)
 ;;C82.01 
 ;;9002226.02101,"2230,C82.01 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.02 ",.01)
 ;;C82.02 
 ;;9002226.02101,"2230,C82.02 ",.02)
 ;;C82.02 
 ;;9002226.02101,"2230,C82.02 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.03 ",.01)
 ;;C82.03 
 ;;9002226.02101,"2230,C82.03 ",.02)
 ;;C82.03 
 ;;9002226.02101,"2230,C82.03 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.04 ",.01)
 ;;C82.04 
 ;;9002226.02101,"2230,C82.04 ",.02)
 ;;C82.04 
 ;;9002226.02101,"2230,C82.04 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.05 ",.01)
 ;;C82.05 
 ;;9002226.02101,"2230,C82.05 ",.02)
 ;;C82.05 
 ;;9002226.02101,"2230,C82.05 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.06 ",.01)
 ;;C82.06 
 ;;9002226.02101,"2230,C82.06 ",.02)
 ;;C82.06 
 ;;9002226.02101,"2230,C82.06 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.07 ",.01)
 ;;C82.07 
 ;;9002226.02101,"2230,C82.07 ",.02)
 ;;C82.07 
 ;;9002226.02101,"2230,C82.07 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.08 ",.01)
 ;;C82.08 
 ;;9002226.02101,"2230,C82.08 ",.02)
 ;;C82.08 
 ;;9002226.02101,"2230,C82.08 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.09 ",.01)
 ;;C82.09 
 ;;9002226.02101,"2230,C82.09 ",.02)
 ;;C82.09 
 ;;9002226.02101,"2230,C82.09 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.10 ",.01)
 ;;C82.10 
 ;;9002226.02101,"2230,C82.10 ",.02)
 ;;C82.10 
 ;;9002226.02101,"2230,C82.10 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.11 ",.01)
 ;;C82.11 
 ;;9002226.02101,"2230,C82.11 ",.02)
 ;;C82.11 
 ;;9002226.02101,"2230,C82.11 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.12 ",.01)
 ;;C82.12 
 ;;9002226.02101,"2230,C82.12 ",.02)
 ;;C82.12 
 ;;9002226.02101,"2230,C82.12 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.13 ",.01)
 ;;C82.13 
 ;;9002226.02101,"2230,C82.13 ",.02)
 ;;C82.13 
 ;;9002226.02101,"2230,C82.13 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.14 ",.01)
 ;;C82.14 
 ;;9002226.02101,"2230,C82.14 ",.02)
 ;;C82.14 
 ;;9002226.02101,"2230,C82.14 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.15 ",.01)
 ;;C82.15 
 ;;9002226.02101,"2230,C82.15 ",.02)
 ;;C82.15 
 ;;9002226.02101,"2230,C82.15 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.16 ",.01)
 ;;C82.16 
 ;;9002226.02101,"2230,C82.16 ",.02)
 ;;C82.16 
 ;;9002226.02101,"2230,C82.16 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.17 ",.01)
 ;;C82.17 
 ;;9002226.02101,"2230,C82.17 ",.02)
 ;;C82.17 
 ;;9002226.02101,"2230,C82.17 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.18 ",.01)
 ;;C82.18 
 ;;9002226.02101,"2230,C82.18 ",.02)
 ;;C82.18 
 ;;9002226.02101,"2230,C82.18 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.19 ",.01)
 ;;C82.19 
 ;;9002226.02101,"2230,C82.19 ",.02)
 ;;C82.19 
 ;;9002226.02101,"2230,C82.19 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.20 ",.01)
 ;;C82.20 
 ;;9002226.02101,"2230,C82.20 ",.02)
 ;;C82.20 
 ;;9002226.02101,"2230,C82.20 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.21 ",.01)
 ;;C82.21 
 ;;9002226.02101,"2230,C82.21 ",.02)
 ;;C82.21 
 ;;9002226.02101,"2230,C82.21 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.22 ",.01)
 ;;C82.22 
 ;;9002226.02101,"2230,C82.22 ",.02)
 ;;C82.22 
 ;;9002226.02101,"2230,C82.22 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.23 ",.01)
 ;;C82.23 
 ;;9002226.02101,"2230,C82.23 ",.02)
 ;;C82.23 
 ;;9002226.02101,"2230,C82.23 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.24 ",.01)
 ;;C82.24 
 ;;9002226.02101,"2230,C82.24 ",.02)
 ;;C82.24 
 ;;9002226.02101,"2230,C82.24 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.25 ",.01)
 ;;C82.25 
 ;;9002226.02101,"2230,C82.25 ",.02)
 ;;C82.25 
 ;;9002226.02101,"2230,C82.25 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.26 ",.01)
 ;;C82.26 
 ;;9002226.02101,"2230,C82.26 ",.02)
 ;;C82.26 
 ;;9002226.02101,"2230,C82.26 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.27 ",.01)
 ;;C82.27 
 ;;9002226.02101,"2230,C82.27 ",.02)
 ;;C82.27 
 ;;9002226.02101,"2230,C82.27 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.28 ",.01)
 ;;C82.28 
 ;;9002226.02101,"2230,C82.28 ",.02)
 ;;C82.28 
 ;;9002226.02101,"2230,C82.28 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.29 ",.01)
 ;;C82.29 
 ;;9002226.02101,"2230,C82.29 ",.02)
 ;;C82.29 
 ;;9002226.02101,"2230,C82.29 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.30 ",.01)
 ;;C82.30 
 ;;9002226.02101,"2230,C82.30 ",.02)
 ;;C82.30 
 ;;9002226.02101,"2230,C82.30 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.31 ",.01)
 ;;C82.31 
 ;;9002226.02101,"2230,C82.31 ",.02)
 ;;C82.31 
 ;;9002226.02101,"2230,C82.31 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.32 ",.01)
 ;;C82.32 
 ;;9002226.02101,"2230,C82.32 ",.02)
 ;;C82.32 
 ;;9002226.02101,"2230,C82.32 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.33 ",.01)
 ;;C82.33 
 ;;9002226.02101,"2230,C82.33 ",.02)
 ;;C82.33 
 ;;9002226.02101,"2230,C82.33 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.34 ",.01)
 ;;C82.34 
 ;;9002226.02101,"2230,C82.34 ",.02)
 ;;C82.34 
 ;;9002226.02101,"2230,C82.34 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.35 ",.01)
 ;;C82.35 
 ;;9002226.02101,"2230,C82.35 ",.02)
 ;;C82.35 
 ;;9002226.02101,"2230,C82.35 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.36 ",.01)
 ;;C82.36 
 ;;9002226.02101,"2230,C82.36 ",.02)
 ;;C82.36 
 ;;9002226.02101,"2230,C82.36 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.37 ",.01)
 ;;C82.37 
 ;;9002226.02101,"2230,C82.37 ",.02)
 ;;C82.37 
 ;;9002226.02101,"2230,C82.37 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.38 ",.01)
 ;;C82.38 
 ;;9002226.02101,"2230,C82.38 ",.02)
 ;;C82.38 
 ;;9002226.02101,"2230,C82.38 ",.03)
 ;;30
 ;;9002226.02101,"2230,C82.39 ",.01)
 ;;C82.39