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

ATXXB186.m

Go to the documentation of this file.
ATXXB186 ;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)
 ;;9002226.02101,"1804,B5121ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5121ZZ ",.01)
 ;;B5121ZZ 
 ;;9002226.02101,"1804,B5121ZZ ",.02)
 ;;B5121ZZ 
 ;;9002226.02101,"1804,B5121ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B512YZA ",.01)
 ;;B512YZA 
 ;;9002226.02101,"1804,B512YZA ",.02)
 ;;B512YZA 
 ;;9002226.02101,"1804,B512YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B512YZZ ",.01)
 ;;B512YZZ 
 ;;9002226.02101,"1804,B512YZZ ",.02)
 ;;B512YZZ 
 ;;9002226.02101,"1804,B512YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B512ZZA ",.01)
 ;;B512ZZA 
 ;;9002226.02101,"1804,B512ZZA ",.02)
 ;;B512ZZA 
 ;;9002226.02101,"1804,B512ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B512ZZZ ",.01)
 ;;B512ZZZ 
 ;;9002226.02101,"1804,B512ZZZ ",.02)
 ;;B512ZZZ 
 ;;9002226.02101,"1804,B512ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5130ZA ",.01)
 ;;B5130ZA 
 ;;9002226.02101,"1804,B5130ZA ",.02)
 ;;B5130ZA 
 ;;9002226.02101,"1804,B5130ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5130ZZ ",.01)
 ;;B5130ZZ 
 ;;9002226.02101,"1804,B5130ZZ ",.02)
 ;;B5130ZZ 
 ;;9002226.02101,"1804,B5130ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5131ZA ",.01)
 ;;B5131ZA 
 ;;9002226.02101,"1804,B5131ZA ",.02)
 ;;B5131ZA 
 ;;9002226.02101,"1804,B5131ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5131ZZ ",.01)
 ;;B5131ZZ 
 ;;9002226.02101,"1804,B5131ZZ ",.02)
 ;;B5131ZZ 
 ;;9002226.02101,"1804,B5131ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B513YZA ",.01)
 ;;B513YZA 
 ;;9002226.02101,"1804,B513YZA ",.02)
 ;;B513YZA 
 ;;9002226.02101,"1804,B513YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B513YZZ ",.01)
 ;;B513YZZ 
 ;;9002226.02101,"1804,B513YZZ ",.02)
 ;;B513YZZ 
 ;;9002226.02101,"1804,B513YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B513ZZA ",.01)
 ;;B513ZZA 
 ;;9002226.02101,"1804,B513ZZA ",.02)
 ;;B513ZZA 
 ;;9002226.02101,"1804,B513ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B513ZZZ ",.01)
 ;;B513ZZZ 
 ;;9002226.02101,"1804,B513ZZZ ",.02)
 ;;B513ZZZ 
 ;;9002226.02101,"1804,B513ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5140ZA ",.01)
 ;;B5140ZA 
 ;;9002226.02101,"1804,B5140ZA ",.02)
 ;;B5140ZA 
 ;;9002226.02101,"1804,B5140ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5140ZZ ",.01)
 ;;B5140ZZ 
 ;;9002226.02101,"1804,B5140ZZ ",.02)
 ;;B5140ZZ 
 ;;9002226.02101,"1804,B5140ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5141ZA ",.01)
 ;;B5141ZA 
 ;;9002226.02101,"1804,B5141ZA ",.02)
 ;;B5141ZA 
 ;;9002226.02101,"1804,B5141ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5141ZZ ",.01)
 ;;B5141ZZ 
 ;;9002226.02101,"1804,B5141ZZ ",.02)
 ;;B5141ZZ 
 ;;9002226.02101,"1804,B5141ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B514YZA ",.01)
 ;;B514YZA 
 ;;9002226.02101,"1804,B514YZA ",.02)
 ;;B514YZA 
 ;;9002226.02101,"1804,B514YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B514YZZ ",.01)
 ;;B514YZZ 
 ;;9002226.02101,"1804,B514YZZ ",.02)
 ;;B514YZZ 
 ;;9002226.02101,"1804,B514YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B514ZZA ",.01)
 ;;B514ZZA 
 ;;9002226.02101,"1804,B514ZZA ",.02)
 ;;B514ZZA 
 ;;9002226.02101,"1804,B514ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B514ZZZ ",.01)
 ;;B514ZZZ 
 ;;9002226.02101,"1804,B514ZZZ ",.02)
 ;;B514ZZZ 
 ;;9002226.02101,"1804,B514ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5150ZA ",.01)
 ;;B5150ZA 
 ;;9002226.02101,"1804,B5150ZA ",.02)
 ;;B5150ZA 
 ;;9002226.02101,"1804,B5150ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5150ZZ ",.01)
 ;;B5150ZZ 
 ;;9002226.02101,"1804,B5150ZZ ",.02)
 ;;B5150ZZ 
 ;;9002226.02101,"1804,B5150ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5151ZA ",.01)
 ;;B5151ZA 
 ;;9002226.02101,"1804,B5151ZA ",.02)
 ;;B5151ZA 
 ;;9002226.02101,"1804,B5151ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5151ZZ ",.01)
 ;;B5151ZZ 
 ;;9002226.02101,"1804,B5151ZZ ",.02)
 ;;B5151ZZ 
 ;;9002226.02101,"1804,B5151ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B515YZA ",.01)
 ;;B515YZA 
 ;;9002226.02101,"1804,B515YZA ",.02)
 ;;B515YZA 
 ;;9002226.02101,"1804,B515YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B515YZZ ",.01)
 ;;B515YZZ 
 ;;9002226.02101,"1804,B515YZZ ",.02)
 ;;B515YZZ 
 ;;9002226.02101,"1804,B515YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B515ZZA ",.01)
 ;;B515ZZA 
 ;;9002226.02101,"1804,B515ZZA ",.02)
 ;;B515ZZA 
 ;;9002226.02101,"1804,B515ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B515ZZZ ",.01)
 ;;B515ZZZ 
 ;;9002226.02101,"1804,B515ZZZ ",.02)
 ;;B515ZZZ 
 ;;9002226.02101,"1804,B515ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5160ZA ",.01)
 ;;B5160ZA 
 ;;9002226.02101,"1804,B5160ZA ",.02)
 ;;B5160ZA 
 ;;9002226.02101,"1804,B5160ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5160ZZ ",.01)
 ;;B5160ZZ 
 ;;9002226.02101,"1804,B5160ZZ ",.02)
 ;;B5160ZZ 
 ;;9002226.02101,"1804,B5160ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5161ZA ",.01)
 ;;B5161ZA 
 ;;9002226.02101,"1804,B5161ZA ",.02)
 ;;B5161ZA 
 ;;9002226.02101,"1804,B5161ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5161ZZ ",.01)
 ;;B5161ZZ 
 ;;9002226.02101,"1804,B5161ZZ ",.02)
 ;;B5161ZZ 
 ;;9002226.02101,"1804,B5161ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B516YZA ",.01)
 ;;B516YZA 
 ;;9002226.02101,"1804,B516YZA ",.02)
 ;;B516YZA 
 ;;9002226.02101,"1804,B516YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B516YZZ ",.01)
 ;;B516YZZ 
 ;;9002226.02101,"1804,B516YZZ ",.02)
 ;;B516YZZ 
 ;;9002226.02101,"1804,B516YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B516ZZA ",.01)
 ;;B516ZZA 
 ;;9002226.02101,"1804,B516ZZA ",.02)
 ;;B516ZZA 
 ;;9002226.02101,"1804,B516ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B516ZZZ ",.01)
 ;;B516ZZZ 
 ;;9002226.02101,"1804,B516ZZZ ",.02)
 ;;B516ZZZ 
 ;;9002226.02101,"1804,B516ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5170ZA ",.01)
 ;;B5170ZA 
 ;;9002226.02101,"1804,B5170ZA ",.02)
 ;;B5170ZA 
 ;;9002226.02101,"1804,B5170ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5170ZZ ",.01)
 ;;B5170ZZ 
 ;;9002226.02101,"1804,B5170ZZ ",.02)
 ;;B5170ZZ 
 ;;9002226.02101,"1804,B5170ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5171ZA ",.01)
 ;;B5171ZA 
 ;;9002226.02101,"1804,B5171ZA ",.02)
 ;;B5171ZA 
 ;;9002226.02101,"1804,B5171ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5171ZZ ",.01)
 ;;B5171ZZ 
 ;;9002226.02101,"1804,B5171ZZ ",.02)
 ;;B5171ZZ 
 ;;9002226.02101,"1804,B5171ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B517YZA ",.01)
 ;;B517YZA 
 ;;9002226.02101,"1804,B517YZA ",.02)
 ;;B517YZA 
 ;;9002226.02101,"1804,B517YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B517YZZ ",.01)
 ;;B517YZZ 
 ;;9002226.02101,"1804,B517YZZ ",.02)
 ;;B517YZZ 
 ;;9002226.02101,"1804,B517YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B517ZZA ",.01)
 ;;B517ZZA 
 ;;9002226.02101,"1804,B517ZZA ",.02)
 ;;B517ZZA 
 ;;9002226.02101,"1804,B517ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B517ZZZ ",.01)
 ;;B517ZZZ 
 ;;9002226.02101,"1804,B517ZZZ ",.02)
 ;;B517ZZZ 
 ;;9002226.02101,"1804,B517ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5180ZA ",.01)
 ;;B5180ZA 
 ;;9002226.02101,"1804,B5180ZA ",.02)
 ;;B5180ZA 
 ;;9002226.02101,"1804,B5180ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5180ZZ ",.01)
 ;;B5180ZZ 
 ;;9002226.02101,"1804,B5180ZZ ",.02)
 ;;B5180ZZ 
 ;;9002226.02101,"1804,B5180ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5181ZA ",.01)
 ;;B5181ZA 
 ;;9002226.02101,"1804,B5181ZA ",.02)
 ;;B5181ZA 
 ;;9002226.02101,"1804,B5181ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5181ZZ ",.01)
 ;;B5181ZZ 
 ;;9002226.02101,"1804,B5181ZZ ",.02)
 ;;B5181ZZ 
 ;;9002226.02101,"1804,B5181ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B518YZA ",.01)
 ;;B518YZA 
 ;;9002226.02101,"1804,B518YZA ",.02)
 ;;B518YZA 
 ;;9002226.02101,"1804,B518YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B518YZZ ",.01)
 ;;B518YZZ 
 ;;9002226.02101,"1804,B518YZZ ",.02)
 ;;B518YZZ 
 ;;9002226.02101,"1804,B518YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B518ZZA ",.01)
 ;;B518ZZA 
 ;;9002226.02101,"1804,B518ZZA ",.02)
 ;;B518ZZA 
 ;;9002226.02101,"1804,B518ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B518ZZZ ",.01)
 ;;B518ZZZ 
 ;;9002226.02101,"1804,B518ZZZ ",.02)
 ;;B518ZZZ 
 ;;9002226.02101,"1804,B518ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5190ZA ",.01)
 ;;B5190ZA 
 ;;9002226.02101,"1804,B5190ZA ",.02)
 ;;B5190ZA 
 ;;9002226.02101,"1804,B5190ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5190ZZ ",.01)
 ;;B5190ZZ 
 ;;9002226.02101,"1804,B5190ZZ ",.02)
 ;;B5190ZZ 
 ;;9002226.02101,"1804,B5190ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B5191ZA ",.01)
 ;;B5191ZA 
 ;;9002226.02101,"1804,B5191ZA ",.02)
 ;;B5191ZA 
 ;;9002226.02101,"1804,B5191ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B5191ZZ ",.01)
 ;;B5191ZZ 
 ;;9002226.02101,"1804,B5191ZZ ",.02)
 ;;B5191ZZ 
 ;;9002226.02101,"1804,B5191ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B519YZA ",.01)
 ;;B519YZA 
 ;;9002226.02101,"1804,B519YZA ",.02)
 ;;B519YZA 
 ;;9002226.02101,"1804,B519YZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B519YZZ ",.01)
 ;;B519YZZ 
 ;;9002226.02101,"1804,B519YZZ ",.02)
 ;;B519YZZ 
 ;;9002226.02101,"1804,B519YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B519ZZA ",.01)
 ;;B519ZZA 
 ;;9002226.02101,"1804,B519ZZA ",.02)
 ;;B519ZZA 
 ;;9002226.02101,"1804,B519ZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B519ZZZ ",.01)
 ;;B519ZZZ 
 ;;9002226.02101,"1804,B519ZZZ ",.02)
 ;;B519ZZZ 
 ;;9002226.02101,"1804,B519ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51B0ZA ",.01)
 ;;B51B0ZA 
 ;;9002226.02101,"1804,B51B0ZA ",.02)
 ;;B51B0ZA 
 ;;9002226.02101,"1804,B51B0ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51B0ZZ ",.01)
 ;;B51B0ZZ 
 ;;9002226.02101,"1804,B51B0ZZ ",.02)
 ;;B51B0ZZ 
 ;;9002226.02101,"1804,B51B0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51B1ZA ",.01)
 ;;B51B1ZA 
 ;;9002226.02101,"1804,B51B1ZA ",.02)
 ;;B51B1ZA 
 ;;9002226.02101,"1804,B51B1ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51B1ZZ ",.01)
 ;;B51B1ZZ 
 ;;9002226.02101,"1804,B51B1ZZ ",.02)
 ;;B51B1ZZ 
 ;;9002226.02101,"1804,B51B1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51BYZA ",.01)
 ;;B51BYZA 
 ;;9002226.02101,"1804,B51BYZA ",.02)
 ;;B51BYZA 
 ;;9002226.02101,"1804,B51BYZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51BYZZ ",.01)
 ;;B51BYZZ 
 ;;9002226.02101,"1804,B51BYZZ ",.02)
 ;;B51BYZZ 
 ;;9002226.02101,"1804,B51BYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51BZZA ",.01)
 ;;B51BZZA 
 ;;9002226.02101,"1804,B51BZZA ",.02)
 ;;B51BZZA 
 ;;9002226.02101,"1804,B51BZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51BZZZ ",.01)
 ;;B51BZZZ 
 ;;9002226.02101,"1804,B51BZZZ ",.02)
 ;;B51BZZZ 
 ;;9002226.02101,"1804,B51BZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51C0ZA ",.01)
 ;;B51C0ZA 
 ;;9002226.02101,"1804,B51C0ZA ",.02)
 ;;B51C0ZA 
 ;;9002226.02101,"1804,B51C0ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51C0ZZ ",.01)
 ;;B51C0ZZ 
 ;;9002226.02101,"1804,B51C0ZZ ",.02)
 ;;B51C0ZZ 
 ;;9002226.02101,"1804,B51C0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51C1ZA ",.01)
 ;;B51C1ZA 
 ;;9002226.02101,"1804,B51C1ZA ",.02)
 ;;B51C1ZA 
 ;;9002226.02101,"1804,B51C1ZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51C1ZZ ",.01)
 ;;B51C1ZZ 
 ;;9002226.02101,"1804,B51C1ZZ ",.02)
 ;;B51C1ZZ 
 ;;9002226.02101,"1804,B51C1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51CYZA ",.01)
 ;;B51CYZA 
 ;;9002226.02101,"1804,B51CYZA ",.02)
 ;;B51CYZA 
 ;;9002226.02101,"1804,B51CYZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51CYZZ ",.01)
 ;;B51CYZZ 
 ;;9002226.02101,"1804,B51CYZZ ",.02)
 ;;B51CYZZ 
 ;;9002226.02101,"1804,B51CYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51CZZA ",.01)
 ;;B51CZZA 
 ;;9002226.02101,"1804,B51CZZA ",.02)
 ;;B51CZZA 
 ;;9002226.02101,"1804,B51CZZA ",.03)
 ;;31
 ;;9002226.02101,"1804,B51CZZZ ",.01)
 ;;B51CZZZ 
 ;;9002226.02101,"1804,B51CZZZ ",.02)
 ;;B51CZZZ 
 ;;9002226.02101,"1804,B51CZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B51D0ZA ",.01)
 ;;B51D0ZA 
 ;;9002226.02101,"1804,B51D0ZA ",.02)
 ;;B51D0ZA 
 ;;9002226.02101,"1804,B51D0ZA ",.03)
 ;;31