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

ATXXA96.m

Go to the documentation of this file.
  1. ATXXA96 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
  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,"873,S66.402A ",.01)
  1. ;;S66.402A
  1. ;;9002226.02101,"873,S66.402A ",.02)
  1. ;;S66.402A
  1. ;;9002226.02101,"873,S66.402A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.409A ",.01)
  1. ;;S66.409A
  1. ;;9002226.02101,"873,S66.409A ",.02)
  1. ;;S66.409A
  1. ;;9002226.02101,"873,S66.409A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.411A ",.01)
  1. ;;S66.411A
  1. ;;9002226.02101,"873,S66.411A ",.02)
  1. ;;S66.411A
  1. ;;9002226.02101,"873,S66.411A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.412A ",.01)
  1. ;;S66.412A
  1. ;;9002226.02101,"873,S66.412A ",.02)
  1. ;;S66.412A
  1. ;;9002226.02101,"873,S66.412A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.419A ",.01)
  1. ;;S66.419A
  1. ;;9002226.02101,"873,S66.419A ",.02)
  1. ;;S66.419A
  1. ;;9002226.02101,"873,S66.419A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.421A ",.01)
  1. ;;S66.421A
  1. ;;9002226.02101,"873,S66.421A ",.02)
  1. ;;S66.421A
  1. ;;9002226.02101,"873,S66.421A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.422A ",.01)
  1. ;;S66.422A
  1. ;;9002226.02101,"873,S66.422A ",.02)
  1. ;;S66.422A
  1. ;;9002226.02101,"873,S66.422A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.429A ",.01)
  1. ;;S66.429A
  1. ;;9002226.02101,"873,S66.429A ",.02)
  1. ;;S66.429A
  1. ;;9002226.02101,"873,S66.429A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.491A ",.01)
  1. ;;S66.491A
  1. ;;9002226.02101,"873,S66.491A ",.02)
  1. ;;S66.491A
  1. ;;9002226.02101,"873,S66.491A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.492A ",.01)
  1. ;;S66.492A
  1. ;;9002226.02101,"873,S66.492A ",.02)
  1. ;;S66.492A
  1. ;;9002226.02101,"873,S66.492A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.499A ",.01)
  1. ;;S66.499A
  1. ;;9002226.02101,"873,S66.499A ",.02)
  1. ;;S66.499A
  1. ;;9002226.02101,"873,S66.499A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.500A ",.01)
  1. ;;S66.500A
  1. ;;9002226.02101,"873,S66.500A ",.02)
  1. ;;S66.500A
  1. ;;9002226.02101,"873,S66.500A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.501A ",.01)
  1. ;;S66.501A
  1. ;;9002226.02101,"873,S66.501A ",.02)
  1. ;;S66.501A
  1. ;;9002226.02101,"873,S66.501A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.502A ",.01)
  1. ;;S66.502A
  1. ;;9002226.02101,"873,S66.502A ",.02)
  1. ;;S66.502A
  1. ;;9002226.02101,"873,S66.502A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.503A ",.01)
  1. ;;S66.503A
  1. ;;9002226.02101,"873,S66.503A ",.02)
  1. ;;S66.503A
  1. ;;9002226.02101,"873,S66.503A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.504A ",.01)
  1. ;;S66.504A
  1. ;;9002226.02101,"873,S66.504A ",.02)
  1. ;;S66.504A
  1. ;;9002226.02101,"873,S66.504A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.505A ",.01)
  1. ;;S66.505A
  1. ;;9002226.02101,"873,S66.505A ",.02)
  1. ;;S66.505A
  1. ;;9002226.02101,"873,S66.505A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.506A ",.01)
  1. ;;S66.506A
  1. ;;9002226.02101,"873,S66.506A ",.02)
  1. ;;S66.506A
  1. ;;9002226.02101,"873,S66.506A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.507A ",.01)
  1. ;;S66.507A
  1. ;;9002226.02101,"873,S66.507A ",.02)
  1. ;;S66.507A
  1. ;;9002226.02101,"873,S66.507A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.508A ",.01)
  1. ;;S66.508A
  1. ;;9002226.02101,"873,S66.508A ",.02)
  1. ;;S66.508A
  1. ;;9002226.02101,"873,S66.508A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.509A ",.01)
  1. ;;S66.509A
  1. ;;9002226.02101,"873,S66.509A ",.02)
  1. ;;S66.509A
  1. ;;9002226.02101,"873,S66.509A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.510A ",.01)
  1. ;;S66.510A
  1. ;;9002226.02101,"873,S66.510A ",.02)
  1. ;;S66.510A
  1. ;;9002226.02101,"873,S66.510A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.511A ",.01)
  1. ;;S66.511A
  1. ;;9002226.02101,"873,S66.511A ",.02)
  1. ;;S66.511A
  1. ;;9002226.02101,"873,S66.511A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.512A ",.01)
  1. ;;S66.512A
  1. ;;9002226.02101,"873,S66.512A ",.02)
  1. ;;S66.512A
  1. ;;9002226.02101,"873,S66.512A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.513A ",.01)
  1. ;;S66.513A
  1. ;;9002226.02101,"873,S66.513A ",.02)
  1. ;;S66.513A
  1. ;;9002226.02101,"873,S66.513A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.514A ",.01)
  1. ;;S66.514A
  1. ;;9002226.02101,"873,S66.514A ",.02)
  1. ;;S66.514A
  1. ;;9002226.02101,"873,S66.514A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.515A ",.01)
  1. ;;S66.515A
  1. ;;9002226.02101,"873,S66.515A ",.02)
  1. ;;S66.515A
  1. ;;9002226.02101,"873,S66.515A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.516A ",.01)
  1. ;;S66.516A
  1. ;;9002226.02101,"873,S66.516A ",.02)
  1. ;;S66.516A
  1. ;;9002226.02101,"873,S66.516A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.517A ",.01)
  1. ;;S66.517A
  1. ;;9002226.02101,"873,S66.517A ",.02)
  1. ;;S66.517A
  1. ;;9002226.02101,"873,S66.517A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.518A ",.01)
  1. ;;S66.518A
  1. ;;9002226.02101,"873,S66.518A ",.02)
  1. ;;S66.518A
  1. ;;9002226.02101,"873,S66.518A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.519A ",.01)
  1. ;;S66.519A
  1. ;;9002226.02101,"873,S66.519A ",.02)
  1. ;;S66.519A
  1. ;;9002226.02101,"873,S66.519A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.520A ",.01)
  1. ;;S66.520A
  1. ;;9002226.02101,"873,S66.520A ",.02)
  1. ;;S66.520A
  1. ;;9002226.02101,"873,S66.520A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.521A ",.01)
  1. ;;S66.521A
  1. ;;9002226.02101,"873,S66.521A ",.02)
  1. ;;S66.521A
  1. ;;9002226.02101,"873,S66.521A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.522A ",.01)
  1. ;;S66.522A
  1. ;;9002226.02101,"873,S66.522A ",.02)
  1. ;;S66.522A
  1. ;;9002226.02101,"873,S66.522A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.523A ",.01)
  1. ;;S66.523A
  1. ;;9002226.02101,"873,S66.523A ",.02)
  1. ;;S66.523A
  1. ;;9002226.02101,"873,S66.523A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.524A ",.01)
  1. ;;S66.524A
  1. ;;9002226.02101,"873,S66.524A ",.02)
  1. ;;S66.524A
  1. ;;9002226.02101,"873,S66.524A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.525A ",.01)
  1. ;;S66.525A
  1. ;;9002226.02101,"873,S66.525A ",.02)
  1. ;;S66.525A
  1. ;;9002226.02101,"873,S66.525A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.526A ",.01)
  1. ;;S66.526A
  1. ;;9002226.02101,"873,S66.526A ",.02)
  1. ;;S66.526A
  1. ;;9002226.02101,"873,S66.526A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.527A ",.01)
  1. ;;S66.527A
  1. ;;9002226.02101,"873,S66.527A ",.02)
  1. ;;S66.527A
  1. ;;9002226.02101,"873,S66.527A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.528A ",.01)
  1. ;;S66.528A
  1. ;;9002226.02101,"873,S66.528A ",.02)
  1. ;;S66.528A
  1. ;;9002226.02101,"873,S66.528A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.529A ",.01)
  1. ;;S66.529A
  1. ;;9002226.02101,"873,S66.529A ",.02)
  1. ;;S66.529A
  1. ;;9002226.02101,"873,S66.529A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.590A ",.01)
  1. ;;S66.590A
  1. ;;9002226.02101,"873,S66.590A ",.02)
  1. ;;S66.590A
  1. ;;9002226.02101,"873,S66.590A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.591A ",.01)
  1. ;;S66.591A
  1. ;;9002226.02101,"873,S66.591A ",.02)
  1. ;;S66.591A
  1. ;;9002226.02101,"873,S66.591A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.592A ",.01)
  1. ;;S66.592A
  1. ;;9002226.02101,"873,S66.592A ",.02)
  1. ;;S66.592A
  1. ;;9002226.02101,"873,S66.592A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.593A ",.01)
  1. ;;S66.593A
  1. ;;9002226.02101,"873,S66.593A ",.02)
  1. ;;S66.593A
  1. ;;9002226.02101,"873,S66.593A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.594A ",.01)
  1. ;;S66.594A
  1. ;;9002226.02101,"873,S66.594A ",.02)
  1. ;;S66.594A
  1. ;;9002226.02101,"873,S66.594A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.595A ",.01)
  1. ;;S66.595A
  1. ;;9002226.02101,"873,S66.595A ",.02)
  1. ;;S66.595A
  1. ;;9002226.02101,"873,S66.595A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.596A ",.01)
  1. ;;S66.596A
  1. ;;9002226.02101,"873,S66.596A ",.02)
  1. ;;S66.596A
  1. ;;9002226.02101,"873,S66.596A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.597A ",.01)
  1. ;;S66.597A
  1. ;;9002226.02101,"873,S66.597A ",.02)
  1. ;;S66.597A
  1. ;;9002226.02101,"873,S66.597A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.598A ",.01)
  1. ;;S66.598A
  1. ;;9002226.02101,"873,S66.598A ",.02)
  1. ;;S66.598A
  1. ;;9002226.02101,"873,S66.598A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.599A ",.01)
  1. ;;S66.599A
  1. ;;9002226.02101,"873,S66.599A ",.02)
  1. ;;S66.599A
  1. ;;9002226.02101,"873,S66.599A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.801A ",.01)
  1. ;;S66.801A
  1. ;;9002226.02101,"873,S66.801A ",.02)
  1. ;;S66.801A
  1. ;;9002226.02101,"873,S66.801A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.802A ",.01)
  1. ;;S66.802A
  1. ;;9002226.02101,"873,S66.802A ",.02)
  1. ;;S66.802A
  1. ;;9002226.02101,"873,S66.802A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.809A ",.01)
  1. ;;S66.809A
  1. ;;9002226.02101,"873,S66.809A ",.02)
  1. ;;S66.809A
  1. ;;9002226.02101,"873,S66.809A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.811A ",.01)
  1. ;;S66.811A
  1. ;;9002226.02101,"873,S66.811A ",.02)
  1. ;;S66.811A
  1. ;;9002226.02101,"873,S66.811A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.812A ",.01)
  1. ;;S66.812A
  1. ;;9002226.02101,"873,S66.812A ",.02)
  1. ;;S66.812A
  1. ;;9002226.02101,"873,S66.812A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.819A ",.01)
  1. ;;S66.819A
  1. ;;9002226.02101,"873,S66.819A ",.02)
  1. ;;S66.819A
  1. ;;9002226.02101,"873,S66.819A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.821A ",.01)
  1. ;;S66.821A
  1. ;;9002226.02101,"873,S66.821A ",.02)
  1. ;;S66.821A
  1. ;;9002226.02101,"873,S66.821A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.822A ",.01)
  1. ;;S66.822A
  1. ;;9002226.02101,"873,S66.822A ",.02)
  1. ;;S66.822A
  1. ;;9002226.02101,"873,S66.822A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.829A ",.01)
  1. ;;S66.829A
  1. ;;9002226.02101,"873,S66.829A ",.02)
  1. ;;S66.829A
  1. ;;9002226.02101,"873,S66.829A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.891A ",.01)
  1. ;;S66.891A
  1. ;;9002226.02101,"873,S66.891A ",.02)
  1. ;;S66.891A
  1. ;;9002226.02101,"873,S66.891A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.892A ",.01)
  1. ;;S66.892A
  1. ;;9002226.02101,"873,S66.892A ",.02)
  1. ;;S66.892A
  1. ;;9002226.02101,"873,S66.892A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.899A ",.01)
  1. ;;S66.899A
  1. ;;9002226.02101,"873,S66.899A ",.02)
  1. ;;S66.899A
  1. ;;9002226.02101,"873,S66.899A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.901A ",.01)
  1. ;;S66.901A
  1. ;;9002226.02101,"873,S66.901A ",.02)
  1. ;;S66.901A
  1. ;;9002226.02101,"873,S66.901A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.902A ",.01)
  1. ;;S66.902A
  1. ;;9002226.02101,"873,S66.902A ",.02)
  1. ;;S66.902A
  1. ;;9002226.02101,"873,S66.902A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.909A ",.01)
  1. ;;S66.909A
  1. ;;9002226.02101,"873,S66.909A ",.02)
  1. ;;S66.909A
  1. ;;9002226.02101,"873,S66.909A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.911A ",.01)
  1. ;;S66.911A
  1. ;;9002226.02101,"873,S66.911A ",.02)
  1. ;;S66.911A
  1. ;;9002226.02101,"873,S66.911A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.912A ",.01)
  1. ;;S66.912A
  1. ;;9002226.02101,"873,S66.912A ",.02)
  1. ;;S66.912A
  1. ;;9002226.02101,"873,S66.912A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.919A ",.01)
  1. ;;S66.919A
  1. ;;9002226.02101,"873,S66.919A ",.02)
  1. ;;S66.919A
  1. ;;9002226.02101,"873,S66.919A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.921A ",.01)
  1. ;;S66.921A
  1. ;;9002226.02101,"873,S66.921A ",.02)
  1. ;;S66.921A
  1. ;;9002226.02101,"873,S66.921A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.922A ",.01)
  1. ;;S66.922A
  1. ;;9002226.02101,"873,S66.922A ",.02)
  1. ;;S66.922A
  1. ;;9002226.02101,"873,S66.922A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.929A ",.01)
  1. ;;S66.929A
  1. ;;9002226.02101,"873,S66.929A ",.02)
  1. ;;S66.929A
  1. ;;9002226.02101,"873,S66.929A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.991A ",.01)
  1. ;;S66.991A
  1. ;;9002226.02101,"873,S66.991A ",.02)
  1. ;;S66.991A
  1. ;;9002226.02101,"873,S66.991A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.992A ",.01)
  1. ;;S66.992A
  1. ;;9002226.02101,"873,S66.992A ",.02)
  1. ;;S66.992A
  1. ;;9002226.02101,"873,S66.992A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S66.999A ",.01)
  1. ;;S66.999A
  1. ;;9002226.02101,"873,S66.999A ",.02)
  1. ;;S66.999A
  1. ;;9002226.02101,"873,S66.999A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S67.00XA ",.01)
  1. ;;S67.00XA
  1. ;;9002226.02101,"873,S67.00XA ",.02)
  1. ;;S67.00XA
  1. ;;9002226.02101,"873,S67.00XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S67.01XA ",.01)
  1. ;;S67.01XA
  1. ;;9002226.02101,"873,S67.01XA ",.02)
  1. ;;S67.01XA
  1. ;;9002226.02101,"873,S67.01XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S67.02XA ",.01)
  1. ;;S67.02XA
  1. ;;9002226.02101,"873,S67.02XA ",.02)
  1. ;;S67.02XA
  1. ;;9002226.02101,"873,S67.02XA ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S67.10XA ",.01)
  1. ;;S67.10XA