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

ATXXA124.m

Go to the documentation of this file.
ATXXA124 ;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,"873,S92.011B ",.02)
 ;;S92.011B
 ;;9002226.02101,"873,S92.011B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.012A ",.01)
 ;;S92.012A
 ;;9002226.02101,"873,S92.012A ",.02)
 ;;S92.012A
 ;;9002226.02101,"873,S92.012A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.012B ",.01)
 ;;S92.012B
 ;;9002226.02101,"873,S92.012B ",.02)
 ;;S92.012B
 ;;9002226.02101,"873,S92.012B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.013A ",.01)
 ;;S92.013A
 ;;9002226.02101,"873,S92.013A ",.02)
 ;;S92.013A
 ;;9002226.02101,"873,S92.013A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.013B ",.01)
 ;;S92.013B
 ;;9002226.02101,"873,S92.013B ",.02)
 ;;S92.013B
 ;;9002226.02101,"873,S92.013B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.014A ",.01)
 ;;S92.014A
 ;;9002226.02101,"873,S92.014A ",.02)
 ;;S92.014A
 ;;9002226.02101,"873,S92.014A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.014B ",.01)
 ;;S92.014B
 ;;9002226.02101,"873,S92.014B ",.02)
 ;;S92.014B
 ;;9002226.02101,"873,S92.014B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.015A ",.01)
 ;;S92.015A
 ;;9002226.02101,"873,S92.015A ",.02)
 ;;S92.015A
 ;;9002226.02101,"873,S92.015A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.015B ",.01)
 ;;S92.015B
 ;;9002226.02101,"873,S92.015B ",.02)
 ;;S92.015B
 ;;9002226.02101,"873,S92.015B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.016A ",.01)
 ;;S92.016A
 ;;9002226.02101,"873,S92.016A ",.02)
 ;;S92.016A
 ;;9002226.02101,"873,S92.016A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.016B ",.01)
 ;;S92.016B
 ;;9002226.02101,"873,S92.016B ",.02)
 ;;S92.016B
 ;;9002226.02101,"873,S92.016B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.021A ",.01)
 ;;S92.021A
 ;;9002226.02101,"873,S92.021A ",.02)
 ;;S92.021A
 ;;9002226.02101,"873,S92.021A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.021B ",.01)
 ;;S92.021B
 ;;9002226.02101,"873,S92.021B ",.02)
 ;;S92.021B
 ;;9002226.02101,"873,S92.021B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.022A ",.01)
 ;;S92.022A
 ;;9002226.02101,"873,S92.022A ",.02)
 ;;S92.022A
 ;;9002226.02101,"873,S92.022A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.022B ",.01)
 ;;S92.022B
 ;;9002226.02101,"873,S92.022B ",.02)
 ;;S92.022B
 ;;9002226.02101,"873,S92.022B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.023A ",.01)
 ;;S92.023A
 ;;9002226.02101,"873,S92.023A ",.02)
 ;;S92.023A
 ;;9002226.02101,"873,S92.023A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.023B ",.01)
 ;;S92.023B
 ;;9002226.02101,"873,S92.023B ",.02)
 ;;S92.023B
 ;;9002226.02101,"873,S92.023B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.024A ",.01)
 ;;S92.024A
 ;;9002226.02101,"873,S92.024A ",.02)
 ;;S92.024A
 ;;9002226.02101,"873,S92.024A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.024B ",.01)
 ;;S92.024B
 ;;9002226.02101,"873,S92.024B ",.02)
 ;;S92.024B
 ;;9002226.02101,"873,S92.024B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.025A ",.01)
 ;;S92.025A
 ;;9002226.02101,"873,S92.025A ",.02)
 ;;S92.025A
 ;;9002226.02101,"873,S92.025A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.025B ",.01)
 ;;S92.025B
 ;;9002226.02101,"873,S92.025B ",.02)
 ;;S92.025B
 ;;9002226.02101,"873,S92.025B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.026A ",.01)
 ;;S92.026A
 ;;9002226.02101,"873,S92.026A ",.02)
 ;;S92.026A
 ;;9002226.02101,"873,S92.026A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.026B ",.01)
 ;;S92.026B
 ;;9002226.02101,"873,S92.026B ",.02)
 ;;S92.026B
 ;;9002226.02101,"873,S92.026B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.031A ",.01)
 ;;S92.031A
 ;;9002226.02101,"873,S92.031A ",.02)
 ;;S92.031A
 ;;9002226.02101,"873,S92.031A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.031B ",.01)
 ;;S92.031B
 ;;9002226.02101,"873,S92.031B ",.02)
 ;;S92.031B
 ;;9002226.02101,"873,S92.031B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.032A ",.01)
 ;;S92.032A
 ;;9002226.02101,"873,S92.032A ",.02)
 ;;S92.032A
 ;;9002226.02101,"873,S92.032A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.032B ",.01)
 ;;S92.032B
 ;;9002226.02101,"873,S92.032B ",.02)
 ;;S92.032B
 ;;9002226.02101,"873,S92.032B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.033A ",.01)
 ;;S92.033A
 ;;9002226.02101,"873,S92.033A ",.02)
 ;;S92.033A
 ;;9002226.02101,"873,S92.033A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.033B ",.01)
 ;;S92.033B
 ;;9002226.02101,"873,S92.033B ",.02)
 ;;S92.033B
 ;;9002226.02101,"873,S92.033B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.034A ",.01)
 ;;S92.034A
 ;;9002226.02101,"873,S92.034A ",.02)
 ;;S92.034A
 ;;9002226.02101,"873,S92.034A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.034B ",.01)
 ;;S92.034B
 ;;9002226.02101,"873,S92.034B ",.02)
 ;;S92.034B
 ;;9002226.02101,"873,S92.034B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.035A ",.01)
 ;;S92.035A
 ;;9002226.02101,"873,S92.035A ",.02)
 ;;S92.035A
 ;;9002226.02101,"873,S92.035A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.035B ",.01)
 ;;S92.035B
 ;;9002226.02101,"873,S92.035B ",.02)
 ;;S92.035B
 ;;9002226.02101,"873,S92.035B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.036A ",.01)
 ;;S92.036A
 ;;9002226.02101,"873,S92.036A ",.02)
 ;;S92.036A
 ;;9002226.02101,"873,S92.036A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.036B ",.01)
 ;;S92.036B
 ;;9002226.02101,"873,S92.036B ",.02)
 ;;S92.036B
 ;;9002226.02101,"873,S92.036B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.041A ",.01)
 ;;S92.041A
 ;;9002226.02101,"873,S92.041A ",.02)
 ;;S92.041A
 ;;9002226.02101,"873,S92.041A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.041B ",.01)
 ;;S92.041B
 ;;9002226.02101,"873,S92.041B ",.02)
 ;;S92.041B
 ;;9002226.02101,"873,S92.041B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.042A ",.01)
 ;;S92.042A
 ;;9002226.02101,"873,S92.042A ",.02)
 ;;S92.042A
 ;;9002226.02101,"873,S92.042A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.042B ",.01)
 ;;S92.042B
 ;;9002226.02101,"873,S92.042B ",.02)
 ;;S92.042B
 ;;9002226.02101,"873,S92.042B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.043A ",.01)
 ;;S92.043A
 ;;9002226.02101,"873,S92.043A ",.02)
 ;;S92.043A
 ;;9002226.02101,"873,S92.043A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.043B ",.01)
 ;;S92.043B
 ;;9002226.02101,"873,S92.043B ",.02)
 ;;S92.043B
 ;;9002226.02101,"873,S92.043B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.044A ",.01)
 ;;S92.044A
 ;;9002226.02101,"873,S92.044A ",.02)
 ;;S92.044A
 ;;9002226.02101,"873,S92.044A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.044B ",.01)
 ;;S92.044B
 ;;9002226.02101,"873,S92.044B ",.02)
 ;;S92.044B
 ;;9002226.02101,"873,S92.044B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.045A ",.01)
 ;;S92.045A
 ;;9002226.02101,"873,S92.045A ",.02)
 ;;S92.045A
 ;;9002226.02101,"873,S92.045A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.045B ",.01)
 ;;S92.045B
 ;;9002226.02101,"873,S92.045B ",.02)
 ;;S92.045B
 ;;9002226.02101,"873,S92.045B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.046A ",.01)
 ;;S92.046A
 ;;9002226.02101,"873,S92.046A ",.02)
 ;;S92.046A
 ;;9002226.02101,"873,S92.046A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.046B ",.01)
 ;;S92.046B
 ;;9002226.02101,"873,S92.046B ",.02)
 ;;S92.046B
 ;;9002226.02101,"873,S92.046B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.051A ",.01)
 ;;S92.051A
 ;;9002226.02101,"873,S92.051A ",.02)
 ;;S92.051A
 ;;9002226.02101,"873,S92.051A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.051B ",.01)
 ;;S92.051B
 ;;9002226.02101,"873,S92.051B ",.02)
 ;;S92.051B
 ;;9002226.02101,"873,S92.051B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.052A ",.01)
 ;;S92.052A
 ;;9002226.02101,"873,S92.052A ",.02)
 ;;S92.052A
 ;;9002226.02101,"873,S92.052A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.052B ",.01)
 ;;S92.052B
 ;;9002226.02101,"873,S92.052B ",.02)
 ;;S92.052B
 ;;9002226.02101,"873,S92.052B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.053A ",.01)
 ;;S92.053A
 ;;9002226.02101,"873,S92.053A ",.02)
 ;;S92.053A
 ;;9002226.02101,"873,S92.053A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.053B ",.01)
 ;;S92.053B
 ;;9002226.02101,"873,S92.053B ",.02)
 ;;S92.053B
 ;;9002226.02101,"873,S92.053B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.054A ",.01)
 ;;S92.054A
 ;;9002226.02101,"873,S92.054A ",.02)
 ;;S92.054A
 ;;9002226.02101,"873,S92.054A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.054B ",.01)
 ;;S92.054B
 ;;9002226.02101,"873,S92.054B ",.02)
 ;;S92.054B
 ;;9002226.02101,"873,S92.054B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.055A ",.01)
 ;;S92.055A
 ;;9002226.02101,"873,S92.055A ",.02)
 ;;S92.055A
 ;;9002226.02101,"873,S92.055A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.055B ",.01)
 ;;S92.055B
 ;;9002226.02101,"873,S92.055B ",.02)
 ;;S92.055B
 ;;9002226.02101,"873,S92.055B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.056A ",.01)
 ;;S92.056A
 ;;9002226.02101,"873,S92.056A ",.02)
 ;;S92.056A
 ;;9002226.02101,"873,S92.056A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.056B ",.01)
 ;;S92.056B
 ;;9002226.02101,"873,S92.056B ",.02)
 ;;S92.056B
 ;;9002226.02101,"873,S92.056B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.061A ",.01)
 ;;S92.061A
 ;;9002226.02101,"873,S92.061A ",.02)
 ;;S92.061A
 ;;9002226.02101,"873,S92.061A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.061B ",.01)
 ;;S92.061B
 ;;9002226.02101,"873,S92.061B ",.02)
 ;;S92.061B
 ;;9002226.02101,"873,S92.061B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.062A ",.01)
 ;;S92.062A
 ;;9002226.02101,"873,S92.062A ",.02)
 ;;S92.062A
 ;;9002226.02101,"873,S92.062A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.062B ",.01)
 ;;S92.062B
 ;;9002226.02101,"873,S92.062B ",.02)
 ;;S92.062B
 ;;9002226.02101,"873,S92.062B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.063A ",.01)
 ;;S92.063A
 ;;9002226.02101,"873,S92.063A ",.02)
 ;;S92.063A
 ;;9002226.02101,"873,S92.063A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.063B ",.01)
 ;;S92.063B
 ;;9002226.02101,"873,S92.063B ",.02)
 ;;S92.063B
 ;;9002226.02101,"873,S92.063B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.064A ",.01)
 ;;S92.064A
 ;;9002226.02101,"873,S92.064A ",.02)
 ;;S92.064A
 ;;9002226.02101,"873,S92.064A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.064B ",.01)
 ;;S92.064B
 ;;9002226.02101,"873,S92.064B ",.02)
 ;;S92.064B
 ;;9002226.02101,"873,S92.064B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.065A ",.01)
 ;;S92.065A
 ;;9002226.02101,"873,S92.065A ",.02)
 ;;S92.065A
 ;;9002226.02101,"873,S92.065A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.065B ",.01)
 ;;S92.065B
 ;;9002226.02101,"873,S92.065B ",.02)
 ;;S92.065B
 ;;9002226.02101,"873,S92.065B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.066A ",.01)
 ;;S92.066A
 ;;9002226.02101,"873,S92.066A ",.02)
 ;;S92.066A
 ;;9002226.02101,"873,S92.066A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.066B ",.01)
 ;;S92.066B
 ;;9002226.02101,"873,S92.066B ",.02)
 ;;S92.066B
 ;;9002226.02101,"873,S92.066B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.101A ",.01)
 ;;S92.101A
 ;;9002226.02101,"873,S92.101A ",.02)
 ;;S92.101A
 ;;9002226.02101,"873,S92.101A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.101B ",.01)
 ;;S92.101B
 ;;9002226.02101,"873,S92.101B ",.02)
 ;;S92.101B
 ;;9002226.02101,"873,S92.101B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.102A ",.01)
 ;;S92.102A
 ;;9002226.02101,"873,S92.102A ",.02)
 ;;S92.102A
 ;;9002226.02101,"873,S92.102A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.102B ",.01)
 ;;S92.102B
 ;;9002226.02101,"873,S92.102B ",.02)
 ;;S92.102B
 ;;9002226.02101,"873,S92.102B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.109A ",.01)
 ;;S92.109A
 ;;9002226.02101,"873,S92.109A ",.02)
 ;;S92.109A
 ;;9002226.02101,"873,S92.109A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.109B ",.01)
 ;;S92.109B
 ;;9002226.02101,"873,S92.109B ",.02)
 ;;S92.109B
 ;;9002226.02101,"873,S92.109B ",.03)
 ;;30
 ;;9002226.02101,"873,S92.111A ",.01)
 ;;S92.111A
 ;;9002226.02101,"873,S92.111A ",.02)
 ;;S92.111A
 ;;9002226.02101,"873,S92.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S92.111B ",.01)
 ;;S92.111B
 ;;9002226.02101,"873,S92.111B ",.02)
 ;;S92.111B