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

ATXXB85.m

Go to the documentation of this file.
ATXXB85 ;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,"1804,0JHF3HZ ",.01)
 ;;0JHF3HZ 
 ;;9002226.02101,"1804,0JHF3HZ ",.02)
 ;;0JHF3HZ 
 ;;9002226.02101,"1804,0JHF3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHF3NZ ",.01)
 ;;0JHF3NZ 
 ;;9002226.02101,"1804,0JHF3NZ ",.02)
 ;;0JHF3NZ 
 ;;9002226.02101,"1804,0JHF3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHF3VZ ",.01)
 ;;0JHF3VZ 
 ;;9002226.02101,"1804,0JHF3VZ ",.02)
 ;;0JHF3VZ 
 ;;9002226.02101,"1804,0JHF3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHF3WZ ",.01)
 ;;0JHF3WZ 
 ;;9002226.02101,"1804,0JHF3WZ ",.02)
 ;;0JHF3WZ 
 ;;9002226.02101,"1804,0JHF3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHF3XZ ",.01)
 ;;0JHF3XZ 
 ;;9002226.02101,"1804,0JHF3XZ ",.02)
 ;;0JHF3XZ 
 ;;9002226.02101,"1804,0JHF3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG0HZ ",.01)
 ;;0JHG0HZ 
 ;;9002226.02101,"1804,0JHG0HZ ",.02)
 ;;0JHG0HZ 
 ;;9002226.02101,"1804,0JHG0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG0NZ ",.01)
 ;;0JHG0NZ 
 ;;9002226.02101,"1804,0JHG0NZ ",.02)
 ;;0JHG0NZ 
 ;;9002226.02101,"1804,0JHG0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG0VZ ",.01)
 ;;0JHG0VZ 
 ;;9002226.02101,"1804,0JHG0VZ ",.02)
 ;;0JHG0VZ 
 ;;9002226.02101,"1804,0JHG0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG0WZ ",.01)
 ;;0JHG0WZ 
 ;;9002226.02101,"1804,0JHG0WZ ",.02)
 ;;0JHG0WZ 
 ;;9002226.02101,"1804,0JHG0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG0XZ ",.01)
 ;;0JHG0XZ 
 ;;9002226.02101,"1804,0JHG0XZ ",.02)
 ;;0JHG0XZ 
 ;;9002226.02101,"1804,0JHG0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG3HZ ",.01)
 ;;0JHG3HZ 
 ;;9002226.02101,"1804,0JHG3HZ ",.02)
 ;;0JHG3HZ 
 ;;9002226.02101,"1804,0JHG3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG3NZ ",.01)
 ;;0JHG3NZ 
 ;;9002226.02101,"1804,0JHG3NZ ",.02)
 ;;0JHG3NZ 
 ;;9002226.02101,"1804,0JHG3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG3VZ ",.01)
 ;;0JHG3VZ 
 ;;9002226.02101,"1804,0JHG3VZ ",.02)
 ;;0JHG3VZ 
 ;;9002226.02101,"1804,0JHG3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG3WZ ",.01)
 ;;0JHG3WZ 
 ;;9002226.02101,"1804,0JHG3WZ ",.02)
 ;;0JHG3WZ 
 ;;9002226.02101,"1804,0JHG3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHG3XZ ",.01)
 ;;0JHG3XZ 
 ;;9002226.02101,"1804,0JHG3XZ ",.02)
 ;;0JHG3XZ 
 ;;9002226.02101,"1804,0JHG3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH0HZ ",.01)
 ;;0JHH0HZ 
 ;;9002226.02101,"1804,0JHH0HZ ",.02)
 ;;0JHH0HZ 
 ;;9002226.02101,"1804,0JHH0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH0NZ ",.01)
 ;;0JHH0NZ 
 ;;9002226.02101,"1804,0JHH0NZ ",.02)
 ;;0JHH0NZ 
 ;;9002226.02101,"1804,0JHH0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH0VZ ",.01)
 ;;0JHH0VZ 
 ;;9002226.02101,"1804,0JHH0VZ ",.02)
 ;;0JHH0VZ 
 ;;9002226.02101,"1804,0JHH0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH0WZ ",.01)
 ;;0JHH0WZ 
 ;;9002226.02101,"1804,0JHH0WZ ",.02)
 ;;0JHH0WZ 
 ;;9002226.02101,"1804,0JHH0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH0XZ ",.01)
 ;;0JHH0XZ 
 ;;9002226.02101,"1804,0JHH0XZ ",.02)
 ;;0JHH0XZ 
 ;;9002226.02101,"1804,0JHH0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH3HZ ",.01)
 ;;0JHH3HZ 
 ;;9002226.02101,"1804,0JHH3HZ ",.02)
 ;;0JHH3HZ 
 ;;9002226.02101,"1804,0JHH3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH3NZ ",.01)
 ;;0JHH3NZ 
 ;;9002226.02101,"1804,0JHH3NZ ",.02)
 ;;0JHH3NZ 
 ;;9002226.02101,"1804,0JHH3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH3VZ ",.01)
 ;;0JHH3VZ 
 ;;9002226.02101,"1804,0JHH3VZ ",.02)
 ;;0JHH3VZ 
 ;;9002226.02101,"1804,0JHH3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH3WZ ",.01)
 ;;0JHH3WZ 
 ;;9002226.02101,"1804,0JHH3WZ ",.02)
 ;;0JHH3WZ 
 ;;9002226.02101,"1804,0JHH3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHH3XZ ",.01)
 ;;0JHH3XZ 
 ;;9002226.02101,"1804,0JHH3XZ ",.02)
 ;;0JHH3XZ 
 ;;9002226.02101,"1804,0JHH3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHJ0NZ ",.01)
 ;;0JHJ0NZ 
 ;;9002226.02101,"1804,0JHJ0NZ ",.02)
 ;;0JHJ0NZ 
 ;;9002226.02101,"1804,0JHJ0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHJ3NZ ",.01)
 ;;0JHJ3NZ 
 ;;9002226.02101,"1804,0JHJ3NZ ",.02)
 ;;0JHJ3NZ 
 ;;9002226.02101,"1804,0JHJ3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHK0NZ ",.01)
 ;;0JHK0NZ 
 ;;9002226.02101,"1804,0JHK0NZ ",.02)
 ;;0JHK0NZ 
 ;;9002226.02101,"1804,0JHK0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHK3NZ ",.01)
 ;;0JHK3NZ 
 ;;9002226.02101,"1804,0JHK3NZ ",.02)
 ;;0JHK3NZ 
 ;;9002226.02101,"1804,0JHK3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL0HZ ",.01)
 ;;0JHL0HZ 
 ;;9002226.02101,"1804,0JHL0HZ ",.02)
 ;;0JHL0HZ 
 ;;9002226.02101,"1804,0JHL0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL0NZ ",.01)
 ;;0JHL0NZ 
 ;;9002226.02101,"1804,0JHL0NZ ",.02)
 ;;0JHL0NZ 
 ;;9002226.02101,"1804,0JHL0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL0VZ ",.01)
 ;;0JHL0VZ 
 ;;9002226.02101,"1804,0JHL0VZ ",.02)
 ;;0JHL0VZ 
 ;;9002226.02101,"1804,0JHL0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL0WZ ",.01)
 ;;0JHL0WZ 
 ;;9002226.02101,"1804,0JHL0WZ ",.02)
 ;;0JHL0WZ 
 ;;9002226.02101,"1804,0JHL0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL0XZ ",.01)
 ;;0JHL0XZ 
 ;;9002226.02101,"1804,0JHL0XZ ",.02)
 ;;0JHL0XZ 
 ;;9002226.02101,"1804,0JHL0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL3HZ ",.01)
 ;;0JHL3HZ 
 ;;9002226.02101,"1804,0JHL3HZ ",.02)
 ;;0JHL3HZ 
 ;;9002226.02101,"1804,0JHL3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL3NZ ",.01)
 ;;0JHL3NZ 
 ;;9002226.02101,"1804,0JHL3NZ ",.02)
 ;;0JHL3NZ 
 ;;9002226.02101,"1804,0JHL3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL3VZ ",.01)
 ;;0JHL3VZ 
 ;;9002226.02101,"1804,0JHL3VZ ",.02)
 ;;0JHL3VZ 
 ;;9002226.02101,"1804,0JHL3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL3WZ ",.01)
 ;;0JHL3WZ 
 ;;9002226.02101,"1804,0JHL3WZ ",.02)
 ;;0JHL3WZ 
 ;;9002226.02101,"1804,0JHL3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHL3XZ ",.01)
 ;;0JHL3XZ 
 ;;9002226.02101,"1804,0JHL3XZ ",.02)
 ;;0JHL3XZ 
 ;;9002226.02101,"1804,0JHL3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM0HZ ",.01)
 ;;0JHM0HZ 
 ;;9002226.02101,"1804,0JHM0HZ ",.02)
 ;;0JHM0HZ 
 ;;9002226.02101,"1804,0JHM0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM0NZ ",.01)
 ;;0JHM0NZ 
 ;;9002226.02101,"1804,0JHM0NZ ",.02)
 ;;0JHM0NZ 
 ;;9002226.02101,"1804,0JHM0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM0VZ ",.01)
 ;;0JHM0VZ 
 ;;9002226.02101,"1804,0JHM0VZ ",.02)
 ;;0JHM0VZ 
 ;;9002226.02101,"1804,0JHM0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM0WZ ",.01)
 ;;0JHM0WZ 
 ;;9002226.02101,"1804,0JHM0WZ ",.02)
 ;;0JHM0WZ 
 ;;9002226.02101,"1804,0JHM0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM0XZ ",.01)
 ;;0JHM0XZ 
 ;;9002226.02101,"1804,0JHM0XZ ",.02)
 ;;0JHM0XZ 
 ;;9002226.02101,"1804,0JHM0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM3HZ ",.01)
 ;;0JHM3HZ 
 ;;9002226.02101,"1804,0JHM3HZ ",.02)
 ;;0JHM3HZ 
 ;;9002226.02101,"1804,0JHM3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM3NZ ",.01)
 ;;0JHM3NZ 
 ;;9002226.02101,"1804,0JHM3NZ ",.02)
 ;;0JHM3NZ 
 ;;9002226.02101,"1804,0JHM3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM3VZ ",.01)
 ;;0JHM3VZ 
 ;;9002226.02101,"1804,0JHM3VZ ",.02)
 ;;0JHM3VZ 
 ;;9002226.02101,"1804,0JHM3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM3WZ ",.01)
 ;;0JHM3WZ 
 ;;9002226.02101,"1804,0JHM3WZ ",.02)
 ;;0JHM3WZ 
 ;;9002226.02101,"1804,0JHM3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHM3XZ ",.01)
 ;;0JHM3XZ 
 ;;9002226.02101,"1804,0JHM3XZ ",.02)
 ;;0JHM3XZ 
 ;;9002226.02101,"1804,0JHM3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN0HZ ",.01)
 ;;0JHN0HZ 
 ;;9002226.02101,"1804,0JHN0HZ ",.02)
 ;;0JHN0HZ 
 ;;9002226.02101,"1804,0JHN0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN0NZ ",.01)
 ;;0JHN0NZ 
 ;;9002226.02101,"1804,0JHN0NZ ",.02)
 ;;0JHN0NZ 
 ;;9002226.02101,"1804,0JHN0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN0VZ ",.01)
 ;;0JHN0VZ 
 ;;9002226.02101,"1804,0JHN0VZ ",.02)
 ;;0JHN0VZ 
 ;;9002226.02101,"1804,0JHN0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN0WZ ",.01)
 ;;0JHN0WZ 
 ;;9002226.02101,"1804,0JHN0WZ ",.02)
 ;;0JHN0WZ 
 ;;9002226.02101,"1804,0JHN0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN0XZ ",.01)
 ;;0JHN0XZ 
 ;;9002226.02101,"1804,0JHN0XZ ",.02)
 ;;0JHN0XZ 
 ;;9002226.02101,"1804,0JHN0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN3HZ ",.01)
 ;;0JHN3HZ 
 ;;9002226.02101,"1804,0JHN3HZ ",.02)
 ;;0JHN3HZ 
 ;;9002226.02101,"1804,0JHN3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN3NZ ",.01)
 ;;0JHN3NZ 
 ;;9002226.02101,"1804,0JHN3NZ ",.02)
 ;;0JHN3NZ 
 ;;9002226.02101,"1804,0JHN3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN3VZ ",.01)
 ;;0JHN3VZ 
 ;;9002226.02101,"1804,0JHN3VZ ",.02)
 ;;0JHN3VZ 
 ;;9002226.02101,"1804,0JHN3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN3WZ ",.01)
 ;;0JHN3WZ 
 ;;9002226.02101,"1804,0JHN3WZ ",.02)
 ;;0JHN3WZ 
 ;;9002226.02101,"1804,0JHN3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHN3XZ ",.01)
 ;;0JHN3XZ 
 ;;9002226.02101,"1804,0JHN3XZ ",.02)
 ;;0JHN3XZ 
 ;;9002226.02101,"1804,0JHN3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP0HZ ",.01)
 ;;0JHP0HZ 
 ;;9002226.02101,"1804,0JHP0HZ ",.02)
 ;;0JHP0HZ 
 ;;9002226.02101,"1804,0JHP0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP0NZ ",.01)
 ;;0JHP0NZ 
 ;;9002226.02101,"1804,0JHP0NZ ",.02)
 ;;0JHP0NZ 
 ;;9002226.02101,"1804,0JHP0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP0VZ ",.01)
 ;;0JHP0VZ 
 ;;9002226.02101,"1804,0JHP0VZ ",.02)
 ;;0JHP0VZ 
 ;;9002226.02101,"1804,0JHP0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP0WZ ",.01)
 ;;0JHP0WZ 
 ;;9002226.02101,"1804,0JHP0WZ ",.02)
 ;;0JHP0WZ 
 ;;9002226.02101,"1804,0JHP0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP0XZ ",.01)
 ;;0JHP0XZ 
 ;;9002226.02101,"1804,0JHP0XZ ",.02)
 ;;0JHP0XZ 
 ;;9002226.02101,"1804,0JHP0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP3HZ ",.01)
 ;;0JHP3HZ 
 ;;9002226.02101,"1804,0JHP3HZ ",.02)
 ;;0JHP3HZ 
 ;;9002226.02101,"1804,0JHP3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP3NZ ",.01)
 ;;0JHP3NZ 
 ;;9002226.02101,"1804,0JHP3NZ ",.02)
 ;;0JHP3NZ 
 ;;9002226.02101,"1804,0JHP3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP3VZ ",.01)
 ;;0JHP3VZ 
 ;;9002226.02101,"1804,0JHP3VZ ",.02)
 ;;0JHP3VZ 
 ;;9002226.02101,"1804,0JHP3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP3WZ ",.01)
 ;;0JHP3WZ 
 ;;9002226.02101,"1804,0JHP3WZ ",.02)
 ;;0JHP3WZ 
 ;;9002226.02101,"1804,0JHP3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHP3XZ ",.01)
 ;;0JHP3XZ 
 ;;9002226.02101,"1804,0JHP3XZ ",.02)
 ;;0JHP3XZ 
 ;;9002226.02101,"1804,0JHP3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHQ0NZ ",.01)
 ;;0JHQ0NZ 
 ;;9002226.02101,"1804,0JHQ0NZ ",.02)
 ;;0JHQ0NZ 
 ;;9002226.02101,"1804,0JHQ0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHQ3NZ ",.01)
 ;;0JHQ3NZ 
 ;;9002226.02101,"1804,0JHQ3NZ ",.02)
 ;;0JHQ3NZ 
 ;;9002226.02101,"1804,0JHQ3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHR0NZ ",.01)
 ;;0JHR0NZ 
 ;;9002226.02101,"1804,0JHR0NZ ",.02)
 ;;0JHR0NZ 
 ;;9002226.02101,"1804,0JHR0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHR3NZ ",.01)
 ;;0JHR3NZ 
 ;;9002226.02101,"1804,0JHR3NZ ",.02)
 ;;0JHR3NZ 
 ;;9002226.02101,"1804,0JHR3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHS01Z ",.01)
 ;;0JHS01Z 
 ;;9002226.02101,"1804,0JHS01Z ",.02)
 ;;0JHS01Z 
 ;;9002226.02101,"1804,0JHS01Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHS03Z ",.01)
 ;;0JHS03Z 
 ;;9002226.02101,"1804,0JHS03Z ",.02)
 ;;0JHS03Z 
 ;;9002226.02101,"1804,0JHS03Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHS31Z ",.01)
 ;;0JHS31Z 
 ;;9002226.02101,"1804,0JHS31Z ",.02)
 ;;0JHS31Z 
 ;;9002226.02101,"1804,0JHS31Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHS33Z ",.01)
 ;;0JHS33Z 
 ;;9002226.02101,"1804,0JHS33Z ",.02)
 ;;0JHS33Z 
 ;;9002226.02101,"1804,0JHS33Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHT01Z ",.01)
 ;;0JHT01Z 
 ;;9002226.02101,"1804,0JHT01Z ",.02)
 ;;0JHT01Z 
 ;;9002226.02101,"1804,0JHT01Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JHT03Z ",.01)
 ;;0JHT03Z