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

ATXXA106.m

Go to the documentation of this file.
  1. ATXXA106 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
  1. ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"873,S75.192A ",.02)
  1. ;;S75.192A
  1. ;;9002226.02101,"873,S75.192A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.199A ",.01)
  1. ;;S75.199A
  1. ;;9002226.02101,"873,S75.199A ",.02)
  1. ;;S75.199A
  1. ;;9002226.02101,"873,S75.199A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.201A ",.01)
  1. ;;S75.201A
  1. ;;9002226.02101,"873,S75.201A ",.02)
  1. ;;S75.201A
  1. ;;9002226.02101,"873,S75.201A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.202A ",.01)
  1. ;;S75.202A
  1. ;;9002226.02101,"873,S75.202A ",.02)
  1. ;;S75.202A
  1. ;;9002226.02101,"873,S75.202A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.209A ",.01)
  1. ;;S75.209A
  1. ;;9002226.02101,"873,S75.209A ",.02)
  1. ;;S75.209A
  1. ;;9002226.02101,"873,S75.209A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.211A ",.01)
  1. ;;S75.211A
  1. ;;9002226.02101,"873,S75.211A ",.02)
  1. ;;S75.211A
  1. ;;9002226.02101,"873,S75.211A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.212A ",.01)
  1. ;;S75.212A
  1. ;;9002226.02101,"873,S75.212A ",.02)
  1. ;;S75.212A
  1. ;;9002226.02101,"873,S75.212A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.219A ",.01)
  1. ;;S75.219A
  1. ;;9002226.02101,"873,S75.219A ",.02)
  1. ;;S75.219A
  1. ;;9002226.02101,"873,S75.219A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.221A ",.01)
  1. ;;S75.221A
  1. ;;9002226.02101,"873,S75.221A ",.02)
  1. ;;S75.221A
  1. ;;9002226.02101,"873,S75.221A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.222A ",.01)
  1. ;;S75.222A
  1. ;;9002226.02101,"873,S75.222A ",.02)
  1. ;;S75.222A
  1. ;;9002226.02101,"873,S75.222A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.229A ",.01)
  1. ;;S75.229A
  1. ;;9002226.02101,"873,S75.229A ",.02)
  1. ;;S75.229A
  1. ;;9002226.02101,"873,S75.229A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.291A ",.01)
  1. ;;S75.291A
  1. ;;9002226.02101,"873,S75.291A ",.02)
  1. ;;S75.291A
  1. ;;9002226.02101,"873,S75.291A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.292A ",.01)
  1. ;;S75.292A
  1. ;;9002226.02101,"873,S75.292A ",.02)
  1. ;;S75.292A
  1. ;;9002226.02101,"873,S75.292A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.299A ",.01)
  1. ;;S75.299A
  1. ;;9002226.02101,"873,S75.299A ",.02)
  1. ;;S75.299A
  1. ;;9002226.02101,"873,S75.299A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.801A ",.01)
  1. ;;S75.801A
  1. ;;9002226.02101,"873,S75.801A ",.02)
  1. ;;S75.801A
  1. ;;9002226.02101,"873,S75.801A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.802A ",.01)
  1. ;;S75.802A
  1. ;;9002226.02101,"873,S75.802A ",.02)
  1. ;;S75.802A
  1. ;;9002226.02101,"873,S75.802A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.809A ",.01)
  1. ;;S75.809A
  1. ;;9002226.02101,"873,S75.809A ",.02)
  1. ;;S75.809A
  1. ;;9002226.02101,"873,S75.809A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.811A ",.01)
  1. ;;S75.811A
  1. ;;9002226.02101,"873,S75.811A ",.02)
  1. ;;S75.811A
  1. ;;9002226.02101,"873,S75.811A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.812A ",.01)
  1. ;;S75.812A
  1. ;;9002226.02101,"873,S75.812A ",.02)
  1. ;;S75.812A
  1. ;;9002226.02101,"873,S75.812A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.819A ",.01)
  1. ;;S75.819A
  1. ;;9002226.02101,"873,S75.819A ",.02)
  1. ;;S75.819A
  1. ;;9002226.02101,"873,S75.819A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.891A ",.01)
  1. ;;S75.891A
  1. ;;9002226.02101,"873,S75.891A ",.02)
  1. ;;S75.891A
  1. ;;9002226.02101,"873,S75.891A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.892A ",.01)
  1. ;;S75.892A
  1. ;;9002226.02101,"873,S75.892A ",.02)
  1. ;;S75.892A
  1. ;;9002226.02101,"873,S75.892A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.899A ",.01)
  1. ;;S75.899A
  1. ;;9002226.02101,"873,S75.899A ",.02)
  1. ;;S75.899A
  1. ;;9002226.02101,"873,S75.899A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.901A ",.01)
  1. ;;S75.901A
  1. ;;9002226.02101,"873,S75.901A ",.02)
  1. ;;S75.901A
  1. ;;9002226.02101,"873,S75.901A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.902A ",.01)
  1. ;;S75.902A
  1. ;;9002226.02101,"873,S75.902A ",.02)
  1. ;;S75.902A
  1. ;;9002226.02101,"873,S75.902A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.909A ",.01)
  1. ;;S75.909A
  1. ;;9002226.02101,"873,S75.909A ",.02)
  1. ;;S75.909A
  1. ;;9002226.02101,"873,S75.909A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.911A ",.01)
  1. ;;S75.911A
  1. ;;9002226.02101,"873,S75.911A ",.02)
  1. ;;S75.911A
  1. ;;9002226.02101,"873,S75.911A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.912A ",.01)
  1. ;;S75.912A
  1. ;;9002226.02101,"873,S75.912A ",.02)
  1. ;;S75.912A
  1. ;;9002226.02101,"873,S75.912A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.919A ",.01)
  1. ;;S75.919A
  1. ;;9002226.02101,"873,S75.919A ",.02)
  1. ;;S75.919A
  1. ;;9002226.02101,"873,S75.919A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.991A ",.01)
  1. ;;S75.991A
  1. ;;9002226.02101,"873,S75.991A ",.02)
  1. ;;S75.991A
  1. ;;9002226.02101,"873,S75.991A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.992A ",.01)
  1. ;;S75.992A
  1. ;;9002226.02101,"873,S75.992A ",.02)
  1. ;;S75.992A
  1. ;;9002226.02101,"873,S75.992A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S75.999A ",.01)
  1. ;;S75.999A
  1. ;;9002226.02101,"873,S75.999A ",.02)
  1. ;;S75.999A
  1. ;;9002226.02101,"873,S75.999A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.001A ",.01)
  1. ;;S76.001A
  1. ;;9002226.02101,"873,S76.001A ",.02)
  1. ;;S76.001A
  1. ;;9002226.02101,"873,S76.001A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.002A ",.01)
  1. ;;S76.002A
  1. ;;9002226.02101,"873,S76.002A ",.02)
  1. ;;S76.002A
  1. ;;9002226.02101,"873,S76.002A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.009A ",.01)
  1. ;;S76.009A
  1. ;;9002226.02101,"873,S76.009A ",.02)
  1. ;;S76.009A
  1. ;;9002226.02101,"873,S76.009A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.011A ",.01)
  1. ;;S76.011A
  1. ;;9002226.02101,"873,S76.011A ",.02)
  1. ;;S76.011A
  1. ;;9002226.02101,"873,S76.011A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.012A ",.01)
  1. ;;S76.012A
  1. ;;9002226.02101,"873,S76.012A ",.02)
  1. ;;S76.012A
  1. ;;9002226.02101,"873,S76.012A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.019A ",.01)
  1. ;;S76.019A
  1. ;;9002226.02101,"873,S76.019A ",.02)
  1. ;;S76.019A
  1. ;;9002226.02101,"873,S76.019A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.021A ",.01)
  1. ;;S76.021A
  1. ;;9002226.02101,"873,S76.021A ",.02)
  1. ;;S76.021A
  1. ;;9002226.02101,"873,S76.021A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.022A ",.01)
  1. ;;S76.022A
  1. ;;9002226.02101,"873,S76.022A ",.02)
  1. ;;S76.022A
  1. ;;9002226.02101,"873,S76.022A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.029A ",.01)
  1. ;;S76.029A
  1. ;;9002226.02101,"873,S76.029A ",.02)
  1. ;;S76.029A
  1. ;;9002226.02101,"873,S76.029A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.091A ",.01)
  1. ;;S76.091A
  1. ;;9002226.02101,"873,S76.091A ",.02)
  1. ;;S76.091A
  1. ;;9002226.02101,"873,S76.091A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.092A ",.01)
  1. ;;S76.092A
  1. ;;9002226.02101,"873,S76.092A ",.02)
  1. ;;S76.092A
  1. ;;9002226.02101,"873,S76.092A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.099A ",.01)
  1. ;;S76.099A
  1. ;;9002226.02101,"873,S76.099A ",.02)
  1. ;;S76.099A
  1. ;;9002226.02101,"873,S76.099A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.101A ",.01)
  1. ;;S76.101A
  1. ;;9002226.02101,"873,S76.101A ",.02)
  1. ;;S76.101A
  1. ;;9002226.02101,"873,S76.101A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.102A ",.01)
  1. ;;S76.102A
  1. ;;9002226.02101,"873,S76.102A ",.02)
  1. ;;S76.102A
  1. ;;9002226.02101,"873,S76.102A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.109A ",.01)
  1. ;;S76.109A
  1. ;;9002226.02101,"873,S76.109A ",.02)
  1. ;;S76.109A
  1. ;;9002226.02101,"873,S76.109A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.111A ",.01)
  1. ;;S76.111A
  1. ;;9002226.02101,"873,S76.111A ",.02)
  1. ;;S76.111A
  1. ;;9002226.02101,"873,S76.111A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.112A ",.01)
  1. ;;S76.112A
  1. ;;9002226.02101,"873,S76.112A ",.02)
  1. ;;S76.112A
  1. ;;9002226.02101,"873,S76.112A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.119A ",.01)
  1. ;;S76.119A
  1. ;;9002226.02101,"873,S76.119A ",.02)
  1. ;;S76.119A
  1. ;;9002226.02101,"873,S76.119A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.121A ",.01)
  1. ;;S76.121A
  1. ;;9002226.02101,"873,S76.121A ",.02)
  1. ;;S76.121A
  1. ;;9002226.02101,"873,S76.121A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.122A ",.01)
  1. ;;S76.122A
  1. ;;9002226.02101,"873,S76.122A ",.02)
  1. ;;S76.122A
  1. ;;9002226.02101,"873,S76.122A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.129A ",.01)
  1. ;;S76.129A
  1. ;;9002226.02101,"873,S76.129A ",.02)
  1. ;;S76.129A
  1. ;;9002226.02101,"873,S76.129A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.191A ",.01)
  1. ;;S76.191A
  1. ;;9002226.02101,"873,S76.191A ",.02)
  1. ;;S76.191A
  1. ;;9002226.02101,"873,S76.191A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.192A ",.01)
  1. ;;S76.192A
  1. ;;9002226.02101,"873,S76.192A ",.02)
  1. ;;S76.192A
  1. ;;9002226.02101,"873,S76.192A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.199A ",.01)
  1. ;;S76.199A
  1. ;;9002226.02101,"873,S76.199A ",.02)
  1. ;;S76.199A
  1. ;;9002226.02101,"873,S76.199A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.201A ",.01)
  1. ;;S76.201A
  1. ;;9002226.02101,"873,S76.201A ",.02)
  1. ;;S76.201A
  1. ;;9002226.02101,"873,S76.201A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.202A ",.01)
  1. ;;S76.202A
  1. ;;9002226.02101,"873,S76.202A ",.02)
  1. ;;S76.202A
  1. ;;9002226.02101,"873,S76.202A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.209A ",.01)
  1. ;;S76.209A
  1. ;;9002226.02101,"873,S76.209A ",.02)
  1. ;;S76.209A
  1. ;;9002226.02101,"873,S76.209A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.211A ",.01)
  1. ;;S76.211A
  1. ;;9002226.02101,"873,S76.211A ",.02)
  1. ;;S76.211A
  1. ;;9002226.02101,"873,S76.211A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.212A ",.01)
  1. ;;S76.212A
  1. ;;9002226.02101,"873,S76.212A ",.02)
  1. ;;S76.212A
  1. ;;9002226.02101,"873,S76.212A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.219A ",.01)
  1. ;;S76.219A
  1. ;;9002226.02101,"873,S76.219A ",.02)
  1. ;;S76.219A
  1. ;;9002226.02101,"873,S76.219A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.221A ",.01)
  1. ;;S76.221A
  1. ;;9002226.02101,"873,S76.221A ",.02)
  1. ;;S76.221A
  1. ;;9002226.02101,"873,S76.221A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.222A ",.01)
  1. ;;S76.222A
  1. ;;9002226.02101,"873,S76.222A ",.02)
  1. ;;S76.222A
  1. ;;9002226.02101,"873,S76.222A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.229A ",.01)
  1. ;;S76.229A
  1. ;;9002226.02101,"873,S76.229A ",.02)
  1. ;;S76.229A
  1. ;;9002226.02101,"873,S76.229A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.291A ",.01)
  1. ;;S76.291A
  1. ;;9002226.02101,"873,S76.291A ",.02)
  1. ;;S76.291A
  1. ;;9002226.02101,"873,S76.291A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.292A ",.01)
  1. ;;S76.292A
  1. ;;9002226.02101,"873,S76.292A ",.02)
  1. ;;S76.292A
  1. ;;9002226.02101,"873,S76.292A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.299A ",.01)
  1. ;;S76.299A
  1. ;;9002226.02101,"873,S76.299A ",.02)
  1. ;;S76.299A
  1. ;;9002226.02101,"873,S76.299A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.301A ",.01)
  1. ;;S76.301A
  1. ;;9002226.02101,"873,S76.301A ",.02)
  1. ;;S76.301A
  1. ;;9002226.02101,"873,S76.301A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.302A ",.01)
  1. ;;S76.302A
  1. ;;9002226.02101,"873,S76.302A ",.02)
  1. ;;S76.302A
  1. ;;9002226.02101,"873,S76.302A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.309A ",.01)
  1. ;;S76.309A
  1. ;;9002226.02101,"873,S76.309A ",.02)
  1. ;;S76.309A
  1. ;;9002226.02101,"873,S76.309A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.311A ",.01)
  1. ;;S76.311A
  1. ;;9002226.02101,"873,S76.311A ",.02)
  1. ;;S76.311A
  1. ;;9002226.02101,"873,S76.311A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.312A ",.01)
  1. ;;S76.312A
  1. ;;9002226.02101,"873,S76.312A ",.02)
  1. ;;S76.312A
  1. ;;9002226.02101,"873,S76.312A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.319A ",.01)
  1. ;;S76.319A
  1. ;;9002226.02101,"873,S76.319A ",.02)
  1. ;;S76.319A
  1. ;;9002226.02101,"873,S76.319A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.321A ",.01)
  1. ;;S76.321A
  1. ;;9002226.02101,"873,S76.321A ",.02)
  1. ;;S76.321A
  1. ;;9002226.02101,"873,S76.321A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.322A ",.01)
  1. ;;S76.322A
  1. ;;9002226.02101,"873,S76.322A ",.02)
  1. ;;S76.322A
  1. ;;9002226.02101,"873,S76.322A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.329A ",.01)
  1. ;;S76.329A
  1. ;;9002226.02101,"873,S76.329A ",.02)
  1. ;;S76.329A
  1. ;;9002226.02101,"873,S76.329A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.391A ",.01)
  1. ;;S76.391A
  1. ;;9002226.02101,"873,S76.391A ",.02)
  1. ;;S76.391A
  1. ;;9002226.02101,"873,S76.391A ",.03)
  1. ;;30
  1. ;;9002226.02101,"873,S76.392A ",.01)
  1. ;;S76.392A
  1. ;;9002226.02101,"873,S76.392A ",.02)
  1. ;;S76.392A