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

ATXO1B3.m

Go to the documentation of this file.
ATXO1B3 ;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,02120KC ",.02)
 ;;02120KC
 ;;9002226.02101,"342,02120KC ",.03)
 ;;31
 ;;9002226.02101,"342,02120KF ",.01)
 ;;02120KF
 ;;9002226.02101,"342,02120KF ",.02)
 ;;02120KF
 ;;9002226.02101,"342,02120KF ",.03)
 ;;31
 ;;9002226.02101,"342,02120KW ",.01)
 ;;02120KW
 ;;9002226.02101,"342,02120KW ",.02)
 ;;02120KW
 ;;9002226.02101,"342,02120KW ",.03)
 ;;31
 ;;9002226.02101,"342,02120Z3 ",.01)
 ;;02120Z3
 ;;9002226.02101,"342,02120Z3 ",.02)
 ;;02120Z3
 ;;9002226.02101,"342,02120Z3 ",.03)
 ;;31
 ;;9002226.02101,"342,02120Z8 ",.01)
 ;;02120Z8
 ;;9002226.02101,"342,02120Z8 ",.02)
 ;;02120Z8
 ;;9002226.02101,"342,02120Z8 ",.03)
 ;;31
 ;;9002226.02101,"342,02120Z9 ",.01)
 ;;02120Z9
 ;;9002226.02101,"342,02120Z9 ",.02)
 ;;02120Z9
 ;;9002226.02101,"342,02120Z9 ",.03)
 ;;31
 ;;9002226.02101,"342,02120ZC ",.01)
 ;;02120ZC
 ;;9002226.02101,"342,02120ZC ",.02)
 ;;02120ZC
 ;;9002226.02101,"342,02120ZC ",.03)
 ;;31
 ;;9002226.02101,"342,02120ZF ",.01)
 ;;02120ZF
 ;;9002226.02101,"342,02120ZF ",.02)
 ;;02120ZF
 ;;9002226.02101,"342,02120ZF ",.03)
 ;;31
 ;;9002226.02101,"342,0212493 ",.01)
 ;;0212493
 ;;9002226.02101,"342,0212493 ",.02)
 ;;0212493
 ;;9002226.02101,"342,0212493 ",.03)
 ;;31
 ;;9002226.02101,"342,0212498 ",.01)
 ;;0212498
 ;;9002226.02101,"342,0212498 ",.02)
 ;;0212498
 ;;9002226.02101,"342,0212498 ",.03)
 ;;31
 ;;9002226.02101,"342,0212499 ",.01)
 ;;0212499
 ;;9002226.02101,"342,0212499 ",.02)
 ;;0212499
 ;;9002226.02101,"342,0212499 ",.03)
 ;;31
 ;;9002226.02101,"342,021249C ",.01)
 ;;021249C
 ;;9002226.02101,"342,021249C ",.02)
 ;;021249C
 ;;9002226.02101,"342,021249C ",.03)
 ;;31
 ;;9002226.02101,"342,021249F ",.01)
 ;;021249F
 ;;9002226.02101,"342,021249F ",.02)
 ;;021249F
 ;;9002226.02101,"342,021249F ",.03)
 ;;31
 ;;9002226.02101,"342,021249W ",.01)
 ;;021249W
 ;;9002226.02101,"342,021249W ",.02)
 ;;021249W
 ;;9002226.02101,"342,021249W ",.03)
 ;;31
 ;;9002226.02101,"342,02124A3 ",.01)
 ;;02124A3
 ;;9002226.02101,"342,02124A3 ",.02)
 ;;02124A3
 ;;9002226.02101,"342,02124A3 ",.03)
 ;;31
 ;;9002226.02101,"342,02124A8 ",.01)
 ;;02124A8
 ;;9002226.02101,"342,02124A8 ",.02)
 ;;02124A8
 ;;9002226.02101,"342,02124A8 ",.03)
 ;;31
 ;;9002226.02101,"342,02124A9 ",.01)
 ;;02124A9
 ;;9002226.02101,"342,02124A9 ",.02)
 ;;02124A9
 ;;9002226.02101,"342,02124A9 ",.03)
 ;;31
 ;;9002226.02101,"342,02124AC ",.01)
 ;;02124AC
 ;;9002226.02101,"342,02124AC ",.02)
 ;;02124AC
 ;;9002226.02101,"342,02124AC ",.03)
 ;;31
 ;;9002226.02101,"342,02124AF ",.01)
 ;;02124AF
 ;;9002226.02101,"342,02124AF ",.02)
 ;;02124AF
 ;;9002226.02101,"342,02124AF ",.03)
 ;;31
 ;;9002226.02101,"342,02124AW ",.01)
 ;;02124AW
 ;;9002226.02101,"342,02124AW ",.02)
 ;;02124AW
 ;;9002226.02101,"342,02124AW ",.03)
 ;;31
 ;;9002226.02101,"342,02124J3 ",.01)
 ;;02124J3
 ;;9002226.02101,"342,02124J3 ",.02)
 ;;02124J3
 ;;9002226.02101,"342,02124J3 ",.03)
 ;;31
 ;;9002226.02101,"342,02124J8 ",.01)
 ;;02124J8
 ;;9002226.02101,"342,02124J8 ",.02)
 ;;02124J8
 ;;9002226.02101,"342,02124J8 ",.03)
 ;;31
 ;;9002226.02101,"342,02124J9 ",.01)
 ;;02124J9
 ;;9002226.02101,"342,02124J9 ",.02)
 ;;02124J9
 ;;9002226.02101,"342,02124J9 ",.03)
 ;;31
 ;;9002226.02101,"342,02124JC ",.01)
 ;;02124JC
 ;;9002226.02101,"342,02124JC ",.02)
 ;;02124JC
 ;;9002226.02101,"342,02124JC ",.03)
 ;;31
 ;;9002226.02101,"342,02124JF ",.01)
 ;;02124JF
 ;;9002226.02101,"342,02124JF ",.02)
 ;;02124JF
 ;;9002226.02101,"342,02124JF ",.03)
 ;;31
 ;;9002226.02101,"342,02124JW ",.01)
 ;;02124JW
 ;;9002226.02101,"342,02124JW ",.02)
 ;;02124JW
 ;;9002226.02101,"342,02124JW ",.03)
 ;;31
 ;;9002226.02101,"342,02124K3 ",.01)
 ;;02124K3
 ;;9002226.02101,"342,02124K3 ",.02)
 ;;02124K3
 ;;9002226.02101,"342,02124K3 ",.03)
 ;;31
 ;;9002226.02101,"342,02124K8 ",.01)
 ;;02124K8
 ;;9002226.02101,"342,02124K8 ",.02)
 ;;02124K8
 ;;9002226.02101,"342,02124K8 ",.03)
 ;;31
 ;;9002226.02101,"342,02124K9 ",.01)
 ;;02124K9
 ;;9002226.02101,"342,02124K9 ",.02)
 ;;02124K9
 ;;9002226.02101,"342,02124K9 ",.03)
 ;;31
 ;;9002226.02101,"342,02124KC ",.01)
 ;;02124KC
 ;;9002226.02101,"342,02124KC ",.02)
 ;;02124KC
 ;;9002226.02101,"342,02124KC ",.03)
 ;;31
 ;;9002226.02101,"342,02124KF ",.01)
 ;;02124KF
 ;;9002226.02101,"342,02124KF ",.02)
 ;;02124KF
 ;;9002226.02101,"342,02124KF ",.03)
 ;;31
 ;;9002226.02101,"342,02124KW ",.01)
 ;;02124KW
 ;;9002226.02101,"342,02124KW ",.02)
 ;;02124KW
 ;;9002226.02101,"342,02124KW ",.03)
 ;;31
 ;;9002226.02101,"342,02124Z3 ",.01)
 ;;02124Z3
 ;;9002226.02101,"342,02124Z3 ",.02)
 ;;02124Z3
 ;;9002226.02101,"342,02124Z3 ",.03)
 ;;31
 ;;9002226.02101,"342,02124Z8 ",.01)
 ;;02124Z8
 ;;9002226.02101,"342,02124Z8 ",.02)
 ;;02124Z8
 ;;9002226.02101,"342,02124Z8 ",.03)
 ;;31
 ;;9002226.02101,"342,02124Z9 ",.01)
 ;;02124Z9
 ;;9002226.02101,"342,02124Z9 ",.02)
 ;;02124Z9
 ;;9002226.02101,"342,02124Z9 ",.03)
 ;;31
 ;;9002226.02101,"342,02124ZC ",.01)
 ;;02124ZC
 ;;9002226.02101,"342,02124ZC ",.02)
 ;;02124ZC
 ;;9002226.02101,"342,02124ZC ",.03)
 ;;31
 ;;9002226.02101,"342,02124ZF ",.01)
 ;;02124ZF
 ;;9002226.02101,"342,02124ZF ",.02)
 ;;02124ZF
 ;;9002226.02101,"342,02124ZF ",.03)
 ;;31
 ;;9002226.02101,"342,0213093 ",.01)
 ;;0213093
 ;;9002226.02101,"342,0213093 ",.02)
 ;;0213093
 ;;9002226.02101,"342,0213093 ",.03)
 ;;31
 ;;9002226.02101,"342,0213098 ",.01)
 ;;0213098
 ;;9002226.02101,"342,0213098 ",.02)
 ;;0213098
 ;;9002226.02101,"342,0213098 ",.03)
 ;;31
 ;;9002226.02101,"342,0213099 ",.01)
 ;;0213099
 ;;9002226.02101,"342,0213099 ",.02)
 ;;0213099
 ;;9002226.02101,"342,0213099 ",.03)
 ;;31
 ;;9002226.02101,"342,021309C ",.01)
 ;;021309C
 ;;9002226.02101,"342,021309C ",.02)
 ;;021309C
 ;;9002226.02101,"342,021309C ",.03)
 ;;31
 ;;9002226.02101,"342,021309F ",.01)
 ;;021309F
 ;;9002226.02101,"342,021309F ",.02)
 ;;021309F
 ;;9002226.02101,"342,021309F ",.03)
 ;;31
 ;;9002226.02101,"342,021309W ",.01)
 ;;021309W
 ;;9002226.02101,"342,021309W ",.02)
 ;;021309W
 ;;9002226.02101,"342,021309W ",.03)
 ;;31
 ;;9002226.02101,"342,02130A3 ",.01)
 ;;02130A3
 ;;9002226.02101,"342,02130A3 ",.02)
 ;;02130A3
 ;;9002226.02101,"342,02130A3 ",.03)
 ;;31
 ;;9002226.02101,"342,02130A8 ",.01)
 ;;02130A8
 ;;9002226.02101,"342,02130A8 ",.02)
 ;;02130A8
 ;;9002226.02101,"342,02130A8 ",.03)
 ;;31
 ;;9002226.02101,"342,02130A9 ",.01)
 ;;02130A9
 ;;9002226.02101,"342,02130A9 ",.02)
 ;;02130A9
 ;;9002226.02101,"342,02130A9 ",.03)
 ;;31
 ;;9002226.02101,"342,02130AC ",.01)
 ;;02130AC
 ;;9002226.02101,"342,02130AC ",.02)
 ;;02130AC
 ;;9002226.02101,"342,02130AC ",.03)
 ;;31
 ;;9002226.02101,"342,02130AF ",.01)
 ;;02130AF
 ;;9002226.02101,"342,02130AF ",.02)
 ;;02130AF
 ;;9002226.02101,"342,02130AF ",.03)
 ;;31
 ;;9002226.02101,"342,02130AW ",.01)
 ;;02130AW
 ;;9002226.02101,"342,02130AW ",.02)
 ;;02130AW
 ;;9002226.02101,"342,02130AW ",.03)
 ;;31
 ;;9002226.02101,"342,02130J3 ",.01)
 ;;02130J3
 ;;9002226.02101,"342,02130J3 ",.02)
 ;;02130J3
 ;;9002226.02101,"342,02130J3 ",.03)
 ;;31
 ;;9002226.02101,"342,02130J8 ",.01)
 ;;02130J8
 ;;9002226.02101,"342,02130J8 ",.02)
 ;;02130J8
 ;;9002226.02101,"342,02130J8 ",.03)
 ;;31
 ;;9002226.02101,"342,02130J9 ",.01)
 ;;02130J9
 ;;9002226.02101,"342,02130J9 ",.02)
 ;;02130J9
 ;;9002226.02101,"342,02130J9 ",.03)
 ;;31
 ;;9002226.02101,"342,02130JC ",.01)
 ;;02130JC
 ;;9002226.02101,"342,02130JC ",.02)
 ;;02130JC
 ;;9002226.02101,"342,02130JC ",.03)
 ;;31
 ;;9002226.02101,"342,02130JF ",.01)
 ;;02130JF
 ;;9002226.02101,"342,02130JF ",.02)
 ;;02130JF
 ;;9002226.02101,"342,02130JF ",.03)
 ;;31
 ;;9002226.02101,"342,02130JW ",.01)
 ;;02130JW
 ;;9002226.02101,"342,02130JW ",.02)
 ;;02130JW
 ;;9002226.02101,"342,02130JW ",.03)
 ;;31
 ;;9002226.02101,"342,02130K3 ",.01)
 ;;02130K3
 ;;9002226.02101,"342,02130K3 ",.02)
 ;;02130K3
 ;;9002226.02101,"342,02130K3 ",.03)
 ;;31
 ;;9002226.02101,"342,02130K8 ",.01)
 ;;02130K8
 ;;9002226.02101,"342,02130K8 ",.02)
 ;;02130K8
 ;;9002226.02101,"342,02130K8 ",.03)
 ;;31
 ;;9002226.02101,"342,02130K9 ",.01)
 ;;02130K9
 ;;9002226.02101,"342,02130K9 ",.02)
 ;;02130K9
 ;;9002226.02101,"342,02130K9 ",.03)
 ;;31
 ;;9002226.02101,"342,02130KC ",.01)
 ;;02130KC
 ;;9002226.02101,"342,02130KC ",.02)
 ;;02130KC
 ;;9002226.02101,"342,02130KC ",.03)
 ;;31
 ;;9002226.02101,"342,02130KF ",.01)
 ;;02130KF
 ;;9002226.02101,"342,02130KF ",.02)
 ;;02130KF
 ;;9002226.02101,"342,02130KF ",.03)
 ;;31
 ;;9002226.02101,"342,02130KW ",.01)
 ;;02130KW
 ;;9002226.02101,"342,02130KW ",.02)
 ;;02130KW
 ;;9002226.02101,"342,02130KW ",.03)
 ;;31
 ;;9002226.02101,"342,02130Z3 ",.01)
 ;;02130Z3
 ;;9002226.02101,"342,02130Z3 ",.02)
 ;;02130Z3
 ;;9002226.02101,"342,02130Z3 ",.03)
 ;;31
 ;;9002226.02101,"342,02130Z8 ",.01)
 ;;02130Z8
 ;;9002226.02101,"342,02130Z8 ",.02)
 ;;02130Z8
 ;;9002226.02101,"342,02130Z8 ",.03)
 ;;31
 ;;9002226.02101,"342,02130Z9 ",.01)
 ;;02130Z9
 ;;9002226.02101,"342,02130Z9 ",.02)
 ;;02130Z9
 ;;9002226.02101,"342,02130Z9 ",.03)
 ;;31
 ;;9002226.02101,"342,02130ZC ",.01)
 ;;02130ZC
 ;;9002226.02101,"342,02130ZC ",.02)
 ;;02130ZC
 ;;9002226.02101,"342,02130ZC ",.03)
 ;;31
 ;;9002226.02101,"342,02130ZF ",.01)
 ;;02130ZF
 ;;9002226.02101,"342,02130ZF ",.02)
 ;;02130ZF
 ;;9002226.02101,"342,02130ZF ",.03)
 ;;31
 ;;9002226.02101,"342,0213493 ",.01)
 ;;0213493
 ;;9002226.02101,"342,0213493 ",.02)
 ;;0213493
 ;;9002226.02101,"342,0213493 ",.03)
 ;;31
 ;;9002226.02101,"342,0213498 ",.01)
 ;;0213498
 ;;9002226.02101,"342,0213498 ",.02)
 ;;0213498
 ;;9002226.02101,"342,0213498 ",.03)
 ;;31
 ;;9002226.02101,"342,0213499 ",.01)
 ;;0213499
 ;;9002226.02101,"342,0213499 ",.02)
 ;;0213499
 ;;9002226.02101,"342,0213499 ",.03)
 ;;31
 ;;9002226.02101,"342,021349C ",.01)
 ;;021349C
 ;;9002226.02101,"342,021349C ",.02)
 ;;021349C
 ;;9002226.02101,"342,021349C ",.03)
 ;;31
 ;;9002226.02101,"342,021349F ",.01)
 ;;021349F
 ;;9002226.02101,"342,021349F ",.02)
 ;;021349F
 ;;9002226.02101,"342,021349F ",.03)
 ;;31
 ;;9002226.02101,"342,021349W ",.01)
 ;;021349W
 ;;9002226.02101,"342,021349W ",.02)
 ;;021349W
 ;;9002226.02101,"342,021349W ",.03)
 ;;31
 ;;9002226.02101,"342,02134A3 ",.01)
 ;;02134A3
 ;;9002226.02101,"342,02134A3 ",.02)
 ;;02134A3
 ;;9002226.02101,"342,02134A3 ",.03)
 ;;31
 ;;9002226.02101,"342,02134A8 ",.01)
 ;;02134A8
 ;;9002226.02101,"342,02134A8 ",.02)
 ;;02134A8
 ;;9002226.02101,"342,02134A8 ",.03)
 ;;31
 ;;9002226.02101,"342,02134A9 ",.01)
 ;;02134A9
 ;;9002226.02101,"342,02134A9 ",.02)
 ;;02134A9
 ;;9002226.02101,"342,02134A9 ",.03)
 ;;31
 ;;9002226.02101,"342,02134AC ",.01)
 ;;02134AC
 ;;9002226.02101,"342,02134AC ",.02)
 ;;02134AC
 ;;9002226.02101,"342,02134AC ",.03)
 ;;31
 ;;9002226.02101,"342,02134AF ",.01)
 ;;02134AF
 ;;9002226.02101,"342,02134AF ",.02)
 ;;02134AF
 ;;9002226.02101,"342,02134AF ",.03)
 ;;31
 ;;9002226.02101,"342,02134AW ",.01)
 ;;02134AW
 ;;9002226.02101,"342,02134AW ",.02)
 ;;02134AW
 ;;9002226.02101,"342,02134AW ",.03)
 ;;31
 ;;9002226.02101,"342,02134J3 ",.01)
 ;;02134J3
 ;;9002226.02101,"342,02134J3 ",.02)
 ;;02134J3
 ;;9002226.02101,"342,02134J3 ",.03)
 ;;31
 ;;9002226.02101,"342,02134J8 ",.01)
 ;;02134J8
 ;;9002226.02101,"342,02134J8 ",.02)
 ;;02134J8
 ;;9002226.02101,"342,02134J8 ",.03)
 ;;31
 ;;9002226.02101,"342,02134J9 ",.01)
 ;;02134J9
 ;;9002226.02101,"342,02134J9 ",.02)
 ;;02134J9
 ;;9002226.02101,"342,02134J9 ",.03)
 ;;31
 ;;9002226.02101,"342,02134JC ",.01)
 ;;02134JC
 ;;9002226.02101,"342,02134JC ",.02)
 ;;02134JC
 ;;9002226.02101,"342,02134JC ",.03)
 ;;31
 ;;9002226.02101,"342,02134JF ",.01)
 ;;02134JF
 ;;9002226.02101,"342,02134JF ",.02)
 ;;02134JF
 ;;9002226.02101,"342,02134JF ",.03)
 ;;31
 ;;9002226.02101,"342,02134JW ",.01)
 ;;02134JW
 ;;9002226.02101,"342,02134JW ",.02)
 ;;02134JW
 ;;9002226.02101,"342,02134JW ",.03)
 ;;31
 ;;9002226.02101,"342,02134K3 ",.01)
 ;;02134K3
 ;;9002226.02101,"342,02134K3 ",.02)
 ;;02134K3
 ;;9002226.02101,"342,02134K3 ",.03)
 ;;31
 ;;9002226.02101,"342,02134K8 ",.01)
 ;;02134K8
 ;;9002226.02101,"342,02134K8 ",.02)
 ;;02134K8
 ;;9002226.02101,"342,02134K8 ",.03)
 ;;31
 ;;9002226.02101,"342,02134K9 ",.01)
 ;;02134K9
 ;;9002226.02101,"342,02134K9 ",.02)
 ;;02134K9
 ;;9002226.02101,"342,02134K9 ",.03)
 ;;31
 ;;9002226.02101,"342,02134KC ",.01)
 ;;02134KC
 ;;9002226.02101,"342,02134KC ",.02)
 ;;02134KC
 ;;9002226.02101,"342,02134KC ",.03)
 ;;31
 ;;9002226.02101,"342,02134KF ",.01)
 ;;02134KF
 ;;9002226.02101,"342,02134KF ",.02)
 ;;02134KF
 ;;9002226.02101,"342,02134KF ",.03)
 ;;31
 ;;9002226.02101,"342,02134KW ",.01)
 ;;02134KW
 ;;9002226.02101,"342,02134KW ",.02)
 ;;02134KW
 ;;9002226.02101,"342,02134KW ",.03)
 ;;31
 ;;9002226.02101,"342,02134Z3 ",.01)
 ;;02134Z3
 ;;9002226.02101,"342,02134Z3 ",.02)
 ;;02134Z3
 ;;9002226.02101,"342,02134Z3 ",.03)
 ;;31
 ;;9002226.02101,"342,02134Z8 ",.01)
 ;;02134Z8
 ;;9002226.02101,"342,02134Z8 ",.02)
 ;;02134Z8
 ;;9002226.02101,"342,02134Z8 ",.03)
 ;;31
 ;;9002226.02101,"342,02134Z9 ",.01)
 ;;02134Z9
 ;;9002226.02101,"342,02134Z9 ",.02)
 ;;02134Z9
 ;;9002226.02101,"342,02134Z9 ",.03)
 ;;31
 ;;9002226.02101,"342,02134ZC ",.01)
 ;;02134ZC
 ;;9002226.02101,"342,02134ZC ",.02)
 ;;02134ZC