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

ATXXB191.m

Go to the documentation of this file.
ATXXB191 ;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,B8001ZZ ",.02)
 ;;B8001ZZ 
 ;;9002226.02101,"1804,B8001ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B800YZZ ",.01)
 ;;B800YZZ 
 ;;9002226.02101,"1804,B800YZZ ",.02)
 ;;B800YZZ 
 ;;9002226.02101,"1804,B800YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B8010ZZ ",.01)
 ;;B8010ZZ 
 ;;9002226.02101,"1804,B8010ZZ ",.02)
 ;;B8010ZZ 
 ;;9002226.02101,"1804,B8010ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B8011ZZ ",.01)
 ;;B8011ZZ 
 ;;9002226.02101,"1804,B8011ZZ ",.02)
 ;;B8011ZZ 
 ;;9002226.02101,"1804,B8011ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B801YZZ ",.01)
 ;;B801YZZ 
 ;;9002226.02101,"1804,B801YZZ ",.02)
 ;;B801YZZ 
 ;;9002226.02101,"1804,B801YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B8020ZZ ",.01)
 ;;B8020ZZ 
 ;;9002226.02101,"1804,B8020ZZ ",.02)
 ;;B8020ZZ 
 ;;9002226.02101,"1804,B8020ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B8021ZZ ",.01)
 ;;B8021ZZ 
 ;;9002226.02101,"1804,B8021ZZ ",.02)
 ;;B8021ZZ 
 ;;9002226.02101,"1804,B8021ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B802YZZ ",.01)
 ;;B802YZZ 
 ;;9002226.02101,"1804,B802YZZ ",.02)
 ;;B802YZZ 
 ;;9002226.02101,"1804,B802YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B803ZZZ ",.01)
 ;;B803ZZZ 
 ;;9002226.02101,"1804,B803ZZZ ",.02)
 ;;B803ZZZ 
 ;;9002226.02101,"1804,B803ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B804ZZZ ",.01)
 ;;B804ZZZ 
 ;;9002226.02101,"1804,B804ZZZ ",.02)
 ;;B804ZZZ 
 ;;9002226.02101,"1804,B804ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B805ZZZ ",.01)
 ;;B805ZZZ 
 ;;9002226.02101,"1804,B805ZZZ ",.02)
 ;;B805ZZZ 
 ;;9002226.02101,"1804,B805ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B806ZZZ ",.01)
 ;;B806ZZZ 
 ;;9002226.02101,"1804,B806ZZZ ",.02)
 ;;B806ZZZ 
 ;;9002226.02101,"1804,B806ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B807ZZZ ",.01)
 ;;B807ZZZ 
 ;;9002226.02101,"1804,B807ZZZ ",.02)
 ;;B807ZZZ 
 ;;9002226.02101,"1804,B807ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B82500Z ",.01)
 ;;B82500Z 
 ;;9002226.02101,"1804,B82500Z ",.02)
 ;;B82500Z 
 ;;9002226.02101,"1804,B82500Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B8250ZZ ",.01)
 ;;B8250ZZ 
 ;;9002226.02101,"1804,B8250ZZ ",.02)
 ;;B8250ZZ 
 ;;9002226.02101,"1804,B8250ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B82510Z ",.01)
 ;;B82510Z 
 ;;9002226.02101,"1804,B82510Z ",.02)
 ;;B82510Z 
 ;;9002226.02101,"1804,B82510Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B8251ZZ ",.01)
 ;;B8251ZZ 
 ;;9002226.02101,"1804,B8251ZZ ",.02)
 ;;B8251ZZ 
 ;;9002226.02101,"1804,B8251ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B825Y0Z ",.01)
 ;;B825Y0Z 
 ;;9002226.02101,"1804,B825Y0Z ",.02)
 ;;B825Y0Z 
 ;;9002226.02101,"1804,B825Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B825YZZ ",.01)
 ;;B825YZZ 
 ;;9002226.02101,"1804,B825YZZ ",.02)
 ;;B825YZZ 
 ;;9002226.02101,"1804,B825YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B825ZZZ ",.01)
 ;;B825ZZZ 
 ;;9002226.02101,"1804,B825ZZZ ",.02)
 ;;B825ZZZ 
 ;;9002226.02101,"1804,B825ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B82600Z ",.01)
 ;;B82600Z 
 ;;9002226.02101,"1804,B82600Z ",.02)
 ;;B82600Z 
 ;;9002226.02101,"1804,B82600Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B8260ZZ ",.01)
 ;;B8260ZZ 
 ;;9002226.02101,"1804,B8260ZZ ",.02)
 ;;B8260ZZ 
 ;;9002226.02101,"1804,B8260ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B82610Z ",.01)
 ;;B82610Z 
 ;;9002226.02101,"1804,B82610Z ",.02)
 ;;B82610Z 
 ;;9002226.02101,"1804,B82610Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B8261ZZ ",.01)
 ;;B8261ZZ 
 ;;9002226.02101,"1804,B8261ZZ ",.02)
 ;;B8261ZZ 
 ;;9002226.02101,"1804,B8261ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B826Y0Z ",.01)
 ;;B826Y0Z 
 ;;9002226.02101,"1804,B826Y0Z ",.02)
 ;;B826Y0Z 
 ;;9002226.02101,"1804,B826Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B826YZZ ",.01)
 ;;B826YZZ 
 ;;9002226.02101,"1804,B826YZZ ",.02)
 ;;B826YZZ 
 ;;9002226.02101,"1804,B826YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B826ZZZ ",.01)
 ;;B826ZZZ 
 ;;9002226.02101,"1804,B826ZZZ ",.02)
 ;;B826ZZZ 
 ;;9002226.02101,"1804,B826ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B82700Z ",.01)
 ;;B82700Z 
 ;;9002226.02101,"1804,B82700Z ",.02)
 ;;B82700Z 
 ;;9002226.02101,"1804,B82700Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B8270ZZ ",.01)
 ;;B8270ZZ 
 ;;9002226.02101,"1804,B8270ZZ ",.02)
 ;;B8270ZZ 
 ;;9002226.02101,"1804,B8270ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B82710Z ",.01)
 ;;B82710Z 
 ;;9002226.02101,"1804,B82710Z ",.02)
 ;;B82710Z 
 ;;9002226.02101,"1804,B82710Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B8271ZZ ",.01)
 ;;B8271ZZ 
 ;;9002226.02101,"1804,B8271ZZ ",.02)
 ;;B8271ZZ 
 ;;9002226.02101,"1804,B8271ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B827Y0Z ",.01)
 ;;B827Y0Z 
 ;;9002226.02101,"1804,B827Y0Z ",.02)
 ;;B827Y0Z 
 ;;9002226.02101,"1804,B827Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B827YZZ ",.01)
 ;;B827YZZ 
 ;;9002226.02101,"1804,B827YZZ ",.02)
 ;;B827YZZ 
 ;;9002226.02101,"1804,B827YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B827ZZZ ",.01)
 ;;B827ZZZ 
 ;;9002226.02101,"1804,B827ZZZ ",.02)
 ;;B827ZZZ 
 ;;9002226.02101,"1804,B827ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B835Y0Z ",.01)
 ;;B835Y0Z 
 ;;9002226.02101,"1804,B835Y0Z ",.02)
 ;;B835Y0Z 
 ;;9002226.02101,"1804,B835Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B835YZZ ",.01)
 ;;B835YZZ 
 ;;9002226.02101,"1804,B835YZZ ",.02)
 ;;B835YZZ 
 ;;9002226.02101,"1804,B835YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B835ZZZ ",.01)
 ;;B835ZZZ 
 ;;9002226.02101,"1804,B835ZZZ ",.02)
 ;;B835ZZZ 
 ;;9002226.02101,"1804,B835ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B836Y0Z ",.01)
 ;;B836Y0Z 
 ;;9002226.02101,"1804,B836Y0Z ",.02)
 ;;B836Y0Z 
 ;;9002226.02101,"1804,B836Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B836YZZ ",.01)
 ;;B836YZZ 
 ;;9002226.02101,"1804,B836YZZ ",.02)
 ;;B836YZZ 
 ;;9002226.02101,"1804,B836YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B836ZZZ ",.01)
 ;;B836ZZZ 
 ;;9002226.02101,"1804,B836ZZZ ",.02)
 ;;B836ZZZ 
 ;;9002226.02101,"1804,B836ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B837Y0Z ",.01)
 ;;B837Y0Z 
 ;;9002226.02101,"1804,B837Y0Z ",.02)
 ;;B837Y0Z 
 ;;9002226.02101,"1804,B837Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B837YZZ ",.01)
 ;;B837YZZ 
 ;;9002226.02101,"1804,B837YZZ ",.02)
 ;;B837YZZ 
 ;;9002226.02101,"1804,B837YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B837ZZZ ",.01)
 ;;B837ZZZ 
 ;;9002226.02101,"1804,B837ZZZ ",.02)
 ;;B837ZZZ 
 ;;9002226.02101,"1804,B837ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B845ZZZ ",.01)
 ;;B845ZZZ 
 ;;9002226.02101,"1804,B845ZZZ ",.02)
 ;;B845ZZZ 
 ;;9002226.02101,"1804,B845ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B846ZZZ ",.01)
 ;;B846ZZZ 
 ;;9002226.02101,"1804,B846ZZZ ",.02)
 ;;B846ZZZ 
 ;;9002226.02101,"1804,B846ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B847ZZZ ",.01)
 ;;B847ZZZ 
 ;;9002226.02101,"1804,B847ZZZ ",.02)
 ;;B847ZZZ 
 ;;9002226.02101,"1804,B847ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B902ZZZ ",.01)
 ;;B902ZZZ 
 ;;9002226.02101,"1804,B902ZZZ ",.02)
 ;;B902ZZZ 
 ;;9002226.02101,"1804,B902ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9040ZZ ",.01)
 ;;B9040ZZ 
 ;;9002226.02101,"1804,B9040ZZ ",.02)
 ;;B9040ZZ 
 ;;9002226.02101,"1804,B9040ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9041ZZ ",.01)
 ;;B9041ZZ 
 ;;9002226.02101,"1804,B9041ZZ ",.02)
 ;;B9041ZZ 
 ;;9002226.02101,"1804,B9041ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B904YZZ ",.01)
 ;;B904YZZ 
 ;;9002226.02101,"1804,B904YZZ ",.02)
 ;;B904YZZ 
 ;;9002226.02101,"1804,B904YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9050ZZ ",.01)
 ;;B9050ZZ 
 ;;9002226.02101,"1804,B9050ZZ ",.02)
 ;;B9050ZZ 
 ;;9002226.02101,"1804,B9050ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9051ZZ ",.01)
 ;;B9051ZZ 
 ;;9002226.02101,"1804,B9051ZZ ",.02)
 ;;B9051ZZ 
 ;;9002226.02101,"1804,B9051ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B905YZZ ",.01)
 ;;B905YZZ 
 ;;9002226.02101,"1804,B905YZZ ",.02)
 ;;B905YZZ 
 ;;9002226.02101,"1804,B905YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9060ZZ ",.01)
 ;;B9060ZZ 
 ;;9002226.02101,"1804,B9060ZZ ",.02)
 ;;B9060ZZ 
 ;;9002226.02101,"1804,B9060ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9061ZZ ",.01)
 ;;B9061ZZ 
 ;;9002226.02101,"1804,B9061ZZ ",.02)
 ;;B9061ZZ 
 ;;9002226.02101,"1804,B9061ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B906YZZ ",.01)
 ;;B906YZZ 
 ;;9002226.02101,"1804,B906YZZ ",.02)
 ;;B906YZZ 
 ;;9002226.02101,"1804,B906YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9070ZZ ",.01)
 ;;B9070ZZ 
 ;;9002226.02101,"1804,B9070ZZ ",.02)
 ;;B9070ZZ 
 ;;9002226.02101,"1804,B9070ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9071ZZ ",.01)
 ;;B9071ZZ 
 ;;9002226.02101,"1804,B9071ZZ ",.02)
 ;;B9071ZZ 
 ;;9002226.02101,"1804,B9071ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B907YZZ ",.01)
 ;;B907YZZ 
 ;;9002226.02101,"1804,B907YZZ ",.02)
 ;;B907YZZ 
 ;;9002226.02101,"1804,B907YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9080ZZ ",.01)
 ;;B9080ZZ 
 ;;9002226.02101,"1804,B9080ZZ ",.02)
 ;;B9080ZZ 
 ;;9002226.02101,"1804,B9080ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9081ZZ ",.01)
 ;;B9081ZZ 
 ;;9002226.02101,"1804,B9081ZZ ",.02)
 ;;B9081ZZ 
 ;;9002226.02101,"1804,B9081ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B908YZZ ",.01)
 ;;B908YZZ 
 ;;9002226.02101,"1804,B908YZZ ",.02)
 ;;B908YZZ 
 ;;9002226.02101,"1804,B908YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9090ZZ ",.01)
 ;;B9090ZZ 
 ;;9002226.02101,"1804,B9090ZZ ",.02)
 ;;B9090ZZ 
 ;;9002226.02101,"1804,B9090ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B9091ZZ ",.01)
 ;;B9091ZZ 
 ;;9002226.02101,"1804,B9091ZZ ",.02)
 ;;B9091ZZ 
 ;;9002226.02101,"1804,B9091ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B909YZZ ",.01)
 ;;B909YZZ 
 ;;9002226.02101,"1804,B909YZZ ",.02)
 ;;B909YZZ 
 ;;9002226.02101,"1804,B909YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90B0ZZ ",.01)
 ;;B90B0ZZ 
 ;;9002226.02101,"1804,B90B0ZZ ",.02)
 ;;B90B0ZZ 
 ;;9002226.02101,"1804,B90B0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90B1ZZ ",.01)
 ;;B90B1ZZ 
 ;;9002226.02101,"1804,B90B1ZZ ",.02)
 ;;B90B1ZZ 
 ;;9002226.02101,"1804,B90B1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90BYZZ ",.01)
 ;;B90BYZZ 
 ;;9002226.02101,"1804,B90BYZZ ",.02)
 ;;B90BYZZ 
 ;;9002226.02101,"1804,B90BYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90C0ZZ ",.01)
 ;;B90C0ZZ 
 ;;9002226.02101,"1804,B90C0ZZ ",.02)
 ;;B90C0ZZ 
 ;;9002226.02101,"1804,B90C0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90C1ZZ ",.01)
 ;;B90C1ZZ 
 ;;9002226.02101,"1804,B90C1ZZ ",.02)
 ;;B90C1ZZ 
 ;;9002226.02101,"1804,B90C1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90CYZZ ",.01)
 ;;B90CYZZ 
 ;;9002226.02101,"1804,B90CYZZ ",.02)
 ;;B90CYZZ 
 ;;9002226.02101,"1804,B90CYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90D0ZZ ",.01)
 ;;B90D0ZZ 
 ;;9002226.02101,"1804,B90D0ZZ ",.02)
 ;;B90D0ZZ 
 ;;9002226.02101,"1804,B90D0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90D1ZZ ",.01)
 ;;B90D1ZZ 
 ;;9002226.02101,"1804,B90D1ZZ ",.02)
 ;;B90D1ZZ 
 ;;9002226.02101,"1804,B90D1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90DYZZ ",.01)
 ;;B90DYZZ 
 ;;9002226.02101,"1804,B90DYZZ ",.02)
 ;;B90DYZZ 
 ;;9002226.02101,"1804,B90DYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90FZZZ ",.01)
 ;;B90FZZZ 
 ;;9002226.02101,"1804,B90FZZZ ",.02)
 ;;B90FZZZ 
 ;;9002226.02101,"1804,B90FZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B90HZZZ ",.01)
 ;;B90HZZZ 
 ;;9002226.02101,"1804,B90HZZZ ",.02)
 ;;B90HZZZ 
 ;;9002226.02101,"1804,B90HZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B91GYZZ ",.01)
 ;;B91GYZZ 
 ;;9002226.02101,"1804,B91GYZZ ",.02)
 ;;B91GYZZ 
 ;;9002226.02101,"1804,B91GYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B91GZZZ ",.01)
 ;;B91GZZZ 
 ;;9002226.02101,"1804,B91GZZZ ",.02)
 ;;B91GZZZ 
 ;;9002226.02101,"1804,B91GZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B91JYZZ ",.01)
 ;;B91JYZZ 
 ;;9002226.02101,"1804,B91JYZZ ",.02)
 ;;B91JYZZ