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

ATXXB157.m

Go to the documentation of this file.
ATXXB157 ;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,2W5GX5Z ",.01)
 ;;2W5GX5Z 
 ;;9002226.02101,"1804,2W5GX5Z ",.02)
 ;;2W5GX5Z 
 ;;9002226.02101,"1804,2W5GX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5GX6Z ",.01)
 ;;2W5GX6Z 
 ;;9002226.02101,"1804,2W5GX6Z ",.02)
 ;;2W5GX6Z 
 ;;9002226.02101,"1804,2W5GX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5GX7Z ",.01)
 ;;2W5GX7Z 
 ;;9002226.02101,"1804,2W5GX7Z ",.02)
 ;;2W5GX7Z 
 ;;9002226.02101,"1804,2W5GX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5GXYZ ",.01)
 ;;2W5GXYZ 
 ;;9002226.02101,"1804,2W5GXYZ ",.02)
 ;;2W5GXYZ 
 ;;9002226.02101,"1804,2W5GXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX0Z ",.01)
 ;;2W5HX0Z 
 ;;9002226.02101,"1804,2W5HX0Z ",.02)
 ;;2W5HX0Z 
 ;;9002226.02101,"1804,2W5HX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX1Z ",.01)
 ;;2W5HX1Z 
 ;;9002226.02101,"1804,2W5HX1Z ",.02)
 ;;2W5HX1Z 
 ;;9002226.02101,"1804,2W5HX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX2Z ",.01)
 ;;2W5HX2Z 
 ;;9002226.02101,"1804,2W5HX2Z ",.02)
 ;;2W5HX2Z 
 ;;9002226.02101,"1804,2W5HX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX3Z ",.01)
 ;;2W5HX3Z 
 ;;9002226.02101,"1804,2W5HX3Z ",.02)
 ;;2W5HX3Z 
 ;;9002226.02101,"1804,2W5HX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX4Z ",.01)
 ;;2W5HX4Z 
 ;;9002226.02101,"1804,2W5HX4Z ",.02)
 ;;2W5HX4Z 
 ;;9002226.02101,"1804,2W5HX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX5Z ",.01)
 ;;2W5HX5Z 
 ;;9002226.02101,"1804,2W5HX5Z ",.02)
 ;;2W5HX5Z 
 ;;9002226.02101,"1804,2W5HX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX6Z ",.01)
 ;;2W5HX6Z 
 ;;9002226.02101,"1804,2W5HX6Z ",.02)
 ;;2W5HX6Z 
 ;;9002226.02101,"1804,2W5HX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HX7Z ",.01)
 ;;2W5HX7Z 
 ;;9002226.02101,"1804,2W5HX7Z ",.02)
 ;;2W5HX7Z 
 ;;9002226.02101,"1804,2W5HX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5HXYZ ",.01)
 ;;2W5HXYZ 
 ;;9002226.02101,"1804,2W5HXYZ ",.02)
 ;;2W5HXYZ 
 ;;9002226.02101,"1804,2W5HXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX0Z ",.01)
 ;;2W5JX0Z 
 ;;9002226.02101,"1804,2W5JX0Z ",.02)
 ;;2W5JX0Z 
 ;;9002226.02101,"1804,2W5JX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX1Z ",.01)
 ;;2W5JX1Z 
 ;;9002226.02101,"1804,2W5JX1Z ",.02)
 ;;2W5JX1Z 
 ;;9002226.02101,"1804,2W5JX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX2Z ",.01)
 ;;2W5JX2Z 
 ;;9002226.02101,"1804,2W5JX2Z ",.02)
 ;;2W5JX2Z 
 ;;9002226.02101,"1804,2W5JX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX3Z ",.01)
 ;;2W5JX3Z 
 ;;9002226.02101,"1804,2W5JX3Z ",.02)
 ;;2W5JX3Z 
 ;;9002226.02101,"1804,2W5JX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX4Z ",.01)
 ;;2W5JX4Z 
 ;;9002226.02101,"1804,2W5JX4Z ",.02)
 ;;2W5JX4Z 
 ;;9002226.02101,"1804,2W5JX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX5Z ",.01)
 ;;2W5JX5Z 
 ;;9002226.02101,"1804,2W5JX5Z ",.02)
 ;;2W5JX5Z 
 ;;9002226.02101,"1804,2W5JX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX6Z ",.01)
 ;;2W5JX6Z 
 ;;9002226.02101,"1804,2W5JX6Z ",.02)
 ;;2W5JX6Z 
 ;;9002226.02101,"1804,2W5JX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JX7Z ",.01)
 ;;2W5JX7Z 
 ;;9002226.02101,"1804,2W5JX7Z ",.02)
 ;;2W5JX7Z 
 ;;9002226.02101,"1804,2W5JX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5JXYZ ",.01)
 ;;2W5JXYZ 
 ;;9002226.02101,"1804,2W5JXYZ ",.02)
 ;;2W5JXYZ 
 ;;9002226.02101,"1804,2W5JXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX0Z ",.01)
 ;;2W5KX0Z 
 ;;9002226.02101,"1804,2W5KX0Z ",.02)
 ;;2W5KX0Z 
 ;;9002226.02101,"1804,2W5KX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX1Z ",.01)
 ;;2W5KX1Z 
 ;;9002226.02101,"1804,2W5KX1Z ",.02)
 ;;2W5KX1Z 
 ;;9002226.02101,"1804,2W5KX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX2Z ",.01)
 ;;2W5KX2Z 
 ;;9002226.02101,"1804,2W5KX2Z ",.02)
 ;;2W5KX2Z 
 ;;9002226.02101,"1804,2W5KX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX3Z ",.01)
 ;;2W5KX3Z 
 ;;9002226.02101,"1804,2W5KX3Z ",.02)
 ;;2W5KX3Z 
 ;;9002226.02101,"1804,2W5KX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX4Z ",.01)
 ;;2W5KX4Z 
 ;;9002226.02101,"1804,2W5KX4Z ",.02)
 ;;2W5KX4Z 
 ;;9002226.02101,"1804,2W5KX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX5Z ",.01)
 ;;2W5KX5Z 
 ;;9002226.02101,"1804,2W5KX5Z ",.02)
 ;;2W5KX5Z 
 ;;9002226.02101,"1804,2W5KX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX6Z ",.01)
 ;;2W5KX6Z 
 ;;9002226.02101,"1804,2W5KX6Z ",.02)
 ;;2W5KX6Z 
 ;;9002226.02101,"1804,2W5KX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KX7Z ",.01)
 ;;2W5KX7Z 
 ;;9002226.02101,"1804,2W5KX7Z ",.02)
 ;;2W5KX7Z 
 ;;9002226.02101,"1804,2W5KX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5KXYZ ",.01)
 ;;2W5KXYZ 
 ;;9002226.02101,"1804,2W5KXYZ ",.02)
 ;;2W5KXYZ 
 ;;9002226.02101,"1804,2W5KXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX0Z ",.01)
 ;;2W5LX0Z 
 ;;9002226.02101,"1804,2W5LX0Z ",.02)
 ;;2W5LX0Z 
 ;;9002226.02101,"1804,2W5LX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX1Z ",.01)
 ;;2W5LX1Z 
 ;;9002226.02101,"1804,2W5LX1Z ",.02)
 ;;2W5LX1Z 
 ;;9002226.02101,"1804,2W5LX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX2Z ",.01)
 ;;2W5LX2Z 
 ;;9002226.02101,"1804,2W5LX2Z ",.02)
 ;;2W5LX2Z 
 ;;9002226.02101,"1804,2W5LX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX3Z ",.01)
 ;;2W5LX3Z 
 ;;9002226.02101,"1804,2W5LX3Z ",.02)
 ;;2W5LX3Z 
 ;;9002226.02101,"1804,2W5LX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX4Z ",.01)
 ;;2W5LX4Z 
 ;;9002226.02101,"1804,2W5LX4Z ",.02)
 ;;2W5LX4Z 
 ;;9002226.02101,"1804,2W5LX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX5Z ",.01)
 ;;2W5LX5Z 
 ;;9002226.02101,"1804,2W5LX5Z ",.02)
 ;;2W5LX5Z 
 ;;9002226.02101,"1804,2W5LX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX6Z ",.01)
 ;;2W5LX6Z 
 ;;9002226.02101,"1804,2W5LX6Z ",.02)
 ;;2W5LX6Z 
 ;;9002226.02101,"1804,2W5LX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LX7Z ",.01)
 ;;2W5LX7Z 
 ;;9002226.02101,"1804,2W5LX7Z ",.02)
 ;;2W5LX7Z 
 ;;9002226.02101,"1804,2W5LX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5LXYZ ",.01)
 ;;2W5LXYZ 
 ;;9002226.02101,"1804,2W5LXYZ ",.02)
 ;;2W5LXYZ 
 ;;9002226.02101,"1804,2W5LXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX0Z ",.01)
 ;;2W5MX0Z 
 ;;9002226.02101,"1804,2W5MX0Z ",.02)
 ;;2W5MX0Z 
 ;;9002226.02101,"1804,2W5MX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX1Z ",.01)
 ;;2W5MX1Z 
 ;;9002226.02101,"1804,2W5MX1Z ",.02)
 ;;2W5MX1Z 
 ;;9002226.02101,"1804,2W5MX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX2Z ",.01)
 ;;2W5MX2Z 
 ;;9002226.02101,"1804,2W5MX2Z ",.02)
 ;;2W5MX2Z 
 ;;9002226.02101,"1804,2W5MX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX3Z ",.01)
 ;;2W5MX3Z 
 ;;9002226.02101,"1804,2W5MX3Z ",.02)
 ;;2W5MX3Z 
 ;;9002226.02101,"1804,2W5MX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX4Z ",.01)
 ;;2W5MX4Z 
 ;;9002226.02101,"1804,2W5MX4Z ",.02)
 ;;2W5MX4Z 
 ;;9002226.02101,"1804,2W5MX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX5Z ",.01)
 ;;2W5MX5Z 
 ;;9002226.02101,"1804,2W5MX5Z ",.02)
 ;;2W5MX5Z 
 ;;9002226.02101,"1804,2W5MX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX6Z ",.01)
 ;;2W5MX6Z 
 ;;9002226.02101,"1804,2W5MX6Z ",.02)
 ;;2W5MX6Z 
 ;;9002226.02101,"1804,2W5MX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MX7Z ",.01)
 ;;2W5MX7Z 
 ;;9002226.02101,"1804,2W5MX7Z ",.02)
 ;;2W5MX7Z 
 ;;9002226.02101,"1804,2W5MX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5MXYZ ",.01)
 ;;2W5MXYZ 
 ;;9002226.02101,"1804,2W5MXYZ ",.02)
 ;;2W5MXYZ 
 ;;9002226.02101,"1804,2W5MXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX0Z ",.01)
 ;;2W5NX0Z 
 ;;9002226.02101,"1804,2W5NX0Z ",.02)
 ;;2W5NX0Z 
 ;;9002226.02101,"1804,2W5NX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX1Z ",.01)
 ;;2W5NX1Z 
 ;;9002226.02101,"1804,2W5NX1Z ",.02)
 ;;2W5NX1Z 
 ;;9002226.02101,"1804,2W5NX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX2Z ",.01)
 ;;2W5NX2Z 
 ;;9002226.02101,"1804,2W5NX2Z ",.02)
 ;;2W5NX2Z 
 ;;9002226.02101,"1804,2W5NX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX3Z ",.01)
 ;;2W5NX3Z 
 ;;9002226.02101,"1804,2W5NX3Z ",.02)
 ;;2W5NX3Z 
 ;;9002226.02101,"1804,2W5NX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX4Z ",.01)
 ;;2W5NX4Z 
 ;;9002226.02101,"1804,2W5NX4Z ",.02)
 ;;2W5NX4Z 
 ;;9002226.02101,"1804,2W5NX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX5Z ",.01)
 ;;2W5NX5Z 
 ;;9002226.02101,"1804,2W5NX5Z ",.02)
 ;;2W5NX5Z 
 ;;9002226.02101,"1804,2W5NX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX6Z ",.01)
 ;;2W5NX6Z 
 ;;9002226.02101,"1804,2W5NX6Z ",.02)
 ;;2W5NX6Z 
 ;;9002226.02101,"1804,2W5NX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NX7Z ",.01)
 ;;2W5NX7Z 
 ;;9002226.02101,"1804,2W5NX7Z ",.02)
 ;;2W5NX7Z 
 ;;9002226.02101,"1804,2W5NX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5NXYZ ",.01)
 ;;2W5NXYZ 
 ;;9002226.02101,"1804,2W5NXYZ ",.02)
 ;;2W5NXYZ 
 ;;9002226.02101,"1804,2W5NXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX0Z ",.01)
 ;;2W5PX0Z 
 ;;9002226.02101,"1804,2W5PX0Z ",.02)
 ;;2W5PX0Z 
 ;;9002226.02101,"1804,2W5PX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX1Z ",.01)
 ;;2W5PX1Z 
 ;;9002226.02101,"1804,2W5PX1Z ",.02)
 ;;2W5PX1Z 
 ;;9002226.02101,"1804,2W5PX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX2Z ",.01)
 ;;2W5PX2Z 
 ;;9002226.02101,"1804,2W5PX2Z ",.02)
 ;;2W5PX2Z 
 ;;9002226.02101,"1804,2W5PX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX3Z ",.01)
 ;;2W5PX3Z 
 ;;9002226.02101,"1804,2W5PX3Z ",.02)
 ;;2W5PX3Z 
 ;;9002226.02101,"1804,2W5PX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX4Z ",.01)
 ;;2W5PX4Z 
 ;;9002226.02101,"1804,2W5PX4Z ",.02)
 ;;2W5PX4Z 
 ;;9002226.02101,"1804,2W5PX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX5Z ",.01)
 ;;2W5PX5Z 
 ;;9002226.02101,"1804,2W5PX5Z ",.02)
 ;;2W5PX5Z 
 ;;9002226.02101,"1804,2W5PX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX6Z ",.01)
 ;;2W5PX6Z 
 ;;9002226.02101,"1804,2W5PX6Z ",.02)
 ;;2W5PX6Z 
 ;;9002226.02101,"1804,2W5PX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PX7Z ",.01)
 ;;2W5PX7Z 
 ;;9002226.02101,"1804,2W5PX7Z ",.02)
 ;;2W5PX7Z 
 ;;9002226.02101,"1804,2W5PX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5PXYZ ",.01)
 ;;2W5PXYZ 
 ;;9002226.02101,"1804,2W5PXYZ ",.02)
 ;;2W5PXYZ 
 ;;9002226.02101,"1804,2W5PXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX0Z ",.01)
 ;;2W5QX0Z 
 ;;9002226.02101,"1804,2W5QX0Z ",.02)
 ;;2W5QX0Z 
 ;;9002226.02101,"1804,2W5QX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX1Z ",.01)
 ;;2W5QX1Z 
 ;;9002226.02101,"1804,2W5QX1Z ",.02)
 ;;2W5QX1Z 
 ;;9002226.02101,"1804,2W5QX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX2Z ",.01)
 ;;2W5QX2Z 
 ;;9002226.02101,"1804,2W5QX2Z ",.02)
 ;;2W5QX2Z 
 ;;9002226.02101,"1804,2W5QX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX3Z ",.01)
 ;;2W5QX3Z 
 ;;9002226.02101,"1804,2W5QX3Z ",.02)
 ;;2W5QX3Z 
 ;;9002226.02101,"1804,2W5QX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX4Z ",.01)
 ;;2W5QX4Z 
 ;;9002226.02101,"1804,2W5QX4Z ",.02)
 ;;2W5QX4Z 
 ;;9002226.02101,"1804,2W5QX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX5Z ",.01)
 ;;2W5QX5Z 
 ;;9002226.02101,"1804,2W5QX5Z ",.02)
 ;;2W5QX5Z 
 ;;9002226.02101,"1804,2W5QX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX6Z ",.01)
 ;;2W5QX6Z 
 ;;9002226.02101,"1804,2W5QX6Z ",.02)
 ;;2W5QX6Z 
 ;;9002226.02101,"1804,2W5QX6Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QX7Z ",.01)
 ;;2W5QX7Z 
 ;;9002226.02101,"1804,2W5QX7Z ",.02)
 ;;2W5QX7Z 
 ;;9002226.02101,"1804,2W5QX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5QXYZ ",.01)
 ;;2W5QXYZ 
 ;;9002226.02101,"1804,2W5QXYZ ",.02)
 ;;2W5QXYZ 
 ;;9002226.02101,"1804,2W5QXYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5RX0Z ",.01)
 ;;2W5RX0Z 
 ;;9002226.02101,"1804,2W5RX0Z ",.02)
 ;;2W5RX0Z 
 ;;9002226.02101,"1804,2W5RX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5RX1Z ",.01)
 ;;2W5RX1Z 
 ;;9002226.02101,"1804,2W5RX1Z ",.02)
 ;;2W5RX1Z 
 ;;9002226.02101,"1804,2W5RX1Z ",.03)
 ;;31
 ;;9002226.02101,"1804,2W5RX2Z ",.01)
 ;;2W5RX2Z