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

ATXXB214.m

Go to the documentation of this file.
ATXXB214 ;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,CP26YZZ ",.01)
 ;;CP26YZZ 
 ;;9002226.02101,"1804,CP26YZZ ",.02)
 ;;CP26YZZ 
 ;;9002226.02101,"1804,CP26YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP271ZZ ",.01)
 ;;CP271ZZ 
 ;;9002226.02101,"1804,CP271ZZ ",.02)
 ;;CP271ZZ 
 ;;9002226.02101,"1804,CP271ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP27YZZ ",.01)
 ;;CP27YZZ 
 ;;9002226.02101,"1804,CP27YZZ ",.02)
 ;;CP27YZZ 
 ;;9002226.02101,"1804,CP27YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP281ZZ ",.01)
 ;;CP281ZZ 
 ;;9002226.02101,"1804,CP281ZZ ",.02)
 ;;CP281ZZ 
 ;;9002226.02101,"1804,CP281ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP28YZZ ",.01)
 ;;CP28YZZ 
 ;;9002226.02101,"1804,CP28YZZ ",.02)
 ;;CP28YZZ 
 ;;9002226.02101,"1804,CP28YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP291ZZ ",.01)
 ;;CP291ZZ 
 ;;9002226.02101,"1804,CP291ZZ ",.02)
 ;;CP291ZZ 
 ;;9002226.02101,"1804,CP291ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP29YZZ ",.01)
 ;;CP29YZZ 
 ;;9002226.02101,"1804,CP29YZZ ",.02)
 ;;CP29YZZ 
 ;;9002226.02101,"1804,CP29YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2B1ZZ ",.01)
 ;;CP2B1ZZ 
 ;;9002226.02101,"1804,CP2B1ZZ ",.02)
 ;;CP2B1ZZ 
 ;;9002226.02101,"1804,CP2B1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2BYZZ ",.01)
 ;;CP2BYZZ 
 ;;9002226.02101,"1804,CP2BYZZ ",.02)
 ;;CP2BYZZ 
 ;;9002226.02101,"1804,CP2BYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2C1ZZ ",.01)
 ;;CP2C1ZZ 
 ;;9002226.02101,"1804,CP2C1ZZ ",.02)
 ;;CP2C1ZZ 
 ;;9002226.02101,"1804,CP2C1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2CYZZ ",.01)
 ;;CP2CYZZ 
 ;;9002226.02101,"1804,CP2CYZZ ",.02)
 ;;CP2CYZZ 
 ;;9002226.02101,"1804,CP2CYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2D1ZZ ",.01)
 ;;CP2D1ZZ 
 ;;9002226.02101,"1804,CP2D1ZZ ",.02)
 ;;CP2D1ZZ 
 ;;9002226.02101,"1804,CP2D1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2DYZZ ",.01)
 ;;CP2DYZZ 
 ;;9002226.02101,"1804,CP2DYZZ ",.02)
 ;;CP2DYZZ 
 ;;9002226.02101,"1804,CP2DYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2F1ZZ ",.01)
 ;;CP2F1ZZ 
 ;;9002226.02101,"1804,CP2F1ZZ ",.02)
 ;;CP2F1ZZ 
 ;;9002226.02101,"1804,CP2F1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2FYZZ ",.01)
 ;;CP2FYZZ 
 ;;9002226.02101,"1804,CP2FYZZ ",.02)
 ;;CP2FYZZ 
 ;;9002226.02101,"1804,CP2FYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2G1ZZ ",.01)
 ;;CP2G1ZZ 
 ;;9002226.02101,"1804,CP2G1ZZ ",.02)
 ;;CP2G1ZZ 
 ;;9002226.02101,"1804,CP2G1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2GYZZ ",.01)
 ;;CP2GYZZ 
 ;;9002226.02101,"1804,CP2GYZZ ",.02)
 ;;CP2GYZZ 
 ;;9002226.02101,"1804,CP2GYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2H1ZZ ",.01)
 ;;CP2H1ZZ 
 ;;9002226.02101,"1804,CP2H1ZZ ",.02)
 ;;CP2H1ZZ 
 ;;9002226.02101,"1804,CP2H1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2HYZZ ",.01)
 ;;CP2HYZZ 
 ;;9002226.02101,"1804,CP2HYZZ ",.02)
 ;;CP2HYZZ 
 ;;9002226.02101,"1804,CP2HYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2J1ZZ ",.01)
 ;;CP2J1ZZ 
 ;;9002226.02101,"1804,CP2J1ZZ ",.02)
 ;;CP2J1ZZ 
 ;;9002226.02101,"1804,CP2J1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2JYZZ ",.01)
 ;;CP2JYZZ 
 ;;9002226.02101,"1804,CP2JYZZ ",.02)
 ;;CP2JYZZ 
 ;;9002226.02101,"1804,CP2JYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP2YYZZ ",.01)
 ;;CP2YYZZ 
 ;;9002226.02101,"1804,CP2YYZZ ",.02)
 ;;CP2YYZZ 
 ;;9002226.02101,"1804,CP2YYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP55ZZZ ",.01)
 ;;CP55ZZZ 
 ;;9002226.02101,"1804,CP55ZZZ ",.02)
 ;;CP55ZZZ 
 ;;9002226.02101,"1804,CP55ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP5NZZZ ",.01)
 ;;CP5NZZZ 
 ;;9002226.02101,"1804,CP5NZZZ ",.02)
 ;;CP5NZZZ 
 ;;9002226.02101,"1804,CP5NZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP5PZZZ ",.01)
 ;;CP5PZZZ 
 ;;9002226.02101,"1804,CP5PZZZ ",.02)
 ;;CP5PZZZ 
 ;;9002226.02101,"1804,CP5PZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CP5YYZZ ",.01)
 ;;CP5YYZZ 
 ;;9002226.02101,"1804,CP5YYZZ ",.02)
 ;;CP5YYZZ 
 ;;9002226.02101,"1804,CP5YYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT131ZZ ",.01)
 ;;CT131ZZ 
 ;;9002226.02101,"1804,CT131ZZ ",.02)
 ;;CT131ZZ 
 ;;9002226.02101,"1804,CT131ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT13FZZ ",.01)
 ;;CT13FZZ 
 ;;9002226.02101,"1804,CT13FZZ ",.02)
 ;;CT13FZZ 
 ;;9002226.02101,"1804,CT13FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT13GZZ ",.01)
 ;;CT13GZZ 
 ;;9002226.02101,"1804,CT13GZZ ",.02)
 ;;CT13GZZ 
 ;;9002226.02101,"1804,CT13GZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT13YZZ ",.01)
 ;;CT13YZZ 
 ;;9002226.02101,"1804,CT13YZZ ",.02)
 ;;CT13YZZ 
 ;;9002226.02101,"1804,CT13YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT1H1ZZ ",.01)
 ;;CT1H1ZZ 
 ;;9002226.02101,"1804,CT1H1ZZ ",.02)
 ;;CT1H1ZZ 
 ;;9002226.02101,"1804,CT1H1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT1HYZZ ",.01)
 ;;CT1HYZZ 
 ;;9002226.02101,"1804,CT1HYZZ ",.02)
 ;;CT1HYZZ 
 ;;9002226.02101,"1804,CT1HYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT1YYZZ ",.01)
 ;;CT1YYZZ 
 ;;9002226.02101,"1804,CT1YYZZ ",.02)
 ;;CT1YYZZ 
 ;;9002226.02101,"1804,CT1YYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT231ZZ ",.01)
 ;;CT231ZZ 
 ;;9002226.02101,"1804,CT231ZZ ",.02)
 ;;CT231ZZ 
 ;;9002226.02101,"1804,CT231ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT23YZZ ",.01)
 ;;CT23YZZ 
 ;;9002226.02101,"1804,CT23YZZ ",.02)
 ;;CT23YZZ 
 ;;9002226.02101,"1804,CT23YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT2YYZZ ",.01)
 ;;CT2YYZZ 
 ;;9002226.02101,"1804,CT2YYZZ ",.02)
 ;;CT2YYZZ 
 ;;9002226.02101,"1804,CT2YYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT631ZZ ",.01)
 ;;CT631ZZ 
 ;;9002226.02101,"1804,CT631ZZ ",.02)
 ;;CT631ZZ 
 ;;9002226.02101,"1804,CT631ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT63FZZ ",.01)
 ;;CT63FZZ 
 ;;9002226.02101,"1804,CT63FZZ ",.02)
 ;;CT63FZZ 
 ;;9002226.02101,"1804,CT63FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT63GZZ ",.01)
 ;;CT63GZZ 
 ;;9002226.02101,"1804,CT63GZZ ",.02)
 ;;CT63GZZ 
 ;;9002226.02101,"1804,CT63GZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT63HZZ ",.01)
 ;;CT63HZZ 
 ;;9002226.02101,"1804,CT63HZZ ",.02)
 ;;CT63HZZ 
 ;;9002226.02101,"1804,CT63HZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT63YZZ ",.01)
 ;;CT63YZZ 
 ;;9002226.02101,"1804,CT63YZZ ",.02)
 ;;CT63YZZ 
 ;;9002226.02101,"1804,CT63YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CT6YYZZ ",.01)
 ;;CT6YYZZ 
 ;;9002226.02101,"1804,CT6YYZZ ",.02)
 ;;CT6YYZZ 
 ;;9002226.02101,"1804,CT6YYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CV191ZZ ",.01)
 ;;CV191ZZ 
 ;;9002226.02101,"1804,CV191ZZ ",.02)
 ;;CV191ZZ 
 ;;9002226.02101,"1804,CV191ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CV19YZZ ",.01)
 ;;CV19YZZ 
 ;;9002226.02101,"1804,CV19YZZ ",.02)
 ;;CV19YZZ 
 ;;9002226.02101,"1804,CV19YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CV1YYZZ ",.01)
 ;;CV1YYZZ 
 ;;9002226.02101,"1804,CV1YYZZ ",.02)
 ;;CV1YYZZ 
 ;;9002226.02101,"1804,CV1YYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW101ZZ ",.01)
 ;;CW101ZZ 
 ;;9002226.02101,"1804,CW101ZZ ",.02)
 ;;CW101ZZ 
 ;;9002226.02101,"1804,CW101ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW10DZZ ",.01)
 ;;CW10DZZ 
 ;;9002226.02101,"1804,CW10DZZ ",.02)
 ;;CW10DZZ 
 ;;9002226.02101,"1804,CW10DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW10FZZ ",.01)
 ;;CW10FZZ 
 ;;9002226.02101,"1804,CW10FZZ ",.02)
 ;;CW10FZZ 
 ;;9002226.02101,"1804,CW10FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW10GZZ ",.01)
 ;;CW10GZZ 
 ;;9002226.02101,"1804,CW10GZZ ",.02)
 ;;CW10GZZ 
 ;;9002226.02101,"1804,CW10GZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW10LZZ ",.01)
 ;;CW10LZZ 
 ;;9002226.02101,"1804,CW10LZZ ",.02)
 ;;CW10LZZ 
 ;;9002226.02101,"1804,CW10LZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW10SZZ ",.01)
 ;;CW10SZZ 
 ;;9002226.02101,"1804,CW10SZZ ",.02)
 ;;CW10SZZ 
 ;;9002226.02101,"1804,CW10SZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW10YZZ ",.01)
 ;;CW10YZZ 
 ;;9002226.02101,"1804,CW10YZZ ",.02)
 ;;CW10YZZ 
 ;;9002226.02101,"1804,CW10YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW111ZZ ",.01)
 ;;CW111ZZ 
 ;;9002226.02101,"1804,CW111ZZ ",.02)
 ;;CW111ZZ 
 ;;9002226.02101,"1804,CW111ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW11DZZ ",.01)
 ;;CW11DZZ 
 ;;9002226.02101,"1804,CW11DZZ ",.02)
 ;;CW11DZZ 
 ;;9002226.02101,"1804,CW11DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW11FZZ ",.01)
 ;;CW11FZZ 
 ;;9002226.02101,"1804,CW11FZZ ",.02)
 ;;CW11FZZ 
 ;;9002226.02101,"1804,CW11FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW11GZZ ",.01)
 ;;CW11GZZ 
 ;;9002226.02101,"1804,CW11GZZ ",.02)
 ;;CW11GZZ 
 ;;9002226.02101,"1804,CW11GZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW11LZZ ",.01)
 ;;CW11LZZ 
 ;;9002226.02101,"1804,CW11LZZ ",.02)
 ;;CW11LZZ 
 ;;9002226.02101,"1804,CW11LZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW11SZZ ",.01)
 ;;CW11SZZ 
 ;;9002226.02101,"1804,CW11SZZ ",.02)
 ;;CW11SZZ 
 ;;9002226.02101,"1804,CW11SZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW11YZZ ",.01)
 ;;CW11YZZ 
 ;;9002226.02101,"1804,CW11YZZ ",.02)
 ;;CW11YZZ 
 ;;9002226.02101,"1804,CW11YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW131ZZ ",.01)
 ;;CW131ZZ 
 ;;9002226.02101,"1804,CW131ZZ ",.02)
 ;;CW131ZZ 
 ;;9002226.02101,"1804,CW131ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW13DZZ ",.01)
 ;;CW13DZZ 
 ;;9002226.02101,"1804,CW13DZZ ",.02)
 ;;CW13DZZ 
 ;;9002226.02101,"1804,CW13DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW13FZZ ",.01)
 ;;CW13FZZ 
 ;;9002226.02101,"1804,CW13FZZ ",.02)
 ;;CW13FZZ 
 ;;9002226.02101,"1804,CW13FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW13GZZ ",.01)
 ;;CW13GZZ 
 ;;9002226.02101,"1804,CW13GZZ ",.02)
 ;;CW13GZZ 
 ;;9002226.02101,"1804,CW13GZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW13KZZ ",.01)
 ;;CW13KZZ 
 ;;9002226.02101,"1804,CW13KZZ ",.02)
 ;;CW13KZZ 
 ;;9002226.02101,"1804,CW13KZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW13LZZ ",.01)
 ;;CW13LZZ 
 ;;9002226.02101,"1804,CW13LZZ ",.02)
 ;;CW13LZZ 
 ;;9002226.02101,"1804,CW13LZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW13SZZ ",.01)
 ;;CW13SZZ 
 ;;9002226.02101,"1804,CW13SZZ ",.02)
 ;;CW13SZZ 
 ;;9002226.02101,"1804,CW13SZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW13YZZ ",.01)
 ;;CW13YZZ 
 ;;9002226.02101,"1804,CW13YZZ ",.02)
 ;;CW13YZZ 
 ;;9002226.02101,"1804,CW13YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW141ZZ ",.01)
 ;;CW141ZZ 
 ;;9002226.02101,"1804,CW141ZZ ",.02)
 ;;CW141ZZ 
 ;;9002226.02101,"1804,CW141ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW14DZZ ",.01)
 ;;CW14DZZ 
 ;;9002226.02101,"1804,CW14DZZ ",.02)
 ;;CW14DZZ 
 ;;9002226.02101,"1804,CW14DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW14FZZ ",.01)
 ;;CW14FZZ 
 ;;9002226.02101,"1804,CW14FZZ ",.02)
 ;;CW14FZZ 
 ;;9002226.02101,"1804,CW14FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW14GZZ ",.01)
 ;;CW14GZZ 
 ;;9002226.02101,"1804,CW14GZZ ",.02)
 ;;CW14GZZ 
 ;;9002226.02101,"1804,CW14GZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW14LZZ ",.01)
 ;;CW14LZZ 
 ;;9002226.02101,"1804,CW14LZZ ",.02)
 ;;CW14LZZ 
 ;;9002226.02101,"1804,CW14LZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW14SZZ ",.01)
 ;;CW14SZZ 
 ;;9002226.02101,"1804,CW14SZZ ",.02)
 ;;CW14SZZ 
 ;;9002226.02101,"1804,CW14SZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW14YZZ ",.01)
 ;;CW14YZZ 
 ;;9002226.02101,"1804,CW14YZZ ",.02)
 ;;CW14YZZ 
 ;;9002226.02101,"1804,CW14YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW161ZZ ",.01)
 ;;CW161ZZ 
 ;;9002226.02101,"1804,CW161ZZ ",.02)
 ;;CW161ZZ 
 ;;9002226.02101,"1804,CW161ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW16DZZ ",.01)
 ;;CW16DZZ 
 ;;9002226.02101,"1804,CW16DZZ ",.02)
 ;;CW16DZZ 
 ;;9002226.02101,"1804,CW16DZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW16FZZ ",.01)
 ;;CW16FZZ 
 ;;9002226.02101,"1804,CW16FZZ ",.02)
 ;;CW16FZZ 
 ;;9002226.02101,"1804,CW16FZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW16GZZ ",.01)
 ;;CW16GZZ 
 ;;9002226.02101,"1804,CW16GZZ ",.02)
 ;;CW16GZZ 
 ;;9002226.02101,"1804,CW16GZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,CW16LZZ ",.01)
 ;;CW16LZZ