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

ATXXA87.m

Go to the documentation of this file.
ATXXA87 ;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,"873,S62.516A ",.01)
 ;;S62.516A
 ;;9002226.02101,"873,S62.516A ",.02)
 ;;S62.516A
 ;;9002226.02101,"873,S62.516A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.516B ",.01)
 ;;S62.516B
 ;;9002226.02101,"873,S62.516B ",.02)
 ;;S62.516B
 ;;9002226.02101,"873,S62.516B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.521A ",.01)
 ;;S62.521A
 ;;9002226.02101,"873,S62.521A ",.02)
 ;;S62.521A
 ;;9002226.02101,"873,S62.521A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.521B ",.01)
 ;;S62.521B
 ;;9002226.02101,"873,S62.521B ",.02)
 ;;S62.521B
 ;;9002226.02101,"873,S62.521B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.522A ",.01)
 ;;S62.522A
 ;;9002226.02101,"873,S62.522A ",.02)
 ;;S62.522A
 ;;9002226.02101,"873,S62.522A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.522B ",.01)
 ;;S62.522B
 ;;9002226.02101,"873,S62.522B ",.02)
 ;;S62.522B
 ;;9002226.02101,"873,S62.522B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.523A ",.01)
 ;;S62.523A
 ;;9002226.02101,"873,S62.523A ",.02)
 ;;S62.523A
 ;;9002226.02101,"873,S62.523A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.523B ",.01)
 ;;S62.523B
 ;;9002226.02101,"873,S62.523B ",.02)
 ;;S62.523B
 ;;9002226.02101,"873,S62.523B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.524A ",.01)
 ;;S62.524A
 ;;9002226.02101,"873,S62.524A ",.02)
 ;;S62.524A
 ;;9002226.02101,"873,S62.524A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.524B ",.01)
 ;;S62.524B
 ;;9002226.02101,"873,S62.524B ",.02)
 ;;S62.524B
 ;;9002226.02101,"873,S62.524B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.525A ",.01)
 ;;S62.525A
 ;;9002226.02101,"873,S62.525A ",.02)
 ;;S62.525A
 ;;9002226.02101,"873,S62.525A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.525B ",.01)
 ;;S62.525B
 ;;9002226.02101,"873,S62.525B ",.02)
 ;;S62.525B
 ;;9002226.02101,"873,S62.525B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.526A ",.01)
 ;;S62.526A
 ;;9002226.02101,"873,S62.526A ",.02)
 ;;S62.526A
 ;;9002226.02101,"873,S62.526A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.526B ",.01)
 ;;S62.526B
 ;;9002226.02101,"873,S62.526B ",.02)
 ;;S62.526B
 ;;9002226.02101,"873,S62.526B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.600A ",.01)
 ;;S62.600A
 ;;9002226.02101,"873,S62.600A ",.02)
 ;;S62.600A
 ;;9002226.02101,"873,S62.600A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.600B ",.01)
 ;;S62.600B
 ;;9002226.02101,"873,S62.600B ",.02)
 ;;S62.600B
 ;;9002226.02101,"873,S62.600B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.601A ",.01)
 ;;S62.601A
 ;;9002226.02101,"873,S62.601A ",.02)
 ;;S62.601A
 ;;9002226.02101,"873,S62.601A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.601B ",.01)
 ;;S62.601B
 ;;9002226.02101,"873,S62.601B ",.02)
 ;;S62.601B
 ;;9002226.02101,"873,S62.601B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.602A ",.01)
 ;;S62.602A
 ;;9002226.02101,"873,S62.602A ",.02)
 ;;S62.602A
 ;;9002226.02101,"873,S62.602A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.602B ",.01)
 ;;S62.602B
 ;;9002226.02101,"873,S62.602B ",.02)
 ;;S62.602B
 ;;9002226.02101,"873,S62.602B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.603A ",.01)
 ;;S62.603A
 ;;9002226.02101,"873,S62.603A ",.02)
 ;;S62.603A
 ;;9002226.02101,"873,S62.603A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.603B ",.01)
 ;;S62.603B
 ;;9002226.02101,"873,S62.603B ",.02)
 ;;S62.603B
 ;;9002226.02101,"873,S62.603B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.604A ",.01)
 ;;S62.604A
 ;;9002226.02101,"873,S62.604A ",.02)
 ;;S62.604A
 ;;9002226.02101,"873,S62.604A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.604B ",.01)
 ;;S62.604B
 ;;9002226.02101,"873,S62.604B ",.02)
 ;;S62.604B
 ;;9002226.02101,"873,S62.604B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.605A ",.01)
 ;;S62.605A
 ;;9002226.02101,"873,S62.605A ",.02)
 ;;S62.605A
 ;;9002226.02101,"873,S62.605A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.605B ",.01)
 ;;S62.605B
 ;;9002226.02101,"873,S62.605B ",.02)
 ;;S62.605B
 ;;9002226.02101,"873,S62.605B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.606A ",.01)
 ;;S62.606A
 ;;9002226.02101,"873,S62.606A ",.02)
 ;;S62.606A
 ;;9002226.02101,"873,S62.606A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.606B ",.01)
 ;;S62.606B
 ;;9002226.02101,"873,S62.606B ",.02)
 ;;S62.606B
 ;;9002226.02101,"873,S62.606B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.607A ",.01)
 ;;S62.607A
 ;;9002226.02101,"873,S62.607A ",.02)
 ;;S62.607A
 ;;9002226.02101,"873,S62.607A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.607B ",.01)
 ;;S62.607B
 ;;9002226.02101,"873,S62.607B ",.02)
 ;;S62.607B
 ;;9002226.02101,"873,S62.607B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.608A ",.01)
 ;;S62.608A
 ;;9002226.02101,"873,S62.608A ",.02)
 ;;S62.608A
 ;;9002226.02101,"873,S62.608A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.608B ",.01)
 ;;S62.608B
 ;;9002226.02101,"873,S62.608B ",.02)
 ;;S62.608B
 ;;9002226.02101,"873,S62.608B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.609A ",.01)
 ;;S62.609A
 ;;9002226.02101,"873,S62.609A ",.02)
 ;;S62.609A
 ;;9002226.02101,"873,S62.609A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.609B ",.01)
 ;;S62.609B
 ;;9002226.02101,"873,S62.609B ",.02)
 ;;S62.609B
 ;;9002226.02101,"873,S62.609B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.610A ",.01)
 ;;S62.610A
 ;;9002226.02101,"873,S62.610A ",.02)
 ;;S62.610A
 ;;9002226.02101,"873,S62.610A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.610B ",.01)
 ;;S62.610B
 ;;9002226.02101,"873,S62.610B ",.02)
 ;;S62.610B
 ;;9002226.02101,"873,S62.610B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.611A ",.01)
 ;;S62.611A
 ;;9002226.02101,"873,S62.611A ",.02)
 ;;S62.611A
 ;;9002226.02101,"873,S62.611A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.611B ",.01)
 ;;S62.611B
 ;;9002226.02101,"873,S62.611B ",.02)
 ;;S62.611B
 ;;9002226.02101,"873,S62.611B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.612A ",.01)
 ;;S62.612A
 ;;9002226.02101,"873,S62.612A ",.02)
 ;;S62.612A
 ;;9002226.02101,"873,S62.612A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.612B ",.01)
 ;;S62.612B
 ;;9002226.02101,"873,S62.612B ",.02)
 ;;S62.612B
 ;;9002226.02101,"873,S62.612B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.613A ",.01)
 ;;S62.613A
 ;;9002226.02101,"873,S62.613A ",.02)
 ;;S62.613A
 ;;9002226.02101,"873,S62.613A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.613B ",.01)
 ;;S62.613B
 ;;9002226.02101,"873,S62.613B ",.02)
 ;;S62.613B
 ;;9002226.02101,"873,S62.613B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.614A ",.01)
 ;;S62.614A
 ;;9002226.02101,"873,S62.614A ",.02)
 ;;S62.614A
 ;;9002226.02101,"873,S62.614A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.614B ",.01)
 ;;S62.614B
 ;;9002226.02101,"873,S62.614B ",.02)
 ;;S62.614B
 ;;9002226.02101,"873,S62.614B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.615A ",.01)
 ;;S62.615A
 ;;9002226.02101,"873,S62.615A ",.02)
 ;;S62.615A
 ;;9002226.02101,"873,S62.615A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.615B ",.01)
 ;;S62.615B
 ;;9002226.02101,"873,S62.615B ",.02)
 ;;S62.615B
 ;;9002226.02101,"873,S62.615B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.616A ",.01)
 ;;S62.616A
 ;;9002226.02101,"873,S62.616A ",.02)
 ;;S62.616A
 ;;9002226.02101,"873,S62.616A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.616B ",.01)
 ;;S62.616B
 ;;9002226.02101,"873,S62.616B ",.02)
 ;;S62.616B
 ;;9002226.02101,"873,S62.616B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.617A ",.01)
 ;;S62.617A
 ;;9002226.02101,"873,S62.617A ",.02)
 ;;S62.617A
 ;;9002226.02101,"873,S62.617A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.617B ",.01)
 ;;S62.617B
 ;;9002226.02101,"873,S62.617B ",.02)
 ;;S62.617B
 ;;9002226.02101,"873,S62.617B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.618A ",.01)
 ;;S62.618A
 ;;9002226.02101,"873,S62.618A ",.02)
 ;;S62.618A
 ;;9002226.02101,"873,S62.618A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.618B ",.01)
 ;;S62.618B
 ;;9002226.02101,"873,S62.618B ",.02)
 ;;S62.618B
 ;;9002226.02101,"873,S62.618B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.619A ",.01)
 ;;S62.619A
 ;;9002226.02101,"873,S62.619A ",.02)
 ;;S62.619A
 ;;9002226.02101,"873,S62.619A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.619B ",.01)
 ;;S62.619B
 ;;9002226.02101,"873,S62.619B ",.02)
 ;;S62.619B
 ;;9002226.02101,"873,S62.619B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.620A ",.01)
 ;;S62.620A
 ;;9002226.02101,"873,S62.620A ",.02)
 ;;S62.620A
 ;;9002226.02101,"873,S62.620A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.620B ",.01)
 ;;S62.620B
 ;;9002226.02101,"873,S62.620B ",.02)
 ;;S62.620B
 ;;9002226.02101,"873,S62.620B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.621A ",.01)
 ;;S62.621A
 ;;9002226.02101,"873,S62.621A ",.02)
 ;;S62.621A
 ;;9002226.02101,"873,S62.621A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.621B ",.01)
 ;;S62.621B
 ;;9002226.02101,"873,S62.621B ",.02)
 ;;S62.621B
 ;;9002226.02101,"873,S62.621B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.622A ",.01)
 ;;S62.622A
 ;;9002226.02101,"873,S62.622A ",.02)
 ;;S62.622A
 ;;9002226.02101,"873,S62.622A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.622B ",.01)
 ;;S62.622B
 ;;9002226.02101,"873,S62.622B ",.02)
 ;;S62.622B
 ;;9002226.02101,"873,S62.622B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.623A ",.01)
 ;;S62.623A
 ;;9002226.02101,"873,S62.623A ",.02)
 ;;S62.623A
 ;;9002226.02101,"873,S62.623A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.623B ",.01)
 ;;S62.623B
 ;;9002226.02101,"873,S62.623B ",.02)
 ;;S62.623B
 ;;9002226.02101,"873,S62.623B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.624A ",.01)
 ;;S62.624A
 ;;9002226.02101,"873,S62.624A ",.02)
 ;;S62.624A
 ;;9002226.02101,"873,S62.624A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.624B ",.01)
 ;;S62.624B
 ;;9002226.02101,"873,S62.624B ",.02)
 ;;S62.624B
 ;;9002226.02101,"873,S62.624B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.625A ",.01)
 ;;S62.625A
 ;;9002226.02101,"873,S62.625A ",.02)
 ;;S62.625A
 ;;9002226.02101,"873,S62.625A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.625B ",.01)
 ;;S62.625B
 ;;9002226.02101,"873,S62.625B ",.02)
 ;;S62.625B
 ;;9002226.02101,"873,S62.625B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.626A ",.01)
 ;;S62.626A
 ;;9002226.02101,"873,S62.626A ",.02)
 ;;S62.626A
 ;;9002226.02101,"873,S62.626A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.626B ",.01)
 ;;S62.626B
 ;;9002226.02101,"873,S62.626B ",.02)
 ;;S62.626B
 ;;9002226.02101,"873,S62.626B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.627A ",.01)
 ;;S62.627A
 ;;9002226.02101,"873,S62.627A ",.02)
 ;;S62.627A
 ;;9002226.02101,"873,S62.627A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.627B ",.01)
 ;;S62.627B
 ;;9002226.02101,"873,S62.627B ",.02)
 ;;S62.627B
 ;;9002226.02101,"873,S62.627B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.628A ",.01)
 ;;S62.628A
 ;;9002226.02101,"873,S62.628A ",.02)
 ;;S62.628A
 ;;9002226.02101,"873,S62.628A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.628B ",.01)
 ;;S62.628B
 ;;9002226.02101,"873,S62.628B ",.02)
 ;;S62.628B
 ;;9002226.02101,"873,S62.628B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.629A ",.01)
 ;;S62.629A
 ;;9002226.02101,"873,S62.629A ",.02)
 ;;S62.629A
 ;;9002226.02101,"873,S62.629A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.629B ",.01)
 ;;S62.629B
 ;;9002226.02101,"873,S62.629B ",.02)
 ;;S62.629B
 ;;9002226.02101,"873,S62.629B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.630A ",.01)
 ;;S62.630A
 ;;9002226.02101,"873,S62.630A ",.02)
 ;;S62.630A
 ;;9002226.02101,"873,S62.630A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.630B ",.01)
 ;;S62.630B
 ;;9002226.02101,"873,S62.630B ",.02)
 ;;S62.630B
 ;;9002226.02101,"873,S62.630B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.631A ",.01)
 ;;S62.631A
 ;;9002226.02101,"873,S62.631A ",.02)
 ;;S62.631A
 ;;9002226.02101,"873,S62.631A ",.03)
 ;;30
 ;;9002226.02101,"873,S62.631B ",.01)
 ;;S62.631B
 ;;9002226.02101,"873,S62.631B ",.02)
 ;;S62.631B
 ;;9002226.02101,"873,S62.631B ",.03)
 ;;30
 ;;9002226.02101,"873,S62.632A ",.01)
 ;;S62.632A