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

ATXXB89.m

Go to the documentation of this file.
ATXXB89 ;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,0JWT00Z ",.02)
 ;;0JWT00Z 
 ;;9002226.02101,"1804,0JWT00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT02Z ",.01)
 ;;0JWT02Z 
 ;;9002226.02101,"1804,0JWT02Z ",.02)
 ;;0JWT02Z 
 ;;9002226.02101,"1804,0JWT02Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT03Z ",.01)
 ;;0JWT03Z 
 ;;9002226.02101,"1804,0JWT03Z ",.02)
 ;;0JWT03Z 
 ;;9002226.02101,"1804,0JWT03Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT07Z ",.01)
 ;;0JWT07Z 
 ;;9002226.02101,"1804,0JWT07Z ",.02)
 ;;0JWT07Z 
 ;;9002226.02101,"1804,0JWT07Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0HZ ",.01)
 ;;0JWT0HZ 
 ;;9002226.02101,"1804,0JWT0HZ ",.02)
 ;;0JWT0HZ 
 ;;9002226.02101,"1804,0JWT0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0JZ ",.01)
 ;;0JWT0JZ 
 ;;9002226.02101,"1804,0JWT0JZ ",.02)
 ;;0JWT0JZ 
 ;;9002226.02101,"1804,0JWT0JZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0KZ ",.01)
 ;;0JWT0KZ 
 ;;9002226.02101,"1804,0JWT0KZ ",.02)
 ;;0JWT0KZ 
 ;;9002226.02101,"1804,0JWT0KZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0MZ ",.01)
 ;;0JWT0MZ 
 ;;9002226.02101,"1804,0JWT0MZ ",.02)
 ;;0JWT0MZ 
 ;;9002226.02101,"1804,0JWT0MZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0NZ ",.01)
 ;;0JWT0NZ 
 ;;9002226.02101,"1804,0JWT0NZ ",.02)
 ;;0JWT0NZ 
 ;;9002226.02101,"1804,0JWT0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0VZ ",.01)
 ;;0JWT0VZ 
 ;;9002226.02101,"1804,0JWT0VZ ",.02)
 ;;0JWT0VZ 
 ;;9002226.02101,"1804,0JWT0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0WZ ",.01)
 ;;0JWT0WZ 
 ;;9002226.02101,"1804,0JWT0WZ ",.02)
 ;;0JWT0WZ 
 ;;9002226.02101,"1804,0JWT0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT0XZ ",.01)
 ;;0JWT0XZ 
 ;;9002226.02101,"1804,0JWT0XZ ",.02)
 ;;0JWT0XZ 
 ;;9002226.02101,"1804,0JWT0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT30Z ",.01)
 ;;0JWT30Z 
 ;;9002226.02101,"1804,0JWT30Z ",.02)
 ;;0JWT30Z 
 ;;9002226.02101,"1804,0JWT30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT32Z ",.01)
 ;;0JWT32Z 
 ;;9002226.02101,"1804,0JWT32Z ",.02)
 ;;0JWT32Z 
 ;;9002226.02101,"1804,0JWT32Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT33Z ",.01)
 ;;0JWT33Z 
 ;;9002226.02101,"1804,0JWT33Z ",.02)
 ;;0JWT33Z 
 ;;9002226.02101,"1804,0JWT33Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT37Z ",.01)
 ;;0JWT37Z 
 ;;9002226.02101,"1804,0JWT37Z ",.02)
 ;;0JWT37Z 
 ;;9002226.02101,"1804,0JWT37Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3HZ ",.01)
 ;;0JWT3HZ 
 ;;9002226.02101,"1804,0JWT3HZ ",.02)
 ;;0JWT3HZ 
 ;;9002226.02101,"1804,0JWT3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3JZ ",.01)
 ;;0JWT3JZ 
 ;;9002226.02101,"1804,0JWT3JZ ",.02)
 ;;0JWT3JZ 
 ;;9002226.02101,"1804,0JWT3JZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3KZ ",.01)
 ;;0JWT3KZ 
 ;;9002226.02101,"1804,0JWT3KZ ",.02)
 ;;0JWT3KZ 
 ;;9002226.02101,"1804,0JWT3KZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3MZ ",.01)
 ;;0JWT3MZ 
 ;;9002226.02101,"1804,0JWT3MZ ",.02)
 ;;0JWT3MZ 
 ;;9002226.02101,"1804,0JWT3MZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3NZ ",.01)
 ;;0JWT3NZ 
 ;;9002226.02101,"1804,0JWT3NZ ",.02)
 ;;0JWT3NZ 
 ;;9002226.02101,"1804,0JWT3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3VZ ",.01)
 ;;0JWT3VZ 
 ;;9002226.02101,"1804,0JWT3VZ ",.02)
 ;;0JWT3VZ 
 ;;9002226.02101,"1804,0JWT3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3WZ ",.01)
 ;;0JWT3WZ 
 ;;9002226.02101,"1804,0JWT3WZ ",.02)
 ;;0JWT3WZ 
 ;;9002226.02101,"1804,0JWT3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWT3XZ ",.01)
 ;;0JWT3XZ 
 ;;9002226.02101,"1804,0JWT3XZ ",.02)
 ;;0JWT3XZ 
 ;;9002226.02101,"1804,0JWT3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTX0Z ",.01)
 ;;0JWTX0Z 
 ;;9002226.02101,"1804,0JWTX0Z ",.02)
 ;;0JWTX0Z 
 ;;9002226.02101,"1804,0JWTX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTX2Z ",.01)
 ;;0JWTX2Z 
 ;;9002226.02101,"1804,0JWTX2Z ",.02)
 ;;0JWTX2Z 
 ;;9002226.02101,"1804,0JWTX2Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTX3Z ",.01)
 ;;0JWTX3Z 
 ;;9002226.02101,"1804,0JWTX3Z ",.02)
 ;;0JWTX3Z 
 ;;9002226.02101,"1804,0JWTX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTX7Z ",.01)
 ;;0JWTX7Z 
 ;;9002226.02101,"1804,0JWTX7Z ",.02)
 ;;0JWTX7Z 
 ;;9002226.02101,"1804,0JWTX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXHZ ",.01)
 ;;0JWTXHZ 
 ;;9002226.02101,"1804,0JWTXHZ ",.02)
 ;;0JWTXHZ 
 ;;9002226.02101,"1804,0JWTXHZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXJZ ",.01)
 ;;0JWTXJZ 
 ;;9002226.02101,"1804,0JWTXJZ ",.02)
 ;;0JWTXJZ 
 ;;9002226.02101,"1804,0JWTXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXKZ ",.01)
 ;;0JWTXKZ 
 ;;9002226.02101,"1804,0JWTXKZ ",.02)
 ;;0JWTXKZ 
 ;;9002226.02101,"1804,0JWTXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXMZ ",.01)
 ;;0JWTXMZ 
 ;;9002226.02101,"1804,0JWTXMZ ",.02)
 ;;0JWTXMZ 
 ;;9002226.02101,"1804,0JWTXMZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXNZ ",.01)
 ;;0JWTXNZ 
 ;;9002226.02101,"1804,0JWTXNZ ",.02)
 ;;0JWTXNZ 
 ;;9002226.02101,"1804,0JWTXNZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXPZ ",.01)
 ;;0JWTXPZ 
 ;;9002226.02101,"1804,0JWTXPZ ",.02)
 ;;0JWTXPZ 
 ;;9002226.02101,"1804,0JWTXPZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXVZ ",.01)
 ;;0JWTXVZ 
 ;;9002226.02101,"1804,0JWTXVZ ",.02)
 ;;0JWTXVZ 
 ;;9002226.02101,"1804,0JWTXVZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXWZ ",.01)
 ;;0JWTXWZ 
 ;;9002226.02101,"1804,0JWTXWZ ",.02)
 ;;0JWTXWZ 
 ;;9002226.02101,"1804,0JWTXWZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWTXXZ ",.01)
 ;;0JWTXXZ 
 ;;9002226.02101,"1804,0JWTXXZ ",.02)
 ;;0JWTXXZ 
 ;;9002226.02101,"1804,0JWTXXZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV00Z ",.01)
 ;;0JWV00Z 
 ;;9002226.02101,"1804,0JWV00Z ",.02)
 ;;0JWV00Z 
 ;;9002226.02101,"1804,0JWV00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV03Z ",.01)
 ;;0JWV03Z 
 ;;9002226.02101,"1804,0JWV03Z ",.02)
 ;;0JWV03Z 
 ;;9002226.02101,"1804,0JWV03Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV07Z ",.01)
 ;;0JWV07Z 
 ;;9002226.02101,"1804,0JWV07Z ",.02)
 ;;0JWV07Z 
 ;;9002226.02101,"1804,0JWV07Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV0HZ ",.01)
 ;;0JWV0HZ 
 ;;9002226.02101,"1804,0JWV0HZ ",.02)
 ;;0JWV0HZ 
 ;;9002226.02101,"1804,0JWV0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV0JZ ",.01)
 ;;0JWV0JZ 
 ;;9002226.02101,"1804,0JWV0JZ ",.02)
 ;;0JWV0JZ 
 ;;9002226.02101,"1804,0JWV0JZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV0KZ ",.01)
 ;;0JWV0KZ 
 ;;9002226.02101,"1804,0JWV0KZ ",.02)
 ;;0JWV0KZ 
 ;;9002226.02101,"1804,0JWV0KZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV0NZ ",.01)
 ;;0JWV0NZ 
 ;;9002226.02101,"1804,0JWV0NZ ",.02)
 ;;0JWV0NZ 
 ;;9002226.02101,"1804,0JWV0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV0VZ ",.01)
 ;;0JWV0VZ 
 ;;9002226.02101,"1804,0JWV0VZ ",.02)
 ;;0JWV0VZ 
 ;;9002226.02101,"1804,0JWV0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV0WZ ",.01)
 ;;0JWV0WZ 
 ;;9002226.02101,"1804,0JWV0WZ ",.02)
 ;;0JWV0WZ 
 ;;9002226.02101,"1804,0JWV0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV0XZ ",.01)
 ;;0JWV0XZ 
 ;;9002226.02101,"1804,0JWV0XZ ",.02)
 ;;0JWV0XZ 
 ;;9002226.02101,"1804,0JWV0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV30Z ",.01)
 ;;0JWV30Z 
 ;;9002226.02101,"1804,0JWV30Z ",.02)
 ;;0JWV30Z 
 ;;9002226.02101,"1804,0JWV30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV33Z ",.01)
 ;;0JWV33Z 
 ;;9002226.02101,"1804,0JWV33Z ",.02)
 ;;0JWV33Z 
 ;;9002226.02101,"1804,0JWV33Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV37Z ",.01)
 ;;0JWV37Z 
 ;;9002226.02101,"1804,0JWV37Z ",.02)
 ;;0JWV37Z 
 ;;9002226.02101,"1804,0JWV37Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV3HZ ",.01)
 ;;0JWV3HZ 
 ;;9002226.02101,"1804,0JWV3HZ ",.02)
 ;;0JWV3HZ 
 ;;9002226.02101,"1804,0JWV3HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV3JZ ",.01)
 ;;0JWV3JZ 
 ;;9002226.02101,"1804,0JWV3JZ ",.02)
 ;;0JWV3JZ 
 ;;9002226.02101,"1804,0JWV3JZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV3KZ ",.01)
 ;;0JWV3KZ 
 ;;9002226.02101,"1804,0JWV3KZ ",.02)
 ;;0JWV3KZ 
 ;;9002226.02101,"1804,0JWV3KZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV3NZ ",.01)
 ;;0JWV3NZ 
 ;;9002226.02101,"1804,0JWV3NZ ",.02)
 ;;0JWV3NZ 
 ;;9002226.02101,"1804,0JWV3NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV3VZ ",.01)
 ;;0JWV3VZ 
 ;;9002226.02101,"1804,0JWV3VZ ",.02)
 ;;0JWV3VZ 
 ;;9002226.02101,"1804,0JWV3VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV3WZ ",.01)
 ;;0JWV3WZ 
 ;;9002226.02101,"1804,0JWV3WZ ",.02)
 ;;0JWV3WZ 
 ;;9002226.02101,"1804,0JWV3WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWV3XZ ",.01)
 ;;0JWV3XZ 
 ;;9002226.02101,"1804,0JWV3XZ ",.02)
 ;;0JWV3XZ 
 ;;9002226.02101,"1804,0JWV3XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVX0Z ",.01)
 ;;0JWVX0Z 
 ;;9002226.02101,"1804,0JWVX0Z ",.02)
 ;;0JWVX0Z 
 ;;9002226.02101,"1804,0JWVX0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVX3Z ",.01)
 ;;0JWVX3Z 
 ;;9002226.02101,"1804,0JWVX3Z ",.02)
 ;;0JWVX3Z 
 ;;9002226.02101,"1804,0JWVX3Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVX7Z ",.01)
 ;;0JWVX7Z 
 ;;9002226.02101,"1804,0JWVX7Z ",.02)
 ;;0JWVX7Z 
 ;;9002226.02101,"1804,0JWVX7Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVXHZ ",.01)
 ;;0JWVXHZ 
 ;;9002226.02101,"1804,0JWVXHZ ",.02)
 ;;0JWVXHZ 
 ;;9002226.02101,"1804,0JWVXHZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVXJZ ",.01)
 ;;0JWVXJZ 
 ;;9002226.02101,"1804,0JWVXJZ ",.02)
 ;;0JWVXJZ 
 ;;9002226.02101,"1804,0JWVXJZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVXKZ ",.01)
 ;;0JWVXKZ 
 ;;9002226.02101,"1804,0JWVXKZ ",.02)
 ;;0JWVXKZ 
 ;;9002226.02101,"1804,0JWVXKZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVXNZ ",.01)
 ;;0JWVXNZ 
 ;;9002226.02101,"1804,0JWVXNZ ",.02)
 ;;0JWVXNZ 
 ;;9002226.02101,"1804,0JWVXNZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVXVZ ",.01)
 ;;0JWVXVZ 
 ;;9002226.02101,"1804,0JWVXVZ ",.02)
 ;;0JWVXVZ 
 ;;9002226.02101,"1804,0JWVXVZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVXWZ ",.01)
 ;;0JWVXWZ 
 ;;9002226.02101,"1804,0JWVXWZ ",.02)
 ;;0JWVXWZ 
 ;;9002226.02101,"1804,0JWVXWZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWVXXZ ",.01)
 ;;0JWVXXZ 
 ;;9002226.02101,"1804,0JWVXXZ ",.02)
 ;;0JWVXXZ 
 ;;9002226.02101,"1804,0JWVXXZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW00Z ",.01)
 ;;0JWW00Z 
 ;;9002226.02101,"1804,0JWW00Z ",.02)
 ;;0JWW00Z 
 ;;9002226.02101,"1804,0JWW00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW03Z ",.01)
 ;;0JWW03Z 
 ;;9002226.02101,"1804,0JWW03Z ",.02)
 ;;0JWW03Z 
 ;;9002226.02101,"1804,0JWW03Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW07Z ",.01)
 ;;0JWW07Z 
 ;;9002226.02101,"1804,0JWW07Z ",.02)
 ;;0JWW07Z 
 ;;9002226.02101,"1804,0JWW07Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW0HZ ",.01)
 ;;0JWW0HZ 
 ;;9002226.02101,"1804,0JWW0HZ ",.02)
 ;;0JWW0HZ 
 ;;9002226.02101,"1804,0JWW0HZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW0JZ ",.01)
 ;;0JWW0JZ 
 ;;9002226.02101,"1804,0JWW0JZ ",.02)
 ;;0JWW0JZ 
 ;;9002226.02101,"1804,0JWW0JZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW0KZ ",.01)
 ;;0JWW0KZ 
 ;;9002226.02101,"1804,0JWW0KZ ",.02)
 ;;0JWW0KZ 
 ;;9002226.02101,"1804,0JWW0KZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW0NZ ",.01)
 ;;0JWW0NZ 
 ;;9002226.02101,"1804,0JWW0NZ ",.02)
 ;;0JWW0NZ 
 ;;9002226.02101,"1804,0JWW0NZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW0VZ ",.01)
 ;;0JWW0VZ 
 ;;9002226.02101,"1804,0JWW0VZ ",.02)
 ;;0JWW0VZ 
 ;;9002226.02101,"1804,0JWW0VZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW0WZ ",.01)
 ;;0JWW0WZ 
 ;;9002226.02101,"1804,0JWW0WZ ",.02)
 ;;0JWW0WZ 
 ;;9002226.02101,"1804,0JWW0WZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW0XZ ",.01)
 ;;0JWW0XZ 
 ;;9002226.02101,"1804,0JWW0XZ ",.02)
 ;;0JWW0XZ 
 ;;9002226.02101,"1804,0JWW0XZ ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW30Z ",.01)
 ;;0JWW30Z 
 ;;9002226.02101,"1804,0JWW30Z ",.02)
 ;;0JWW30Z 
 ;;9002226.02101,"1804,0JWW30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,0JWW33Z ",.01)
 ;;0JWW33Z 
 ;;9002226.02101,"1804,0JWW33Z ",.02)
 ;;0JWW33Z