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

ATXD2F20.m

Go to the documentation of this file.
ATXD2F20 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2015;
 ;;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,"374,S72.491B ",.02)
 ;;S72.491B
 ;;9002226.02101,"374,S72.491B ",.03)
 ;;30
 ;;9002226.02101,"374,S72.491C ",.01)
 ;;S72.491C
 ;;9002226.02101,"374,S72.491C ",.02)
 ;;S72.491C
 ;;9002226.02101,"374,S72.491C ",.03)
 ;;30
 ;;9002226.02101,"374,S72.492A ",.01)
 ;;S72.492A
 ;;9002226.02101,"374,S72.492A ",.02)
 ;;S72.492A
 ;;9002226.02101,"374,S72.492A ",.03)
 ;;30
 ;;9002226.02101,"374,S72.492B ",.01)
 ;;S72.492B
 ;;9002226.02101,"374,S72.492B ",.02)
 ;;S72.492B
 ;;9002226.02101,"374,S72.492B ",.03)
 ;;30
 ;;9002226.02101,"374,S72.492C ",.01)
 ;;S72.492C
 ;;9002226.02101,"374,S72.492C ",.02)
 ;;S72.492C
 ;;9002226.02101,"374,S72.492C ",.03)
 ;;30
 ;;9002226.02101,"374,S72.499A ",.01)
 ;;S72.499A
 ;;9002226.02101,"374,S72.499A ",.02)
 ;;S72.499A
 ;;9002226.02101,"374,S72.499A ",.03)
 ;;30
 ;;9002226.02101,"374,S72.499B ",.01)
 ;;S72.499B
 ;;9002226.02101,"374,S72.499B ",.02)
 ;;S72.499B
 ;;9002226.02101,"374,S72.499B ",.03)
 ;;30
 ;;9002226.02101,"374,S72.499C ",.01)
 ;;S72.499C
 ;;9002226.02101,"374,S72.499C ",.02)
 ;;S72.499C
 ;;9002226.02101,"374,S72.499C ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X1A ",.01)
 ;;S72.8X1A
 ;;9002226.02101,"374,S72.8X1A ",.02)
 ;;S72.8X1A
 ;;9002226.02101,"374,S72.8X1A ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X1B ",.01)
 ;;S72.8X1B
 ;;9002226.02101,"374,S72.8X1B ",.02)
 ;;S72.8X1B
 ;;9002226.02101,"374,S72.8X1B ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X1C ",.01)
 ;;S72.8X1C
 ;;9002226.02101,"374,S72.8X1C ",.02)
 ;;S72.8X1C
 ;;9002226.02101,"374,S72.8X1C ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X2A ",.01)
 ;;S72.8X2A
 ;;9002226.02101,"374,S72.8X2A ",.02)
 ;;S72.8X2A
 ;;9002226.02101,"374,S72.8X2A ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X2B ",.01)
 ;;S72.8X2B
 ;;9002226.02101,"374,S72.8X2B ",.02)
 ;;S72.8X2B
 ;;9002226.02101,"374,S72.8X2B ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X2C ",.01)
 ;;S72.8X2C
 ;;9002226.02101,"374,S72.8X2C ",.02)
 ;;S72.8X2C
 ;;9002226.02101,"374,S72.8X2C ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X9A ",.01)
 ;;S72.8X9A
 ;;9002226.02101,"374,S72.8X9A ",.02)
 ;;S72.8X9A
 ;;9002226.02101,"374,S72.8X9A ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X9B ",.01)
 ;;S72.8X9B
 ;;9002226.02101,"374,S72.8X9B ",.02)
 ;;S72.8X9B
 ;;9002226.02101,"374,S72.8X9B ",.03)
 ;;30
 ;;9002226.02101,"374,S72.8X9C ",.01)
 ;;S72.8X9C
 ;;9002226.02101,"374,S72.8X9C ",.02)
 ;;S72.8X9C
 ;;9002226.02101,"374,S72.8X9C ",.03)
 ;;30
 ;;9002226.02101,"374,S72.90XA ",.01)
 ;;S72.90XA
 ;;9002226.02101,"374,S72.90XA ",.02)
 ;;S72.90XA
 ;;9002226.02101,"374,S72.90XA ",.03)
 ;;30
 ;;9002226.02101,"374,S72.90XB ",.01)
 ;;S72.90XB
 ;;9002226.02101,"374,S72.90XB ",.02)
 ;;S72.90XB
 ;;9002226.02101,"374,S72.90XB ",.03)
 ;;30
 ;;9002226.02101,"374,S72.90XC ",.01)
 ;;S72.90XC
 ;;9002226.02101,"374,S72.90XC ",.02)
 ;;S72.90XC
 ;;9002226.02101,"374,S72.90XC ",.03)
 ;;30
 ;;9002226.02101,"374,S72.91XA ",.01)
 ;;S72.91XA
 ;;9002226.02101,"374,S72.91XA ",.02)
 ;;S72.91XA
 ;;9002226.02101,"374,S72.91XA ",.03)
 ;;30
 ;;9002226.02101,"374,S72.91XB ",.01)
 ;;S72.91XB
 ;;9002226.02101,"374,S72.91XB ",.02)
 ;;S72.91XB
 ;;9002226.02101,"374,S72.91XB ",.03)
 ;;30
 ;;9002226.02101,"374,S72.91XC ",.01)
 ;;S72.91XC
 ;;9002226.02101,"374,S72.91XC ",.02)
 ;;S72.91XC
 ;;9002226.02101,"374,S72.91XC ",.03)
 ;;30
 ;;9002226.02101,"374,S72.92XA ",.01)
 ;;S72.92XA
 ;;9002226.02101,"374,S72.92XA ",.02)
 ;;S72.92XA
 ;;9002226.02101,"374,S72.92XA ",.03)
 ;;30
 ;;9002226.02101,"374,S72.92XB ",.01)
 ;;S72.92XB
 ;;9002226.02101,"374,S72.92XB ",.02)
 ;;S72.92XB
 ;;9002226.02101,"374,S72.92XB ",.03)
 ;;30
 ;;9002226.02101,"374,S72.92XC ",.01)
 ;;S72.92XC
 ;;9002226.02101,"374,S72.92XC ",.02)
 ;;S72.92XC
 ;;9002226.02101,"374,S72.92XC ",.03)
 ;;30
 ;;9002226.02101,"374,S82.001A ",.01)
 ;;S82.001A
 ;;9002226.02101,"374,S82.001A ",.02)
 ;;S82.001A
 ;;9002226.02101,"374,S82.001A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.001B ",.01)
 ;;S82.001B
 ;;9002226.02101,"374,S82.001B ",.02)
 ;;S82.001B
 ;;9002226.02101,"374,S82.001B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.001C ",.01)
 ;;S82.001C
 ;;9002226.02101,"374,S82.001C ",.02)
 ;;S82.001C
 ;;9002226.02101,"374,S82.001C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.002A ",.01)
 ;;S82.002A
 ;;9002226.02101,"374,S82.002A ",.02)
 ;;S82.002A
 ;;9002226.02101,"374,S82.002A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.002B ",.01)
 ;;S82.002B
 ;;9002226.02101,"374,S82.002B ",.02)
 ;;S82.002B
 ;;9002226.02101,"374,S82.002B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.002C ",.01)
 ;;S82.002C
 ;;9002226.02101,"374,S82.002C ",.02)
 ;;S82.002C
 ;;9002226.02101,"374,S82.002C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.009A ",.01)
 ;;S82.009A
 ;;9002226.02101,"374,S82.009A ",.02)
 ;;S82.009A
 ;;9002226.02101,"374,S82.009A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.009B ",.01)
 ;;S82.009B
 ;;9002226.02101,"374,S82.009B ",.02)
 ;;S82.009B
 ;;9002226.02101,"374,S82.009B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.009C ",.01)
 ;;S82.009C
 ;;9002226.02101,"374,S82.009C ",.02)
 ;;S82.009C
 ;;9002226.02101,"374,S82.009C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.011A ",.01)
 ;;S82.011A
 ;;9002226.02101,"374,S82.011A ",.02)
 ;;S82.011A
 ;;9002226.02101,"374,S82.011A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.011B ",.01)
 ;;S82.011B
 ;;9002226.02101,"374,S82.011B ",.02)
 ;;S82.011B
 ;;9002226.02101,"374,S82.011B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.011C ",.01)
 ;;S82.011C
 ;;9002226.02101,"374,S82.011C ",.02)
 ;;S82.011C
 ;;9002226.02101,"374,S82.011C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.012A ",.01)
 ;;S82.012A
 ;;9002226.02101,"374,S82.012A ",.02)
 ;;S82.012A
 ;;9002226.02101,"374,S82.012A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.012B ",.01)
 ;;S82.012B
 ;;9002226.02101,"374,S82.012B ",.02)
 ;;S82.012B
 ;;9002226.02101,"374,S82.012B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.012C ",.01)
 ;;S82.012C
 ;;9002226.02101,"374,S82.012C ",.02)
 ;;S82.012C
 ;;9002226.02101,"374,S82.012C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.013A ",.01)
 ;;S82.013A
 ;;9002226.02101,"374,S82.013A ",.02)
 ;;S82.013A
 ;;9002226.02101,"374,S82.013A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.013B ",.01)
 ;;S82.013B
 ;;9002226.02101,"374,S82.013B ",.02)
 ;;S82.013B
 ;;9002226.02101,"374,S82.013B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.013C ",.01)
 ;;S82.013C
 ;;9002226.02101,"374,S82.013C ",.02)
 ;;S82.013C
 ;;9002226.02101,"374,S82.013C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.014A ",.01)
 ;;S82.014A
 ;;9002226.02101,"374,S82.014A ",.02)
 ;;S82.014A
 ;;9002226.02101,"374,S82.014A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.014B ",.01)
 ;;S82.014B
 ;;9002226.02101,"374,S82.014B ",.02)
 ;;S82.014B
 ;;9002226.02101,"374,S82.014B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.014C ",.01)
 ;;S82.014C
 ;;9002226.02101,"374,S82.014C ",.02)
 ;;S82.014C
 ;;9002226.02101,"374,S82.014C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.015A ",.01)
 ;;S82.015A
 ;;9002226.02101,"374,S82.015A ",.02)
 ;;S82.015A
 ;;9002226.02101,"374,S82.015A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.015B ",.01)
 ;;S82.015B
 ;;9002226.02101,"374,S82.015B ",.02)
 ;;S82.015B
 ;;9002226.02101,"374,S82.015B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.015C ",.01)
 ;;S82.015C
 ;;9002226.02101,"374,S82.015C ",.02)
 ;;S82.015C
 ;;9002226.02101,"374,S82.015C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.016A ",.01)
 ;;S82.016A
 ;;9002226.02101,"374,S82.016A ",.02)
 ;;S82.016A
 ;;9002226.02101,"374,S82.016A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.016B ",.01)
 ;;S82.016B
 ;;9002226.02101,"374,S82.016B ",.02)
 ;;S82.016B
 ;;9002226.02101,"374,S82.016B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.016C ",.01)
 ;;S82.016C
 ;;9002226.02101,"374,S82.016C ",.02)
 ;;S82.016C
 ;;9002226.02101,"374,S82.016C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.021A ",.01)
 ;;S82.021A
 ;;9002226.02101,"374,S82.021A ",.02)
 ;;S82.021A
 ;;9002226.02101,"374,S82.021A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.021B ",.01)
 ;;S82.021B
 ;;9002226.02101,"374,S82.021B ",.02)
 ;;S82.021B
 ;;9002226.02101,"374,S82.021B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.021C ",.01)
 ;;S82.021C
 ;;9002226.02101,"374,S82.021C ",.02)
 ;;S82.021C
 ;;9002226.02101,"374,S82.021C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.022A ",.01)
 ;;S82.022A
 ;;9002226.02101,"374,S82.022A ",.02)
 ;;S82.022A
 ;;9002226.02101,"374,S82.022A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.022B ",.01)
 ;;S82.022B
 ;;9002226.02101,"374,S82.022B ",.02)
 ;;S82.022B
 ;;9002226.02101,"374,S82.022B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.022C ",.01)
 ;;S82.022C
 ;;9002226.02101,"374,S82.022C ",.02)
 ;;S82.022C
 ;;9002226.02101,"374,S82.022C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.023A ",.01)
 ;;S82.023A
 ;;9002226.02101,"374,S82.023A ",.02)
 ;;S82.023A
 ;;9002226.02101,"374,S82.023A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.023B ",.01)
 ;;S82.023B
 ;;9002226.02101,"374,S82.023B ",.02)
 ;;S82.023B
 ;;9002226.02101,"374,S82.023B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.023C ",.01)
 ;;S82.023C
 ;;9002226.02101,"374,S82.023C ",.02)
 ;;S82.023C
 ;;9002226.02101,"374,S82.023C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.024A ",.01)
 ;;S82.024A
 ;;9002226.02101,"374,S82.024A ",.02)
 ;;S82.024A
 ;;9002226.02101,"374,S82.024A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.024B ",.01)
 ;;S82.024B
 ;;9002226.02101,"374,S82.024B ",.02)
 ;;S82.024B
 ;;9002226.02101,"374,S82.024B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.024C ",.01)
 ;;S82.024C
 ;;9002226.02101,"374,S82.024C ",.02)
 ;;S82.024C
 ;;9002226.02101,"374,S82.024C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.025A ",.01)
 ;;S82.025A
 ;;9002226.02101,"374,S82.025A ",.02)
 ;;S82.025A
 ;;9002226.02101,"374,S82.025A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.025B ",.01)
 ;;S82.025B
 ;;9002226.02101,"374,S82.025B ",.02)
 ;;S82.025B
 ;;9002226.02101,"374,S82.025B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.025C ",.01)
 ;;S82.025C
 ;;9002226.02101,"374,S82.025C ",.02)
 ;;S82.025C
 ;;9002226.02101,"374,S82.025C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.026A ",.01)
 ;;S82.026A
 ;;9002226.02101,"374,S82.026A ",.02)
 ;;S82.026A
 ;;9002226.02101,"374,S82.026A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.026B ",.01)
 ;;S82.026B
 ;;9002226.02101,"374,S82.026B ",.02)
 ;;S82.026B
 ;;9002226.02101,"374,S82.026B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.026C ",.01)
 ;;S82.026C
 ;;9002226.02101,"374,S82.026C ",.02)
 ;;S82.026C
 ;;9002226.02101,"374,S82.026C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.031A ",.01)
 ;;S82.031A
 ;;9002226.02101,"374,S82.031A ",.02)
 ;;S82.031A
 ;;9002226.02101,"374,S82.031A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.031B ",.01)
 ;;S82.031B
 ;;9002226.02101,"374,S82.031B ",.02)
 ;;S82.031B
 ;;9002226.02101,"374,S82.031B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.031C ",.01)
 ;;S82.031C
 ;;9002226.02101,"374,S82.031C ",.02)
 ;;S82.031C
 ;;9002226.02101,"374,S82.031C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.032A ",.01)
 ;;S82.032A
 ;;9002226.02101,"374,S82.032A ",.02)
 ;;S82.032A
 ;;9002226.02101,"374,S82.032A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.032B ",.01)
 ;;S82.032B
 ;;9002226.02101,"374,S82.032B ",.02)
 ;;S82.032B
 ;;9002226.02101,"374,S82.032B ",.03)
 ;;30
 ;;9002226.02101,"374,S82.032C ",.01)
 ;;S82.032C
 ;;9002226.02101,"374,S82.032C ",.02)
 ;;S82.032C
 ;;9002226.02101,"374,S82.032C ",.03)
 ;;30
 ;;9002226.02101,"374,S82.033A ",.01)
 ;;S82.033A
 ;;9002226.02101,"374,S82.033A ",.02)
 ;;S82.033A
 ;;9002226.02101,"374,S82.033A ",.03)
 ;;30
 ;;9002226.02101,"374,S82.033B ",.01)
 ;;S82.033B
 ;;9002226.02101,"374,S82.033B ",.02)
 ;;S82.033B