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

ATXXA49.m

Go to the documentation of this file.
ATXXA49 ;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,S32.416A ",.02)
 ;;S32.416A
 ;;9002226.02101,"873,S32.416A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.416B ",.01)
 ;;S32.416B
 ;;9002226.02101,"873,S32.416B ",.02)
 ;;S32.416B
 ;;9002226.02101,"873,S32.416B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.421A ",.01)
 ;;S32.421A
 ;;9002226.02101,"873,S32.421A ",.02)
 ;;S32.421A
 ;;9002226.02101,"873,S32.421A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.421B ",.01)
 ;;S32.421B
 ;;9002226.02101,"873,S32.421B ",.02)
 ;;S32.421B
 ;;9002226.02101,"873,S32.421B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.422A ",.01)
 ;;S32.422A
 ;;9002226.02101,"873,S32.422A ",.02)
 ;;S32.422A
 ;;9002226.02101,"873,S32.422A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.422B ",.01)
 ;;S32.422B
 ;;9002226.02101,"873,S32.422B ",.02)
 ;;S32.422B
 ;;9002226.02101,"873,S32.422B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.423A ",.01)
 ;;S32.423A
 ;;9002226.02101,"873,S32.423A ",.02)
 ;;S32.423A
 ;;9002226.02101,"873,S32.423A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.423B ",.01)
 ;;S32.423B
 ;;9002226.02101,"873,S32.423B ",.02)
 ;;S32.423B
 ;;9002226.02101,"873,S32.423B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.424A ",.01)
 ;;S32.424A
 ;;9002226.02101,"873,S32.424A ",.02)
 ;;S32.424A
 ;;9002226.02101,"873,S32.424A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.424B ",.01)
 ;;S32.424B
 ;;9002226.02101,"873,S32.424B ",.02)
 ;;S32.424B
 ;;9002226.02101,"873,S32.424B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.425A ",.01)
 ;;S32.425A
 ;;9002226.02101,"873,S32.425A ",.02)
 ;;S32.425A
 ;;9002226.02101,"873,S32.425A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.425B ",.01)
 ;;S32.425B
 ;;9002226.02101,"873,S32.425B ",.02)
 ;;S32.425B
 ;;9002226.02101,"873,S32.425B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.426A ",.01)
 ;;S32.426A
 ;;9002226.02101,"873,S32.426A ",.02)
 ;;S32.426A
 ;;9002226.02101,"873,S32.426A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.426B ",.01)
 ;;S32.426B
 ;;9002226.02101,"873,S32.426B ",.02)
 ;;S32.426B
 ;;9002226.02101,"873,S32.426B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.431A ",.01)
 ;;S32.431A
 ;;9002226.02101,"873,S32.431A ",.02)
 ;;S32.431A
 ;;9002226.02101,"873,S32.431A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.431B ",.01)
 ;;S32.431B
 ;;9002226.02101,"873,S32.431B ",.02)
 ;;S32.431B
 ;;9002226.02101,"873,S32.431B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.432A ",.01)
 ;;S32.432A
 ;;9002226.02101,"873,S32.432A ",.02)
 ;;S32.432A
 ;;9002226.02101,"873,S32.432A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.432B ",.01)
 ;;S32.432B
 ;;9002226.02101,"873,S32.432B ",.02)
 ;;S32.432B
 ;;9002226.02101,"873,S32.432B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.433A ",.01)
 ;;S32.433A
 ;;9002226.02101,"873,S32.433A ",.02)
 ;;S32.433A
 ;;9002226.02101,"873,S32.433A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.433B ",.01)
 ;;S32.433B
 ;;9002226.02101,"873,S32.433B ",.02)
 ;;S32.433B
 ;;9002226.02101,"873,S32.433B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.434A ",.01)
 ;;S32.434A
 ;;9002226.02101,"873,S32.434A ",.02)
 ;;S32.434A
 ;;9002226.02101,"873,S32.434A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.434B ",.01)
 ;;S32.434B
 ;;9002226.02101,"873,S32.434B ",.02)
 ;;S32.434B
 ;;9002226.02101,"873,S32.434B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.435A ",.01)
 ;;S32.435A
 ;;9002226.02101,"873,S32.435A ",.02)
 ;;S32.435A
 ;;9002226.02101,"873,S32.435A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.435B ",.01)
 ;;S32.435B
 ;;9002226.02101,"873,S32.435B ",.02)
 ;;S32.435B
 ;;9002226.02101,"873,S32.435B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.436A ",.01)
 ;;S32.436A
 ;;9002226.02101,"873,S32.436A ",.02)
 ;;S32.436A
 ;;9002226.02101,"873,S32.436A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.436B ",.01)
 ;;S32.436B
 ;;9002226.02101,"873,S32.436B ",.02)
 ;;S32.436B
 ;;9002226.02101,"873,S32.436B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.441A ",.01)
 ;;S32.441A
 ;;9002226.02101,"873,S32.441A ",.02)
 ;;S32.441A
 ;;9002226.02101,"873,S32.441A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.441B ",.01)
 ;;S32.441B
 ;;9002226.02101,"873,S32.441B ",.02)
 ;;S32.441B
 ;;9002226.02101,"873,S32.441B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.442A ",.01)
 ;;S32.442A
 ;;9002226.02101,"873,S32.442A ",.02)
 ;;S32.442A
 ;;9002226.02101,"873,S32.442A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.442B ",.01)
 ;;S32.442B
 ;;9002226.02101,"873,S32.442B ",.02)
 ;;S32.442B
 ;;9002226.02101,"873,S32.442B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.443A ",.01)
 ;;S32.443A
 ;;9002226.02101,"873,S32.443A ",.02)
 ;;S32.443A
 ;;9002226.02101,"873,S32.443A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.443B ",.01)
 ;;S32.443B
 ;;9002226.02101,"873,S32.443B ",.02)
 ;;S32.443B
 ;;9002226.02101,"873,S32.443B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.444A ",.01)
 ;;S32.444A
 ;;9002226.02101,"873,S32.444A ",.02)
 ;;S32.444A
 ;;9002226.02101,"873,S32.444A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.444B ",.01)
 ;;S32.444B
 ;;9002226.02101,"873,S32.444B ",.02)
 ;;S32.444B
 ;;9002226.02101,"873,S32.444B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.445A ",.01)
 ;;S32.445A
 ;;9002226.02101,"873,S32.445A ",.02)
 ;;S32.445A
 ;;9002226.02101,"873,S32.445A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.445B ",.01)
 ;;S32.445B
 ;;9002226.02101,"873,S32.445B ",.02)
 ;;S32.445B
 ;;9002226.02101,"873,S32.445B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.446A ",.01)
 ;;S32.446A
 ;;9002226.02101,"873,S32.446A ",.02)
 ;;S32.446A
 ;;9002226.02101,"873,S32.446A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.446B ",.01)
 ;;S32.446B
 ;;9002226.02101,"873,S32.446B ",.02)
 ;;S32.446B
 ;;9002226.02101,"873,S32.446B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.451A ",.01)
 ;;S32.451A
 ;;9002226.02101,"873,S32.451A ",.02)
 ;;S32.451A
 ;;9002226.02101,"873,S32.451A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.451B ",.01)
 ;;S32.451B
 ;;9002226.02101,"873,S32.451B ",.02)
 ;;S32.451B
 ;;9002226.02101,"873,S32.451B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.452A ",.01)
 ;;S32.452A
 ;;9002226.02101,"873,S32.452A ",.02)
 ;;S32.452A
 ;;9002226.02101,"873,S32.452A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.452B ",.01)
 ;;S32.452B
 ;;9002226.02101,"873,S32.452B ",.02)
 ;;S32.452B
 ;;9002226.02101,"873,S32.452B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.453A ",.01)
 ;;S32.453A
 ;;9002226.02101,"873,S32.453A ",.02)
 ;;S32.453A
 ;;9002226.02101,"873,S32.453A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.453B ",.01)
 ;;S32.453B
 ;;9002226.02101,"873,S32.453B ",.02)
 ;;S32.453B
 ;;9002226.02101,"873,S32.453B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.454A ",.01)
 ;;S32.454A
 ;;9002226.02101,"873,S32.454A ",.02)
 ;;S32.454A
 ;;9002226.02101,"873,S32.454A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.454B ",.01)
 ;;S32.454B
 ;;9002226.02101,"873,S32.454B ",.02)
 ;;S32.454B
 ;;9002226.02101,"873,S32.454B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.455A ",.01)
 ;;S32.455A
 ;;9002226.02101,"873,S32.455A ",.02)
 ;;S32.455A
 ;;9002226.02101,"873,S32.455A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.455B ",.01)
 ;;S32.455B
 ;;9002226.02101,"873,S32.455B ",.02)
 ;;S32.455B
 ;;9002226.02101,"873,S32.455B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.456A ",.01)
 ;;S32.456A
 ;;9002226.02101,"873,S32.456A ",.02)
 ;;S32.456A
 ;;9002226.02101,"873,S32.456A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.456B ",.01)
 ;;S32.456B
 ;;9002226.02101,"873,S32.456B ",.02)
 ;;S32.456B
 ;;9002226.02101,"873,S32.456B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.461A ",.01)
 ;;S32.461A
 ;;9002226.02101,"873,S32.461A ",.02)
 ;;S32.461A
 ;;9002226.02101,"873,S32.461A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.461B ",.01)
 ;;S32.461B
 ;;9002226.02101,"873,S32.461B ",.02)
 ;;S32.461B
 ;;9002226.02101,"873,S32.461B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.462A ",.01)
 ;;S32.462A
 ;;9002226.02101,"873,S32.462A ",.02)
 ;;S32.462A
 ;;9002226.02101,"873,S32.462A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.462B ",.01)
 ;;S32.462B
 ;;9002226.02101,"873,S32.462B ",.02)
 ;;S32.462B
 ;;9002226.02101,"873,S32.462B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.463A ",.01)
 ;;S32.463A
 ;;9002226.02101,"873,S32.463A ",.02)
 ;;S32.463A
 ;;9002226.02101,"873,S32.463A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.463B ",.01)
 ;;S32.463B
 ;;9002226.02101,"873,S32.463B ",.02)
 ;;S32.463B
 ;;9002226.02101,"873,S32.463B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.464A ",.01)
 ;;S32.464A
 ;;9002226.02101,"873,S32.464A ",.02)
 ;;S32.464A
 ;;9002226.02101,"873,S32.464A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.464B ",.01)
 ;;S32.464B
 ;;9002226.02101,"873,S32.464B ",.02)
 ;;S32.464B
 ;;9002226.02101,"873,S32.464B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.465A ",.01)
 ;;S32.465A
 ;;9002226.02101,"873,S32.465A ",.02)
 ;;S32.465A
 ;;9002226.02101,"873,S32.465A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.465B ",.01)
 ;;S32.465B
 ;;9002226.02101,"873,S32.465B ",.02)
 ;;S32.465B
 ;;9002226.02101,"873,S32.465B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.466A ",.01)
 ;;S32.466A
 ;;9002226.02101,"873,S32.466A ",.02)
 ;;S32.466A
 ;;9002226.02101,"873,S32.466A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.466B ",.01)
 ;;S32.466B
 ;;9002226.02101,"873,S32.466B ",.02)
 ;;S32.466B
 ;;9002226.02101,"873,S32.466B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.471A ",.01)
 ;;S32.471A
 ;;9002226.02101,"873,S32.471A ",.02)
 ;;S32.471A
 ;;9002226.02101,"873,S32.471A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.471B ",.01)
 ;;S32.471B
 ;;9002226.02101,"873,S32.471B ",.02)
 ;;S32.471B
 ;;9002226.02101,"873,S32.471B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.472A ",.01)
 ;;S32.472A
 ;;9002226.02101,"873,S32.472A ",.02)
 ;;S32.472A
 ;;9002226.02101,"873,S32.472A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.472B ",.01)
 ;;S32.472B
 ;;9002226.02101,"873,S32.472B ",.02)
 ;;S32.472B
 ;;9002226.02101,"873,S32.472B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.473A ",.01)
 ;;S32.473A
 ;;9002226.02101,"873,S32.473A ",.02)
 ;;S32.473A
 ;;9002226.02101,"873,S32.473A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.473B ",.01)
 ;;S32.473B
 ;;9002226.02101,"873,S32.473B ",.02)
 ;;S32.473B
 ;;9002226.02101,"873,S32.473B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.474A ",.01)
 ;;S32.474A
 ;;9002226.02101,"873,S32.474A ",.02)
 ;;S32.474A
 ;;9002226.02101,"873,S32.474A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.474B ",.01)
 ;;S32.474B
 ;;9002226.02101,"873,S32.474B ",.02)
 ;;S32.474B
 ;;9002226.02101,"873,S32.474B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.475A ",.01)
 ;;S32.475A
 ;;9002226.02101,"873,S32.475A ",.02)
 ;;S32.475A
 ;;9002226.02101,"873,S32.475A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.475B ",.01)
 ;;S32.475B
 ;;9002226.02101,"873,S32.475B ",.02)
 ;;S32.475B
 ;;9002226.02101,"873,S32.475B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.476A ",.01)
 ;;S32.476A
 ;;9002226.02101,"873,S32.476A ",.02)
 ;;S32.476A
 ;;9002226.02101,"873,S32.476A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.476B ",.01)
 ;;S32.476B
 ;;9002226.02101,"873,S32.476B ",.02)
 ;;S32.476B
 ;;9002226.02101,"873,S32.476B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.481A ",.01)
 ;;S32.481A
 ;;9002226.02101,"873,S32.481A ",.02)
 ;;S32.481A
 ;;9002226.02101,"873,S32.481A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.481B ",.01)
 ;;S32.481B
 ;;9002226.02101,"873,S32.481B ",.02)
 ;;S32.481B
 ;;9002226.02101,"873,S32.481B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.482A ",.01)
 ;;S32.482A
 ;;9002226.02101,"873,S32.482A ",.02)
 ;;S32.482A
 ;;9002226.02101,"873,S32.482A ",.03)
 ;;30
 ;;9002226.02101,"873,S32.482B ",.01)
 ;;S32.482B
 ;;9002226.02101,"873,S32.482B ",.02)
 ;;S32.482B
 ;;9002226.02101,"873,S32.482B ",.03)
 ;;30
 ;;9002226.02101,"873,S32.483A ",.01)
 ;;S32.483A
 ;;9002226.02101,"873,S32.483A ",.02)
 ;;S32.483A