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

ATXF6D6.m

Go to the documentation of this file.
ATXF6D6 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON DEC 20, 2016 ;
 ;;5.1;TAXONOMY;**19**;FEB 04, 1997;Build 32
 ;
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,"2075,O46.003 ",.03)
 ;;30
 ;;9002226.02101,"2075,O46.013 ",.01)
 ;;O46.013
 ;;9002226.02101,"2075,O46.013 ",.02)
 ;;O46.013
 ;;9002226.02101,"2075,O46.013 ",.03)
 ;;30
 ;;9002226.02101,"2075,O46.023 ",.01)
 ;;O46.023
 ;;9002226.02101,"2075,O46.023 ",.02)
 ;;O46.023
 ;;9002226.02101,"2075,O46.023 ",.03)
 ;;30
 ;;9002226.02101,"2075,O46.093 ",.01)
 ;;O46.093
 ;;9002226.02101,"2075,O46.093 ",.02)
 ;;O46.093
 ;;9002226.02101,"2075,O46.093 ",.03)
 ;;30
 ;;9002226.02101,"2075,O46.8X3 ",.01)
 ;;O46.8X3
 ;;9002226.02101,"2075,O46.8X3 ",.02)
 ;;O46.8X3
 ;;9002226.02101,"2075,O46.8X3 ",.03)
 ;;30
 ;;9002226.02101,"2075,O46.93 ",.01)
 ;;O46.93
 ;;9002226.02101,"2075,O46.93 ",.02)
 ;;O46.93
 ;;9002226.02101,"2075,O46.93 ",.03)
 ;;30
 ;;9002226.02101,"2075,O47.03 ",.01)
 ;;O47.03
 ;;9002226.02101,"2075,O47.03 ",.02)
 ;;O47.03
 ;;9002226.02101,"2075,O47.03 ",.03)
 ;;30
 ;;9002226.02101,"2075,O60.03 ",.01)
 ;;O60.03
 ;;9002226.02101,"2075,O60.03 ",.02)
 ;;O60.03
 ;;9002226.02101,"2075,O60.03 ",.03)
 ;;30
 ;;9002226.02101,"2075,O71.03 ",.01)
 ;;O71.03
 ;;9002226.02101,"2075,O71.03 ",.02)
 ;;O71.03
 ;;9002226.02101,"2075,O71.03 ",.03)
 ;;30
 ;;9002226.02101,"2075,O88.013 ",.01)
 ;;O88.013
 ;;9002226.02101,"2075,O88.013 ",.02)
 ;;O88.013
 ;;9002226.02101,"2075,O88.013 ",.03)
 ;;30
 ;;9002226.02101,"2075,O88.113 ",.01)
 ;;O88.113
 ;;9002226.02101,"2075,O88.113 ",.02)
 ;;O88.113
 ;;9002226.02101,"2075,O88.113 ",.03)
 ;;30
 ;;9002226.02101,"2075,O88.213 ",.01)
 ;;O88.213
 ;;9002226.02101,"2075,O88.213 ",.02)
 ;;O88.213
 ;;9002226.02101,"2075,O88.213 ",.03)
 ;;30
 ;;9002226.02101,"2075,O88.313 ",.01)
 ;;O88.313
 ;;9002226.02101,"2075,O88.313 ",.02)
 ;;O88.313
 ;;9002226.02101,"2075,O88.313 ",.03)
 ;;30
 ;;9002226.02101,"2075,O88.813 ",.01)
 ;;O88.813
 ;;9002226.02101,"2075,O88.813 ",.02)
 ;;O88.813
 ;;9002226.02101,"2075,O88.813 ",.03)
 ;;30
 ;;9002226.02101,"2075,O91.013 ",.01)
 ;;O91.013
 ;;9002226.02101,"2075,O91.013 ",.02)
 ;;O91.013
 ;;9002226.02101,"2075,O91.013 ",.03)
 ;;30
 ;;9002226.02101,"2075,O91.113 ",.01)
 ;;O91.113
 ;;9002226.02101,"2075,O91.113 ",.02)
 ;;O91.113
 ;;9002226.02101,"2075,O91.113 ",.03)
 ;;30
 ;;9002226.02101,"2075,O91.213 ",.01)
 ;;O91.213
 ;;9002226.02101,"2075,O91.213 ",.02)
 ;;O91.213
 ;;9002226.02101,"2075,O91.213 ",.03)
 ;;30
 ;;9002226.02101,"2075,O92.013 ",.01)
 ;;O92.013
 ;;9002226.02101,"2075,O92.013 ",.02)
 ;;O92.013
 ;;9002226.02101,"2075,O92.013 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.013 ",.01)
 ;;O98.013
 ;;9002226.02101,"2075,O98.013 ",.02)
 ;;O98.013
 ;;9002226.02101,"2075,O98.013 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.113 ",.01)
 ;;O98.113
 ;;9002226.02101,"2075,O98.113 ",.02)
 ;;O98.113
 ;;9002226.02101,"2075,O98.113 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.213 ",.01)
 ;;O98.213
 ;;9002226.02101,"2075,O98.213 ",.02)
 ;;O98.213
 ;;9002226.02101,"2075,O98.213 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.313 ",.01)
 ;;O98.313
 ;;9002226.02101,"2075,O98.313 ",.02)
 ;;O98.313
 ;;9002226.02101,"2075,O98.313 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.413 ",.01)
 ;;O98.413
 ;;9002226.02101,"2075,O98.413 ",.02)
 ;;O98.413
 ;;9002226.02101,"2075,O98.413 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.513 ",.01)
 ;;O98.513
 ;;9002226.02101,"2075,O98.513 ",.02)
 ;;O98.513
 ;;9002226.02101,"2075,O98.513 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.613 ",.01)
 ;;O98.613
 ;;9002226.02101,"2075,O98.613 ",.02)
 ;;O98.613
 ;;9002226.02101,"2075,O98.613 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.713 ",.01)
 ;;O98.713
 ;;9002226.02101,"2075,O98.713 ",.02)
 ;;O98.713
 ;;9002226.02101,"2075,O98.713 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.813 ",.01)
 ;;O98.813
 ;;9002226.02101,"2075,O98.813 ",.02)
 ;;O98.813
 ;;9002226.02101,"2075,O98.813 ",.03)
 ;;30
 ;;9002226.02101,"2075,O98.913 ",.01)
 ;;O98.913
 ;;9002226.02101,"2075,O98.913 ",.02)
 ;;O98.913
 ;;9002226.02101,"2075,O98.913 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.013 ",.01)
 ;;O99.013
 ;;9002226.02101,"2075,O99.013 ",.02)
 ;;O99.013
 ;;9002226.02101,"2075,O99.013 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.113 ",.01)
 ;;O99.113
 ;;9002226.02101,"2075,O99.113 ",.02)
 ;;O99.113
 ;;9002226.02101,"2075,O99.113 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.213 ",.01)
 ;;O99.213
 ;;9002226.02101,"2075,O99.213 ",.02)
 ;;O99.213
 ;;9002226.02101,"2075,O99.213 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.283 ",.01)
 ;;O99.283
 ;;9002226.02101,"2075,O99.283 ",.02)
 ;;O99.283
 ;;9002226.02101,"2075,O99.283 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.313 ",.01)
 ;;O99.313
 ;;9002226.02101,"2075,O99.313 ",.02)
 ;;O99.313
 ;;9002226.02101,"2075,O99.313 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.323 ",.01)
 ;;O99.323
 ;;9002226.02101,"2075,O99.323 ",.02)
 ;;O99.323
 ;;9002226.02101,"2075,O99.323 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.333 ",.01)
 ;;O99.333
 ;;9002226.02101,"2075,O99.333 ",.02)
 ;;O99.333
 ;;9002226.02101,"2075,O99.333 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.343 ",.01)
 ;;O99.343
 ;;9002226.02101,"2075,O99.343 ",.02)
 ;;O99.343
 ;;9002226.02101,"2075,O99.343 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.353 ",.01)
 ;;O99.353
 ;;9002226.02101,"2075,O99.353 ",.02)
 ;;O99.353
 ;;9002226.02101,"2075,O99.353 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.413 ",.01)
 ;;O99.413
 ;;9002226.02101,"2075,O99.413 ",.02)
 ;;O99.413
 ;;9002226.02101,"2075,O99.413 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.513 ",.01)
 ;;O99.513
 ;;9002226.02101,"2075,O99.513 ",.02)
 ;;O99.513
 ;;9002226.02101,"2075,O99.513 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.613 ",.01)
 ;;O99.613
 ;;9002226.02101,"2075,O99.613 ",.02)
 ;;O99.613
 ;;9002226.02101,"2075,O99.613 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.713 ",.01)
 ;;O99.713
 ;;9002226.02101,"2075,O99.713 ",.02)
 ;;O99.713
 ;;9002226.02101,"2075,O99.713 ",.03)
 ;;30
 ;;9002226.02101,"2075,O99.843 ",.01)
 ;;O99.843
 ;;9002226.02101,"2075,O99.843 ",.02)
 ;;O99.843
 ;;9002226.02101,"2075,O99.843 ",.03)
 ;;30
 ;;9002226.02101,"2075,O9A.113 ",.01)
 ;;O9A.113
 ;;9002226.02101,"2075,O9A.113 ",.02)
 ;;O9A.113
 ;;9002226.02101,"2075,O9A.113 ",.03)
 ;;30
 ;;9002226.02101,"2075,O9A.213 ",.01)
 ;;O9A.213
 ;;9002226.02101,"2075,O9A.213 ",.02)
 ;;O9A.213
 ;;9002226.02101,"2075,O9A.213 ",.03)
 ;;30
 ;;9002226.02101,"2075,O9A.313 ",.01)
 ;;O9A.313
 ;;9002226.02101,"2075,O9A.313 ",.02)
 ;;O9A.313
 ;;9002226.02101,"2075,O9A.313 ",.03)
 ;;30
 ;;9002226.02101,"2075,O9A.413 ",.01)
 ;;O9A.413
 ;;9002226.02101,"2075,O9A.413 ",.02)
 ;;O9A.413
 ;;9002226.02101,"2075,O9A.413 ",.03)
 ;;30
 ;;9002226.02101,"2075,O9A.513 ",.01)
 ;;O9A.513
 ;;9002226.02101,"2075,O9A.513 ",.02)
 ;;O9A.513
 ;;9002226.02101,"2075,O9A.513 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z34.03 ",.01)
 ;;Z34.03
 ;;9002226.02101,"2075,Z34.03 ",.02)
 ;;Z34.03
 ;;9002226.02101,"2075,Z34.03 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z34.83 ",.01)
 ;;Z34.83
 ;;9002226.02101,"2075,Z34.83 ",.02)
 ;;Z34.83
 ;;9002226.02101,"2075,Z34.83 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z34.93 ",.01)
 ;;Z34.93
 ;;9002226.02101,"2075,Z34.93 ",.02)
 ;;Z34.93
 ;;9002226.02101,"2075,Z34.93 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.27 ",.01)
 ;;Z3A.27
 ;;9002226.02101,"2075,Z3A.27 ",.02)
 ;;Z3A.27
 ;;9002226.02101,"2075,Z3A.27 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.28 ",.01)
 ;;Z3A.28
 ;;9002226.02101,"2075,Z3A.28 ",.02)
 ;;Z3A.28
 ;;9002226.02101,"2075,Z3A.28 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.29 ",.01)
 ;;Z3A.29
 ;;9002226.02101,"2075,Z3A.29 ",.02)
 ;;Z3A.29
 ;;9002226.02101,"2075,Z3A.29 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.30 ",.01)
 ;;Z3A.30
 ;;9002226.02101,"2075,Z3A.30 ",.02)
 ;;Z3A.30
 ;;9002226.02101,"2075,Z3A.30 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.31 ",.01)
 ;;Z3A.31
 ;;9002226.02101,"2075,Z3A.31 ",.02)
 ;;Z3A.31
 ;;9002226.02101,"2075,Z3A.31 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.32 ",.01)
 ;;Z3A.32
 ;;9002226.02101,"2075,Z3A.32 ",.02)
 ;;Z3A.32
 ;;9002226.02101,"2075,Z3A.32 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.33 ",.01)
 ;;Z3A.33
 ;;9002226.02101,"2075,Z3A.33 ",.02)
 ;;Z3A.33
 ;;9002226.02101,"2075,Z3A.33 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.34 ",.01)
 ;;Z3A.34
 ;;9002226.02101,"2075,Z3A.34 ",.02)
 ;;Z3A.34
 ;;9002226.02101,"2075,Z3A.34 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.35 ",.01)
 ;;Z3A.35
 ;;9002226.02101,"2075,Z3A.35 ",.02)
 ;;Z3A.35
 ;;9002226.02101,"2075,Z3A.35 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.36 ",.01)
 ;;Z3A.36
 ;;9002226.02101,"2075,Z3A.36 ",.02)
 ;;Z3A.36
 ;;9002226.02101,"2075,Z3A.36 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.37 ",.01)
 ;;Z3A.37
 ;;9002226.02101,"2075,Z3A.37 ",.02)
 ;;Z3A.37
 ;;9002226.02101,"2075,Z3A.37 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.38 ",.01)
 ;;Z3A.38
 ;;9002226.02101,"2075,Z3A.38 ",.02)
 ;;Z3A.38
 ;;9002226.02101,"2075,Z3A.38 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.39 ",.01)
 ;;Z3A.39
 ;;9002226.02101,"2075,Z3A.39 ",.02)
 ;;Z3A.39
 ;;9002226.02101,"2075,Z3A.39 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.40 ",.01)
 ;;Z3A.40
 ;;9002226.02101,"2075,Z3A.40 ",.02)
 ;;Z3A.40
 ;;9002226.02101,"2075,Z3A.40 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.41 ",.01)
 ;;Z3A.41
 ;;9002226.02101,"2075,Z3A.41 ",.02)
 ;;Z3A.41
 ;;9002226.02101,"2075,Z3A.41 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.42 ",.01)
 ;;Z3A.42
 ;;9002226.02101,"2075,Z3A.42 ",.02)
 ;;Z3A.42
 ;;9002226.02101,"2075,Z3A.42 ",.03)
 ;;30
 ;;9002226.02101,"2075,Z3A.49 ",.01)
 ;;Z3A.49
 ;;9002226.02101,"2075,Z3A.49 ",.02)
 ;;Z3A.49
 ;;9002226.02101,"2075,Z3A.49 ",.03)
 ;;30