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

ATXXB220.m

Go to the documentation of this file.
ATXXB220 ;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,D7159BZ ",.01)
 ;;D7159BZ 
 ;;9002226.02101,"1804,D7159BZ ",.02)
 ;;D7159BZ 
 ;;9002226.02101,"1804,D7159BZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7159CZ ",.01)
 ;;D7159CZ 
 ;;9002226.02101,"1804,D7159CZ ",.02)
 ;;D7159CZ 
 ;;9002226.02101,"1804,D7159CZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7159YZ ",.01)
 ;;D7159YZ 
 ;;9002226.02101,"1804,D7159YZ ",.02)
 ;;D7159YZ 
 ;;9002226.02101,"1804,D7159YZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D715B7Z ",.01)
 ;;D715B7Z 
 ;;9002226.02101,"1804,D715B7Z ",.02)
 ;;D715B7Z 
 ;;9002226.02101,"1804,D715B7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D715B8Z ",.01)
 ;;D715B8Z 
 ;;9002226.02101,"1804,D715B8Z ",.02)
 ;;D715B8Z 
 ;;9002226.02101,"1804,D715B8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D715B9Z ",.01)
 ;;D715B9Z 
 ;;9002226.02101,"1804,D715B9Z ",.02)
 ;;D715B9Z 
 ;;9002226.02101,"1804,D715B9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D715BBZ ",.01)
 ;;D715BBZ 
 ;;9002226.02101,"1804,D715BBZ ",.02)
 ;;D715BBZ 
 ;;9002226.02101,"1804,D715BBZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D715BCZ ",.01)
 ;;D715BCZ 
 ;;9002226.02101,"1804,D715BCZ ",.02)
 ;;D715BCZ 
 ;;9002226.02101,"1804,D715BCZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D715BYZ ",.01)
 ;;D715BYZ 
 ;;9002226.02101,"1804,D715BYZ ",.02)
 ;;D715BYZ 
 ;;9002226.02101,"1804,D715BYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D71697Z ",.01)
 ;;D71697Z 
 ;;9002226.02101,"1804,D71697Z ",.02)
 ;;D71697Z 
 ;;9002226.02101,"1804,D71697Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D71698Z ",.01)
 ;;D71698Z 
 ;;9002226.02101,"1804,D71698Z ",.02)
 ;;D71698Z 
 ;;9002226.02101,"1804,D71698Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D71699Z ",.01)
 ;;D71699Z 
 ;;9002226.02101,"1804,D71699Z ",.02)
 ;;D71699Z 
 ;;9002226.02101,"1804,D71699Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D7169BZ ",.01)
 ;;D7169BZ 
 ;;9002226.02101,"1804,D7169BZ ",.02)
 ;;D7169BZ 
 ;;9002226.02101,"1804,D7169BZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7169CZ ",.01)
 ;;D7169CZ 
 ;;9002226.02101,"1804,D7169CZ ",.02)
 ;;D7169CZ 
 ;;9002226.02101,"1804,D7169CZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7169YZ ",.01)
 ;;D7169YZ 
 ;;9002226.02101,"1804,D7169YZ ",.02)
 ;;D7169YZ 
 ;;9002226.02101,"1804,D7169YZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D716B7Z ",.01)
 ;;D716B7Z 
 ;;9002226.02101,"1804,D716B7Z ",.02)
 ;;D716B7Z 
 ;;9002226.02101,"1804,D716B7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D716B8Z ",.01)
 ;;D716B8Z 
 ;;9002226.02101,"1804,D716B8Z ",.02)
 ;;D716B8Z 
 ;;9002226.02101,"1804,D716B8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D716B9Z ",.01)
 ;;D716B9Z 
 ;;9002226.02101,"1804,D716B9Z ",.02)
 ;;D716B9Z 
 ;;9002226.02101,"1804,D716B9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D716BBZ ",.01)
 ;;D716BBZ 
 ;;9002226.02101,"1804,D716BBZ ",.02)
 ;;D716BBZ 
 ;;9002226.02101,"1804,D716BBZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D716BCZ ",.01)
 ;;D716BCZ 
 ;;9002226.02101,"1804,D716BCZ ",.02)
 ;;D716BCZ 
 ;;9002226.02101,"1804,D716BCZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D716BYZ ",.01)
 ;;D716BYZ 
 ;;9002226.02101,"1804,D716BYZ ",.02)
 ;;D716BYZ 
 ;;9002226.02101,"1804,D716BYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D71797Z ",.01)
 ;;D71797Z 
 ;;9002226.02101,"1804,D71797Z ",.02)
 ;;D71797Z 
 ;;9002226.02101,"1804,D71797Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D71798Z ",.01)
 ;;D71798Z 
 ;;9002226.02101,"1804,D71798Z ",.02)
 ;;D71798Z 
 ;;9002226.02101,"1804,D71798Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D71799Z ",.01)
 ;;D71799Z 
 ;;9002226.02101,"1804,D71799Z ",.02)
 ;;D71799Z 
 ;;9002226.02101,"1804,D71799Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D7179BZ ",.01)
 ;;D7179BZ 
 ;;9002226.02101,"1804,D7179BZ ",.02)
 ;;D7179BZ 
 ;;9002226.02101,"1804,D7179BZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7179CZ ",.01)
 ;;D7179CZ 
 ;;9002226.02101,"1804,D7179CZ ",.02)
 ;;D7179CZ 
 ;;9002226.02101,"1804,D7179CZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7179YZ ",.01)
 ;;D7179YZ 
 ;;9002226.02101,"1804,D7179YZ ",.02)
 ;;D7179YZ 
 ;;9002226.02101,"1804,D7179YZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D717B7Z ",.01)
 ;;D717B7Z 
 ;;9002226.02101,"1804,D717B7Z ",.02)
 ;;D717B7Z 
 ;;9002226.02101,"1804,D717B7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D717B8Z ",.01)
 ;;D717B8Z 
 ;;9002226.02101,"1804,D717B8Z ",.02)
 ;;D717B8Z 
 ;;9002226.02101,"1804,D717B8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D717B9Z ",.01)
 ;;D717B9Z 
 ;;9002226.02101,"1804,D717B9Z ",.02)
 ;;D717B9Z 
 ;;9002226.02101,"1804,D717B9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D717BBZ ",.01)
 ;;D717BBZ 
 ;;9002226.02101,"1804,D717BBZ ",.02)
 ;;D717BBZ 
 ;;9002226.02101,"1804,D717BBZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D717BCZ ",.01)
 ;;D717BCZ 
 ;;9002226.02101,"1804,D717BCZ ",.02)
 ;;D717BCZ 
 ;;9002226.02101,"1804,D717BCZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D717BYZ ",.01)
 ;;D717BYZ 
 ;;9002226.02101,"1804,D717BYZ ",.02)
 ;;D717BYZ 
 ;;9002226.02101,"1804,D717BYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D71897Z ",.01)
 ;;D71897Z 
 ;;9002226.02101,"1804,D71897Z ",.02)
 ;;D71897Z 
 ;;9002226.02101,"1804,D71897Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D71898Z ",.01)
 ;;D71898Z 
 ;;9002226.02101,"1804,D71898Z ",.02)
 ;;D71898Z 
 ;;9002226.02101,"1804,D71898Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D71899Z ",.01)
 ;;D71899Z 
 ;;9002226.02101,"1804,D71899Z ",.02)
 ;;D71899Z 
 ;;9002226.02101,"1804,D71899Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D7189BZ ",.01)
 ;;D7189BZ 
 ;;9002226.02101,"1804,D7189BZ ",.02)
 ;;D7189BZ 
 ;;9002226.02101,"1804,D7189BZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7189CZ ",.01)
 ;;D7189CZ 
 ;;9002226.02101,"1804,D7189CZ ",.02)
 ;;D7189CZ 
 ;;9002226.02101,"1804,D7189CZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7189YZ ",.01)
 ;;D7189YZ 
 ;;9002226.02101,"1804,D7189YZ ",.02)
 ;;D7189YZ 
 ;;9002226.02101,"1804,D7189YZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D718B7Z ",.01)
 ;;D718B7Z 
 ;;9002226.02101,"1804,D718B7Z ",.02)
 ;;D718B7Z 
 ;;9002226.02101,"1804,D718B7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D718B8Z ",.01)
 ;;D718B8Z 
 ;;9002226.02101,"1804,D718B8Z ",.02)
 ;;D718B8Z 
 ;;9002226.02101,"1804,D718B8Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D718B9Z ",.01)
 ;;D718B9Z 
 ;;9002226.02101,"1804,D718B9Z ",.02)
 ;;D718B9Z 
 ;;9002226.02101,"1804,D718B9Z ",.03)
 ;;31
 ;;9002226.02101,"1804,D718BBZ ",.01)
 ;;D718BBZ 
 ;;9002226.02101,"1804,D718BBZ ",.02)
 ;;D718BBZ 
 ;;9002226.02101,"1804,D718BBZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D718BCZ ",.01)
 ;;D718BCZ 
 ;;9002226.02101,"1804,D718BCZ ",.02)
 ;;D718BCZ 
 ;;9002226.02101,"1804,D718BCZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D718BYZ ",.01)
 ;;D718BYZ 
 ;;9002226.02101,"1804,D718BYZ ",.02)
 ;;D718BYZ 
 ;;9002226.02101,"1804,D718BYZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D720DZZ ",.01)
 ;;D720DZZ 
 ;;9002226.02101,"1804,D720DZZ ",.02)
 ;;D720DZZ 
 ;;9002226.02101,"1804,D720DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D720HZZ ",.01)
 ;;D720HZZ 
 ;;9002226.02101,"1804,D720HZZ ",.02)
 ;;D720HZZ 
 ;;9002226.02101,"1804,D720HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D720JZZ ",.01)
 ;;D720JZZ 
 ;;9002226.02101,"1804,D720JZZ ",.02)
 ;;D720JZZ 
 ;;9002226.02101,"1804,D720JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D721DZZ ",.01)
 ;;D721DZZ 
 ;;9002226.02101,"1804,D721DZZ ",.02)
 ;;D721DZZ 
 ;;9002226.02101,"1804,D721DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D721HZZ ",.01)
 ;;D721HZZ 
 ;;9002226.02101,"1804,D721HZZ ",.02)
 ;;D721HZZ 
 ;;9002226.02101,"1804,D721HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D721JZZ ",.01)
 ;;D721JZZ 
 ;;9002226.02101,"1804,D721JZZ ",.02)
 ;;D721JZZ 
 ;;9002226.02101,"1804,D721JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D722DZZ ",.01)
 ;;D722DZZ 
 ;;9002226.02101,"1804,D722DZZ ",.02)
 ;;D722DZZ 
 ;;9002226.02101,"1804,D722DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D722HZZ ",.01)
 ;;D722HZZ 
 ;;9002226.02101,"1804,D722HZZ ",.02)
 ;;D722HZZ 
 ;;9002226.02101,"1804,D722HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D722JZZ ",.01)
 ;;D722JZZ 
 ;;9002226.02101,"1804,D722JZZ ",.02)
 ;;D722JZZ 
 ;;9002226.02101,"1804,D722JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D723DZZ ",.01)
 ;;D723DZZ 
 ;;9002226.02101,"1804,D723DZZ ",.02)
 ;;D723DZZ 
 ;;9002226.02101,"1804,D723DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D723HZZ ",.01)
 ;;D723HZZ 
 ;;9002226.02101,"1804,D723HZZ ",.02)
 ;;D723HZZ 
 ;;9002226.02101,"1804,D723HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D723JZZ ",.01)
 ;;D723JZZ 
 ;;9002226.02101,"1804,D723JZZ ",.02)
 ;;D723JZZ 
 ;;9002226.02101,"1804,D723JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D724DZZ ",.01)
 ;;D724DZZ 
 ;;9002226.02101,"1804,D724DZZ ",.02)
 ;;D724DZZ 
 ;;9002226.02101,"1804,D724DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D724HZZ ",.01)
 ;;D724HZZ 
 ;;9002226.02101,"1804,D724HZZ ",.02)
 ;;D724HZZ 
 ;;9002226.02101,"1804,D724HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D724JZZ ",.01)
 ;;D724JZZ 
 ;;9002226.02101,"1804,D724JZZ ",.02)
 ;;D724JZZ 
 ;;9002226.02101,"1804,D724JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D725DZZ ",.01)
 ;;D725DZZ 
 ;;9002226.02101,"1804,D725DZZ ",.02)
 ;;D725DZZ 
 ;;9002226.02101,"1804,D725DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D725HZZ ",.01)
 ;;D725HZZ 
 ;;9002226.02101,"1804,D725HZZ ",.02)
 ;;D725HZZ 
 ;;9002226.02101,"1804,D725HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D725JZZ ",.01)
 ;;D725JZZ 
 ;;9002226.02101,"1804,D725JZZ ",.02)
 ;;D725JZZ 
 ;;9002226.02101,"1804,D725JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D726DZZ ",.01)
 ;;D726DZZ 
 ;;9002226.02101,"1804,D726DZZ ",.02)
 ;;D726DZZ 
 ;;9002226.02101,"1804,D726DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D726HZZ ",.01)
 ;;D726HZZ 
 ;;9002226.02101,"1804,D726HZZ ",.02)
 ;;D726HZZ 
 ;;9002226.02101,"1804,D726HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D726JZZ ",.01)
 ;;D726JZZ 
 ;;9002226.02101,"1804,D726JZZ ",.02)
 ;;D726JZZ 
 ;;9002226.02101,"1804,D726JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D727DZZ ",.01)
 ;;D727DZZ 
 ;;9002226.02101,"1804,D727DZZ ",.02)
 ;;D727DZZ 
 ;;9002226.02101,"1804,D727DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D727HZZ ",.01)
 ;;D727HZZ 
 ;;9002226.02101,"1804,D727HZZ ",.02)
 ;;D727HZZ 
 ;;9002226.02101,"1804,D727HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D727JZZ ",.01)
 ;;D727JZZ 
 ;;9002226.02101,"1804,D727JZZ ",.02)
 ;;D727JZZ 
 ;;9002226.02101,"1804,D727JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D728DZZ ",.01)
 ;;D728DZZ 
 ;;9002226.02101,"1804,D728DZZ ",.02)
 ;;D728DZZ 
 ;;9002226.02101,"1804,D728DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D728HZZ ",.01)
 ;;D728HZZ 
 ;;9002226.02101,"1804,D728HZZ ",.02)
 ;;D728HZZ 
 ;;9002226.02101,"1804,D728HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D728JZZ ",.01)
 ;;D728JZZ 
 ;;9002226.02101,"1804,D728JZZ ",.02)
 ;;D728JZZ 
 ;;9002226.02101,"1804,D728JZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7Y08ZZ ",.01)
 ;;D7Y08ZZ 
 ;;9002226.02101,"1804,D7Y08ZZ ",.02)
 ;;D7Y08ZZ 
 ;;9002226.02101,"1804,D7Y08ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7Y0FZZ ",.01)
 ;;D7Y0FZZ 
 ;;9002226.02101,"1804,D7Y0FZZ ",.02)
 ;;D7Y0FZZ 
 ;;9002226.02101,"1804,D7Y0FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7Y18ZZ ",.01)
 ;;D7Y18ZZ 
 ;;9002226.02101,"1804,D7Y18ZZ ",.02)
 ;;D7Y18ZZ 
 ;;9002226.02101,"1804,D7Y18ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7Y1FZZ ",.01)
 ;;D7Y1FZZ 
 ;;9002226.02101,"1804,D7Y1FZZ ",.02)
 ;;D7Y1FZZ 
 ;;9002226.02101,"1804,D7Y1FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7Y28ZZ ",.01)
 ;;D7Y28ZZ 
 ;;9002226.02101,"1804,D7Y28ZZ ",.02)
 ;;D7Y28ZZ 
 ;;9002226.02101,"1804,D7Y28ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7Y2FZZ ",.01)
 ;;D7Y2FZZ 
 ;;9002226.02101,"1804,D7Y2FZZ ",.02)
 ;;D7Y2FZZ 
 ;;9002226.02101,"1804,D7Y2FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,D7Y38ZZ ",.01)
 ;;D7Y38ZZ