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

ATXXA78.m

Go to the documentation of this file.
ATXXA78 ;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,S60.039A ",.01)
 ;;S60.039A
 ;;9002226.02101,"873,S60.039A ",.02)
 ;;S60.039A
 ;;9002226.02101,"873,S60.039A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.041A ",.01)
 ;;S60.041A
 ;;9002226.02101,"873,S60.041A ",.02)
 ;;S60.041A
 ;;9002226.02101,"873,S60.041A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.042A ",.01)
 ;;S60.042A
 ;;9002226.02101,"873,S60.042A ",.02)
 ;;S60.042A
 ;;9002226.02101,"873,S60.042A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.049A ",.01)
 ;;S60.049A
 ;;9002226.02101,"873,S60.049A ",.02)
 ;;S60.049A
 ;;9002226.02101,"873,S60.049A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.051A ",.01)
 ;;S60.051A
 ;;9002226.02101,"873,S60.051A ",.02)
 ;;S60.051A
 ;;9002226.02101,"873,S60.051A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.052A ",.01)
 ;;S60.052A
 ;;9002226.02101,"873,S60.052A ",.02)
 ;;S60.052A
 ;;9002226.02101,"873,S60.052A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.059A ",.01)
 ;;S60.059A
 ;;9002226.02101,"873,S60.059A ",.02)
 ;;S60.059A
 ;;9002226.02101,"873,S60.059A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.10XA ",.01)
 ;;S60.10XA
 ;;9002226.02101,"873,S60.10XA ",.02)
 ;;S60.10XA
 ;;9002226.02101,"873,S60.10XA ",.03)
 ;;30
 ;;9002226.02101,"873,S60.111A ",.01)
 ;;S60.111A
 ;;9002226.02101,"873,S60.111A ",.02)
 ;;S60.111A
 ;;9002226.02101,"873,S60.111A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.112A ",.01)
 ;;S60.112A
 ;;9002226.02101,"873,S60.112A ",.02)
 ;;S60.112A
 ;;9002226.02101,"873,S60.112A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.119A ",.01)
 ;;S60.119A
 ;;9002226.02101,"873,S60.119A ",.02)
 ;;S60.119A
 ;;9002226.02101,"873,S60.119A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.121A ",.01)
 ;;S60.121A
 ;;9002226.02101,"873,S60.121A ",.02)
 ;;S60.121A
 ;;9002226.02101,"873,S60.121A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.122A ",.01)
 ;;S60.122A
 ;;9002226.02101,"873,S60.122A ",.02)
 ;;S60.122A
 ;;9002226.02101,"873,S60.122A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.129A ",.01)
 ;;S60.129A
 ;;9002226.02101,"873,S60.129A ",.02)
 ;;S60.129A
 ;;9002226.02101,"873,S60.129A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.131A ",.01)
 ;;S60.131A
 ;;9002226.02101,"873,S60.131A ",.02)
 ;;S60.131A
 ;;9002226.02101,"873,S60.131A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.132A ",.01)
 ;;S60.132A
 ;;9002226.02101,"873,S60.132A ",.02)
 ;;S60.132A
 ;;9002226.02101,"873,S60.132A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.139A ",.01)
 ;;S60.139A
 ;;9002226.02101,"873,S60.139A ",.02)
 ;;S60.139A
 ;;9002226.02101,"873,S60.139A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.141A ",.01)
 ;;S60.141A
 ;;9002226.02101,"873,S60.141A ",.02)
 ;;S60.141A
 ;;9002226.02101,"873,S60.141A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.142A ",.01)
 ;;S60.142A
 ;;9002226.02101,"873,S60.142A ",.02)
 ;;S60.142A
 ;;9002226.02101,"873,S60.142A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.149A ",.01)
 ;;S60.149A
 ;;9002226.02101,"873,S60.149A ",.02)
 ;;S60.149A
 ;;9002226.02101,"873,S60.149A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.151A ",.01)
 ;;S60.151A
 ;;9002226.02101,"873,S60.151A ",.02)
 ;;S60.151A
 ;;9002226.02101,"873,S60.151A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.152A ",.01)
 ;;S60.152A
 ;;9002226.02101,"873,S60.152A ",.02)
 ;;S60.152A
 ;;9002226.02101,"873,S60.152A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.159A ",.01)
 ;;S60.159A
 ;;9002226.02101,"873,S60.159A ",.02)
 ;;S60.159A
 ;;9002226.02101,"873,S60.159A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.211A ",.01)
 ;;S60.211A
 ;;9002226.02101,"873,S60.211A ",.02)
 ;;S60.211A
 ;;9002226.02101,"873,S60.211A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.212A ",.01)
 ;;S60.212A
 ;;9002226.02101,"873,S60.212A ",.02)
 ;;S60.212A
 ;;9002226.02101,"873,S60.212A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.219A ",.01)
 ;;S60.219A
 ;;9002226.02101,"873,S60.219A ",.02)
 ;;S60.219A
 ;;9002226.02101,"873,S60.219A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.221A ",.01)
 ;;S60.221A
 ;;9002226.02101,"873,S60.221A ",.02)
 ;;S60.221A
 ;;9002226.02101,"873,S60.221A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.222A ",.01)
 ;;S60.222A
 ;;9002226.02101,"873,S60.222A ",.02)
 ;;S60.222A
 ;;9002226.02101,"873,S60.222A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.229A ",.01)
 ;;S60.229A
 ;;9002226.02101,"873,S60.229A ",.02)
 ;;S60.229A
 ;;9002226.02101,"873,S60.229A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.311A ",.01)
 ;;S60.311A
 ;;9002226.02101,"873,S60.311A ",.02)
 ;;S60.311A
 ;;9002226.02101,"873,S60.311A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.312A ",.01)
 ;;S60.312A
 ;;9002226.02101,"873,S60.312A ",.02)
 ;;S60.312A
 ;;9002226.02101,"873,S60.312A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.319A ",.01)
 ;;S60.319A
 ;;9002226.02101,"873,S60.319A ",.02)
 ;;S60.319A
 ;;9002226.02101,"873,S60.319A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.341A ",.01)
 ;;S60.341A
 ;;9002226.02101,"873,S60.341A ",.02)
 ;;S60.341A
 ;;9002226.02101,"873,S60.341A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.342A ",.01)
 ;;S60.342A
 ;;9002226.02101,"873,S60.342A ",.02)
 ;;S60.342A
 ;;9002226.02101,"873,S60.342A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.349A ",.01)
 ;;S60.349A
 ;;9002226.02101,"873,S60.349A ",.02)
 ;;S60.349A
 ;;9002226.02101,"873,S60.349A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.351A ",.01)
 ;;S60.351A
 ;;9002226.02101,"873,S60.351A ",.02)
 ;;S60.351A
 ;;9002226.02101,"873,S60.351A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.352A ",.01)
 ;;S60.352A
 ;;9002226.02101,"873,S60.352A ",.02)
 ;;S60.352A
 ;;9002226.02101,"873,S60.352A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.359A ",.01)
 ;;S60.359A
 ;;9002226.02101,"873,S60.359A ",.02)
 ;;S60.359A
 ;;9002226.02101,"873,S60.359A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.371A ",.01)
 ;;S60.371A
 ;;9002226.02101,"873,S60.371A ",.02)
 ;;S60.371A
 ;;9002226.02101,"873,S60.371A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.372A ",.01)
 ;;S60.372A
 ;;9002226.02101,"873,S60.372A ",.02)
 ;;S60.372A
 ;;9002226.02101,"873,S60.372A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.379A ",.01)
 ;;S60.379A
 ;;9002226.02101,"873,S60.379A ",.02)
 ;;S60.379A
 ;;9002226.02101,"873,S60.379A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.391A ",.01)
 ;;S60.391A
 ;;9002226.02101,"873,S60.391A ",.02)
 ;;S60.391A
 ;;9002226.02101,"873,S60.391A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.392A ",.01)
 ;;S60.392A
 ;;9002226.02101,"873,S60.392A ",.02)
 ;;S60.392A
 ;;9002226.02101,"873,S60.392A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.399A ",.01)
 ;;S60.399A
 ;;9002226.02101,"873,S60.399A ",.02)
 ;;S60.399A
 ;;9002226.02101,"873,S60.399A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.410A ",.01)
 ;;S60.410A
 ;;9002226.02101,"873,S60.410A ",.02)
 ;;S60.410A
 ;;9002226.02101,"873,S60.410A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.411A ",.01)
 ;;S60.411A
 ;;9002226.02101,"873,S60.411A ",.02)
 ;;S60.411A
 ;;9002226.02101,"873,S60.411A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.412A ",.01)
 ;;S60.412A
 ;;9002226.02101,"873,S60.412A ",.02)
 ;;S60.412A
 ;;9002226.02101,"873,S60.412A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.413A ",.01)
 ;;S60.413A
 ;;9002226.02101,"873,S60.413A ",.02)
 ;;S60.413A
 ;;9002226.02101,"873,S60.413A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.414A ",.01)
 ;;S60.414A
 ;;9002226.02101,"873,S60.414A ",.02)
 ;;S60.414A
 ;;9002226.02101,"873,S60.414A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.415A ",.01)
 ;;S60.415A
 ;;9002226.02101,"873,S60.415A ",.02)
 ;;S60.415A
 ;;9002226.02101,"873,S60.415A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.416A ",.01)
 ;;S60.416A
 ;;9002226.02101,"873,S60.416A ",.02)
 ;;S60.416A
 ;;9002226.02101,"873,S60.416A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.417A ",.01)
 ;;S60.417A
 ;;9002226.02101,"873,S60.417A ",.02)
 ;;S60.417A
 ;;9002226.02101,"873,S60.417A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.418A ",.01)
 ;;S60.418A
 ;;9002226.02101,"873,S60.418A ",.02)
 ;;S60.418A
 ;;9002226.02101,"873,S60.418A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.419A ",.01)
 ;;S60.419A
 ;;9002226.02101,"873,S60.419A ",.02)
 ;;S60.419A
 ;;9002226.02101,"873,S60.419A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.440A ",.01)
 ;;S60.440A
 ;;9002226.02101,"873,S60.440A ",.02)
 ;;S60.440A
 ;;9002226.02101,"873,S60.440A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.441A ",.01)
 ;;S60.441A
 ;;9002226.02101,"873,S60.441A ",.02)
 ;;S60.441A
 ;;9002226.02101,"873,S60.441A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.442A ",.01)
 ;;S60.442A
 ;;9002226.02101,"873,S60.442A ",.02)
 ;;S60.442A
 ;;9002226.02101,"873,S60.442A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.443A ",.01)
 ;;S60.443A
 ;;9002226.02101,"873,S60.443A ",.02)
 ;;S60.443A
 ;;9002226.02101,"873,S60.443A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.444A ",.01)
 ;;S60.444A
 ;;9002226.02101,"873,S60.444A ",.02)
 ;;S60.444A
 ;;9002226.02101,"873,S60.444A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.445A ",.01)
 ;;S60.445A
 ;;9002226.02101,"873,S60.445A ",.02)
 ;;S60.445A
 ;;9002226.02101,"873,S60.445A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.446A ",.01)
 ;;S60.446A
 ;;9002226.02101,"873,S60.446A ",.02)
 ;;S60.446A
 ;;9002226.02101,"873,S60.446A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.447A ",.01)
 ;;S60.447A
 ;;9002226.02101,"873,S60.447A ",.02)
 ;;S60.447A
 ;;9002226.02101,"873,S60.447A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.448A ",.01)
 ;;S60.448A
 ;;9002226.02101,"873,S60.448A ",.02)
 ;;S60.448A
 ;;9002226.02101,"873,S60.448A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.449A ",.01)
 ;;S60.449A
 ;;9002226.02101,"873,S60.449A ",.02)
 ;;S60.449A
 ;;9002226.02101,"873,S60.449A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.450A ",.01)
 ;;S60.450A
 ;;9002226.02101,"873,S60.450A ",.02)
 ;;S60.450A
 ;;9002226.02101,"873,S60.450A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.451A ",.01)
 ;;S60.451A
 ;;9002226.02101,"873,S60.451A ",.02)
 ;;S60.451A
 ;;9002226.02101,"873,S60.451A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.452A ",.01)
 ;;S60.452A
 ;;9002226.02101,"873,S60.452A ",.02)
 ;;S60.452A
 ;;9002226.02101,"873,S60.452A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.453A ",.01)
 ;;S60.453A
 ;;9002226.02101,"873,S60.453A ",.02)
 ;;S60.453A
 ;;9002226.02101,"873,S60.453A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.454A ",.01)
 ;;S60.454A
 ;;9002226.02101,"873,S60.454A ",.02)
 ;;S60.454A
 ;;9002226.02101,"873,S60.454A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.455A ",.01)
 ;;S60.455A
 ;;9002226.02101,"873,S60.455A ",.02)
 ;;S60.455A
 ;;9002226.02101,"873,S60.455A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.456A ",.01)
 ;;S60.456A
 ;;9002226.02101,"873,S60.456A ",.02)
 ;;S60.456A
 ;;9002226.02101,"873,S60.456A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.457A ",.01)
 ;;S60.457A
 ;;9002226.02101,"873,S60.457A ",.02)
 ;;S60.457A
 ;;9002226.02101,"873,S60.457A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.458A ",.01)
 ;;S60.458A
 ;;9002226.02101,"873,S60.458A ",.02)
 ;;S60.458A
 ;;9002226.02101,"873,S60.458A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.459A ",.01)
 ;;S60.459A
 ;;9002226.02101,"873,S60.459A ",.02)
 ;;S60.459A
 ;;9002226.02101,"873,S60.459A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.470A ",.01)
 ;;S60.470A
 ;;9002226.02101,"873,S60.470A ",.02)
 ;;S60.470A
 ;;9002226.02101,"873,S60.470A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.471A ",.01)
 ;;S60.471A
 ;;9002226.02101,"873,S60.471A ",.02)
 ;;S60.471A
 ;;9002226.02101,"873,S60.471A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.472A ",.01)
 ;;S60.472A
 ;;9002226.02101,"873,S60.472A ",.02)
 ;;S60.472A
 ;;9002226.02101,"873,S60.472A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.473A ",.01)
 ;;S60.473A
 ;;9002226.02101,"873,S60.473A ",.02)
 ;;S60.473A
 ;;9002226.02101,"873,S60.473A ",.03)
 ;;30
 ;;9002226.02101,"873,S60.474A ",.01)
 ;;S60.474A