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

ATXXB97.m

Go to the documentation of this file.
ATXXB97 ;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,0QPRX4Z ",.01)
 ;;0QPRX4Z 
 ;;9002226.02101,"1804,0QPRX4Z ",.02)
 ;;0QPRX4Z 
 ;;9002226.02101,"1804,0QPRX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QPRX5Z ",.01)
 ;;0QPRX5Z 
 ;;9002226.02101,"1804,0QPRX5Z ",.02)
 ;;0QPRX5Z 
 ;;9002226.02101,"1804,0QPRX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QPSX4Z ",.01)
 ;;0QPSX4Z 
 ;;9002226.02101,"1804,0QPSX4Z ",.02)
 ;;0QPSX4Z 
 ;;9002226.02101,"1804,0QPSX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QPYX0Z ",.01)
 ;;0QPYX0Z 
 ;;9002226.02101,"1804,0QPYX0Z ",.02)
 ;;0QPYX0Z 
 ;;9002226.02101,"1804,0QPYX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QPYXMZ ",.01)
 ;;0QPYXMZ 
 ;;9002226.02101,"1804,0QPYXMZ ",.02)
 ;;0QPYXMZ 
 ;;9002226.02101,"1804,0QPYXMZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW0X4Z ",.01)
 ;;0QW0X4Z 
 ;;9002226.02101,"1804,0QW0X4Z ",.02)
 ;;0QW0X4Z 
 ;;9002226.02101,"1804,0QW0X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW0X7Z ",.01)
 ;;0QW0X7Z 
 ;;9002226.02101,"1804,0QW0X7Z ",.02)
 ;;0QW0X7Z 
 ;;9002226.02101,"1804,0QW0X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW0XJZ ",.01)
 ;;0QW0XJZ 
 ;;9002226.02101,"1804,0QW0XJZ ",.02)
 ;;0QW0XJZ 
 ;;9002226.02101,"1804,0QW0XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW0XKZ ",.01)
 ;;0QW0XKZ 
 ;;9002226.02101,"1804,0QW0XKZ ",.02)
 ;;0QW0XKZ 
 ;;9002226.02101,"1804,0QW0XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW1X4Z ",.01)
 ;;0QW1X4Z 
 ;;9002226.02101,"1804,0QW1X4Z ",.02)
 ;;0QW1X4Z 
 ;;9002226.02101,"1804,0QW1X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW1X7Z ",.01)
 ;;0QW1X7Z 
 ;;9002226.02101,"1804,0QW1X7Z ",.02)
 ;;0QW1X7Z 
 ;;9002226.02101,"1804,0QW1X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW1XJZ ",.01)
 ;;0QW1XJZ 
 ;;9002226.02101,"1804,0QW1XJZ ",.02)
 ;;0QW1XJZ 
 ;;9002226.02101,"1804,0QW1XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW1XKZ ",.01)
 ;;0QW1XKZ 
 ;;9002226.02101,"1804,0QW1XKZ ",.02)
 ;;0QW1XKZ 
 ;;9002226.02101,"1804,0QW1XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW2X4Z ",.01)
 ;;0QW2X4Z 
 ;;9002226.02101,"1804,0QW2X4Z ",.02)
 ;;0QW2X4Z 
 ;;9002226.02101,"1804,0QW2X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW2X5Z ",.01)
 ;;0QW2X5Z 
 ;;9002226.02101,"1804,0QW2X5Z ",.02)
 ;;0QW2X5Z 
 ;;9002226.02101,"1804,0QW2X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW2X7Z ",.01)
 ;;0QW2X7Z 
 ;;9002226.02101,"1804,0QW2X7Z ",.02)
 ;;0QW2X7Z 
 ;;9002226.02101,"1804,0QW2X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW2XJZ ",.01)
 ;;0QW2XJZ 
 ;;9002226.02101,"1804,0QW2XJZ ",.02)
 ;;0QW2XJZ 
 ;;9002226.02101,"1804,0QW2XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW2XKZ ",.01)
 ;;0QW2XKZ 
 ;;9002226.02101,"1804,0QW2XKZ ",.02)
 ;;0QW2XKZ 
 ;;9002226.02101,"1804,0QW2XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW3X4Z ",.01)
 ;;0QW3X4Z 
 ;;9002226.02101,"1804,0QW3X4Z ",.02)
 ;;0QW3X4Z 
 ;;9002226.02101,"1804,0QW3X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW3X5Z ",.01)
 ;;0QW3X5Z 
 ;;9002226.02101,"1804,0QW3X5Z ",.02)
 ;;0QW3X5Z 
 ;;9002226.02101,"1804,0QW3X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW3X7Z ",.01)
 ;;0QW3X7Z 
 ;;9002226.02101,"1804,0QW3X7Z ",.02)
 ;;0QW3X7Z 
 ;;9002226.02101,"1804,0QW3X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW3XJZ ",.01)
 ;;0QW3XJZ 
 ;;9002226.02101,"1804,0QW3XJZ ",.02)
 ;;0QW3XJZ 
 ;;9002226.02101,"1804,0QW3XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW3XKZ ",.01)
 ;;0QW3XKZ 
 ;;9002226.02101,"1804,0QW3XKZ ",.02)
 ;;0QW3XKZ 
 ;;9002226.02101,"1804,0QW3XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW4X4Z ",.01)
 ;;0QW4X4Z 
 ;;9002226.02101,"1804,0QW4X4Z ",.02)
 ;;0QW4X4Z 
 ;;9002226.02101,"1804,0QW4X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW4X7Z ",.01)
 ;;0QW4X7Z 
 ;;9002226.02101,"1804,0QW4X7Z ",.02)
 ;;0QW4X7Z 
 ;;9002226.02101,"1804,0QW4X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW4XJZ ",.01)
 ;;0QW4XJZ 
 ;;9002226.02101,"1804,0QW4XJZ ",.02)
 ;;0QW4XJZ 
 ;;9002226.02101,"1804,0QW4XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW4XKZ ",.01)
 ;;0QW4XKZ 
 ;;9002226.02101,"1804,0QW4XKZ ",.02)
 ;;0QW4XKZ 
 ;;9002226.02101,"1804,0QW4XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW5X4Z ",.01)
 ;;0QW5X4Z 
 ;;9002226.02101,"1804,0QW5X4Z ",.02)
 ;;0QW5X4Z 
 ;;9002226.02101,"1804,0QW5X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW5X7Z ",.01)
 ;;0QW5X7Z 
 ;;9002226.02101,"1804,0QW5X7Z ",.02)
 ;;0QW5X7Z 
 ;;9002226.02101,"1804,0QW5X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW5XJZ ",.01)
 ;;0QW5XJZ 
 ;;9002226.02101,"1804,0QW5XJZ ",.02)
 ;;0QW5XJZ 
 ;;9002226.02101,"1804,0QW5XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW5XKZ ",.01)
 ;;0QW5XKZ 
 ;;9002226.02101,"1804,0QW5XKZ ",.02)
 ;;0QW5XKZ 
 ;;9002226.02101,"1804,0QW5XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW6X4Z ",.01)
 ;;0QW6X4Z 
 ;;9002226.02101,"1804,0QW6X4Z ",.02)
 ;;0QW6X4Z 
 ;;9002226.02101,"1804,0QW6X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW6X5Z ",.01)
 ;;0QW6X5Z 
 ;;9002226.02101,"1804,0QW6X5Z ",.02)
 ;;0QW6X5Z 
 ;;9002226.02101,"1804,0QW6X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW6X7Z ",.01)
 ;;0QW6X7Z 
 ;;9002226.02101,"1804,0QW6X7Z ",.02)
 ;;0QW6X7Z 
 ;;9002226.02101,"1804,0QW6X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW6XJZ ",.01)
 ;;0QW6XJZ 
 ;;9002226.02101,"1804,0QW6XJZ ",.02)
 ;;0QW6XJZ 
 ;;9002226.02101,"1804,0QW6XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW6XKZ ",.01)
 ;;0QW6XKZ 
 ;;9002226.02101,"1804,0QW6XKZ ",.02)
 ;;0QW6XKZ 
 ;;9002226.02101,"1804,0QW6XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW7X4Z ",.01)
 ;;0QW7X4Z 
 ;;9002226.02101,"1804,0QW7X4Z ",.02)
 ;;0QW7X4Z 
 ;;9002226.02101,"1804,0QW7X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW7X5Z ",.01)
 ;;0QW7X5Z 
 ;;9002226.02101,"1804,0QW7X5Z ",.02)
 ;;0QW7X5Z 
 ;;9002226.02101,"1804,0QW7X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW7X7Z ",.01)
 ;;0QW7X7Z 
 ;;9002226.02101,"1804,0QW7X7Z ",.02)
 ;;0QW7X7Z 
 ;;9002226.02101,"1804,0QW7X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW7XJZ ",.01)
 ;;0QW7XJZ 
 ;;9002226.02101,"1804,0QW7XJZ ",.02)
 ;;0QW7XJZ 
 ;;9002226.02101,"1804,0QW7XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW7XKZ ",.01)
 ;;0QW7XKZ 
 ;;9002226.02101,"1804,0QW7XKZ ",.02)
 ;;0QW7XKZ 
 ;;9002226.02101,"1804,0QW7XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW8X4Z ",.01)
 ;;0QW8X4Z 
 ;;9002226.02101,"1804,0QW8X4Z ",.02)
 ;;0QW8X4Z 
 ;;9002226.02101,"1804,0QW8X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW8X5Z ",.01)
 ;;0QW8X5Z 
 ;;9002226.02101,"1804,0QW8X5Z ",.02)
 ;;0QW8X5Z 
 ;;9002226.02101,"1804,0QW8X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW8X7Z ",.01)
 ;;0QW8X7Z 
 ;;9002226.02101,"1804,0QW8X7Z ",.02)
 ;;0QW8X7Z 
 ;;9002226.02101,"1804,0QW8X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW8XJZ ",.01)
 ;;0QW8XJZ 
 ;;9002226.02101,"1804,0QW8XJZ ",.02)
 ;;0QW8XJZ 
 ;;9002226.02101,"1804,0QW8XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW8XKZ ",.01)
 ;;0QW8XKZ 
 ;;9002226.02101,"1804,0QW8XKZ ",.02)
 ;;0QW8XKZ 
 ;;9002226.02101,"1804,0QW8XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW9X4Z ",.01)
 ;;0QW9X4Z 
 ;;9002226.02101,"1804,0QW9X4Z ",.02)
 ;;0QW9X4Z 
 ;;9002226.02101,"1804,0QW9X4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW9X5Z ",.01)
 ;;0QW9X5Z 
 ;;9002226.02101,"1804,0QW9X5Z ",.02)
 ;;0QW9X5Z 
 ;;9002226.02101,"1804,0QW9X5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW9X7Z ",.01)
 ;;0QW9X7Z 
 ;;9002226.02101,"1804,0QW9X7Z ",.02)
 ;;0QW9X7Z 
 ;;9002226.02101,"1804,0QW9X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW9XJZ ",.01)
 ;;0QW9XJZ 
 ;;9002226.02101,"1804,0QW9XJZ ",.02)
 ;;0QW9XJZ 
 ;;9002226.02101,"1804,0QW9XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QW9XKZ ",.01)
 ;;0QW9XKZ 
 ;;9002226.02101,"1804,0QW9XKZ ",.02)
 ;;0QW9XKZ 
 ;;9002226.02101,"1804,0QW9XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWBX4Z ",.01)
 ;;0QWBX4Z 
 ;;9002226.02101,"1804,0QWBX4Z ",.02)
 ;;0QWBX4Z 
 ;;9002226.02101,"1804,0QWBX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWBX5Z ",.01)
 ;;0QWBX5Z 
 ;;9002226.02101,"1804,0QWBX5Z ",.02)
 ;;0QWBX5Z 
 ;;9002226.02101,"1804,0QWBX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWBX7Z ",.01)
 ;;0QWBX7Z 
 ;;9002226.02101,"1804,0QWBX7Z ",.02)
 ;;0QWBX7Z 
 ;;9002226.02101,"1804,0QWBX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWBXJZ ",.01)
 ;;0QWBXJZ 
 ;;9002226.02101,"1804,0QWBXJZ ",.02)
 ;;0QWBXJZ 
 ;;9002226.02101,"1804,0QWBXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWBXKZ ",.01)
 ;;0QWBXKZ 
 ;;9002226.02101,"1804,0QWBXKZ ",.02)
 ;;0QWBXKZ 
 ;;9002226.02101,"1804,0QWBXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWCX4Z ",.01)
 ;;0QWCX4Z 
 ;;9002226.02101,"1804,0QWCX4Z ",.02)
 ;;0QWCX4Z 
 ;;9002226.02101,"1804,0QWCX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWCX5Z ",.01)
 ;;0QWCX5Z 
 ;;9002226.02101,"1804,0QWCX5Z ",.02)
 ;;0QWCX5Z 
 ;;9002226.02101,"1804,0QWCX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWCX7Z ",.01)
 ;;0QWCX7Z 
 ;;9002226.02101,"1804,0QWCX7Z ",.02)
 ;;0QWCX7Z 
 ;;9002226.02101,"1804,0QWCX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWCXJZ ",.01)
 ;;0QWCXJZ 
 ;;9002226.02101,"1804,0QWCXJZ ",.02)
 ;;0QWCXJZ 
 ;;9002226.02101,"1804,0QWCXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWCXKZ ",.01)
 ;;0QWCXKZ 
 ;;9002226.02101,"1804,0QWCXKZ ",.02)
 ;;0QWCXKZ 
 ;;9002226.02101,"1804,0QWCXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWDX4Z ",.01)
 ;;0QWDX4Z 
 ;;9002226.02101,"1804,0QWDX4Z ",.02)
 ;;0QWDX4Z 
 ;;9002226.02101,"1804,0QWDX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWDX5Z ",.01)
 ;;0QWDX5Z 
 ;;9002226.02101,"1804,0QWDX5Z ",.02)
 ;;0QWDX5Z 
 ;;9002226.02101,"1804,0QWDX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWDX7Z ",.01)
 ;;0QWDX7Z 
 ;;9002226.02101,"1804,0QWDX7Z ",.02)
 ;;0QWDX7Z 
 ;;9002226.02101,"1804,0QWDX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWDXJZ ",.01)
 ;;0QWDXJZ 
 ;;9002226.02101,"1804,0QWDXJZ ",.02)
 ;;0QWDXJZ 
 ;;9002226.02101,"1804,0QWDXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWDXKZ ",.01)
 ;;0QWDXKZ 
 ;;9002226.02101,"1804,0QWDXKZ ",.02)
 ;;0QWDXKZ 
 ;;9002226.02101,"1804,0QWDXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWFX4Z ",.01)
 ;;0QWFX4Z 
 ;;9002226.02101,"1804,0QWFX4Z ",.02)
 ;;0QWFX4Z 
 ;;9002226.02101,"1804,0QWFX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWFX5Z ",.01)
 ;;0QWFX5Z 
 ;;9002226.02101,"1804,0QWFX5Z ",.02)
 ;;0QWFX5Z 
 ;;9002226.02101,"1804,0QWFX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWFX7Z ",.01)
 ;;0QWFX7Z 
 ;;9002226.02101,"1804,0QWFX7Z ",.02)
 ;;0QWFX7Z 
 ;;9002226.02101,"1804,0QWFX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWFXJZ ",.01)
 ;;0QWFXJZ 
 ;;9002226.02101,"1804,0QWFXJZ ",.02)
 ;;0QWFXJZ 
 ;;9002226.02101,"1804,0QWFXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWFXKZ ",.01)
 ;;0QWFXKZ 
 ;;9002226.02101,"1804,0QWFXKZ ",.02)
 ;;0QWFXKZ 
 ;;9002226.02101,"1804,0QWFXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWGX4Z ",.01)
 ;;0QWGX4Z 
 ;;9002226.02101,"1804,0QWGX4Z ",.02)
 ;;0QWGX4Z 
 ;;9002226.02101,"1804,0QWGX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWGX5Z ",.01)
 ;;0QWGX5Z 
 ;;9002226.02101,"1804,0QWGX5Z ",.02)
 ;;0QWGX5Z 
 ;;9002226.02101,"1804,0QWGX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWGX7Z ",.01)
 ;;0QWGX7Z 
 ;;9002226.02101,"1804,0QWGX7Z ",.02)
 ;;0QWGX7Z 
 ;;9002226.02101,"1804,0QWGX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWGXJZ ",.01)
 ;;0QWGXJZ 
 ;;9002226.02101,"1804,0QWGXJZ ",.02)
 ;;0QWGXJZ 
 ;;9002226.02101,"1804,0QWGXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWGXKZ ",.01)
 ;;0QWGXKZ 
 ;;9002226.02101,"1804,0QWGXKZ ",.02)
 ;;0QWGXKZ 
 ;;9002226.02101,"1804,0QWGXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWHX4Z ",.01)
 ;;0QWHX4Z 
 ;;9002226.02101,"1804,0QWHX4Z ",.02)
 ;;0QWHX4Z 
 ;;9002226.02101,"1804,0QWHX4Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWHX5Z ",.01)
 ;;0QWHX5Z 
 ;;9002226.02101,"1804,0QWHX5Z ",.02)
 ;;0QWHX5Z 
 ;;9002226.02101,"1804,0QWHX5Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0QWHX7Z ",.01)
 ;;0QWHX7Z