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

ATXXB178.m

Go to the documentation of this file.
ATXXB178 ;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,B217YZZ ",.01)
 ;;B217YZZ 
 ;;9002226.02101,"1804,B217YZZ ",.02)
 ;;B217YZZ 
 ;;9002226.02101,"1804,B217YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B2180ZZ ",.01)
 ;;B2180ZZ 
 ;;9002226.02101,"1804,B2180ZZ ",.02)
 ;;B2180ZZ 
 ;;9002226.02101,"1804,B2180ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B2181ZZ ",.01)
 ;;B2181ZZ 
 ;;9002226.02101,"1804,B2181ZZ ",.02)
 ;;B2181ZZ 
 ;;9002226.02101,"1804,B2181ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B218YZZ ",.01)
 ;;B218YZZ 
 ;;9002226.02101,"1804,B218YZZ ",.02)
 ;;B218YZZ 
 ;;9002226.02101,"1804,B218YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B21F0ZZ ",.01)
 ;;B21F0ZZ 
 ;;9002226.02101,"1804,B21F0ZZ ",.02)
 ;;B21F0ZZ 
 ;;9002226.02101,"1804,B21F0ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B21F1ZZ ",.01)
 ;;B21F1ZZ 
 ;;9002226.02101,"1804,B21F1ZZ ",.02)
 ;;B21F1ZZ 
 ;;9002226.02101,"1804,B21F1ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B21FYZZ ",.01)
 ;;B21FYZZ 
 ;;9002226.02101,"1804,B21FYZZ ",.02)
 ;;B21FYZZ 
 ;;9002226.02101,"1804,B21FYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B22100Z ",.01)
 ;;B22100Z 
 ;;9002226.02101,"1804,B22100Z ",.02)
 ;;B22100Z 
 ;;9002226.02101,"1804,B22100Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B2210ZZ ",.01)
 ;;B2210ZZ 
 ;;9002226.02101,"1804,B2210ZZ ",.02)
 ;;B2210ZZ 
 ;;9002226.02101,"1804,B2210ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B22110Z ",.01)
 ;;B22110Z 
 ;;9002226.02101,"1804,B22110Z ",.02)
 ;;B22110Z 
 ;;9002226.02101,"1804,B22110Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B2211ZZ ",.01)
 ;;B2211ZZ 
 ;;9002226.02101,"1804,B2211ZZ ",.02)
 ;;B2211ZZ 
 ;;9002226.02101,"1804,B2211ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B221Y0Z ",.01)
 ;;B221Y0Z 
 ;;9002226.02101,"1804,B221Y0Z ",.02)
 ;;B221Y0Z 
 ;;9002226.02101,"1804,B221Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B221YZZ ",.01)
 ;;B221YZZ 
 ;;9002226.02101,"1804,B221YZZ ",.02)
 ;;B221YZZ 
 ;;9002226.02101,"1804,B221YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B221ZZZ ",.01)
 ;;B221ZZZ 
 ;;9002226.02101,"1804,B221ZZZ ",.02)
 ;;B221ZZZ 
 ;;9002226.02101,"1804,B221ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B22300Z ",.01)
 ;;B22300Z 
 ;;9002226.02101,"1804,B22300Z ",.02)
 ;;B22300Z 
 ;;9002226.02101,"1804,B22300Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B2230ZZ ",.01)
 ;;B2230ZZ 
 ;;9002226.02101,"1804,B2230ZZ ",.02)
 ;;B2230ZZ 
 ;;9002226.02101,"1804,B2230ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B22310Z ",.01)
 ;;B22310Z 
 ;;9002226.02101,"1804,B22310Z ",.02)
 ;;B22310Z 
 ;;9002226.02101,"1804,B22310Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B2231ZZ ",.01)
 ;;B2231ZZ 
 ;;9002226.02101,"1804,B2231ZZ ",.02)
 ;;B2231ZZ 
 ;;9002226.02101,"1804,B2231ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B223Y0Z ",.01)
 ;;B223Y0Z 
 ;;9002226.02101,"1804,B223Y0Z ",.02)
 ;;B223Y0Z 
 ;;9002226.02101,"1804,B223Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B223YZZ ",.01)
 ;;B223YZZ 
 ;;9002226.02101,"1804,B223YZZ ",.02)
 ;;B223YZZ 
 ;;9002226.02101,"1804,B223YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B223ZZZ ",.01)
 ;;B223ZZZ 
 ;;9002226.02101,"1804,B223ZZZ ",.02)
 ;;B223ZZZ 
 ;;9002226.02101,"1804,B223ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B22600Z ",.01)
 ;;B22600Z 
 ;;9002226.02101,"1804,B22600Z ",.02)
 ;;B22600Z 
 ;;9002226.02101,"1804,B22600Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B2260ZZ ",.01)
 ;;B2260ZZ 
 ;;9002226.02101,"1804,B2260ZZ ",.02)
 ;;B2260ZZ 
 ;;9002226.02101,"1804,B2260ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B22610Z ",.01)
 ;;B22610Z 
 ;;9002226.02101,"1804,B22610Z ",.02)
 ;;B22610Z 
 ;;9002226.02101,"1804,B22610Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B2261ZZ ",.01)
 ;;B2261ZZ 
 ;;9002226.02101,"1804,B2261ZZ ",.02)
 ;;B2261ZZ 
 ;;9002226.02101,"1804,B2261ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B226Y0Z ",.01)
 ;;B226Y0Z 
 ;;9002226.02101,"1804,B226Y0Z ",.02)
 ;;B226Y0Z 
 ;;9002226.02101,"1804,B226Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B226YZZ ",.01)
 ;;B226YZZ 
 ;;9002226.02101,"1804,B226YZZ ",.02)
 ;;B226YZZ 
 ;;9002226.02101,"1804,B226YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B226ZZZ ",.01)
 ;;B226ZZZ 
 ;;9002226.02101,"1804,B226ZZZ ",.02)
 ;;B226ZZZ 
 ;;9002226.02101,"1804,B226ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B231Y0Z ",.01)
 ;;B231Y0Z 
 ;;9002226.02101,"1804,B231Y0Z ",.02)
 ;;B231Y0Z 
 ;;9002226.02101,"1804,B231Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B231YZZ ",.01)
 ;;B231YZZ 
 ;;9002226.02101,"1804,B231YZZ ",.02)
 ;;B231YZZ 
 ;;9002226.02101,"1804,B231YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B231ZZZ ",.01)
 ;;B231ZZZ 
 ;;9002226.02101,"1804,B231ZZZ ",.02)
 ;;B231ZZZ 
 ;;9002226.02101,"1804,B231ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B233Y0Z ",.01)
 ;;B233Y0Z 
 ;;9002226.02101,"1804,B233Y0Z ",.02)
 ;;B233Y0Z 
 ;;9002226.02101,"1804,B233Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B233YZZ ",.01)
 ;;B233YZZ 
 ;;9002226.02101,"1804,B233YZZ ",.02)
 ;;B233YZZ 
 ;;9002226.02101,"1804,B233YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B233ZZZ ",.01)
 ;;B233ZZZ 
 ;;9002226.02101,"1804,B233ZZZ ",.02)
 ;;B233ZZZ 
 ;;9002226.02101,"1804,B233ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B236Y0Z ",.01)
 ;;B236Y0Z 
 ;;9002226.02101,"1804,B236Y0Z ",.02)
 ;;B236Y0Z 
 ;;9002226.02101,"1804,B236Y0Z ",.03)
 ;;31
 ;;9002226.02101,"1804,B236YZZ ",.01)
 ;;B236YZZ 
 ;;9002226.02101,"1804,B236YZZ ",.02)
 ;;B236YZZ 
 ;;9002226.02101,"1804,B236YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B236ZZZ ",.01)
 ;;B236ZZZ 
 ;;9002226.02101,"1804,B236ZZZ ",.02)
 ;;B236ZZZ 
 ;;9002226.02101,"1804,B236ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B240YZZ ",.01)
 ;;B240YZZ 
 ;;9002226.02101,"1804,B240YZZ ",.02)
 ;;B240YZZ 
 ;;9002226.02101,"1804,B240YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B240ZZ4 ",.01)
 ;;B240ZZ4 
 ;;9002226.02101,"1804,B240ZZ4 ",.02)
 ;;B240ZZ4 
 ;;9002226.02101,"1804,B240ZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B240ZZZ ",.01)
 ;;B240ZZZ 
 ;;9002226.02101,"1804,B240ZZZ ",.02)
 ;;B240ZZZ 
 ;;9002226.02101,"1804,B240ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B241YZZ ",.01)
 ;;B241YZZ 
 ;;9002226.02101,"1804,B241YZZ ",.02)
 ;;B241YZZ 
 ;;9002226.02101,"1804,B241YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B241ZZ4 ",.01)
 ;;B241ZZ4 
 ;;9002226.02101,"1804,B241ZZ4 ",.02)
 ;;B241ZZ4 
 ;;9002226.02101,"1804,B241ZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B241ZZZ ",.01)
 ;;B241ZZZ 
 ;;9002226.02101,"1804,B241ZZZ ",.02)
 ;;B241ZZZ 
 ;;9002226.02101,"1804,B241ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B244YZZ ",.01)
 ;;B244YZZ 
 ;;9002226.02101,"1804,B244YZZ ",.02)
 ;;B244YZZ 
 ;;9002226.02101,"1804,B244YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B244ZZ4 ",.01)
 ;;B244ZZ4 
 ;;9002226.02101,"1804,B244ZZ4 ",.02)
 ;;B244ZZ4 
 ;;9002226.02101,"1804,B244ZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B244ZZZ ",.01)
 ;;B244ZZZ 
 ;;9002226.02101,"1804,B244ZZZ ",.02)
 ;;B244ZZZ 
 ;;9002226.02101,"1804,B244ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B245YZZ ",.01)
 ;;B245YZZ 
 ;;9002226.02101,"1804,B245YZZ ",.02)
 ;;B245YZZ 
 ;;9002226.02101,"1804,B245YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B245ZZ4 ",.01)
 ;;B245ZZ4 
 ;;9002226.02101,"1804,B245ZZ4 ",.02)
 ;;B245ZZ4 
 ;;9002226.02101,"1804,B245ZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B245ZZZ ",.01)
 ;;B245ZZZ 
 ;;9002226.02101,"1804,B245ZZZ ",.02)
 ;;B245ZZZ 
 ;;9002226.02101,"1804,B245ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B246YZZ ",.01)
 ;;B246YZZ 
 ;;9002226.02101,"1804,B246YZZ ",.02)
 ;;B246YZZ 
 ;;9002226.02101,"1804,B246YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B246ZZ4 ",.01)
 ;;B246ZZ4 
 ;;9002226.02101,"1804,B246ZZ4 ",.02)
 ;;B246ZZ4 
 ;;9002226.02101,"1804,B246ZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B246ZZZ ",.01)
 ;;B246ZZZ 
 ;;9002226.02101,"1804,B246ZZZ ",.02)
 ;;B246ZZZ 
 ;;9002226.02101,"1804,B246ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B24BYZZ ",.01)
 ;;B24BYZZ 
 ;;9002226.02101,"1804,B24BYZZ ",.02)
 ;;B24BYZZ 
 ;;9002226.02101,"1804,B24BYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B24BZZ4 ",.01)
 ;;B24BZZ4 
 ;;9002226.02101,"1804,B24BZZ4 ",.02)
 ;;B24BZZ4 
 ;;9002226.02101,"1804,B24BZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B24BZZZ ",.01)
 ;;B24BZZZ 
 ;;9002226.02101,"1804,B24BZZZ ",.02)
 ;;B24BZZZ 
 ;;9002226.02101,"1804,B24BZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B24CYZZ ",.01)
 ;;B24CYZZ 
 ;;9002226.02101,"1804,B24CYZZ ",.02)
 ;;B24CYZZ 
 ;;9002226.02101,"1804,B24CYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B24CZZ4 ",.01)
 ;;B24CZZ4 
 ;;9002226.02101,"1804,B24CZZ4 ",.02)
 ;;B24CZZ4 
 ;;9002226.02101,"1804,B24CZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B24CZZZ ",.01)
 ;;B24CZZZ 
 ;;9002226.02101,"1804,B24CZZZ ",.02)
 ;;B24CZZZ 
 ;;9002226.02101,"1804,B24CZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B24DYZZ ",.01)
 ;;B24DYZZ 
 ;;9002226.02101,"1804,B24DYZZ ",.02)
 ;;B24DYZZ 
 ;;9002226.02101,"1804,B24DYZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B24DZZ4 ",.01)
 ;;B24DZZ4 
 ;;9002226.02101,"1804,B24DZZ4 ",.02)
 ;;B24DZZ4 
 ;;9002226.02101,"1804,B24DZZ4 ",.03)
 ;;31
 ;;9002226.02101,"1804,B24DZZZ ",.01)
 ;;B24DZZZ 
 ;;9002226.02101,"1804,B24DZZZ ",.02)
 ;;B24DZZZ 
 ;;9002226.02101,"1804,B24DZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3000ZZ ",.01)
 ;;B3000ZZ 
 ;;9002226.02101,"1804,B3000ZZ ",.02)
 ;;B3000ZZ 
 ;;9002226.02101,"1804,B3000ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3001ZZ ",.01)
 ;;B3001ZZ 
 ;;9002226.02101,"1804,B3001ZZ ",.02)
 ;;B3001ZZ 
 ;;9002226.02101,"1804,B3001ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B300YZZ ",.01)
 ;;B300YZZ 
 ;;9002226.02101,"1804,B300YZZ ",.02)
 ;;B300YZZ 
 ;;9002226.02101,"1804,B300YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B300ZZZ ",.01)
 ;;B300ZZZ 
 ;;9002226.02101,"1804,B300ZZZ ",.02)
 ;;B300ZZZ 
 ;;9002226.02101,"1804,B300ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3010ZZ ",.01)
 ;;B3010ZZ 
 ;;9002226.02101,"1804,B3010ZZ ",.02)
 ;;B3010ZZ 
 ;;9002226.02101,"1804,B3010ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3011ZZ ",.01)
 ;;B3011ZZ 
 ;;9002226.02101,"1804,B3011ZZ ",.02)
 ;;B3011ZZ 
 ;;9002226.02101,"1804,B3011ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B301YZZ ",.01)
 ;;B301YZZ 
 ;;9002226.02101,"1804,B301YZZ ",.02)
 ;;B301YZZ 
 ;;9002226.02101,"1804,B301YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B301ZZZ ",.01)
 ;;B301ZZZ 
 ;;9002226.02101,"1804,B301ZZZ ",.02)
 ;;B301ZZZ 
 ;;9002226.02101,"1804,B301ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3020ZZ ",.01)
 ;;B3020ZZ 
 ;;9002226.02101,"1804,B3020ZZ ",.02)
 ;;B3020ZZ 
 ;;9002226.02101,"1804,B3020ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3021ZZ ",.01)
 ;;B3021ZZ 
 ;;9002226.02101,"1804,B3021ZZ ",.02)
 ;;B3021ZZ 
 ;;9002226.02101,"1804,B3021ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B302YZZ ",.01)
 ;;B302YZZ 
 ;;9002226.02101,"1804,B302YZZ ",.02)
 ;;B302YZZ 
 ;;9002226.02101,"1804,B302YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B302ZZZ ",.01)
 ;;B302ZZZ 
 ;;9002226.02101,"1804,B302ZZZ ",.02)
 ;;B302ZZZ 
 ;;9002226.02101,"1804,B302ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3030ZZ ",.01)
 ;;B3030ZZ 
 ;;9002226.02101,"1804,B3030ZZ ",.02)
 ;;B3030ZZ 
 ;;9002226.02101,"1804,B3030ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3031ZZ ",.01)
 ;;B3031ZZ 
 ;;9002226.02101,"1804,B3031ZZ ",.02)
 ;;B3031ZZ 
 ;;9002226.02101,"1804,B3031ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B303YZZ ",.01)
 ;;B303YZZ 
 ;;9002226.02101,"1804,B303YZZ ",.02)
 ;;B303YZZ 
 ;;9002226.02101,"1804,B303YZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B303ZZZ ",.01)
 ;;B303ZZZ 
 ;;9002226.02101,"1804,B303ZZZ ",.02)
 ;;B303ZZZ 
 ;;9002226.02101,"1804,B303ZZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3040ZZ ",.01)
 ;;B3040ZZ 
 ;;9002226.02101,"1804,B3040ZZ ",.02)
 ;;B3040ZZ 
 ;;9002226.02101,"1804,B3040ZZ ",.03)
 ;;31
 ;;9002226.02101,"1804,B3041ZZ ",.01)
 ;;B3041ZZ