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

ATXD5K2.m

Go to the documentation of this file.
  1. ATXD5K2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 12, 2013;
  1. ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"164,X35.XXXA ",.02)
  1. ;;X35.XXXA
  1. ;;9002226.02101,"164,X35.XXXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X35.XXXD ",.01)
  1. ;;X35.XXXD
  1. ;;9002226.02101,"164,X35.XXXD ",.02)
  1. ;;X35.XXXD
  1. ;;9002226.02101,"164,X35.XXXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X35.XXXS ",.01)
  1. ;;X35.XXXS
  1. ;;9002226.02101,"164,X35.XXXS ",.02)
  1. ;;X35.XXXS
  1. ;;9002226.02101,"164,X35.XXXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X36.0XXA ",.01)
  1. ;;X36.0XXA
  1. ;;9002226.02101,"164,X36.0XXA ",.02)
  1. ;;X36.0XXA
  1. ;;9002226.02101,"164,X36.0XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X36.0XXD ",.01)
  1. ;;X36.0XXD
  1. ;;9002226.02101,"164,X36.0XXD ",.02)
  1. ;;X36.0XXD
  1. ;;9002226.02101,"164,X36.0XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X36.0XXS ",.01)
  1. ;;X36.0XXS
  1. ;;9002226.02101,"164,X36.0XXS ",.02)
  1. ;;X36.0XXS
  1. ;;9002226.02101,"164,X36.0XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X36.1XXA ",.01)
  1. ;;X36.1XXA
  1. ;;9002226.02101,"164,X36.1XXA ",.02)
  1. ;;X36.1XXA
  1. ;;9002226.02101,"164,X36.1XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X36.1XXD ",.01)
  1. ;;X36.1XXD
  1. ;;9002226.02101,"164,X36.1XXD ",.02)
  1. ;;X36.1XXD
  1. ;;9002226.02101,"164,X36.1XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X36.1XXS ",.01)
  1. ;;X36.1XXS
  1. ;;9002226.02101,"164,X36.1XXS ",.02)
  1. ;;X36.1XXS
  1. ;;9002226.02101,"164,X36.1XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.0XXA ",.01)
  1. ;;X37.0XXA
  1. ;;9002226.02101,"164,X37.0XXA ",.02)
  1. ;;X37.0XXA
  1. ;;9002226.02101,"164,X37.0XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.0XXD ",.01)
  1. ;;X37.0XXD
  1. ;;9002226.02101,"164,X37.0XXD ",.02)
  1. ;;X37.0XXD
  1. ;;9002226.02101,"164,X37.0XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.0XXS ",.01)
  1. ;;X37.0XXS
  1. ;;9002226.02101,"164,X37.0XXS ",.02)
  1. ;;X37.0XXS
  1. ;;9002226.02101,"164,X37.0XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.1XXA ",.01)
  1. ;;X37.1XXA
  1. ;;9002226.02101,"164,X37.1XXA ",.02)
  1. ;;X37.1XXA
  1. ;;9002226.02101,"164,X37.1XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.1XXD ",.01)
  1. ;;X37.1XXD
  1. ;;9002226.02101,"164,X37.1XXD ",.02)
  1. ;;X37.1XXD
  1. ;;9002226.02101,"164,X37.1XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.1XXS ",.01)
  1. ;;X37.1XXS
  1. ;;9002226.02101,"164,X37.1XXS ",.02)
  1. ;;X37.1XXS
  1. ;;9002226.02101,"164,X37.1XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.2XXA ",.01)
  1. ;;X37.2XXA
  1. ;;9002226.02101,"164,X37.2XXA ",.02)
  1. ;;X37.2XXA
  1. ;;9002226.02101,"164,X37.2XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.2XXD ",.01)
  1. ;;X37.2XXD
  1. ;;9002226.02101,"164,X37.2XXD ",.02)
  1. ;;X37.2XXD
  1. ;;9002226.02101,"164,X37.2XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.2XXS ",.01)
  1. ;;X37.2XXS
  1. ;;9002226.02101,"164,X37.2XXS ",.02)
  1. ;;X37.2XXS
  1. ;;9002226.02101,"164,X37.2XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.3XXA ",.01)
  1. ;;X37.3XXA
  1. ;;9002226.02101,"164,X37.3XXA ",.02)
  1. ;;X37.3XXA
  1. ;;9002226.02101,"164,X37.3XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.3XXD ",.01)
  1. ;;X37.3XXD
  1. ;;9002226.02101,"164,X37.3XXD ",.02)
  1. ;;X37.3XXD
  1. ;;9002226.02101,"164,X37.3XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.3XXS ",.01)
  1. ;;X37.3XXS
  1. ;;9002226.02101,"164,X37.3XXS ",.02)
  1. ;;X37.3XXS
  1. ;;9002226.02101,"164,X37.3XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.41XA ",.01)
  1. ;;X37.41XA
  1. ;;9002226.02101,"164,X37.41XA ",.02)
  1. ;;X37.41XA
  1. ;;9002226.02101,"164,X37.41XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.41XD ",.01)
  1. ;;X37.41XD
  1. ;;9002226.02101,"164,X37.41XD ",.02)
  1. ;;X37.41XD
  1. ;;9002226.02101,"164,X37.41XD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.41XS ",.01)
  1. ;;X37.41XS
  1. ;;9002226.02101,"164,X37.41XS ",.02)
  1. ;;X37.41XS
  1. ;;9002226.02101,"164,X37.41XS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.42XA ",.01)
  1. ;;X37.42XA
  1. ;;9002226.02101,"164,X37.42XA ",.02)
  1. ;;X37.42XA
  1. ;;9002226.02101,"164,X37.42XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.42XD ",.01)
  1. ;;X37.42XD
  1. ;;9002226.02101,"164,X37.42XD ",.02)
  1. ;;X37.42XD
  1. ;;9002226.02101,"164,X37.42XD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.42XS ",.01)
  1. ;;X37.42XS
  1. ;;9002226.02101,"164,X37.42XS ",.02)
  1. ;;X37.42XS
  1. ;;9002226.02101,"164,X37.42XS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.43XA ",.01)
  1. ;;X37.43XA
  1. ;;9002226.02101,"164,X37.43XA ",.02)
  1. ;;X37.43XA
  1. ;;9002226.02101,"164,X37.43XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.43XD ",.01)
  1. ;;X37.43XD
  1. ;;9002226.02101,"164,X37.43XD ",.02)
  1. ;;X37.43XD
  1. ;;9002226.02101,"164,X37.43XD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.43XS ",.01)
  1. ;;X37.43XS
  1. ;;9002226.02101,"164,X37.43XS ",.02)
  1. ;;X37.43XS
  1. ;;9002226.02101,"164,X37.43XS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.8XXA ",.01)
  1. ;;X37.8XXA
  1. ;;9002226.02101,"164,X37.8XXA ",.02)
  1. ;;X37.8XXA
  1. ;;9002226.02101,"164,X37.8XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.8XXD ",.01)
  1. ;;X37.8XXD
  1. ;;9002226.02101,"164,X37.8XXD ",.02)
  1. ;;X37.8XXD
  1. ;;9002226.02101,"164,X37.8XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.8XXS ",.01)
  1. ;;X37.8XXS
  1. ;;9002226.02101,"164,X37.8XXS ",.02)
  1. ;;X37.8XXS
  1. ;;9002226.02101,"164,X37.8XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.9XXA ",.01)
  1. ;;X37.9XXA
  1. ;;9002226.02101,"164,X37.9XXA ",.02)
  1. ;;X37.9XXA
  1. ;;9002226.02101,"164,X37.9XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.9XXD ",.01)
  1. ;;X37.9XXD
  1. ;;9002226.02101,"164,X37.9XXD ",.02)
  1. ;;X37.9XXD
  1. ;;9002226.02101,"164,X37.9XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X37.9XXS ",.01)
  1. ;;X37.9XXS
  1. ;;9002226.02101,"164,X37.9XXS ",.02)
  1. ;;X37.9XXS
  1. ;;9002226.02101,"164,X37.9XXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X38.XXXA ",.01)
  1. ;;X38.XXXA
  1. ;;9002226.02101,"164,X38.XXXA ",.02)
  1. ;;X38.XXXA
  1. ;;9002226.02101,"164,X38.XXXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X38.XXXD ",.01)
  1. ;;X38.XXXD
  1. ;;9002226.02101,"164,X38.XXXD ",.02)
  1. ;;X38.XXXD
  1. ;;9002226.02101,"164,X38.XXXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X38.XXXS ",.01)
  1. ;;X38.XXXS
  1. ;;9002226.02101,"164,X38.XXXS ",.02)
  1. ;;X38.XXXS
  1. ;;9002226.02101,"164,X38.XXXS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.01XA ",.01)
  1. ;;X39.01XA
  1. ;;9002226.02101,"164,X39.01XA ",.02)
  1. ;;X39.01XA
  1. ;;9002226.02101,"164,X39.01XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.01XD ",.01)
  1. ;;X39.01XD
  1. ;;9002226.02101,"164,X39.01XD ",.02)
  1. ;;X39.01XD
  1. ;;9002226.02101,"164,X39.01XD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.01XS ",.01)
  1. ;;X39.01XS
  1. ;;9002226.02101,"164,X39.01XS ",.02)
  1. ;;X39.01XS
  1. ;;9002226.02101,"164,X39.01XS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.08XA ",.01)
  1. ;;X39.08XA
  1. ;;9002226.02101,"164,X39.08XA ",.02)
  1. ;;X39.08XA
  1. ;;9002226.02101,"164,X39.08XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.08XD ",.01)
  1. ;;X39.08XD
  1. ;;9002226.02101,"164,X39.08XD ",.02)
  1. ;;X39.08XD
  1. ;;9002226.02101,"164,X39.08XD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.08XS ",.01)
  1. ;;X39.08XS
  1. ;;9002226.02101,"164,X39.08XS ",.02)
  1. ;;X39.08XS
  1. ;;9002226.02101,"164,X39.08XS ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.8XXA ",.01)
  1. ;;X39.8XXA
  1. ;;9002226.02101,"164,X39.8XXA ",.02)
  1. ;;X39.8XXA
  1. ;;9002226.02101,"164,X39.8XXA ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.8XXD ",.01)
  1. ;;X39.8XXD
  1. ;;9002226.02101,"164,X39.8XXD ",.02)
  1. ;;X39.8XXD
  1. ;;9002226.02101,"164,X39.8XXD ",.03)
  1. ;;30
  1. ;;9002226.02101,"164,X39.8XXS ",.01)
  1. ;;X39.8XXS
  1. ;;9002226.02101,"164,X39.8XXS ",.02)
  1. ;;X39.8XXS
  1. ;;9002226.02101,"164,X39.8XXS ",.03)
  1. ;;30
  1. ;;9002226.04101,"164,1",.01)
  1. ;;APCL