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

ATXXA103.m

Go to the documentation of this file.
ATXXA103 ;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,S72.391A ",.02)
 ;;S72.391A
 ;;9002226.02101,"873,S72.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.391B ",.01)
 ;;S72.391B
 ;;9002226.02101,"873,S72.391B ",.02)
 ;;S72.391B
 ;;9002226.02101,"873,S72.391B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.391C ",.01)
 ;;S72.391C
 ;;9002226.02101,"873,S72.391C ",.02)
 ;;S72.391C
 ;;9002226.02101,"873,S72.391C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.392A ",.01)
 ;;S72.392A
 ;;9002226.02101,"873,S72.392A ",.02)
 ;;S72.392A
 ;;9002226.02101,"873,S72.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.392B ",.01)
 ;;S72.392B
 ;;9002226.02101,"873,S72.392B ",.02)
 ;;S72.392B
 ;;9002226.02101,"873,S72.392B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.392C ",.01)
 ;;S72.392C
 ;;9002226.02101,"873,S72.392C ",.02)
 ;;S72.392C
 ;;9002226.02101,"873,S72.392C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.399A ",.01)
 ;;S72.399A
 ;;9002226.02101,"873,S72.399A ",.02)
 ;;S72.399A
 ;;9002226.02101,"873,S72.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.399B ",.01)
 ;;S72.399B
 ;;9002226.02101,"873,S72.399B ",.02)
 ;;S72.399B
 ;;9002226.02101,"873,S72.399B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.399C ",.01)
 ;;S72.399C
 ;;9002226.02101,"873,S72.399C ",.02)
 ;;S72.399C
 ;;9002226.02101,"873,S72.399C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.401A ",.01)
 ;;S72.401A
 ;;9002226.02101,"873,S72.401A ",.02)
 ;;S72.401A
 ;;9002226.02101,"873,S72.401A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.401B ",.01)
 ;;S72.401B
 ;;9002226.02101,"873,S72.401B ",.02)
 ;;S72.401B
 ;;9002226.02101,"873,S72.401B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.401C ",.01)
 ;;S72.401C
 ;;9002226.02101,"873,S72.401C ",.02)
 ;;S72.401C
 ;;9002226.02101,"873,S72.401C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.402A ",.01)
 ;;S72.402A
 ;;9002226.02101,"873,S72.402A ",.02)
 ;;S72.402A
 ;;9002226.02101,"873,S72.402A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.402B ",.01)
 ;;S72.402B
 ;;9002226.02101,"873,S72.402B ",.02)
 ;;S72.402B
 ;;9002226.02101,"873,S72.402B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.402C ",.01)
 ;;S72.402C
 ;;9002226.02101,"873,S72.402C ",.02)
 ;;S72.402C
 ;;9002226.02101,"873,S72.402C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.409A ",.01)
 ;;S72.409A
 ;;9002226.02101,"873,S72.409A ",.02)
 ;;S72.409A
 ;;9002226.02101,"873,S72.409A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.409B ",.01)
 ;;S72.409B
 ;;9002226.02101,"873,S72.409B ",.02)
 ;;S72.409B
 ;;9002226.02101,"873,S72.409B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.409C ",.01)
 ;;S72.409C
 ;;9002226.02101,"873,S72.409C ",.02)
 ;;S72.409C
 ;;9002226.02101,"873,S72.409C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.411A ",.01)
 ;;S72.411A
 ;;9002226.02101,"873,S72.411A ",.02)
 ;;S72.411A
 ;;9002226.02101,"873,S72.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.411B ",.01)
 ;;S72.411B
 ;;9002226.02101,"873,S72.411B ",.02)
 ;;S72.411B
 ;;9002226.02101,"873,S72.411B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.411C ",.01)
 ;;S72.411C
 ;;9002226.02101,"873,S72.411C ",.02)
 ;;S72.411C
 ;;9002226.02101,"873,S72.411C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.412A ",.01)
 ;;S72.412A
 ;;9002226.02101,"873,S72.412A ",.02)
 ;;S72.412A
 ;;9002226.02101,"873,S72.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.412B ",.01)
 ;;S72.412B
 ;;9002226.02101,"873,S72.412B ",.02)
 ;;S72.412B
 ;;9002226.02101,"873,S72.412B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.412C ",.01)
 ;;S72.412C
 ;;9002226.02101,"873,S72.412C ",.02)
 ;;S72.412C
 ;;9002226.02101,"873,S72.412C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.413A ",.01)
 ;;S72.413A
 ;;9002226.02101,"873,S72.413A ",.02)
 ;;S72.413A
 ;;9002226.02101,"873,S72.413A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.413B ",.01)
 ;;S72.413B
 ;;9002226.02101,"873,S72.413B ",.02)
 ;;S72.413B
 ;;9002226.02101,"873,S72.413B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.413C ",.01)
 ;;S72.413C
 ;;9002226.02101,"873,S72.413C ",.02)
 ;;S72.413C
 ;;9002226.02101,"873,S72.413C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.414A ",.01)
 ;;S72.414A
 ;;9002226.02101,"873,S72.414A ",.02)
 ;;S72.414A
 ;;9002226.02101,"873,S72.414A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.414B ",.01)
 ;;S72.414B
 ;;9002226.02101,"873,S72.414B ",.02)
 ;;S72.414B
 ;;9002226.02101,"873,S72.414B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.414C ",.01)
 ;;S72.414C
 ;;9002226.02101,"873,S72.414C ",.02)
 ;;S72.414C
 ;;9002226.02101,"873,S72.414C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.415A ",.01)
 ;;S72.415A
 ;;9002226.02101,"873,S72.415A ",.02)
 ;;S72.415A
 ;;9002226.02101,"873,S72.415A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.415B ",.01)
 ;;S72.415B
 ;;9002226.02101,"873,S72.415B ",.02)
 ;;S72.415B
 ;;9002226.02101,"873,S72.415B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.415C ",.01)
 ;;S72.415C
 ;;9002226.02101,"873,S72.415C ",.02)
 ;;S72.415C
 ;;9002226.02101,"873,S72.415C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.416A ",.01)
 ;;S72.416A
 ;;9002226.02101,"873,S72.416A ",.02)
 ;;S72.416A
 ;;9002226.02101,"873,S72.416A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.416B ",.01)
 ;;S72.416B
 ;;9002226.02101,"873,S72.416B ",.02)
 ;;S72.416B
 ;;9002226.02101,"873,S72.416B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.416C ",.01)
 ;;S72.416C
 ;;9002226.02101,"873,S72.416C ",.02)
 ;;S72.416C
 ;;9002226.02101,"873,S72.416C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.421A ",.01)
 ;;S72.421A
 ;;9002226.02101,"873,S72.421A ",.02)
 ;;S72.421A
 ;;9002226.02101,"873,S72.421A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.421B ",.01)
 ;;S72.421B
 ;;9002226.02101,"873,S72.421B ",.02)
 ;;S72.421B
 ;;9002226.02101,"873,S72.421B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.421C ",.01)
 ;;S72.421C
 ;;9002226.02101,"873,S72.421C ",.02)
 ;;S72.421C
 ;;9002226.02101,"873,S72.421C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.422A ",.01)
 ;;S72.422A
 ;;9002226.02101,"873,S72.422A ",.02)
 ;;S72.422A
 ;;9002226.02101,"873,S72.422A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.422B ",.01)
 ;;S72.422B
 ;;9002226.02101,"873,S72.422B ",.02)
 ;;S72.422B
 ;;9002226.02101,"873,S72.422B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.422C ",.01)
 ;;S72.422C
 ;;9002226.02101,"873,S72.422C ",.02)
 ;;S72.422C
 ;;9002226.02101,"873,S72.422C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.423A ",.01)
 ;;S72.423A
 ;;9002226.02101,"873,S72.423A ",.02)
 ;;S72.423A
 ;;9002226.02101,"873,S72.423A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.423B ",.01)
 ;;S72.423B
 ;;9002226.02101,"873,S72.423B ",.02)
 ;;S72.423B
 ;;9002226.02101,"873,S72.423B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.423C ",.01)
 ;;S72.423C
 ;;9002226.02101,"873,S72.423C ",.02)
 ;;S72.423C
 ;;9002226.02101,"873,S72.423C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.424A ",.01)
 ;;S72.424A
 ;;9002226.02101,"873,S72.424A ",.02)
 ;;S72.424A
 ;;9002226.02101,"873,S72.424A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.424B ",.01)
 ;;S72.424B
 ;;9002226.02101,"873,S72.424B ",.02)
 ;;S72.424B
 ;;9002226.02101,"873,S72.424B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.424C ",.01)
 ;;S72.424C
 ;;9002226.02101,"873,S72.424C ",.02)
 ;;S72.424C
 ;;9002226.02101,"873,S72.424C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.425A ",.01)
 ;;S72.425A
 ;;9002226.02101,"873,S72.425A ",.02)
 ;;S72.425A
 ;;9002226.02101,"873,S72.425A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.425B ",.01)
 ;;S72.425B
 ;;9002226.02101,"873,S72.425B ",.02)
 ;;S72.425B
 ;;9002226.02101,"873,S72.425B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.425C ",.01)
 ;;S72.425C
 ;;9002226.02101,"873,S72.425C ",.02)
 ;;S72.425C
 ;;9002226.02101,"873,S72.425C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.426A ",.01)
 ;;S72.426A
 ;;9002226.02101,"873,S72.426A ",.02)
 ;;S72.426A
 ;;9002226.02101,"873,S72.426A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.426B ",.01)
 ;;S72.426B
 ;;9002226.02101,"873,S72.426B ",.02)
 ;;S72.426B
 ;;9002226.02101,"873,S72.426B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.426C ",.01)
 ;;S72.426C
 ;;9002226.02101,"873,S72.426C ",.02)
 ;;S72.426C
 ;;9002226.02101,"873,S72.426C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.431A ",.01)
 ;;S72.431A
 ;;9002226.02101,"873,S72.431A ",.02)
 ;;S72.431A
 ;;9002226.02101,"873,S72.431A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.431B ",.01)
 ;;S72.431B
 ;;9002226.02101,"873,S72.431B ",.02)
 ;;S72.431B
 ;;9002226.02101,"873,S72.431B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.431C ",.01)
 ;;S72.431C
 ;;9002226.02101,"873,S72.431C ",.02)
 ;;S72.431C
 ;;9002226.02101,"873,S72.431C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.432A ",.01)
 ;;S72.432A
 ;;9002226.02101,"873,S72.432A ",.02)
 ;;S72.432A
 ;;9002226.02101,"873,S72.432A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.432B ",.01)
 ;;S72.432B
 ;;9002226.02101,"873,S72.432B ",.02)
 ;;S72.432B
 ;;9002226.02101,"873,S72.432B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.432C ",.01)
 ;;S72.432C
 ;;9002226.02101,"873,S72.432C ",.02)
 ;;S72.432C
 ;;9002226.02101,"873,S72.432C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.433A ",.01)
 ;;S72.433A
 ;;9002226.02101,"873,S72.433A ",.02)
 ;;S72.433A
 ;;9002226.02101,"873,S72.433A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.433B ",.01)
 ;;S72.433B
 ;;9002226.02101,"873,S72.433B ",.02)
 ;;S72.433B
 ;;9002226.02101,"873,S72.433B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.433C ",.01)
 ;;S72.433C
 ;;9002226.02101,"873,S72.433C ",.02)
 ;;S72.433C
 ;;9002226.02101,"873,S72.433C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.434A ",.01)
 ;;S72.434A
 ;;9002226.02101,"873,S72.434A ",.02)
 ;;S72.434A
 ;;9002226.02101,"873,S72.434A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.434B ",.01)
 ;;S72.434B
 ;;9002226.02101,"873,S72.434B ",.02)
 ;;S72.434B
 ;;9002226.02101,"873,S72.434B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.434C ",.01)
 ;;S72.434C
 ;;9002226.02101,"873,S72.434C ",.02)
 ;;S72.434C
 ;;9002226.02101,"873,S72.434C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.435A ",.01)
 ;;S72.435A
 ;;9002226.02101,"873,S72.435A ",.02)
 ;;S72.435A
 ;;9002226.02101,"873,S72.435A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.435B ",.01)
 ;;S72.435B
 ;;9002226.02101,"873,S72.435B ",.02)
 ;;S72.435B
 ;;9002226.02101,"873,S72.435B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.435C ",.01)
 ;;S72.435C
 ;;9002226.02101,"873,S72.435C ",.02)
 ;;S72.435C
 ;;9002226.02101,"873,S72.435C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.436A ",.01)
 ;;S72.436A
 ;;9002226.02101,"873,S72.436A ",.02)
 ;;S72.436A
 ;;9002226.02101,"873,S72.436A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.436B ",.01)
 ;;S72.436B
 ;;9002226.02101,"873,S72.436B ",.02)
 ;;S72.436B
 ;;9002226.02101,"873,S72.436B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.436C ",.01)
 ;;S72.436C
 ;;9002226.02101,"873,S72.436C ",.02)
 ;;S72.436C
 ;;9002226.02101,"873,S72.436C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.441A ",.01)
 ;;S72.441A
 ;;9002226.02101,"873,S72.441A ",.02)
 ;;S72.441A
 ;;9002226.02101,"873,S72.441A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.441B ",.01)
 ;;S72.441B
 ;;9002226.02101,"873,S72.441B ",.02)
 ;;S72.441B
 ;;9002226.02101,"873,S72.441B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.441C ",.01)
 ;;S72.441C
 ;;9002226.02101,"873,S72.441C ",.02)
 ;;S72.441C
 ;;9002226.02101,"873,S72.441C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.442A ",.01)
 ;;S72.442A
 ;;9002226.02101,"873,S72.442A ",.02)
 ;;S72.442A
 ;;9002226.02101,"873,S72.442A ",.03)
 ;;30
 ;;9002226.02101,"873,S72.442B ",.01)
 ;;S72.442B
 ;;9002226.02101,"873,S72.442B ",.02)
 ;;S72.442B
 ;;9002226.02101,"873,S72.442B ",.03)
 ;;30
 ;;9002226.02101,"873,S72.442C ",.01)
 ;;S72.442C
 ;;9002226.02101,"873,S72.442C ",.02)
 ;;S72.442C
 ;;9002226.02101,"873,S72.442C ",.03)
 ;;30
 ;;9002226.02101,"873,S72.443A ",.01)
 ;;S72.443A
 ;;9002226.02101,"873,S72.443A ",.02)
 ;;S72.443A