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

ATXXB109.m

Go to the documentation of this file.
ATXXB109 ;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,0TC67ZZ ",.01)
 ;;0TC67ZZ 
 ;;9002226.02101,"1804,0TC67ZZ ",.02)
 ;;0TC67ZZ 
 ;;9002226.02101,"1804,0TC67ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TC68ZZ ",.01)
 ;;0TC68ZZ 
 ;;9002226.02101,"1804,0TC68ZZ ",.02)
 ;;0TC68ZZ 
 ;;9002226.02101,"1804,0TC68ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TC77ZZ ",.01)
 ;;0TC77ZZ 
 ;;9002226.02101,"1804,0TC77ZZ ",.02)
 ;;0TC77ZZ 
 ;;9002226.02101,"1804,0TC77ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TC78ZZ ",.01)
 ;;0TC78ZZ 
 ;;9002226.02101,"1804,0TC78ZZ ",.02)
 ;;0TC78ZZ 
 ;;9002226.02101,"1804,0TC78ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TCB7ZZ ",.01)
 ;;0TCB7ZZ 
 ;;9002226.02101,"1804,0TCB7ZZ ",.02)
 ;;0TCB7ZZ 
 ;;9002226.02101,"1804,0TCB7ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TCB8ZZ ",.01)
 ;;0TCB8ZZ 
 ;;9002226.02101,"1804,0TCB8ZZ ",.02)
 ;;0TCB8ZZ 
 ;;9002226.02101,"1804,0TCB8ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TCD7ZZ ",.01)
 ;;0TCD7ZZ 
 ;;9002226.02101,"1804,0TCD7ZZ ",.02)
 ;;0TCD7ZZ 
 ;;9002226.02101,"1804,0TCD7ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TCD8ZZ ",.01)
 ;;0TCD8ZZ 
 ;;9002226.02101,"1804,0TCD8ZZ ",.02)
 ;;0TCD8ZZ 
 ;;9002226.02101,"1804,0TCD8ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TCDXZZ ",.01)
 ;;0TCDXZZ 
 ;;9002226.02101,"1804,0TCDXZZ ",.02)
 ;;0TCDXZZ 
 ;;9002226.02101,"1804,0TCDXZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TF3XZZ ",.01)
 ;;0TF3XZZ 
 ;;9002226.02101,"1804,0TF3XZZ ",.02)
 ;;0TF3XZZ 
 ;;9002226.02101,"1804,0TF3XZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TF4XZZ ",.01)
 ;;0TF4XZZ 
 ;;9002226.02101,"1804,0TF4XZZ ",.02)
 ;;0TF4XZZ 
 ;;9002226.02101,"1804,0TF4XZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TF6XZZ ",.01)
 ;;0TF6XZZ 
 ;;9002226.02101,"1804,0TF6XZZ ",.02)
 ;;0TF6XZZ 
 ;;9002226.02101,"1804,0TF6XZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TF7XZZ ",.01)
 ;;0TF7XZZ 
 ;;9002226.02101,"1804,0TF7XZZ ",.02)
 ;;0TF7XZZ 
 ;;9002226.02101,"1804,0TF7XZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TFBXZZ ",.01)
 ;;0TFBXZZ 
 ;;9002226.02101,"1804,0TFBXZZ ",.02)
 ;;0TFBXZZ 
 ;;9002226.02101,"1804,0TFBXZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TFCXZZ ",.01)
 ;;0TFCXZZ 
 ;;9002226.02101,"1804,0TFCXZZ ",.02)
 ;;0TFCXZZ 
 ;;9002226.02101,"1804,0TFCXZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TFDXZZ ",.01)
 ;;0TFDXZZ 
 ;;9002226.02101,"1804,0TFDXZZ ",.02)
 ;;0TFDXZZ 
 ;;9002226.02101,"1804,0TFDXZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH503Z ",.01)
 ;;0TH503Z 
 ;;9002226.02101,"1804,0TH503Z ",.02)
 ;;0TH503Z 
 ;;9002226.02101,"1804,0TH503Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH533Z ",.01)
 ;;0TH533Z 
 ;;9002226.02101,"1804,0TH533Z ",.02)
 ;;0TH533Z 
 ;;9002226.02101,"1804,0TH533Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH543Z ",.01)
 ;;0TH543Z 
 ;;9002226.02101,"1804,0TH543Z ",.02)
 ;;0TH543Z 
 ;;9002226.02101,"1804,0TH543Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH573Z ",.01)
 ;;0TH573Z 
 ;;9002226.02101,"1804,0TH573Z ",.02)
 ;;0TH573Z 
 ;;9002226.02101,"1804,0TH573Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH583Z ",.01)
 ;;0TH583Z 
 ;;9002226.02101,"1804,0TH583Z ",.02)
 ;;0TH583Z 
 ;;9002226.02101,"1804,0TH583Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH903Z ",.01)
 ;;0TH903Z 
 ;;9002226.02101,"1804,0TH903Z ",.02)
 ;;0TH903Z 
 ;;9002226.02101,"1804,0TH903Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH933Z ",.01)
 ;;0TH933Z 
 ;;9002226.02101,"1804,0TH933Z ",.02)
 ;;0TH933Z 
 ;;9002226.02101,"1804,0TH933Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH943Z ",.01)
 ;;0TH943Z 
 ;;9002226.02101,"1804,0TH943Z ",.02)
 ;;0TH943Z 
 ;;9002226.02101,"1804,0TH943Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH973Z ",.01)
 ;;0TH973Z 
 ;;9002226.02101,"1804,0TH973Z ",.02)
 ;;0TH973Z 
 ;;9002226.02101,"1804,0TH973Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TH983Z ",.01)
 ;;0TH983Z 
 ;;9002226.02101,"1804,0TH983Z ",.02)
 ;;0TH983Z 
 ;;9002226.02101,"1804,0TH983Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THB03Z ",.01)
 ;;0THB03Z 
 ;;9002226.02101,"1804,0THB03Z ",.02)
 ;;0THB03Z 
 ;;9002226.02101,"1804,0THB03Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THB33Z ",.01)
 ;;0THB33Z 
 ;;9002226.02101,"1804,0THB33Z ",.02)
 ;;0THB33Z 
 ;;9002226.02101,"1804,0THB33Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THB43Z ",.01)
 ;;0THB43Z 
 ;;9002226.02101,"1804,0THB43Z ",.02)
 ;;0THB43Z 
 ;;9002226.02101,"1804,0THB43Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THB73Z ",.01)
 ;;0THB73Z 
 ;;9002226.02101,"1804,0THB73Z ",.02)
 ;;0THB73Z 
 ;;9002226.02101,"1804,0THB73Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THB83Z ",.01)
 ;;0THB83Z 
 ;;9002226.02101,"1804,0THB83Z ",.02)
 ;;0THB83Z 
 ;;9002226.02101,"1804,0THB83Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THD03Z ",.01)
 ;;0THD03Z 
 ;;9002226.02101,"1804,0THD03Z ",.02)
 ;;0THD03Z 
 ;;9002226.02101,"1804,0THD03Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THD33Z ",.01)
 ;;0THD33Z 
 ;;9002226.02101,"1804,0THD33Z ",.02)
 ;;0THD33Z 
 ;;9002226.02101,"1804,0THD33Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THD43Z ",.01)
 ;;0THD43Z 
 ;;9002226.02101,"1804,0THD43Z ",.02)
 ;;0THD43Z 
 ;;9002226.02101,"1804,0THD43Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THD73Z ",.01)
 ;;0THD73Z 
 ;;9002226.02101,"1804,0THD73Z ",.02)
 ;;0THD73Z 
 ;;9002226.02101,"1804,0THD73Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THD83Z ",.01)
 ;;0THD83Z 
 ;;9002226.02101,"1804,0THD83Z ",.02)
 ;;0THD83Z 
 ;;9002226.02101,"1804,0THD83Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0THDX3Z ",.01)
 ;;0THDX3Z 
 ;;9002226.02101,"1804,0THDX3Z ",.02)
 ;;0THDX3Z 
 ;;9002226.02101,"1804,0THDX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TJ5XZZ ",.01)
 ;;0TJ5XZZ 
 ;;9002226.02101,"1804,0TJ5XZZ ",.02)
 ;;0TJ5XZZ 
 ;;9002226.02101,"1804,0TJ5XZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TJ9XZZ ",.01)
 ;;0TJ9XZZ 
 ;;9002226.02101,"1804,0TJ9XZZ ",.02)
 ;;0TJ9XZZ 
 ;;9002226.02101,"1804,0TJ9XZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TJBXZZ ",.01)
 ;;0TJBXZZ 
 ;;9002226.02101,"1804,0TJBXZZ ",.02)
 ;;0TJBXZZ 
 ;;9002226.02101,"1804,0TJBXZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TJDXZZ ",.01)
 ;;0TJDXZZ 
 ;;9002226.02101,"1804,0TJDXZZ ",.02)
 ;;0TJDXZZ 
 ;;9002226.02101,"1804,0TJDXZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP5X0Z ",.01)
 ;;0TP5X0Z 
 ;;9002226.02101,"1804,0TP5X0Z ",.02)
 ;;0TP5X0Z 
 ;;9002226.02101,"1804,0TP5X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP5X2Z ",.01)
 ;;0TP5X2Z 
 ;;9002226.02101,"1804,0TP5X2Z ",.02)
 ;;0TP5X2Z 
 ;;9002226.02101,"1804,0TP5X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP5X3Z ",.01)
 ;;0TP5X3Z 
 ;;9002226.02101,"1804,0TP5X3Z ",.02)
 ;;0TP5X3Z 
 ;;9002226.02101,"1804,0TP5X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP5XDZ ",.01)
 ;;0TP5XDZ 
 ;;9002226.02101,"1804,0TP5XDZ ",.02)
 ;;0TP5XDZ 
 ;;9002226.02101,"1804,0TP5XDZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP9X0Z ",.01)
 ;;0TP9X0Z 
 ;;9002226.02101,"1804,0TP9X0Z ",.02)
 ;;0TP9X0Z 
 ;;9002226.02101,"1804,0TP9X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP9X2Z ",.01)
 ;;0TP9X2Z 
 ;;9002226.02101,"1804,0TP9X2Z ",.02)
 ;;0TP9X2Z 
 ;;9002226.02101,"1804,0TP9X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP9X3Z ",.01)
 ;;0TP9X3Z 
 ;;9002226.02101,"1804,0TP9X3Z ",.02)
 ;;0TP9X3Z 
 ;;9002226.02101,"1804,0TP9X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TP9XDZ ",.01)
 ;;0TP9XDZ 
 ;;9002226.02101,"1804,0TP9XDZ ",.02)
 ;;0TP9XDZ 
 ;;9002226.02101,"1804,0TP9XDZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPBX0Z ",.01)
 ;;0TPBX0Z 
 ;;9002226.02101,"1804,0TPBX0Z ",.02)
 ;;0TPBX0Z 
 ;;9002226.02101,"1804,0TPBX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPBX2Z ",.01)
 ;;0TPBX2Z 
 ;;9002226.02101,"1804,0TPBX2Z ",.02)
 ;;0TPBX2Z 
 ;;9002226.02101,"1804,0TPBX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPBX3Z ",.01)
 ;;0TPBX3Z 
 ;;9002226.02101,"1804,0TPBX3Z ",.02)
 ;;0TPBX3Z 
 ;;9002226.02101,"1804,0TPBX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPBXDZ ",.01)
 ;;0TPBXDZ 
 ;;9002226.02101,"1804,0TPBXDZ ",.02)
 ;;0TPBXDZ 
 ;;9002226.02101,"1804,0TPBXDZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPBXLZ ",.01)
 ;;0TPBXLZ 
 ;;9002226.02101,"1804,0TPBXLZ ",.02)
 ;;0TPBXLZ 
 ;;9002226.02101,"1804,0TPBXLZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPDX0Z ",.01)
 ;;0TPDX0Z 
 ;;9002226.02101,"1804,0TPDX0Z ",.02)
 ;;0TPDX0Z 
 ;;9002226.02101,"1804,0TPDX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPDX2Z ",.01)
 ;;0TPDX2Z 
 ;;9002226.02101,"1804,0TPDX2Z ",.02)
 ;;0TPDX2Z 
 ;;9002226.02101,"1804,0TPDX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPDX3Z ",.01)
 ;;0TPDX3Z 
 ;;9002226.02101,"1804,0TPDX3Z ",.02)
 ;;0TPDX3Z 
 ;;9002226.02101,"1804,0TPDX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TPDXDZ ",.01)
 ;;0TPDXDZ 
 ;;9002226.02101,"1804,0TPDXDZ ",.02)
 ;;0TPDXDZ 
 ;;9002226.02101,"1804,0TPDXDZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5X0Z ",.01)
 ;;0TW5X0Z 
 ;;9002226.02101,"1804,0TW5X0Z ",.02)
 ;;0TW5X0Z 
 ;;9002226.02101,"1804,0TW5X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5X2Z ",.01)
 ;;0TW5X2Z 
 ;;9002226.02101,"1804,0TW5X2Z ",.02)
 ;;0TW5X2Z 
 ;;9002226.02101,"1804,0TW5X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5X3Z ",.01)
 ;;0TW5X3Z 
 ;;9002226.02101,"1804,0TW5X3Z ",.02)
 ;;0TW5X3Z 
 ;;9002226.02101,"1804,0TW5X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5X7Z ",.01)
 ;;0TW5X7Z 
 ;;9002226.02101,"1804,0TW5X7Z ",.02)
 ;;0TW5X7Z 
 ;;9002226.02101,"1804,0TW5X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5XCZ ",.01)
 ;;0TW5XCZ 
 ;;9002226.02101,"1804,0TW5XCZ ",.02)
 ;;0TW5XCZ 
 ;;9002226.02101,"1804,0TW5XCZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5XDZ ",.01)
 ;;0TW5XDZ 
 ;;9002226.02101,"1804,0TW5XDZ ",.02)
 ;;0TW5XDZ 
 ;;9002226.02101,"1804,0TW5XDZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5XJZ ",.01)
 ;;0TW5XJZ 
 ;;9002226.02101,"1804,0TW5XJZ ",.02)
 ;;0TW5XJZ 
 ;;9002226.02101,"1804,0TW5XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW5XKZ ",.01)
 ;;0TW5XKZ 
 ;;9002226.02101,"1804,0TW5XKZ ",.02)
 ;;0TW5XKZ 
 ;;9002226.02101,"1804,0TW5XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9X0Z ",.01)
 ;;0TW9X0Z 
 ;;9002226.02101,"1804,0TW9X0Z ",.02)
 ;;0TW9X0Z 
 ;;9002226.02101,"1804,0TW9X0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9X2Z ",.01)
 ;;0TW9X2Z 
 ;;9002226.02101,"1804,0TW9X2Z ",.02)
 ;;0TW9X2Z 
 ;;9002226.02101,"1804,0TW9X2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9X3Z ",.01)
 ;;0TW9X3Z 
 ;;9002226.02101,"1804,0TW9X3Z ",.02)
 ;;0TW9X3Z 
 ;;9002226.02101,"1804,0TW9X3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9X7Z ",.01)
 ;;0TW9X7Z 
 ;;9002226.02101,"1804,0TW9X7Z ",.02)
 ;;0TW9X7Z 
 ;;9002226.02101,"1804,0TW9X7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9XCZ ",.01)
 ;;0TW9XCZ 
 ;;9002226.02101,"1804,0TW9XCZ ",.02)
 ;;0TW9XCZ 
 ;;9002226.02101,"1804,0TW9XCZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9XDZ ",.01)
 ;;0TW9XDZ 
 ;;9002226.02101,"1804,0TW9XDZ ",.02)
 ;;0TW9XDZ 
 ;;9002226.02101,"1804,0TW9XDZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9XJZ ",.01)
 ;;0TW9XJZ 
 ;;9002226.02101,"1804,0TW9XJZ ",.02)
 ;;0TW9XJZ 
 ;;9002226.02101,"1804,0TW9XJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9XKZ ",.01)
 ;;0TW9XKZ 
 ;;9002226.02101,"1804,0TW9XKZ ",.02)
 ;;0TW9XKZ 
 ;;9002226.02101,"1804,0TW9XKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TW9XMZ ",.01)
 ;;0TW9XMZ 
 ;;9002226.02101,"1804,0TW9XMZ ",.02)
 ;;0TW9XMZ 
 ;;9002226.02101,"1804,0TW9XMZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0TWBX0Z ",.01)
 ;;0TWBX0Z 
 ;;9002226.02101,"1804,0TWBX0Z ",.02)
 ;;0TWBX0Z 
 ;;9002226.02101,"1804,0TWBX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TWBX2Z ",.01)
 ;;0TWBX2Z 
 ;;9002226.02101,"1804,0TWBX2Z ",.02)
 ;;0TWBX2Z 
 ;;9002226.02101,"1804,0TWBX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TWBX3Z ",.01)
 ;;0TWBX3Z 
 ;;9002226.02101,"1804,0TWBX3Z ",.02)
 ;;0TWBX3Z 
 ;;9002226.02101,"1804,0TWBX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0TWBX7Z ",.01)
 ;;0TWBX7Z