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

ATXXB102.m

Go to the documentation of this file.
ATXXB102 ;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,0RW5X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW5X7Z ",.01)
 ;;0RW5X7Z 
 ;;9002226.02101,"1804,0RW5X7Z ",.02)
 ;;0RW5X7Z 
 ;;9002226.02101,"1804,0RW5X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW5XJZ ",.01)
 ;;0RW5XJZ 
 ;;9002226.02101,"1804,0RW5XJZ ",.02)
 ;;0RW5XJZ 
 ;;9002226.02101,"1804,0RW5XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW5XKZ ",.01)
 ;;0RW5XKZ 
 ;;9002226.02101,"1804,0RW5XKZ ",.02)
 ;;0RW5XKZ 
 ;;9002226.02101,"1804,0RW5XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6X0Z ",.01)
 ;;0RW6X0Z 
 ;;9002226.02101,"1804,0RW6X0Z ",.02)
 ;;0RW6X0Z 
 ;;9002226.02101,"1804,0RW6X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6X3Z ",.01)
 ;;0RW6X3Z 
 ;;9002226.02101,"1804,0RW6X3Z ",.02)
 ;;0RW6X3Z 
 ;;9002226.02101,"1804,0RW6X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6X4Z ",.01)
 ;;0RW6X4Z 
 ;;9002226.02101,"1804,0RW6X4Z ",.02)
 ;;0RW6X4Z 
 ;;9002226.02101,"1804,0RW6X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6X7Z ",.01)
 ;;0RW6X7Z 
 ;;9002226.02101,"1804,0RW6X7Z ",.02)
 ;;0RW6X7Z 
 ;;9002226.02101,"1804,0RW6X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6X8Z ",.01)
 ;;0RW6X8Z 
 ;;9002226.02101,"1804,0RW6X8Z ",.02)
 ;;0RW6X8Z 
 ;;9002226.02101,"1804,0RW6X8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6XAZ ",.01)
 ;;0RW6XAZ 
 ;;9002226.02101,"1804,0RW6XAZ ",.02)
 ;;0RW6XAZ 
 ;;9002226.02101,"1804,0RW6XAZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6XJZ ",.01)
 ;;0RW6XJZ 
 ;;9002226.02101,"1804,0RW6XJZ ",.02)
 ;;0RW6XJZ 
 ;;9002226.02101,"1804,0RW6XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW6XKZ ",.01)
 ;;0RW6XKZ 
 ;;9002226.02101,"1804,0RW6XKZ ",.02)
 ;;0RW6XKZ 
 ;;9002226.02101,"1804,0RW6XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW9X0Z ",.01)
 ;;0RW9X0Z 
 ;;9002226.02101,"1804,0RW9X0Z ",.02)
 ;;0RW9X0Z 
 ;;9002226.02101,"1804,0RW9X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW9X3Z ",.01)
 ;;0RW9X3Z 
 ;;9002226.02101,"1804,0RW9X3Z ",.02)
 ;;0RW9X3Z 
 ;;9002226.02101,"1804,0RW9X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW9X7Z ",.01)
 ;;0RW9X7Z 
 ;;9002226.02101,"1804,0RW9X7Z ",.02)
 ;;0RW9X7Z 
 ;;9002226.02101,"1804,0RW9X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW9XJZ ",.01)
 ;;0RW9XJZ 
 ;;9002226.02101,"1804,0RW9XJZ ",.02)
 ;;0RW9XJZ 
 ;;9002226.02101,"1804,0RW9XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RW9XKZ ",.01)
 ;;0RW9XKZ 
 ;;9002226.02101,"1804,0RW9XKZ ",.02)
 ;;0RW9XKZ 
 ;;9002226.02101,"1804,0RW9XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAX0Z ",.01)
 ;;0RWAX0Z 
 ;;9002226.02101,"1804,0RWAX0Z ",.02)
 ;;0RWAX0Z 
 ;;9002226.02101,"1804,0RWAX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAX3Z ",.01)
 ;;0RWAX3Z 
 ;;9002226.02101,"1804,0RWAX3Z ",.02)
 ;;0RWAX3Z 
 ;;9002226.02101,"1804,0RWAX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAX4Z ",.01)
 ;;0RWAX4Z 
 ;;9002226.02101,"1804,0RWAX4Z ",.02)
 ;;0RWAX4Z 
 ;;9002226.02101,"1804,0RWAX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAX7Z ",.01)
 ;;0RWAX7Z 
 ;;9002226.02101,"1804,0RWAX7Z ",.02)
 ;;0RWAX7Z 
 ;;9002226.02101,"1804,0RWAX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAX8Z ",.01)
 ;;0RWAX8Z 
 ;;9002226.02101,"1804,0RWAX8Z ",.02)
 ;;0RWAX8Z 
 ;;9002226.02101,"1804,0RWAX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAXAZ ",.01)
 ;;0RWAXAZ 
 ;;9002226.02101,"1804,0RWAXAZ ",.02)
 ;;0RWAXAZ 
 ;;9002226.02101,"1804,0RWAXAZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAXJZ ",.01)
 ;;0RWAXJZ 
 ;;9002226.02101,"1804,0RWAXJZ ",.02)
 ;;0RWAXJZ 
 ;;9002226.02101,"1804,0RWAXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWAXKZ ",.01)
 ;;0RWAXKZ 
 ;;9002226.02101,"1804,0RWAXKZ ",.02)
 ;;0RWAXKZ 
 ;;9002226.02101,"1804,0RWAXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWBX0Z ",.01)
 ;;0RWBX0Z 
 ;;9002226.02101,"1804,0RWBX0Z ",.02)
 ;;0RWBX0Z 
 ;;9002226.02101,"1804,0RWBX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWBX3Z ",.01)
 ;;0RWBX3Z 
 ;;9002226.02101,"1804,0RWBX3Z ",.02)
 ;;0RWBX3Z 
 ;;9002226.02101,"1804,0RWBX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWBX7Z ",.01)
 ;;0RWBX7Z 
 ;;9002226.02101,"1804,0RWBX7Z ",.02)
 ;;0RWBX7Z 
 ;;9002226.02101,"1804,0RWBX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWBXJZ ",.01)
 ;;0RWBXJZ 
 ;;9002226.02101,"1804,0RWBXJZ ",.02)
 ;;0RWBXJZ 
 ;;9002226.02101,"1804,0RWBXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWBXKZ ",.01)
 ;;0RWBXKZ 
 ;;9002226.02101,"1804,0RWBXKZ ",.02)
 ;;0RWBXKZ 
 ;;9002226.02101,"1804,0RWBXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWCX0Z ",.01)
 ;;0RWCX0Z 
 ;;9002226.02101,"1804,0RWCX0Z ",.02)
 ;;0RWCX0Z 
 ;;9002226.02101,"1804,0RWCX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWCX3Z ",.01)
 ;;0RWCX3Z 
 ;;9002226.02101,"1804,0RWCX3Z ",.02)
 ;;0RWCX3Z 
 ;;9002226.02101,"1804,0RWCX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWCX4Z ",.01)
 ;;0RWCX4Z 
 ;;9002226.02101,"1804,0RWCX4Z ",.02)
 ;;0RWCX4Z 
 ;;9002226.02101,"1804,0RWCX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWCX7Z ",.01)
 ;;0RWCX7Z 
 ;;9002226.02101,"1804,0RWCX7Z ",.02)
 ;;0RWCX7Z 
 ;;9002226.02101,"1804,0RWCX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWCX8Z ",.01)
 ;;0RWCX8Z 
 ;;9002226.02101,"1804,0RWCX8Z ",.02)
 ;;0RWCX8Z 
 ;;9002226.02101,"1804,0RWCX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWCXJZ ",.01)
 ;;0RWCXJZ 
 ;;9002226.02101,"1804,0RWCXJZ ",.02)
 ;;0RWCXJZ 
 ;;9002226.02101,"1804,0RWCXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWCXKZ ",.01)
 ;;0RWCXKZ 
 ;;9002226.02101,"1804,0RWCXKZ ",.02)
 ;;0RWCXKZ 
 ;;9002226.02101,"1804,0RWCXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWDX0Z ",.01)
 ;;0RWDX0Z 
 ;;9002226.02101,"1804,0RWDX0Z ",.02)
 ;;0RWDX0Z 
 ;;9002226.02101,"1804,0RWDX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWDX3Z ",.01)
 ;;0RWDX3Z 
 ;;9002226.02101,"1804,0RWDX3Z ",.02)
 ;;0RWDX3Z 
 ;;9002226.02101,"1804,0RWDX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWDX4Z ",.01)
 ;;0RWDX4Z 
 ;;9002226.02101,"1804,0RWDX4Z ",.02)
 ;;0RWDX4Z 
 ;;9002226.02101,"1804,0RWDX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWDX7Z ",.01)
 ;;0RWDX7Z 
 ;;9002226.02101,"1804,0RWDX7Z ",.02)
 ;;0RWDX7Z 
 ;;9002226.02101,"1804,0RWDX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWDX8Z ",.01)
 ;;0RWDX8Z 
 ;;9002226.02101,"1804,0RWDX8Z ",.02)
 ;;0RWDX8Z 
 ;;9002226.02101,"1804,0RWDX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWDXJZ ",.01)
 ;;0RWDXJZ 
 ;;9002226.02101,"1804,0RWDXJZ ",.02)
 ;;0RWDXJZ 
 ;;9002226.02101,"1804,0RWDXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWDXKZ ",.01)
 ;;0RWDXKZ 
 ;;9002226.02101,"1804,0RWDXKZ ",.02)
 ;;0RWDXKZ 
 ;;9002226.02101,"1804,0RWDXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWEX0Z ",.01)
 ;;0RWEX0Z 
 ;;9002226.02101,"1804,0RWEX0Z ",.02)
 ;;0RWEX0Z 
 ;;9002226.02101,"1804,0RWEX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWEX3Z ",.01)
 ;;0RWEX3Z 
 ;;9002226.02101,"1804,0RWEX3Z ",.02)
 ;;0RWEX3Z 
 ;;9002226.02101,"1804,0RWEX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWEX4Z ",.01)
 ;;0RWEX4Z 
 ;;9002226.02101,"1804,0RWEX4Z ",.02)
 ;;0RWEX4Z 
 ;;9002226.02101,"1804,0RWEX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWEX7Z ",.01)
 ;;0RWEX7Z 
 ;;9002226.02101,"1804,0RWEX7Z ",.02)
 ;;0RWEX7Z 
 ;;9002226.02101,"1804,0RWEX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWEX8Z ",.01)
 ;;0RWEX8Z 
 ;;9002226.02101,"1804,0RWEX8Z ",.02)
 ;;0RWEX8Z 
 ;;9002226.02101,"1804,0RWEX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWEXJZ ",.01)
 ;;0RWEXJZ 
 ;;9002226.02101,"1804,0RWEXJZ ",.02)
 ;;0RWEXJZ 
 ;;9002226.02101,"1804,0RWEXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWEXKZ ",.01)
 ;;0RWEXKZ 
 ;;9002226.02101,"1804,0RWEXKZ ",.02)
 ;;0RWEXKZ 
 ;;9002226.02101,"1804,0RWEXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWFX0Z ",.01)
 ;;0RWFX0Z 
 ;;9002226.02101,"1804,0RWFX0Z ",.02)
 ;;0RWFX0Z 
 ;;9002226.02101,"1804,0RWFX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWFX3Z ",.01)
 ;;0RWFX3Z 
 ;;9002226.02101,"1804,0RWFX3Z ",.02)
 ;;0RWFX3Z 
 ;;9002226.02101,"1804,0RWFX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWFX4Z ",.01)
 ;;0RWFX4Z 
 ;;9002226.02101,"1804,0RWFX4Z ",.02)
 ;;0RWFX4Z 
 ;;9002226.02101,"1804,0RWFX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWFX7Z ",.01)
 ;;0RWFX7Z 
 ;;9002226.02101,"1804,0RWFX7Z ",.02)
 ;;0RWFX7Z 
 ;;9002226.02101,"1804,0RWFX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWFX8Z ",.01)
 ;;0RWFX8Z 
 ;;9002226.02101,"1804,0RWFX8Z ",.02)
 ;;0RWFX8Z 
 ;;9002226.02101,"1804,0RWFX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWFXJZ ",.01)
 ;;0RWFXJZ 
 ;;9002226.02101,"1804,0RWFXJZ ",.02)
 ;;0RWFXJZ 
 ;;9002226.02101,"1804,0RWFXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWFXKZ ",.01)
 ;;0RWFXKZ 
 ;;9002226.02101,"1804,0RWFXKZ ",.02)
 ;;0RWFXKZ 
 ;;9002226.02101,"1804,0RWFXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWGX0Z ",.01)
 ;;0RWGX0Z 
 ;;9002226.02101,"1804,0RWGX0Z ",.02)
 ;;0RWGX0Z 
 ;;9002226.02101,"1804,0RWGX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWGX3Z ",.01)
 ;;0RWGX3Z 
 ;;9002226.02101,"1804,0RWGX3Z ",.02)
 ;;0RWGX3Z 
 ;;9002226.02101,"1804,0RWGX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWGX4Z ",.01)
 ;;0RWGX4Z 
 ;;9002226.02101,"1804,0RWGX4Z ",.02)
 ;;0RWGX4Z 
 ;;9002226.02101,"1804,0RWGX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWGX7Z ",.01)
 ;;0RWGX7Z 
 ;;9002226.02101,"1804,0RWGX7Z ",.02)
 ;;0RWGX7Z 
 ;;9002226.02101,"1804,0RWGX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWGX8Z ",.01)
 ;;0RWGX8Z 
 ;;9002226.02101,"1804,0RWGX8Z ",.02)
 ;;0RWGX8Z 
 ;;9002226.02101,"1804,0RWGX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWGXJZ ",.01)
 ;;0RWGXJZ 
 ;;9002226.02101,"1804,0RWGXJZ ",.02)
 ;;0RWGXJZ 
 ;;9002226.02101,"1804,0RWGXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWGXKZ ",.01)
 ;;0RWGXKZ 
 ;;9002226.02101,"1804,0RWGXKZ ",.02)
 ;;0RWGXKZ 
 ;;9002226.02101,"1804,0RWGXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWHX0Z ",.01)
 ;;0RWHX0Z 
 ;;9002226.02101,"1804,0RWHX0Z ",.02)
 ;;0RWHX0Z 
 ;;9002226.02101,"1804,0RWHX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWHX3Z ",.01)
 ;;0RWHX3Z 
 ;;9002226.02101,"1804,0RWHX3Z ",.02)
 ;;0RWHX3Z 
 ;;9002226.02101,"1804,0RWHX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWHX4Z ",.01)
 ;;0RWHX4Z 
 ;;9002226.02101,"1804,0RWHX4Z ",.02)
 ;;0RWHX4Z 
 ;;9002226.02101,"1804,0RWHX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWHX7Z ",.01)
 ;;0RWHX7Z 
 ;;9002226.02101,"1804,0RWHX7Z ",.02)
 ;;0RWHX7Z 
 ;;9002226.02101,"1804,0RWHX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWHX8Z ",.01)
 ;;0RWHX8Z 
 ;;9002226.02101,"1804,0RWHX8Z ",.02)
 ;;0RWHX8Z 
 ;;9002226.02101,"1804,0RWHX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWHXJZ ",.01)
 ;;0RWHXJZ 
 ;;9002226.02101,"1804,0RWHXJZ ",.02)
 ;;0RWHXJZ 
 ;;9002226.02101,"1804,0RWHXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWHXKZ ",.01)
 ;;0RWHXKZ 
 ;;9002226.02101,"1804,0RWHXKZ ",.02)
 ;;0RWHXKZ 
 ;;9002226.02101,"1804,0RWHXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWJX0Z ",.01)
 ;;0RWJX0Z 
 ;;9002226.02101,"1804,0RWJX0Z ",.02)
 ;;0RWJX0Z 
 ;;9002226.02101,"1804,0RWJX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWJX3Z ",.01)
 ;;0RWJX3Z 
 ;;9002226.02101,"1804,0RWJX3Z ",.02)
 ;;0RWJX3Z 
 ;;9002226.02101,"1804,0RWJX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWJX4Z ",.01)
 ;;0RWJX4Z 
 ;;9002226.02101,"1804,0RWJX4Z ",.02)
 ;;0RWJX4Z 
 ;;9002226.02101,"1804,0RWJX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWJX7Z ",.01)
 ;;0RWJX7Z 
 ;;9002226.02101,"1804,0RWJX7Z ",.02)
 ;;0RWJX7Z 
 ;;9002226.02101,"1804,0RWJX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWJX8Z ",.01)
 ;;0RWJX8Z 
 ;;9002226.02101,"1804,0RWJX8Z ",.02)
 ;;0RWJX8Z 
 ;;9002226.02101,"1804,0RWJX8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWJXJZ ",.01)
 ;;0RWJXJZ 
 ;;9002226.02101,"1804,0RWJXJZ ",.02)
 ;;0RWJXJZ 
 ;;9002226.02101,"1804,0RWJXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0RWJXKZ ",.01)
 ;;0RWJXKZ 
 ;;9002226.02101,"1804,0RWJXKZ ",.02)
 ;;0RWJXKZ 
 ;;9002226.02101,"1804,0RWJXKZ ",.03)
 ;;31