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

ATXXB150.m

Go to the documentation of this file.
ATXXB150 ;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,2W0CX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0CX5Z ",.01)
 ;;2W0CX5Z 
 ;;9002226.02101,"1804,2W0CX5Z ",.02)
 ;;2W0CX5Z 
 ;;9002226.02101,"1804,2W0CX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0CX6Z ",.01)
 ;;2W0CX6Z 
 ;;9002226.02101,"1804,2W0CX6Z ",.02)
 ;;2W0CX6Z 
 ;;9002226.02101,"1804,2W0CX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0CX7Z ",.01)
 ;;2W0CX7Z 
 ;;9002226.02101,"1804,2W0CX7Z ",.02)
 ;;2W0CX7Z 
 ;;9002226.02101,"1804,2W0CX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0CXYZ ",.01)
 ;;2W0CXYZ 
 ;;9002226.02101,"1804,2W0CXYZ ",.02)
 ;;2W0CXYZ 
 ;;9002226.02101,"1804,2W0CXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX0Z ",.01)
 ;;2W0DX0Z 
 ;;9002226.02101,"1804,2W0DX0Z ",.02)
 ;;2W0DX0Z 
 ;;9002226.02101,"1804,2W0DX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX1Z ",.01)
 ;;2W0DX1Z 
 ;;9002226.02101,"1804,2W0DX1Z ",.02)
 ;;2W0DX1Z 
 ;;9002226.02101,"1804,2W0DX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX2Z ",.01)
 ;;2W0DX2Z 
 ;;9002226.02101,"1804,2W0DX2Z ",.02)
 ;;2W0DX2Z 
 ;;9002226.02101,"1804,2W0DX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX3Z ",.01)
 ;;2W0DX3Z 
 ;;9002226.02101,"1804,2W0DX3Z ",.02)
 ;;2W0DX3Z 
 ;;9002226.02101,"1804,2W0DX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX4Z ",.01)
 ;;2W0DX4Z 
 ;;9002226.02101,"1804,2W0DX4Z ",.02)
 ;;2W0DX4Z 
 ;;9002226.02101,"1804,2W0DX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX5Z ",.01)
 ;;2W0DX5Z 
 ;;9002226.02101,"1804,2W0DX5Z ",.02)
 ;;2W0DX5Z 
 ;;9002226.02101,"1804,2W0DX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX6Z ",.01)
 ;;2W0DX6Z 
 ;;9002226.02101,"1804,2W0DX6Z ",.02)
 ;;2W0DX6Z 
 ;;9002226.02101,"1804,2W0DX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DX7Z ",.01)
 ;;2W0DX7Z 
 ;;9002226.02101,"1804,2W0DX7Z ",.02)
 ;;2W0DX7Z 
 ;;9002226.02101,"1804,2W0DX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0DXYZ ",.01)
 ;;2W0DXYZ 
 ;;9002226.02101,"1804,2W0DXYZ ",.02)
 ;;2W0DXYZ 
 ;;9002226.02101,"1804,2W0DXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX0Z ",.01)
 ;;2W0EX0Z 
 ;;9002226.02101,"1804,2W0EX0Z ",.02)
 ;;2W0EX0Z 
 ;;9002226.02101,"1804,2W0EX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX1Z ",.01)
 ;;2W0EX1Z 
 ;;9002226.02101,"1804,2W0EX1Z ",.02)
 ;;2W0EX1Z 
 ;;9002226.02101,"1804,2W0EX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX2Z ",.01)
 ;;2W0EX2Z 
 ;;9002226.02101,"1804,2W0EX2Z ",.02)
 ;;2W0EX2Z 
 ;;9002226.02101,"1804,2W0EX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX3Z ",.01)
 ;;2W0EX3Z 
 ;;9002226.02101,"1804,2W0EX3Z ",.02)
 ;;2W0EX3Z 
 ;;9002226.02101,"1804,2W0EX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX4Z ",.01)
 ;;2W0EX4Z 
 ;;9002226.02101,"1804,2W0EX4Z ",.02)
 ;;2W0EX4Z 
 ;;9002226.02101,"1804,2W0EX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX5Z ",.01)
 ;;2W0EX5Z 
 ;;9002226.02101,"1804,2W0EX5Z ",.02)
 ;;2W0EX5Z 
 ;;9002226.02101,"1804,2W0EX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX6Z ",.01)
 ;;2W0EX6Z 
 ;;9002226.02101,"1804,2W0EX6Z ",.02)
 ;;2W0EX6Z 
 ;;9002226.02101,"1804,2W0EX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EX7Z ",.01)
 ;;2W0EX7Z 
 ;;9002226.02101,"1804,2W0EX7Z ",.02)
 ;;2W0EX7Z 
 ;;9002226.02101,"1804,2W0EX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0EXYZ ",.01)
 ;;2W0EXYZ 
 ;;9002226.02101,"1804,2W0EXYZ ",.02)
 ;;2W0EXYZ 
 ;;9002226.02101,"1804,2W0EXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX0Z ",.01)
 ;;2W0FX0Z 
 ;;9002226.02101,"1804,2W0FX0Z ",.02)
 ;;2W0FX0Z 
 ;;9002226.02101,"1804,2W0FX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX1Z ",.01)
 ;;2W0FX1Z 
 ;;9002226.02101,"1804,2W0FX1Z ",.02)
 ;;2W0FX1Z 
 ;;9002226.02101,"1804,2W0FX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX2Z ",.01)
 ;;2W0FX2Z 
 ;;9002226.02101,"1804,2W0FX2Z ",.02)
 ;;2W0FX2Z 
 ;;9002226.02101,"1804,2W0FX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX3Z ",.01)
 ;;2W0FX3Z 
 ;;9002226.02101,"1804,2W0FX3Z ",.02)
 ;;2W0FX3Z 
 ;;9002226.02101,"1804,2W0FX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX4Z ",.01)
 ;;2W0FX4Z 
 ;;9002226.02101,"1804,2W0FX4Z ",.02)
 ;;2W0FX4Z 
 ;;9002226.02101,"1804,2W0FX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX5Z ",.01)
 ;;2W0FX5Z 
 ;;9002226.02101,"1804,2W0FX5Z ",.02)
 ;;2W0FX5Z 
 ;;9002226.02101,"1804,2W0FX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX6Z ",.01)
 ;;2W0FX6Z 
 ;;9002226.02101,"1804,2W0FX6Z ",.02)
 ;;2W0FX6Z 
 ;;9002226.02101,"1804,2W0FX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FX7Z ",.01)
 ;;2W0FX7Z 
 ;;9002226.02101,"1804,2W0FX7Z ",.02)
 ;;2W0FX7Z 
 ;;9002226.02101,"1804,2W0FX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0FXYZ ",.01)
 ;;2W0FXYZ 
 ;;9002226.02101,"1804,2W0FXYZ ",.02)
 ;;2W0FXYZ 
 ;;9002226.02101,"1804,2W0FXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX0Z ",.01)
 ;;2W0GX0Z 
 ;;9002226.02101,"1804,2W0GX0Z ",.02)
 ;;2W0GX0Z 
 ;;9002226.02101,"1804,2W0GX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX1Z ",.01)
 ;;2W0GX1Z 
 ;;9002226.02101,"1804,2W0GX1Z ",.02)
 ;;2W0GX1Z 
 ;;9002226.02101,"1804,2W0GX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX2Z ",.01)
 ;;2W0GX2Z 
 ;;9002226.02101,"1804,2W0GX2Z ",.02)
 ;;2W0GX2Z 
 ;;9002226.02101,"1804,2W0GX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX3Z ",.01)
 ;;2W0GX3Z 
 ;;9002226.02101,"1804,2W0GX3Z ",.02)
 ;;2W0GX3Z 
 ;;9002226.02101,"1804,2W0GX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX4Z ",.01)
 ;;2W0GX4Z 
 ;;9002226.02101,"1804,2W0GX4Z ",.02)
 ;;2W0GX4Z 
 ;;9002226.02101,"1804,2W0GX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX5Z ",.01)
 ;;2W0GX5Z 
 ;;9002226.02101,"1804,2W0GX5Z ",.02)
 ;;2W0GX5Z 
 ;;9002226.02101,"1804,2W0GX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX6Z ",.01)
 ;;2W0GX6Z 
 ;;9002226.02101,"1804,2W0GX6Z ",.02)
 ;;2W0GX6Z 
 ;;9002226.02101,"1804,2W0GX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GX7Z ",.01)
 ;;2W0GX7Z 
 ;;9002226.02101,"1804,2W0GX7Z ",.02)
 ;;2W0GX7Z 
 ;;9002226.02101,"1804,2W0GX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0GXYZ ",.01)
 ;;2W0GXYZ 
 ;;9002226.02101,"1804,2W0GXYZ ",.02)
 ;;2W0GXYZ 
 ;;9002226.02101,"1804,2W0GXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX0Z ",.01)
 ;;2W0HX0Z 
 ;;9002226.02101,"1804,2W0HX0Z ",.02)
 ;;2W0HX0Z 
 ;;9002226.02101,"1804,2W0HX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX1Z ",.01)
 ;;2W0HX1Z 
 ;;9002226.02101,"1804,2W0HX1Z ",.02)
 ;;2W0HX1Z 
 ;;9002226.02101,"1804,2W0HX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX2Z ",.01)
 ;;2W0HX2Z 
 ;;9002226.02101,"1804,2W0HX2Z ",.02)
 ;;2W0HX2Z 
 ;;9002226.02101,"1804,2W0HX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX3Z ",.01)
 ;;2W0HX3Z 
 ;;9002226.02101,"1804,2W0HX3Z ",.02)
 ;;2W0HX3Z 
 ;;9002226.02101,"1804,2W0HX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX4Z ",.01)
 ;;2W0HX4Z 
 ;;9002226.02101,"1804,2W0HX4Z ",.02)
 ;;2W0HX4Z 
 ;;9002226.02101,"1804,2W0HX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX5Z ",.01)
 ;;2W0HX5Z 
 ;;9002226.02101,"1804,2W0HX5Z ",.02)
 ;;2W0HX5Z 
 ;;9002226.02101,"1804,2W0HX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX6Z ",.01)
 ;;2W0HX6Z 
 ;;9002226.02101,"1804,2W0HX6Z ",.02)
 ;;2W0HX6Z 
 ;;9002226.02101,"1804,2W0HX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HX7Z ",.01)
 ;;2W0HX7Z 
 ;;9002226.02101,"1804,2W0HX7Z ",.02)
 ;;2W0HX7Z 
 ;;9002226.02101,"1804,2W0HX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0HXYZ ",.01)
 ;;2W0HXYZ 
 ;;9002226.02101,"1804,2W0HXYZ ",.02)
 ;;2W0HXYZ 
 ;;9002226.02101,"1804,2W0HXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX0Z ",.01)
 ;;2W0JX0Z 
 ;;9002226.02101,"1804,2W0JX0Z ",.02)
 ;;2W0JX0Z 
 ;;9002226.02101,"1804,2W0JX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX1Z ",.01)
 ;;2W0JX1Z 
 ;;9002226.02101,"1804,2W0JX1Z ",.02)
 ;;2W0JX1Z 
 ;;9002226.02101,"1804,2W0JX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX2Z ",.01)
 ;;2W0JX2Z 
 ;;9002226.02101,"1804,2W0JX2Z ",.02)
 ;;2W0JX2Z 
 ;;9002226.02101,"1804,2W0JX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX3Z ",.01)
 ;;2W0JX3Z 
 ;;9002226.02101,"1804,2W0JX3Z ",.02)
 ;;2W0JX3Z 
 ;;9002226.02101,"1804,2W0JX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX4Z ",.01)
 ;;2W0JX4Z 
 ;;9002226.02101,"1804,2W0JX4Z ",.02)
 ;;2W0JX4Z 
 ;;9002226.02101,"1804,2W0JX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX5Z ",.01)
 ;;2W0JX5Z 
 ;;9002226.02101,"1804,2W0JX5Z ",.02)
 ;;2W0JX5Z 
 ;;9002226.02101,"1804,2W0JX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX6Z ",.01)
 ;;2W0JX6Z 
 ;;9002226.02101,"1804,2W0JX6Z ",.02)
 ;;2W0JX6Z 
 ;;9002226.02101,"1804,2W0JX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JX7Z ",.01)
 ;;2W0JX7Z 
 ;;9002226.02101,"1804,2W0JX7Z ",.02)
 ;;2W0JX7Z 
 ;;9002226.02101,"1804,2W0JX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0JXYZ ",.01)
 ;;2W0JXYZ 
 ;;9002226.02101,"1804,2W0JXYZ ",.02)
 ;;2W0JXYZ 
 ;;9002226.02101,"1804,2W0JXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX0Z ",.01)
 ;;2W0KX0Z 
 ;;9002226.02101,"1804,2W0KX0Z ",.02)
 ;;2W0KX0Z 
 ;;9002226.02101,"1804,2W0KX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX1Z ",.01)
 ;;2W0KX1Z 
 ;;9002226.02101,"1804,2W0KX1Z ",.02)
 ;;2W0KX1Z 
 ;;9002226.02101,"1804,2W0KX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX2Z ",.01)
 ;;2W0KX2Z 
 ;;9002226.02101,"1804,2W0KX2Z ",.02)
 ;;2W0KX2Z 
 ;;9002226.02101,"1804,2W0KX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX3Z ",.01)
 ;;2W0KX3Z 
 ;;9002226.02101,"1804,2W0KX3Z ",.02)
 ;;2W0KX3Z 
 ;;9002226.02101,"1804,2W0KX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX4Z ",.01)
 ;;2W0KX4Z 
 ;;9002226.02101,"1804,2W0KX4Z ",.02)
 ;;2W0KX4Z 
 ;;9002226.02101,"1804,2W0KX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX5Z ",.01)
 ;;2W0KX5Z 
 ;;9002226.02101,"1804,2W0KX5Z ",.02)
 ;;2W0KX5Z 
 ;;9002226.02101,"1804,2W0KX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX6Z ",.01)
 ;;2W0KX6Z 
 ;;9002226.02101,"1804,2W0KX6Z ",.02)
 ;;2W0KX6Z 
 ;;9002226.02101,"1804,2W0KX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KX7Z ",.01)
 ;;2W0KX7Z 
 ;;9002226.02101,"1804,2W0KX7Z ",.02)
 ;;2W0KX7Z 
 ;;9002226.02101,"1804,2W0KX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0KXYZ ",.01)
 ;;2W0KXYZ 
 ;;9002226.02101,"1804,2W0KXYZ ",.02)
 ;;2W0KXYZ 
 ;;9002226.02101,"1804,2W0KXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX0Z ",.01)
 ;;2W0LX0Z 
 ;;9002226.02101,"1804,2W0LX0Z ",.02)
 ;;2W0LX0Z 
 ;;9002226.02101,"1804,2W0LX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX1Z ",.01)
 ;;2W0LX1Z 
 ;;9002226.02101,"1804,2W0LX1Z ",.02)
 ;;2W0LX1Z 
 ;;9002226.02101,"1804,2W0LX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX2Z ",.01)
 ;;2W0LX2Z 
 ;;9002226.02101,"1804,2W0LX2Z ",.02)
 ;;2W0LX2Z 
 ;;9002226.02101,"1804,2W0LX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX3Z ",.01)
 ;;2W0LX3Z 
 ;;9002226.02101,"1804,2W0LX3Z ",.02)
 ;;2W0LX3Z 
 ;;9002226.02101,"1804,2W0LX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX4Z ",.01)
 ;;2W0LX4Z 
 ;;9002226.02101,"1804,2W0LX4Z ",.02)
 ;;2W0LX4Z 
 ;;9002226.02101,"1804,2W0LX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX5Z ",.01)
 ;;2W0LX5Z 
 ;;9002226.02101,"1804,2W0LX5Z ",.02)
 ;;2W0LX5Z 
 ;;9002226.02101,"1804,2W0LX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX6Z ",.01)
 ;;2W0LX6Z 
 ;;9002226.02101,"1804,2W0LX6Z ",.02)
 ;;2W0LX6Z 
 ;;9002226.02101,"1804,2W0LX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LX7Z ",.01)
 ;;2W0LX7Z 
 ;;9002226.02101,"1804,2W0LX7Z ",.02)
 ;;2W0LX7Z 
 ;;9002226.02101,"1804,2W0LX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0LXYZ ",.01)
 ;;2W0LXYZ 
 ;;9002226.02101,"1804,2W0LXYZ ",.02)
 ;;2W0LXYZ 
 ;;9002226.02101,"1804,2W0LXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0MX0Z ",.01)
 ;;2W0MX0Z 
 ;;9002226.02101,"1804,2W0MX0Z ",.02)
 ;;2W0MX0Z 
 ;;9002226.02101,"1804,2W0MX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W0MX1Z ",.01)
 ;;2W0MX1Z 
 ;;9002226.02101,"1804,2W0MX1Z ",.02)
 ;;2W0MX1Z 
 ;;9002226.02101,"1804,2W0MX1Z ",.03)
 ;;31