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

ATXXB195.m

Go to the documentation of this file.
ATXXB195 ;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,BG231ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG23Y0Z ",.01)
 ;;BG23Y0Z 
 ;;9002226.02101,"1804,BG23Y0Z ",.02)
 ;;BG23Y0Z 
 ;;9002226.02101,"1804,BG23Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BG23YZZ ",.01)
 ;;BG23YZZ 
 ;;9002226.02101,"1804,BG23YZZ ",.02)
 ;;BG23YZZ 
 ;;9002226.02101,"1804,BG23YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG23ZZZ ",.01)
 ;;BG23ZZZ 
 ;;9002226.02101,"1804,BG23ZZZ ",.02)
 ;;BG23ZZZ 
 ;;9002226.02101,"1804,BG23ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG2400Z ",.01)
 ;;BG2400Z 
 ;;9002226.02101,"1804,BG2400Z ",.02)
 ;;BG2400Z 
 ;;9002226.02101,"1804,BG2400Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BG240ZZ ",.01)
 ;;BG240ZZ 
 ;;9002226.02101,"1804,BG240ZZ ",.02)
 ;;BG240ZZ 
 ;;9002226.02101,"1804,BG240ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG2410Z ",.01)
 ;;BG2410Z 
 ;;9002226.02101,"1804,BG2410Z ",.02)
 ;;BG2410Z 
 ;;9002226.02101,"1804,BG2410Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BG241ZZ ",.01)
 ;;BG241ZZ 
 ;;9002226.02101,"1804,BG241ZZ ",.02)
 ;;BG241ZZ 
 ;;9002226.02101,"1804,BG241ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG24Y0Z ",.01)
 ;;BG24Y0Z 
 ;;9002226.02101,"1804,BG24Y0Z ",.02)
 ;;BG24Y0Z 
 ;;9002226.02101,"1804,BG24Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BG24YZZ ",.01)
 ;;BG24YZZ 
 ;;9002226.02101,"1804,BG24YZZ ",.02)
 ;;BG24YZZ 
 ;;9002226.02101,"1804,BG24YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG24ZZZ ",.01)
 ;;BG24ZZZ 
 ;;9002226.02101,"1804,BG24ZZZ ",.02)
 ;;BG24ZZZ 
 ;;9002226.02101,"1804,BG24ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG32Y0Z ",.01)
 ;;BG32Y0Z 
 ;;9002226.02101,"1804,BG32Y0Z ",.02)
 ;;BG32Y0Z 
 ;;9002226.02101,"1804,BG32Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BG32YZZ ",.01)
 ;;BG32YZZ 
 ;;9002226.02101,"1804,BG32YZZ ",.02)
 ;;BG32YZZ 
 ;;9002226.02101,"1804,BG32YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG32ZZZ ",.01)
 ;;BG32ZZZ 
 ;;9002226.02101,"1804,BG32ZZZ ",.02)
 ;;BG32ZZZ 
 ;;9002226.02101,"1804,BG32ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG33Y0Z ",.01)
 ;;BG33Y0Z 
 ;;9002226.02101,"1804,BG33Y0Z ",.02)
 ;;BG33Y0Z 
 ;;9002226.02101,"1804,BG33Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BG33YZZ ",.01)
 ;;BG33YZZ 
 ;;9002226.02101,"1804,BG33YZZ ",.02)
 ;;BG33YZZ 
 ;;9002226.02101,"1804,BG33YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG33ZZZ ",.01)
 ;;BG33ZZZ 
 ;;9002226.02101,"1804,BG33ZZZ ",.02)
 ;;BG33ZZZ 
 ;;9002226.02101,"1804,BG33ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG34Y0Z ",.01)
 ;;BG34Y0Z 
 ;;9002226.02101,"1804,BG34Y0Z ",.02)
 ;;BG34Y0Z 
 ;;9002226.02101,"1804,BG34Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BG34YZZ ",.01)
 ;;BG34YZZ 
 ;;9002226.02101,"1804,BG34YZZ ",.02)
 ;;BG34YZZ 
 ;;9002226.02101,"1804,BG34YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG34ZZZ ",.01)
 ;;BG34ZZZ 
 ;;9002226.02101,"1804,BG34ZZZ ",.02)
 ;;BG34ZZZ 
 ;;9002226.02101,"1804,BG34ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG40ZZZ ",.01)
 ;;BG40ZZZ 
 ;;9002226.02101,"1804,BG40ZZZ ",.02)
 ;;BG40ZZZ 
 ;;9002226.02101,"1804,BG40ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG41ZZZ ",.01)
 ;;BG41ZZZ 
 ;;9002226.02101,"1804,BG41ZZZ ",.02)
 ;;BG41ZZZ 
 ;;9002226.02101,"1804,BG41ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG42ZZZ ",.01)
 ;;BG42ZZZ 
 ;;9002226.02101,"1804,BG42ZZZ ",.02)
 ;;BG42ZZZ 
 ;;9002226.02101,"1804,BG42ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG43ZZZ ",.01)
 ;;BG43ZZZ 
 ;;9002226.02101,"1804,BG43ZZZ ",.02)
 ;;BG43ZZZ 
 ;;9002226.02101,"1804,BG43ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BG44ZZZ ",.01)
 ;;BG44ZZZ 
 ;;9002226.02101,"1804,BG44ZZZ ",.02)
 ;;BG44ZZZ 
 ;;9002226.02101,"1804,BG44ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH00ZZZ ",.01)
 ;;BH00ZZZ 
 ;;9002226.02101,"1804,BH00ZZZ ",.02)
 ;;BH00ZZZ 
 ;;9002226.02101,"1804,BH00ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH01ZZZ ",.01)
 ;;BH01ZZZ 
 ;;9002226.02101,"1804,BH01ZZZ ",.02)
 ;;BH01ZZZ 
 ;;9002226.02101,"1804,BH01ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH02ZZZ ",.01)
 ;;BH02ZZZ 
 ;;9002226.02101,"1804,BH02ZZZ ",.02)
 ;;BH02ZZZ 
 ;;9002226.02101,"1804,BH02ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH030ZZ ",.01)
 ;;BH030ZZ 
 ;;9002226.02101,"1804,BH030ZZ ",.02)
 ;;BH030ZZ 
 ;;9002226.02101,"1804,BH030ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH031ZZ ",.01)
 ;;BH031ZZ 
 ;;9002226.02101,"1804,BH031ZZ ",.02)
 ;;BH031ZZ 
 ;;9002226.02101,"1804,BH031ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH03YZZ ",.01)
 ;;BH03YZZ 
 ;;9002226.02101,"1804,BH03YZZ ",.02)
 ;;BH03YZZ 
 ;;9002226.02101,"1804,BH03YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH03ZZZ ",.01)
 ;;BH03ZZZ 
 ;;9002226.02101,"1804,BH03ZZZ ",.02)
 ;;BH03ZZZ 
 ;;9002226.02101,"1804,BH03ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH040ZZ ",.01)
 ;;BH040ZZ 
 ;;9002226.02101,"1804,BH040ZZ ",.02)
 ;;BH040ZZ 
 ;;9002226.02101,"1804,BH040ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH041ZZ ",.01)
 ;;BH041ZZ 
 ;;9002226.02101,"1804,BH041ZZ ",.02)
 ;;BH041ZZ 
 ;;9002226.02101,"1804,BH041ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH04YZZ ",.01)
 ;;BH04YZZ 
 ;;9002226.02101,"1804,BH04YZZ ",.02)
 ;;BH04YZZ 
 ;;9002226.02101,"1804,BH04YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH04ZZZ ",.01)
 ;;BH04ZZZ 
 ;;9002226.02101,"1804,BH04ZZZ ",.02)
 ;;BH04ZZZ 
 ;;9002226.02101,"1804,BH04ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH050ZZ ",.01)
 ;;BH050ZZ 
 ;;9002226.02101,"1804,BH050ZZ ",.02)
 ;;BH050ZZ 
 ;;9002226.02101,"1804,BH050ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH051ZZ ",.01)
 ;;BH051ZZ 
 ;;9002226.02101,"1804,BH051ZZ ",.02)
 ;;BH051ZZ 
 ;;9002226.02101,"1804,BH051ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH05YZZ ",.01)
 ;;BH05YZZ 
 ;;9002226.02101,"1804,BH05YZZ ",.02)
 ;;BH05YZZ 
 ;;9002226.02101,"1804,BH05YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH05ZZZ ",.01)
 ;;BH05ZZZ 
 ;;9002226.02101,"1804,BH05ZZZ ",.02)
 ;;BH05ZZZ 
 ;;9002226.02101,"1804,BH05ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH060ZZ ",.01)
 ;;BH060ZZ 
 ;;9002226.02101,"1804,BH060ZZ ",.02)
 ;;BH060ZZ 
 ;;9002226.02101,"1804,BH060ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH061ZZ ",.01)
 ;;BH061ZZ 
 ;;9002226.02101,"1804,BH061ZZ ",.02)
 ;;BH061ZZ 
 ;;9002226.02101,"1804,BH061ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH06YZZ ",.01)
 ;;BH06YZZ 
 ;;9002226.02101,"1804,BH06YZZ ",.02)
 ;;BH06YZZ 
 ;;9002226.02101,"1804,BH06YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH06ZZZ ",.01)
 ;;BH06ZZZ 
 ;;9002226.02101,"1804,BH06ZZZ ",.02)
 ;;BH06ZZZ 
 ;;9002226.02101,"1804,BH06ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH30Y0Z ",.01)
 ;;BH30Y0Z 
 ;;9002226.02101,"1804,BH30Y0Z ",.02)
 ;;BH30Y0Z 
 ;;9002226.02101,"1804,BH30Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH30YZZ ",.01)
 ;;BH30YZZ 
 ;;9002226.02101,"1804,BH30YZZ ",.02)
 ;;BH30YZZ 
 ;;9002226.02101,"1804,BH30YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH30ZZZ ",.01)
 ;;BH30ZZZ 
 ;;9002226.02101,"1804,BH30ZZZ ",.02)
 ;;BH30ZZZ 
 ;;9002226.02101,"1804,BH30ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH31Y0Z ",.01)
 ;;BH31Y0Z 
 ;;9002226.02101,"1804,BH31Y0Z ",.02)
 ;;BH31Y0Z 
 ;;9002226.02101,"1804,BH31Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH31YZZ ",.01)
 ;;BH31YZZ 
 ;;9002226.02101,"1804,BH31YZZ ",.02)
 ;;BH31YZZ 
 ;;9002226.02101,"1804,BH31YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH31ZZZ ",.01)
 ;;BH31ZZZ 
 ;;9002226.02101,"1804,BH31ZZZ ",.02)
 ;;BH31ZZZ 
 ;;9002226.02101,"1804,BH31ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH32Y0Z ",.01)
 ;;BH32Y0Z 
 ;;9002226.02101,"1804,BH32Y0Z ",.02)
 ;;BH32Y0Z 
 ;;9002226.02101,"1804,BH32Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH32YZZ ",.01)
 ;;BH32YZZ 
 ;;9002226.02101,"1804,BH32YZZ ",.02)
 ;;BH32YZZ 
 ;;9002226.02101,"1804,BH32YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH32ZZZ ",.01)
 ;;BH32ZZZ 
 ;;9002226.02101,"1804,BH32ZZZ ",.02)
 ;;BH32ZZZ 
 ;;9002226.02101,"1804,BH32ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3DY0Z ",.01)
 ;;BH3DY0Z 
 ;;9002226.02101,"1804,BH3DY0Z ",.02)
 ;;BH3DY0Z 
 ;;9002226.02101,"1804,BH3DY0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3DYZZ ",.01)
 ;;BH3DYZZ 
 ;;9002226.02101,"1804,BH3DYZZ ",.02)
 ;;BH3DYZZ 
 ;;9002226.02101,"1804,BH3DYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3DZZZ ",.01)
 ;;BH3DZZZ 
 ;;9002226.02101,"1804,BH3DZZZ ",.02)
 ;;BH3DZZZ 
 ;;9002226.02101,"1804,BH3DZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3FY0Z ",.01)
 ;;BH3FY0Z 
 ;;9002226.02101,"1804,BH3FY0Z ",.02)
 ;;BH3FY0Z 
 ;;9002226.02101,"1804,BH3FY0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3FYZZ ",.01)
 ;;BH3FYZZ 
 ;;9002226.02101,"1804,BH3FYZZ ",.02)
 ;;BH3FYZZ 
 ;;9002226.02101,"1804,BH3FYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3FZZZ ",.01)
 ;;BH3FZZZ 
 ;;9002226.02101,"1804,BH3FZZZ ",.02)
 ;;BH3FZZZ 
 ;;9002226.02101,"1804,BH3FZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3GY0Z ",.01)
 ;;BH3GY0Z 
 ;;9002226.02101,"1804,BH3GY0Z ",.02)
 ;;BH3GY0Z 
 ;;9002226.02101,"1804,BH3GY0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3GYZZ ",.01)
 ;;BH3GYZZ 
 ;;9002226.02101,"1804,BH3GYZZ ",.02)
 ;;BH3GYZZ 
 ;;9002226.02101,"1804,BH3GYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3GZZZ ",.01)
 ;;BH3GZZZ 
 ;;9002226.02101,"1804,BH3GZZZ ",.02)
 ;;BH3GZZZ 
 ;;9002226.02101,"1804,BH3GZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3HY0Z ",.01)
 ;;BH3HY0Z 
 ;;9002226.02101,"1804,BH3HY0Z ",.02)
 ;;BH3HY0Z 
 ;;9002226.02101,"1804,BH3HY0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3HYZZ ",.01)
 ;;BH3HYZZ 
 ;;9002226.02101,"1804,BH3HYZZ ",.02)
 ;;BH3HYZZ 
 ;;9002226.02101,"1804,BH3HYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3HZZZ ",.01)
 ;;BH3HZZZ 
 ;;9002226.02101,"1804,BH3HZZZ ",.02)
 ;;BH3HZZZ 
 ;;9002226.02101,"1804,BH3HZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3JY0Z ",.01)
 ;;BH3JY0Z 
 ;;9002226.02101,"1804,BH3JY0Z ",.02)
 ;;BH3JY0Z 
 ;;9002226.02101,"1804,BH3JY0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3JYZZ ",.01)
 ;;BH3JYZZ 
 ;;9002226.02101,"1804,BH3JYZZ ",.02)
 ;;BH3JYZZ 
 ;;9002226.02101,"1804,BH3JYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH3JZZZ ",.01)
 ;;BH3JZZZ 
 ;;9002226.02101,"1804,BH3JZZZ ",.02)
 ;;BH3JZZZ 
 ;;9002226.02101,"1804,BH3JZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH40ZZZ ",.01)
 ;;BH40ZZZ 
 ;;9002226.02101,"1804,BH40ZZZ ",.02)
 ;;BH40ZZZ 
 ;;9002226.02101,"1804,BH40ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH41ZZZ ",.01)
 ;;BH41ZZZ 
 ;;9002226.02101,"1804,BH41ZZZ ",.02)
 ;;BH41ZZZ 
 ;;9002226.02101,"1804,BH41ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH42ZZZ ",.01)
 ;;BH42ZZZ 
 ;;9002226.02101,"1804,BH42ZZZ ",.02)
 ;;BH42ZZZ 
 ;;9002226.02101,"1804,BH42ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH47ZZZ ",.01)
 ;;BH47ZZZ 
 ;;9002226.02101,"1804,BH47ZZZ ",.02)
 ;;BH47ZZZ 
 ;;9002226.02101,"1804,BH47ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH48ZZZ ",.01)
 ;;BH48ZZZ 
 ;;9002226.02101,"1804,BH48ZZZ ",.02)
 ;;BH48ZZZ 
 ;;9002226.02101,"1804,BH48ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH49ZZZ ",.01)
 ;;BH49ZZZ 
 ;;9002226.02101,"1804,BH49ZZZ ",.02)
 ;;BH49ZZZ 
 ;;9002226.02101,"1804,BH49ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH4BZZZ ",.01)
 ;;BH4BZZZ 
 ;;9002226.02101,"1804,BH4BZZZ ",.02)
 ;;BH4BZZZ 
 ;;9002226.02101,"1804,BH4BZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BH4CZZZ ",.01)
 ;;BH4CZZZ 
 ;;9002226.02101,"1804,BH4CZZZ ",.02)
 ;;BH4CZZZ 
 ;;9002226.02101,"1804,BH4CZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BL30Y0Z ",.01)
 ;;BL30Y0Z 
 ;;9002226.02101,"1804,BL30Y0Z ",.02)
 ;;BL30Y0Z 
 ;;9002226.02101,"1804,BL30Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,BL30YZZ ",.01)
 ;;BL30YZZ 
 ;;9002226.02101,"1804,BL30YZZ ",.02)
 ;;BL30YZZ 
 ;;9002226.02101,"1804,BL30YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,BL30ZZZ ",.01)
 ;;BL30ZZZ 
 ;;9002226.02101,"1804,BL30ZZZ ",.02)
 ;;BL30ZZZ 
 ;;9002226.02101,"1804,BL30ZZZ ",.03)
 ;;31