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

ATXO1B2.m

Go to the documentation of this file.
ATXO1B2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON OCT 28, 2013;
 ;;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,"342,02104JC ",.01)
 ;;02104JC
 ;;9002226.02101,"342,02104JC ",.02)
 ;;02104JC
 ;;9002226.02101,"342,02104JC ",.03)
 ;;31
 ;;9002226.02101,"342,02104JF ",.01)
 ;;02104JF
 ;;9002226.02101,"342,02104JF ",.02)
 ;;02104JF
 ;;9002226.02101,"342,02104JF ",.03)
 ;;31
 ;;9002226.02101,"342,02104JW ",.01)
 ;;02104JW
 ;;9002226.02101,"342,02104JW ",.02)
 ;;02104JW
 ;;9002226.02101,"342,02104JW ",.03)
 ;;31
 ;;9002226.02101,"342,02104K3 ",.01)
 ;;02104K3
 ;;9002226.02101,"342,02104K3 ",.02)
 ;;02104K3
 ;;9002226.02101,"342,02104K3 ",.03)
 ;;31
 ;;9002226.02101,"342,02104K8 ",.01)
 ;;02104K8
 ;;9002226.02101,"342,02104K8 ",.02)
 ;;02104K8
 ;;9002226.02101,"342,02104K8 ",.03)
 ;;31
 ;;9002226.02101,"342,02104K9 ",.01)
 ;;02104K9
 ;;9002226.02101,"342,02104K9 ",.02)
 ;;02104K9
 ;;9002226.02101,"342,02104K9 ",.03)
 ;;31
 ;;9002226.02101,"342,02104KC ",.01)
 ;;02104KC
 ;;9002226.02101,"342,02104KC ",.02)
 ;;02104KC
 ;;9002226.02101,"342,02104KC ",.03)
 ;;31
 ;;9002226.02101,"342,02104KF ",.01)
 ;;02104KF
 ;;9002226.02101,"342,02104KF ",.02)
 ;;02104KF
 ;;9002226.02101,"342,02104KF ",.03)
 ;;31
 ;;9002226.02101,"342,02104KW ",.01)
 ;;02104KW
 ;;9002226.02101,"342,02104KW ",.02)
 ;;02104KW
 ;;9002226.02101,"342,02104KW ",.03)
 ;;31
 ;;9002226.02101,"342,02104Z3 ",.01)
 ;;02104Z3
 ;;9002226.02101,"342,02104Z3 ",.02)
 ;;02104Z3
 ;;9002226.02101,"342,02104Z3 ",.03)
 ;;31
 ;;9002226.02101,"342,02104Z8 ",.01)
 ;;02104Z8
 ;;9002226.02101,"342,02104Z8 ",.02)
 ;;02104Z8
 ;;9002226.02101,"342,02104Z8 ",.03)
 ;;31
 ;;9002226.02101,"342,02104Z9 ",.01)
 ;;02104Z9
 ;;9002226.02101,"342,02104Z9 ",.02)
 ;;02104Z9
 ;;9002226.02101,"342,02104Z9 ",.03)
 ;;31
 ;;9002226.02101,"342,02104ZC ",.01)
 ;;02104ZC
 ;;9002226.02101,"342,02104ZC ",.02)
 ;;02104ZC
 ;;9002226.02101,"342,02104ZC ",.03)
 ;;31
 ;;9002226.02101,"342,02104ZF ",.01)
 ;;02104ZF
 ;;9002226.02101,"342,02104ZF ",.02)
 ;;02104ZF
 ;;9002226.02101,"342,02104ZF ",.03)
 ;;31
 ;;9002226.02101,"342,0211093 ",.01)
 ;;0211093
 ;;9002226.02101,"342,0211093 ",.02)
 ;;0211093
 ;;9002226.02101,"342,0211093 ",.03)
 ;;31
 ;;9002226.02101,"342,0211098 ",.01)
 ;;0211098
 ;;9002226.02101,"342,0211098 ",.02)
 ;;0211098
 ;;9002226.02101,"342,0211098 ",.03)
 ;;31
 ;;9002226.02101,"342,0211099 ",.01)
 ;;0211099
 ;;9002226.02101,"342,0211099 ",.02)
 ;;0211099
 ;;9002226.02101,"342,0211099 ",.03)
 ;;31
 ;;9002226.02101,"342,021109C ",.01)
 ;;021109C
 ;;9002226.02101,"342,021109C ",.02)
 ;;021109C
 ;;9002226.02101,"342,021109C ",.03)
 ;;31
 ;;9002226.02101,"342,021109F ",.01)
 ;;021109F
 ;;9002226.02101,"342,021109F ",.02)
 ;;021109F
 ;;9002226.02101,"342,021109F ",.03)
 ;;31
 ;;9002226.02101,"342,021109W ",.01)
 ;;021109W
 ;;9002226.02101,"342,021109W ",.02)
 ;;021109W
 ;;9002226.02101,"342,021109W ",.03)
 ;;31
 ;;9002226.02101,"342,02110A3 ",.01)
 ;;02110A3
 ;;9002226.02101,"342,02110A3 ",.02)
 ;;02110A3
 ;;9002226.02101,"342,02110A3 ",.03)
 ;;31
 ;;9002226.02101,"342,02110A8 ",.01)
 ;;02110A8
 ;;9002226.02101,"342,02110A8 ",.02)
 ;;02110A8
 ;;9002226.02101,"342,02110A8 ",.03)
 ;;31
 ;;9002226.02101,"342,02110A9 ",.01)
 ;;02110A9
 ;;9002226.02101,"342,02110A9 ",.02)
 ;;02110A9
 ;;9002226.02101,"342,02110A9 ",.03)
 ;;31
 ;;9002226.02101,"342,02110AC ",.01)
 ;;02110AC
 ;;9002226.02101,"342,02110AC ",.02)
 ;;02110AC
 ;;9002226.02101,"342,02110AC ",.03)
 ;;31
 ;;9002226.02101,"342,02110AF ",.01)
 ;;02110AF
 ;;9002226.02101,"342,02110AF ",.02)
 ;;02110AF
 ;;9002226.02101,"342,02110AF ",.03)
 ;;31
 ;;9002226.02101,"342,02110AW ",.01)
 ;;02110AW
 ;;9002226.02101,"342,02110AW ",.02)
 ;;02110AW
 ;;9002226.02101,"342,02110AW ",.03)
 ;;31
 ;;9002226.02101,"342,02110J3 ",.01)
 ;;02110J3
 ;;9002226.02101,"342,02110J3 ",.02)
 ;;02110J3
 ;;9002226.02101,"342,02110J3 ",.03)
 ;;31
 ;;9002226.02101,"342,02110J8 ",.01)
 ;;02110J8
 ;;9002226.02101,"342,02110J8 ",.02)
 ;;02110J8
 ;;9002226.02101,"342,02110J8 ",.03)
 ;;31
 ;;9002226.02101,"342,02110J9 ",.01)
 ;;02110J9
 ;;9002226.02101,"342,02110J9 ",.02)
 ;;02110J9
 ;;9002226.02101,"342,02110J9 ",.03)
 ;;31
 ;;9002226.02101,"342,02110JC ",.01)
 ;;02110JC
 ;;9002226.02101,"342,02110JC ",.02)
 ;;02110JC
 ;;9002226.02101,"342,02110JC ",.03)
 ;;31
 ;;9002226.02101,"342,02110JF ",.01)
 ;;02110JF
 ;;9002226.02101,"342,02110JF ",.02)
 ;;02110JF
 ;;9002226.02101,"342,02110JF ",.03)
 ;;31
 ;;9002226.02101,"342,02110JW ",.01)
 ;;02110JW
 ;;9002226.02101,"342,02110JW ",.02)
 ;;02110JW
 ;;9002226.02101,"342,02110JW ",.03)
 ;;31
 ;;9002226.02101,"342,02110K3 ",.01)
 ;;02110K3
 ;;9002226.02101,"342,02110K3 ",.02)
 ;;02110K3
 ;;9002226.02101,"342,02110K3 ",.03)
 ;;31
 ;;9002226.02101,"342,02110K8 ",.01)
 ;;02110K8
 ;;9002226.02101,"342,02110K8 ",.02)
 ;;02110K8
 ;;9002226.02101,"342,02110K8 ",.03)
 ;;31
 ;;9002226.02101,"342,02110K9 ",.01)
 ;;02110K9
 ;;9002226.02101,"342,02110K9 ",.02)
 ;;02110K9
 ;;9002226.02101,"342,02110K9 ",.03)
 ;;31
 ;;9002226.02101,"342,02110KC ",.01)
 ;;02110KC
 ;;9002226.02101,"342,02110KC ",.02)
 ;;02110KC
 ;;9002226.02101,"342,02110KC ",.03)
 ;;31
 ;;9002226.02101,"342,02110KF ",.01)
 ;;02110KF
 ;;9002226.02101,"342,02110KF ",.02)
 ;;02110KF
 ;;9002226.02101,"342,02110KF ",.03)
 ;;31
 ;;9002226.02101,"342,02110KW ",.01)
 ;;02110KW
 ;;9002226.02101,"342,02110KW ",.02)
 ;;02110KW
 ;;9002226.02101,"342,02110KW ",.03)
 ;;31
 ;;9002226.02101,"342,02110Z3 ",.01)
 ;;02110Z3
 ;;9002226.02101,"342,02110Z3 ",.02)
 ;;02110Z3
 ;;9002226.02101,"342,02110Z3 ",.03)
 ;;31
 ;;9002226.02101,"342,02110Z8 ",.01)
 ;;02110Z8
 ;;9002226.02101,"342,02110Z8 ",.02)
 ;;02110Z8
 ;;9002226.02101,"342,02110Z8 ",.03)
 ;;31
 ;;9002226.02101,"342,02110Z9 ",.01)
 ;;02110Z9
 ;;9002226.02101,"342,02110Z9 ",.02)
 ;;02110Z9
 ;;9002226.02101,"342,02110Z9 ",.03)
 ;;31
 ;;9002226.02101,"342,02110ZC ",.01)
 ;;02110ZC
 ;;9002226.02101,"342,02110ZC ",.02)
 ;;02110ZC
 ;;9002226.02101,"342,02110ZC ",.03)
 ;;31
 ;;9002226.02101,"342,02110ZF ",.01)
 ;;02110ZF
 ;;9002226.02101,"342,02110ZF ",.02)
 ;;02110ZF
 ;;9002226.02101,"342,02110ZF ",.03)
 ;;31
 ;;9002226.02101,"342,0211493 ",.01)
 ;;0211493
 ;;9002226.02101,"342,0211493 ",.02)
 ;;0211493
 ;;9002226.02101,"342,0211493 ",.03)
 ;;31
 ;;9002226.02101,"342,0211498 ",.01)
 ;;0211498
 ;;9002226.02101,"342,0211498 ",.02)
 ;;0211498
 ;;9002226.02101,"342,0211498 ",.03)
 ;;31
 ;;9002226.02101,"342,0211499 ",.01)
 ;;0211499
 ;;9002226.02101,"342,0211499 ",.02)
 ;;0211499
 ;;9002226.02101,"342,0211499 ",.03)
 ;;31
 ;;9002226.02101,"342,021149C ",.01)
 ;;021149C
 ;;9002226.02101,"342,021149C ",.02)
 ;;021149C
 ;;9002226.02101,"342,021149C ",.03)
 ;;31
 ;;9002226.02101,"342,021149F ",.01)
 ;;021149F
 ;;9002226.02101,"342,021149F ",.02)
 ;;021149F
 ;;9002226.02101,"342,021149F ",.03)
 ;;31
 ;;9002226.02101,"342,021149W ",.01)
 ;;021149W
 ;;9002226.02101,"342,021149W ",.02)
 ;;021149W
 ;;9002226.02101,"342,021149W ",.03)
 ;;31
 ;;9002226.02101,"342,02114A3 ",.01)
 ;;02114A3
 ;;9002226.02101,"342,02114A3 ",.02)
 ;;02114A3
 ;;9002226.02101,"342,02114A3 ",.03)
 ;;31
 ;;9002226.02101,"342,02114A8 ",.01)
 ;;02114A8
 ;;9002226.02101,"342,02114A8 ",.02)
 ;;02114A8
 ;;9002226.02101,"342,02114A8 ",.03)
 ;;31
 ;;9002226.02101,"342,02114A9 ",.01)
 ;;02114A9
 ;;9002226.02101,"342,02114A9 ",.02)
 ;;02114A9
 ;;9002226.02101,"342,02114A9 ",.03)
 ;;31
 ;;9002226.02101,"342,02114AC ",.01)
 ;;02114AC
 ;;9002226.02101,"342,02114AC ",.02)
 ;;02114AC
 ;;9002226.02101,"342,02114AC ",.03)
 ;;31
 ;;9002226.02101,"342,02114AF ",.01)
 ;;02114AF
 ;;9002226.02101,"342,02114AF ",.02)
 ;;02114AF
 ;;9002226.02101,"342,02114AF ",.03)
 ;;31
 ;;9002226.02101,"342,02114AW ",.01)
 ;;02114AW
 ;;9002226.02101,"342,02114AW ",.02)
 ;;02114AW
 ;;9002226.02101,"342,02114AW ",.03)
 ;;31
 ;;9002226.02101,"342,02114J3 ",.01)
 ;;02114J3
 ;;9002226.02101,"342,02114J3 ",.02)
 ;;02114J3
 ;;9002226.02101,"342,02114J3 ",.03)
 ;;31
 ;;9002226.02101,"342,02114J8 ",.01)
 ;;02114J8
 ;;9002226.02101,"342,02114J8 ",.02)
 ;;02114J8
 ;;9002226.02101,"342,02114J8 ",.03)
 ;;31
 ;;9002226.02101,"342,02114J9 ",.01)
 ;;02114J9
 ;;9002226.02101,"342,02114J9 ",.02)
 ;;02114J9
 ;;9002226.02101,"342,02114J9 ",.03)
 ;;31
 ;;9002226.02101,"342,02114JC ",.01)
 ;;02114JC
 ;;9002226.02101,"342,02114JC ",.02)
 ;;02114JC
 ;;9002226.02101,"342,02114JC ",.03)
 ;;31
 ;;9002226.02101,"342,02114JF ",.01)
 ;;02114JF
 ;;9002226.02101,"342,02114JF ",.02)
 ;;02114JF
 ;;9002226.02101,"342,02114JF ",.03)
 ;;31
 ;;9002226.02101,"342,02114JW ",.01)
 ;;02114JW
 ;;9002226.02101,"342,02114JW ",.02)
 ;;02114JW
 ;;9002226.02101,"342,02114JW ",.03)
 ;;31
 ;;9002226.02101,"342,02114K3 ",.01)
 ;;02114K3
 ;;9002226.02101,"342,02114K3 ",.02)
 ;;02114K3
 ;;9002226.02101,"342,02114K3 ",.03)
 ;;31
 ;;9002226.02101,"342,02114K8 ",.01)
 ;;02114K8
 ;;9002226.02101,"342,02114K8 ",.02)
 ;;02114K8
 ;;9002226.02101,"342,02114K8 ",.03)
 ;;31
 ;;9002226.02101,"342,02114K9 ",.01)
 ;;02114K9
 ;;9002226.02101,"342,02114K9 ",.02)
 ;;02114K9
 ;;9002226.02101,"342,02114K9 ",.03)
 ;;31
 ;;9002226.02101,"342,02114KC ",.01)
 ;;02114KC
 ;;9002226.02101,"342,02114KC ",.02)
 ;;02114KC
 ;;9002226.02101,"342,02114KC ",.03)
 ;;31
 ;;9002226.02101,"342,02114KF ",.01)
 ;;02114KF
 ;;9002226.02101,"342,02114KF ",.02)
 ;;02114KF
 ;;9002226.02101,"342,02114KF ",.03)
 ;;31
 ;;9002226.02101,"342,02114KW ",.01)
 ;;02114KW
 ;;9002226.02101,"342,02114KW ",.02)
 ;;02114KW
 ;;9002226.02101,"342,02114KW ",.03)
 ;;31
 ;;9002226.02101,"342,02114Z3 ",.01)
 ;;02114Z3
 ;;9002226.02101,"342,02114Z3 ",.02)
 ;;02114Z3
 ;;9002226.02101,"342,02114Z3 ",.03)
 ;;31
 ;;9002226.02101,"342,02114Z8 ",.01)
 ;;02114Z8
 ;;9002226.02101,"342,02114Z8 ",.02)
 ;;02114Z8
 ;;9002226.02101,"342,02114Z8 ",.03)
 ;;31
 ;;9002226.02101,"342,02114Z9 ",.01)
 ;;02114Z9
 ;;9002226.02101,"342,02114Z9 ",.02)
 ;;02114Z9
 ;;9002226.02101,"342,02114Z9 ",.03)
 ;;31
 ;;9002226.02101,"342,02114ZC ",.01)
 ;;02114ZC
 ;;9002226.02101,"342,02114ZC ",.02)
 ;;02114ZC
 ;;9002226.02101,"342,02114ZC ",.03)
 ;;31
 ;;9002226.02101,"342,02114ZF ",.01)
 ;;02114ZF
 ;;9002226.02101,"342,02114ZF ",.02)
 ;;02114ZF
 ;;9002226.02101,"342,02114ZF ",.03)
 ;;31
 ;;9002226.02101,"342,0212093 ",.01)
 ;;0212093
 ;;9002226.02101,"342,0212093 ",.02)
 ;;0212093
 ;;9002226.02101,"342,0212093 ",.03)
 ;;31
 ;;9002226.02101,"342,0212098 ",.01)
 ;;0212098
 ;;9002226.02101,"342,0212098 ",.02)
 ;;0212098
 ;;9002226.02101,"342,0212098 ",.03)
 ;;31
 ;;9002226.02101,"342,0212099 ",.01)
 ;;0212099
 ;;9002226.02101,"342,0212099 ",.02)
 ;;0212099
 ;;9002226.02101,"342,0212099 ",.03)
 ;;31
 ;;9002226.02101,"342,021209C ",.01)
 ;;021209C
 ;;9002226.02101,"342,021209C ",.02)
 ;;021209C
 ;;9002226.02101,"342,021209C ",.03)
 ;;31
 ;;9002226.02101,"342,021209F ",.01)
 ;;021209F
 ;;9002226.02101,"342,021209F ",.02)
 ;;021209F
 ;;9002226.02101,"342,021209F ",.03)
 ;;31
 ;;9002226.02101,"342,021209W ",.01)
 ;;021209W
 ;;9002226.02101,"342,021209W ",.02)
 ;;021209W
 ;;9002226.02101,"342,021209W ",.03)
 ;;31
 ;;9002226.02101,"342,02120A3 ",.01)
 ;;02120A3
 ;;9002226.02101,"342,02120A3 ",.02)
 ;;02120A3
 ;;9002226.02101,"342,02120A3 ",.03)
 ;;31
 ;;9002226.02101,"342,02120A8 ",.01)
 ;;02120A8
 ;;9002226.02101,"342,02120A8 ",.02)
 ;;02120A8
 ;;9002226.02101,"342,02120A8 ",.03)
 ;;31
 ;;9002226.02101,"342,02120A9 ",.01)
 ;;02120A9
 ;;9002226.02101,"342,02120A9 ",.02)
 ;;02120A9
 ;;9002226.02101,"342,02120A9 ",.03)
 ;;31
 ;;9002226.02101,"342,02120AC ",.01)
 ;;02120AC
 ;;9002226.02101,"342,02120AC ",.02)
 ;;02120AC
 ;;9002226.02101,"342,02120AC ",.03)
 ;;31
 ;;9002226.02101,"342,02120AF ",.01)
 ;;02120AF
 ;;9002226.02101,"342,02120AF ",.02)
 ;;02120AF
 ;;9002226.02101,"342,02120AF ",.03)
 ;;31
 ;;9002226.02101,"342,02120AW ",.01)
 ;;02120AW
 ;;9002226.02101,"342,02120AW ",.02)
 ;;02120AW
 ;;9002226.02101,"342,02120AW ",.03)
 ;;31
 ;;9002226.02101,"342,02120J3 ",.01)
 ;;02120J3
 ;;9002226.02101,"342,02120J3 ",.02)
 ;;02120J3
 ;;9002226.02101,"342,02120J3 ",.03)
 ;;31
 ;;9002226.02101,"342,02120J8 ",.01)
 ;;02120J8
 ;;9002226.02101,"342,02120J8 ",.02)
 ;;02120J8
 ;;9002226.02101,"342,02120J8 ",.03)
 ;;31
 ;;9002226.02101,"342,02120J9 ",.01)
 ;;02120J9
 ;;9002226.02101,"342,02120J9 ",.02)
 ;;02120J9
 ;;9002226.02101,"342,02120J9 ",.03)
 ;;31
 ;;9002226.02101,"342,02120JC ",.01)
 ;;02120JC
 ;;9002226.02101,"342,02120JC ",.02)
 ;;02120JC
 ;;9002226.02101,"342,02120JC ",.03)
 ;;31
 ;;9002226.02101,"342,02120JF ",.01)
 ;;02120JF
 ;;9002226.02101,"342,02120JF ",.02)
 ;;02120JF
 ;;9002226.02101,"342,02120JF ",.03)
 ;;31
 ;;9002226.02101,"342,02120JW ",.01)
 ;;02120JW
 ;;9002226.02101,"342,02120JW ",.02)
 ;;02120JW
 ;;9002226.02101,"342,02120JW ",.03)
 ;;31
 ;;9002226.02101,"342,02120K3 ",.01)
 ;;02120K3
 ;;9002226.02101,"342,02120K3 ",.02)
 ;;02120K3
 ;;9002226.02101,"342,02120K3 ",.03)
 ;;31
 ;;9002226.02101,"342,02120K8 ",.01)
 ;;02120K8
 ;;9002226.02101,"342,02120K8 ",.02)
 ;;02120K8
 ;;9002226.02101,"342,02120K8 ",.03)
 ;;31
 ;;9002226.02101,"342,02120K9 ",.01)
 ;;02120K9
 ;;9002226.02101,"342,02120K9 ",.02)
 ;;02120K9
 ;;9002226.02101,"342,02120K9 ",.03)
 ;;31
 ;;9002226.02101,"342,02120KC ",.01)
 ;;02120KC