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

ATXXB47.m

Go to the documentation of this file.
ATXXB47 ;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,039B00Z ",.02)
 ;;039B00Z 
 ;;9002226.02101,"1804,039B00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039B0ZZ ",.01)
 ;;039B0ZZ 
 ;;9002226.02101,"1804,039B0ZZ ",.02)
 ;;039B0ZZ 
 ;;9002226.02101,"1804,039B0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039B30Z ",.01)
 ;;039B30Z 
 ;;9002226.02101,"1804,039B30Z ",.02)
 ;;039B30Z 
 ;;9002226.02101,"1804,039B30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039B3ZZ ",.01)
 ;;039B3ZZ 
 ;;9002226.02101,"1804,039B3ZZ ",.02)
 ;;039B3ZZ 
 ;;9002226.02101,"1804,039B3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039B40Z ",.01)
 ;;039B40Z 
 ;;9002226.02101,"1804,039B40Z ",.02)
 ;;039B40Z 
 ;;9002226.02101,"1804,039B40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039B4ZZ ",.01)
 ;;039B4ZZ 
 ;;9002226.02101,"1804,039B4ZZ ",.02)
 ;;039B4ZZ 
 ;;9002226.02101,"1804,039B4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039C00Z ",.01)
 ;;039C00Z 
 ;;9002226.02101,"1804,039C00Z ",.02)
 ;;039C00Z 
 ;;9002226.02101,"1804,039C00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039C0ZZ ",.01)
 ;;039C0ZZ 
 ;;9002226.02101,"1804,039C0ZZ ",.02)
 ;;039C0ZZ 
 ;;9002226.02101,"1804,039C0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039C30Z ",.01)
 ;;039C30Z 
 ;;9002226.02101,"1804,039C30Z ",.02)
 ;;039C30Z 
 ;;9002226.02101,"1804,039C30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039C3ZZ ",.01)
 ;;039C3ZZ 
 ;;9002226.02101,"1804,039C3ZZ ",.02)
 ;;039C3ZZ 
 ;;9002226.02101,"1804,039C3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039C40Z ",.01)
 ;;039C40Z 
 ;;9002226.02101,"1804,039C40Z ",.02)
 ;;039C40Z 
 ;;9002226.02101,"1804,039C40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039C4ZZ ",.01)
 ;;039C4ZZ 
 ;;9002226.02101,"1804,039C4ZZ ",.02)
 ;;039C4ZZ 
 ;;9002226.02101,"1804,039C4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039D00Z ",.01)
 ;;039D00Z 
 ;;9002226.02101,"1804,039D00Z ",.02)
 ;;039D00Z 
 ;;9002226.02101,"1804,039D00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039D0ZZ ",.01)
 ;;039D0ZZ 
 ;;9002226.02101,"1804,039D0ZZ ",.02)
 ;;039D0ZZ 
 ;;9002226.02101,"1804,039D0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039D30Z ",.01)
 ;;039D30Z 
 ;;9002226.02101,"1804,039D30Z ",.02)
 ;;039D30Z 
 ;;9002226.02101,"1804,039D30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039D3ZZ ",.01)
 ;;039D3ZZ 
 ;;9002226.02101,"1804,039D3ZZ ",.02)
 ;;039D3ZZ 
 ;;9002226.02101,"1804,039D3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039D40Z ",.01)
 ;;039D40Z 
 ;;9002226.02101,"1804,039D40Z ",.02)
 ;;039D40Z 
 ;;9002226.02101,"1804,039D40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039D4ZZ ",.01)
 ;;039D4ZZ 
 ;;9002226.02101,"1804,039D4ZZ ",.02)
 ;;039D4ZZ 
 ;;9002226.02101,"1804,039D4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039F00Z ",.01)
 ;;039F00Z 
 ;;9002226.02101,"1804,039F00Z ",.02)
 ;;039F00Z 
 ;;9002226.02101,"1804,039F00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039F0ZZ ",.01)
 ;;039F0ZZ 
 ;;9002226.02101,"1804,039F0ZZ ",.02)
 ;;039F0ZZ 
 ;;9002226.02101,"1804,039F0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039F30Z ",.01)
 ;;039F30Z 
 ;;9002226.02101,"1804,039F30Z ",.02)
 ;;039F30Z 
 ;;9002226.02101,"1804,039F30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039F3ZZ ",.01)
 ;;039F3ZZ 
 ;;9002226.02101,"1804,039F3ZZ ",.02)
 ;;039F3ZZ 
 ;;9002226.02101,"1804,039F3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039F40Z ",.01)
 ;;039F40Z 
 ;;9002226.02101,"1804,039F40Z ",.02)
 ;;039F40Z 
 ;;9002226.02101,"1804,039F40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039F4ZZ ",.01)
 ;;039F4ZZ 
 ;;9002226.02101,"1804,039F4ZZ ",.02)
 ;;039F4ZZ 
 ;;9002226.02101,"1804,039F4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039G00Z ",.01)
 ;;039G00Z 
 ;;9002226.02101,"1804,039G00Z ",.02)
 ;;039G00Z 
 ;;9002226.02101,"1804,039G00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039G0ZZ ",.01)
 ;;039G0ZZ 
 ;;9002226.02101,"1804,039G0ZZ ",.02)
 ;;039G0ZZ 
 ;;9002226.02101,"1804,039G0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039G30Z ",.01)
 ;;039G30Z 
 ;;9002226.02101,"1804,039G30Z ",.02)
 ;;039G30Z 
 ;;9002226.02101,"1804,039G30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039G3ZZ ",.01)
 ;;039G3ZZ 
 ;;9002226.02101,"1804,039G3ZZ ",.02)
 ;;039G3ZZ 
 ;;9002226.02101,"1804,039G3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039G40Z ",.01)
 ;;039G40Z 
 ;;9002226.02101,"1804,039G40Z ",.02)
 ;;039G40Z 
 ;;9002226.02101,"1804,039G40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039G4ZZ ",.01)
 ;;039G4ZZ 
 ;;9002226.02101,"1804,039G4ZZ ",.02)
 ;;039G4ZZ 
 ;;9002226.02101,"1804,039G4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039H00Z ",.01)
 ;;039H00Z 
 ;;9002226.02101,"1804,039H00Z ",.02)
 ;;039H00Z 
 ;;9002226.02101,"1804,039H00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039H0ZZ ",.01)
 ;;039H0ZZ 
 ;;9002226.02101,"1804,039H0ZZ ",.02)
 ;;039H0ZZ 
 ;;9002226.02101,"1804,039H0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039H30Z ",.01)
 ;;039H30Z 
 ;;9002226.02101,"1804,039H30Z ",.02)
 ;;039H30Z 
 ;;9002226.02101,"1804,039H30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039H3ZZ ",.01)
 ;;039H3ZZ 
 ;;9002226.02101,"1804,039H3ZZ ",.02)
 ;;039H3ZZ 
 ;;9002226.02101,"1804,039H3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039H40Z ",.01)
 ;;039H40Z 
 ;;9002226.02101,"1804,039H40Z ",.02)
 ;;039H40Z 
 ;;9002226.02101,"1804,039H40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039H4ZZ ",.01)
 ;;039H4ZZ 
 ;;9002226.02101,"1804,039H4ZZ ",.02)
 ;;039H4ZZ 
 ;;9002226.02101,"1804,039H4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039J00Z ",.01)
 ;;039J00Z 
 ;;9002226.02101,"1804,039J00Z ",.02)
 ;;039J00Z 
 ;;9002226.02101,"1804,039J00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039J0ZZ ",.01)
 ;;039J0ZZ 
 ;;9002226.02101,"1804,039J0ZZ ",.02)
 ;;039J0ZZ 
 ;;9002226.02101,"1804,039J0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039J30Z ",.01)
 ;;039J30Z 
 ;;9002226.02101,"1804,039J30Z ",.02)
 ;;039J30Z 
 ;;9002226.02101,"1804,039J30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039J3ZZ ",.01)
 ;;039J3ZZ 
 ;;9002226.02101,"1804,039J3ZZ ",.02)
 ;;039J3ZZ 
 ;;9002226.02101,"1804,039J3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039J40Z ",.01)
 ;;039J40Z 
 ;;9002226.02101,"1804,039J40Z ",.02)
 ;;039J40Z 
 ;;9002226.02101,"1804,039J40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039J4ZZ ",.01)
 ;;039J4ZZ 
 ;;9002226.02101,"1804,039J4ZZ ",.02)
 ;;039J4ZZ 
 ;;9002226.02101,"1804,039J4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039K00Z ",.01)
 ;;039K00Z 
 ;;9002226.02101,"1804,039K00Z ",.02)
 ;;039K00Z 
 ;;9002226.02101,"1804,039K00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039K0ZZ ",.01)
 ;;039K0ZZ 
 ;;9002226.02101,"1804,039K0ZZ ",.02)
 ;;039K0ZZ 
 ;;9002226.02101,"1804,039K0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039K30Z ",.01)
 ;;039K30Z 
 ;;9002226.02101,"1804,039K30Z ",.02)
 ;;039K30Z 
 ;;9002226.02101,"1804,039K30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039K3ZZ ",.01)
 ;;039K3ZZ 
 ;;9002226.02101,"1804,039K3ZZ ",.02)
 ;;039K3ZZ 
 ;;9002226.02101,"1804,039K3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039K40Z ",.01)
 ;;039K40Z 
 ;;9002226.02101,"1804,039K40Z ",.02)
 ;;039K40Z 
 ;;9002226.02101,"1804,039K40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039K4ZZ ",.01)
 ;;039K4ZZ 
 ;;9002226.02101,"1804,039K4ZZ ",.02)
 ;;039K4ZZ 
 ;;9002226.02101,"1804,039K4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039L00Z ",.01)
 ;;039L00Z 
 ;;9002226.02101,"1804,039L00Z ",.02)
 ;;039L00Z 
 ;;9002226.02101,"1804,039L00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039L0ZZ ",.01)
 ;;039L0ZZ 
 ;;9002226.02101,"1804,039L0ZZ ",.02)
 ;;039L0ZZ 
 ;;9002226.02101,"1804,039L0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039L30Z ",.01)
 ;;039L30Z 
 ;;9002226.02101,"1804,039L30Z ",.02)
 ;;039L30Z 
 ;;9002226.02101,"1804,039L30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039L3ZZ ",.01)
 ;;039L3ZZ 
 ;;9002226.02101,"1804,039L3ZZ ",.02)
 ;;039L3ZZ 
 ;;9002226.02101,"1804,039L3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039L40Z ",.01)
 ;;039L40Z 
 ;;9002226.02101,"1804,039L40Z ",.02)
 ;;039L40Z 
 ;;9002226.02101,"1804,039L40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039L4ZZ ",.01)
 ;;039L4ZZ 
 ;;9002226.02101,"1804,039L4ZZ ",.02)
 ;;039L4ZZ 
 ;;9002226.02101,"1804,039L4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039M00Z ",.01)
 ;;039M00Z 
 ;;9002226.02101,"1804,039M00Z ",.02)
 ;;039M00Z 
 ;;9002226.02101,"1804,039M00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039M0ZZ ",.01)
 ;;039M0ZZ 
 ;;9002226.02101,"1804,039M0ZZ ",.02)
 ;;039M0ZZ 
 ;;9002226.02101,"1804,039M0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039M30Z ",.01)
 ;;039M30Z 
 ;;9002226.02101,"1804,039M30Z ",.02)
 ;;039M30Z 
 ;;9002226.02101,"1804,039M30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039M3ZZ ",.01)
 ;;039M3ZZ 
 ;;9002226.02101,"1804,039M3ZZ ",.02)
 ;;039M3ZZ 
 ;;9002226.02101,"1804,039M3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039M40Z ",.01)
 ;;039M40Z 
 ;;9002226.02101,"1804,039M40Z ",.02)
 ;;039M40Z 
 ;;9002226.02101,"1804,039M40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039M4ZZ ",.01)
 ;;039M4ZZ 
 ;;9002226.02101,"1804,039M4ZZ ",.02)
 ;;039M4ZZ 
 ;;9002226.02101,"1804,039M4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039N00Z ",.01)
 ;;039N00Z 
 ;;9002226.02101,"1804,039N00Z ",.02)
 ;;039N00Z 
 ;;9002226.02101,"1804,039N00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039N0ZZ ",.01)
 ;;039N0ZZ 
 ;;9002226.02101,"1804,039N0ZZ ",.02)
 ;;039N0ZZ 
 ;;9002226.02101,"1804,039N0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039N30Z ",.01)
 ;;039N30Z 
 ;;9002226.02101,"1804,039N30Z ",.02)
 ;;039N30Z 
 ;;9002226.02101,"1804,039N30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039N3ZZ ",.01)
 ;;039N3ZZ 
 ;;9002226.02101,"1804,039N3ZZ ",.02)
 ;;039N3ZZ 
 ;;9002226.02101,"1804,039N3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039N40Z ",.01)
 ;;039N40Z 
 ;;9002226.02101,"1804,039N40Z ",.02)
 ;;039N40Z 
 ;;9002226.02101,"1804,039N40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039N4ZZ ",.01)
 ;;039N4ZZ 
 ;;9002226.02101,"1804,039N4ZZ ",.02)
 ;;039N4ZZ 
 ;;9002226.02101,"1804,039N4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039P00Z ",.01)
 ;;039P00Z 
 ;;9002226.02101,"1804,039P00Z ",.02)
 ;;039P00Z 
 ;;9002226.02101,"1804,039P00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039P0ZZ ",.01)
 ;;039P0ZZ 
 ;;9002226.02101,"1804,039P0ZZ ",.02)
 ;;039P0ZZ 
 ;;9002226.02101,"1804,039P0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039P30Z ",.01)
 ;;039P30Z 
 ;;9002226.02101,"1804,039P30Z ",.02)
 ;;039P30Z 
 ;;9002226.02101,"1804,039P30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039P3ZZ ",.01)
 ;;039P3ZZ 
 ;;9002226.02101,"1804,039P3ZZ ",.02)
 ;;039P3ZZ 
 ;;9002226.02101,"1804,039P3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039P40Z ",.01)
 ;;039P40Z 
 ;;9002226.02101,"1804,039P40Z ",.02)
 ;;039P40Z 
 ;;9002226.02101,"1804,039P40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039P4ZZ ",.01)
 ;;039P4ZZ 
 ;;9002226.02101,"1804,039P4ZZ ",.02)
 ;;039P4ZZ 
 ;;9002226.02101,"1804,039P4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039Q00Z ",.01)
 ;;039Q00Z 
 ;;9002226.02101,"1804,039Q00Z ",.02)
 ;;039Q00Z 
 ;;9002226.02101,"1804,039Q00Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039Q0ZZ ",.01)
 ;;039Q0ZZ 
 ;;9002226.02101,"1804,039Q0ZZ ",.02)
 ;;039Q0ZZ 
 ;;9002226.02101,"1804,039Q0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039Q30Z ",.01)
 ;;039Q30Z 
 ;;9002226.02101,"1804,039Q30Z ",.02)
 ;;039Q30Z 
 ;;9002226.02101,"1804,039Q30Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039Q3ZZ ",.01)
 ;;039Q3ZZ 
 ;;9002226.02101,"1804,039Q3ZZ ",.02)
 ;;039Q3ZZ 
 ;;9002226.02101,"1804,039Q3ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039Q40Z ",.01)
 ;;039Q40Z 
 ;;9002226.02101,"1804,039Q40Z ",.02)
 ;;039Q40Z 
 ;;9002226.02101,"1804,039Q40Z ",.03)
 ;;31
 ;;9002226.02101,"1804,039Q4ZZ ",.01)
 ;;039Q4ZZ 
 ;;9002226.02101,"1804,039Q4ZZ ",.02)
 ;;039Q4ZZ 
 ;;9002226.02101,"1804,039Q4ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,039R00Z ",.01)
 ;;039R00Z 
 ;;9002226.02101,"1804,039R00Z ",.02)
 ;;039R00Z