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

ATXF6C6.m

Go to the documentation of this file.
  1. ATXF6C6 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON DEC 20, 2016 ;
  1. ;;5.1;TAXONOMY;**19**;FEB 04, 1997;Build 32
  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,"2074,O46.022 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O46.092 ",.01)
  1. ;;O46.092
  1. ;;9002226.02101,"2074,O46.092 ",.02)
  1. ;;O46.092
  1. ;;9002226.02101,"2074,O46.092 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O46.8X2 ",.01)
  1. ;;O46.8X2
  1. ;;9002226.02101,"2074,O46.8X2 ",.02)
  1. ;;O46.8X2
  1. ;;9002226.02101,"2074,O46.8X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O46.92 ",.01)
  1. ;;O46.92
  1. ;;9002226.02101,"2074,O46.92 ",.02)
  1. ;;O46.92
  1. ;;9002226.02101,"2074,O46.92 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O47.02 ",.01)
  1. ;;O47.02
  1. ;;9002226.02101,"2074,O47.02 ",.02)
  1. ;;O47.02
  1. ;;9002226.02101,"2074,O47.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O60.02 ",.01)
  1. ;;O60.02
  1. ;;9002226.02101,"2074,O60.02 ",.02)
  1. ;;O60.02
  1. ;;9002226.02101,"2074,O60.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O71.02 ",.01)
  1. ;;O71.02
  1. ;;9002226.02101,"2074,O71.02 ",.02)
  1. ;;O71.02
  1. ;;9002226.02101,"2074,O71.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O88.012 ",.01)
  1. ;;O88.012
  1. ;;9002226.02101,"2074,O88.012 ",.02)
  1. ;;O88.012
  1. ;;9002226.02101,"2074,O88.012 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O88.112 ",.01)
  1. ;;O88.112
  1. ;;9002226.02101,"2074,O88.112 ",.02)
  1. ;;O88.112
  1. ;;9002226.02101,"2074,O88.112 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O88.212 ",.01)
  1. ;;O88.212
  1. ;;9002226.02101,"2074,O88.212 ",.02)
  1. ;;O88.212
  1. ;;9002226.02101,"2074,O88.212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O88.312 ",.01)
  1. ;;O88.312
  1. ;;9002226.02101,"2074,O88.312 ",.02)
  1. ;;O88.312
  1. ;;9002226.02101,"2074,O88.312 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O88.812 ",.01)
  1. ;;O88.812
  1. ;;9002226.02101,"2074,O88.812 ",.02)
  1. ;;O88.812
  1. ;;9002226.02101,"2074,O88.812 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O91.012 ",.01)
  1. ;;O91.012
  1. ;;9002226.02101,"2074,O91.012 ",.02)
  1. ;;O91.012
  1. ;;9002226.02101,"2074,O91.012 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O91.112 ",.01)
  1. ;;O91.112
  1. ;;9002226.02101,"2074,O91.112 ",.02)
  1. ;;O91.112
  1. ;;9002226.02101,"2074,O91.112 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O91.212 ",.01)
  1. ;;O91.212
  1. ;;9002226.02101,"2074,O91.212 ",.02)
  1. ;;O91.212
  1. ;;9002226.02101,"2074,O91.212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O92.012 ",.01)
  1. ;;O92.012
  1. ;;9002226.02101,"2074,O92.012 ",.02)
  1. ;;O92.012
  1. ;;9002226.02101,"2074,O92.012 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.012 ",.01)
  1. ;;O98.012
  1. ;;9002226.02101,"2074,O98.012 ",.02)
  1. ;;O98.012
  1. ;;9002226.02101,"2074,O98.012 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.112 ",.01)
  1. ;;O98.112
  1. ;;9002226.02101,"2074,O98.112 ",.02)
  1. ;;O98.112
  1. ;;9002226.02101,"2074,O98.112 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.212 ",.01)
  1. ;;O98.212
  1. ;;9002226.02101,"2074,O98.212 ",.02)
  1. ;;O98.212
  1. ;;9002226.02101,"2074,O98.212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.312 ",.01)
  1. ;;O98.312
  1. ;;9002226.02101,"2074,O98.312 ",.02)
  1. ;;O98.312
  1. ;;9002226.02101,"2074,O98.312 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.412 ",.01)
  1. ;;O98.412
  1. ;;9002226.02101,"2074,O98.412 ",.02)
  1. ;;O98.412
  1. ;;9002226.02101,"2074,O98.412 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.512 ",.01)
  1. ;;O98.512
  1. ;;9002226.02101,"2074,O98.512 ",.02)
  1. ;;O98.512
  1. ;;9002226.02101,"2074,O98.512 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.612 ",.01)
  1. ;;O98.612
  1. ;;9002226.02101,"2074,O98.612 ",.02)
  1. ;;O98.612
  1. ;;9002226.02101,"2074,O98.612 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.712 ",.01)
  1. ;;O98.712
  1. ;;9002226.02101,"2074,O98.712 ",.02)
  1. ;;O98.712
  1. ;;9002226.02101,"2074,O98.712 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.812 ",.01)
  1. ;;O98.812
  1. ;;9002226.02101,"2074,O98.812 ",.02)
  1. ;;O98.812
  1. ;;9002226.02101,"2074,O98.812 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O98.912 ",.01)
  1. ;;O98.912
  1. ;;9002226.02101,"2074,O98.912 ",.02)
  1. ;;O98.912
  1. ;;9002226.02101,"2074,O98.912 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.012 ",.01)
  1. ;;O99.012
  1. ;;9002226.02101,"2074,O99.012 ",.02)
  1. ;;O99.012
  1. ;;9002226.02101,"2074,O99.012 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.112 ",.01)
  1. ;;O99.112
  1. ;;9002226.02101,"2074,O99.112 ",.02)
  1. ;;O99.112
  1. ;;9002226.02101,"2074,O99.112 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.212 ",.01)
  1. ;;O99.212
  1. ;;9002226.02101,"2074,O99.212 ",.02)
  1. ;;O99.212
  1. ;;9002226.02101,"2074,O99.212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.282 ",.01)
  1. ;;O99.282
  1. ;;9002226.02101,"2074,O99.282 ",.02)
  1. ;;O99.282
  1. ;;9002226.02101,"2074,O99.282 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.312 ",.01)
  1. ;;O99.312
  1. ;;9002226.02101,"2074,O99.312 ",.02)
  1. ;;O99.312
  1. ;;9002226.02101,"2074,O99.312 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.322 ",.01)
  1. ;;O99.322
  1. ;;9002226.02101,"2074,O99.322 ",.02)
  1. ;;O99.322
  1. ;;9002226.02101,"2074,O99.322 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.332 ",.01)
  1. ;;O99.332
  1. ;;9002226.02101,"2074,O99.332 ",.02)
  1. ;;O99.332
  1. ;;9002226.02101,"2074,O99.332 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.342 ",.01)
  1. ;;O99.342
  1. ;;9002226.02101,"2074,O99.342 ",.02)
  1. ;;O99.342
  1. ;;9002226.02101,"2074,O99.342 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.352 ",.01)
  1. ;;O99.352
  1. ;;9002226.02101,"2074,O99.352 ",.02)
  1. ;;O99.352
  1. ;;9002226.02101,"2074,O99.352 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.412 ",.01)
  1. ;;O99.412
  1. ;;9002226.02101,"2074,O99.412 ",.02)
  1. ;;O99.412
  1. ;;9002226.02101,"2074,O99.412 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.512 ",.01)
  1. ;;O99.512
  1. ;;9002226.02101,"2074,O99.512 ",.02)
  1. ;;O99.512
  1. ;;9002226.02101,"2074,O99.512 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.612 ",.01)
  1. ;;O99.612
  1. ;;9002226.02101,"2074,O99.612 ",.02)
  1. ;;O99.612
  1. ;;9002226.02101,"2074,O99.612 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.712 ",.01)
  1. ;;O99.712
  1. ;;9002226.02101,"2074,O99.712 ",.02)
  1. ;;O99.712
  1. ;;9002226.02101,"2074,O99.712 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O99.842 ",.01)
  1. ;;O99.842
  1. ;;9002226.02101,"2074,O99.842 ",.02)
  1. ;;O99.842
  1. ;;9002226.02101,"2074,O99.842 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O9A.112 ",.01)
  1. ;;O9A.112
  1. ;;9002226.02101,"2074,O9A.112 ",.02)
  1. ;;O9A.112
  1. ;;9002226.02101,"2074,O9A.112 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O9A.212 ",.01)
  1. ;;O9A.212
  1. ;;9002226.02101,"2074,O9A.212 ",.02)
  1. ;;O9A.212
  1. ;;9002226.02101,"2074,O9A.212 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O9A.312 ",.01)
  1. ;;O9A.312
  1. ;;9002226.02101,"2074,O9A.312 ",.02)
  1. ;;O9A.312
  1. ;;9002226.02101,"2074,O9A.312 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O9A.412 ",.01)
  1. ;;O9A.412
  1. ;;9002226.02101,"2074,O9A.412 ",.02)
  1. ;;O9A.412
  1. ;;9002226.02101,"2074,O9A.412 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,O9A.512 ",.01)
  1. ;;O9A.512
  1. ;;9002226.02101,"2074,O9A.512 ",.02)
  1. ;;O9A.512
  1. ;;9002226.02101,"2074,O9A.512 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z34.02 ",.01)
  1. ;;Z34.02
  1. ;;9002226.02101,"2074,Z34.02 ",.02)
  1. ;;Z34.02
  1. ;;9002226.02101,"2074,Z34.02 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z34.82 ",.01)
  1. ;;Z34.82
  1. ;;9002226.02101,"2074,Z34.82 ",.02)
  1. ;;Z34.82
  1. ;;9002226.02101,"2074,Z34.82 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z34.92 ",.01)
  1. ;;Z34.92
  1. ;;9002226.02101,"2074,Z34.92 ",.02)
  1. ;;Z34.92
  1. ;;9002226.02101,"2074,Z34.92 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.14 ",.01)
  1. ;;Z3A.14
  1. ;;9002226.02101,"2074,Z3A.14 ",.02)
  1. ;;Z3A.14
  1. ;;9002226.02101,"2074,Z3A.14 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.15 ",.01)
  1. ;;Z3A.15
  1. ;;9002226.02101,"2074,Z3A.15 ",.02)
  1. ;;Z3A.15
  1. ;;9002226.02101,"2074,Z3A.15 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.16 ",.01)
  1. ;;Z3A.16
  1. ;;9002226.02101,"2074,Z3A.16 ",.02)
  1. ;;Z3A.16
  1. ;;9002226.02101,"2074,Z3A.16 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.17 ",.01)
  1. ;;Z3A.17
  1. ;;9002226.02101,"2074,Z3A.17 ",.02)
  1. ;;Z3A.17
  1. ;;9002226.02101,"2074,Z3A.17 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.18 ",.01)
  1. ;;Z3A.18
  1. ;;9002226.02101,"2074,Z3A.18 ",.02)
  1. ;;Z3A.18
  1. ;;9002226.02101,"2074,Z3A.18 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.19 ",.01)
  1. ;;Z3A.19
  1. ;;9002226.02101,"2074,Z3A.19 ",.02)
  1. ;;Z3A.19
  1. ;;9002226.02101,"2074,Z3A.19 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.20 ",.01)
  1. ;;Z3A.20
  1. ;;9002226.02101,"2074,Z3A.20 ",.02)
  1. ;;Z3A.20
  1. ;;9002226.02101,"2074,Z3A.20 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.21 ",.01)
  1. ;;Z3A.21
  1. ;;9002226.02101,"2074,Z3A.21 ",.02)
  1. ;;Z3A.21
  1. ;;9002226.02101,"2074,Z3A.21 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.22 ",.01)
  1. ;;Z3A.22
  1. ;;9002226.02101,"2074,Z3A.22 ",.02)
  1. ;;Z3A.22
  1. ;;9002226.02101,"2074,Z3A.22 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.23 ",.01)
  1. ;;Z3A.23
  1. ;;9002226.02101,"2074,Z3A.23 ",.02)
  1. ;;Z3A.23
  1. ;;9002226.02101,"2074,Z3A.23 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.24 ",.01)
  1. ;;Z3A.24
  1. ;;9002226.02101,"2074,Z3A.24 ",.02)
  1. ;;Z3A.24
  1. ;;9002226.02101,"2074,Z3A.24 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.25 ",.01)
  1. ;;Z3A.25
  1. ;;9002226.02101,"2074,Z3A.25 ",.02)
  1. ;;Z3A.25
  1. ;;9002226.02101,"2074,Z3A.25 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2074,Z3A.26 ",.01)
  1. ;;Z3A.26
  1. ;;9002226.02101,"2074,Z3A.26 ",.02)
  1. ;;Z3A.26
  1. ;;9002226.02101,"2074,Z3A.26 ",.03)
  1. ;;30