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

ATXF1D2.m

Go to the documentation of this file.
ATXF1D2 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JUL 22, 2015;
 ;;5.1;TAXONOMY;**12**;FEB 04, 1997;Build 5
 ;
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,"454,I70.1 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.201 ",.01)
 ;;I70.201 
 ;;9002226.02101,"454,I70.201 ",.02)
 ;;I70.201 
 ;;9002226.02101,"454,I70.201 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.202 ",.01)
 ;;I70.202 
 ;;9002226.02101,"454,I70.202 ",.02)
 ;;I70.202 
 ;;9002226.02101,"454,I70.202 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.203 ",.01)
 ;;I70.203 
 ;;9002226.02101,"454,I70.203 ",.02)
 ;;I70.203 
 ;;9002226.02101,"454,I70.203 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.208 ",.01)
 ;;I70.208 
 ;;9002226.02101,"454,I70.208 ",.02)
 ;;I70.208 
 ;;9002226.02101,"454,I70.208 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.209 ",.01)
 ;;I70.209 
 ;;9002226.02101,"454,I70.209 ",.02)
 ;;I70.209 
 ;;9002226.02101,"454,I70.209 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.211 ",.01)
 ;;I70.211 
 ;;9002226.02101,"454,I70.211 ",.02)
 ;;I70.211 
 ;;9002226.02101,"454,I70.211 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.212 ",.01)
 ;;I70.212 
 ;;9002226.02101,"454,I70.212 ",.02)
 ;;I70.212 
 ;;9002226.02101,"454,I70.212 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.213 ",.01)
 ;;I70.213 
 ;;9002226.02101,"454,I70.213 ",.02)
 ;;I70.213 
 ;;9002226.02101,"454,I70.213 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.218 ",.01)
 ;;I70.218 
 ;;9002226.02101,"454,I70.218 ",.02)
 ;;I70.218 
 ;;9002226.02101,"454,I70.218 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.219 ",.01)
 ;;I70.219 
 ;;9002226.02101,"454,I70.219 ",.02)
 ;;I70.219 
 ;;9002226.02101,"454,I70.219 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.221 ",.01)
 ;;I70.221 
 ;;9002226.02101,"454,I70.221 ",.02)
 ;;I70.221 
 ;;9002226.02101,"454,I70.221 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.222 ",.01)
 ;;I70.222 
 ;;9002226.02101,"454,I70.222 ",.02)
 ;;I70.222 
 ;;9002226.02101,"454,I70.222 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.223 ",.01)
 ;;I70.223 
 ;;9002226.02101,"454,I70.223 ",.02)
 ;;I70.223 
 ;;9002226.02101,"454,I70.223 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.228 ",.01)
 ;;I70.228 
 ;;9002226.02101,"454,I70.228 ",.02)
 ;;I70.228 
 ;;9002226.02101,"454,I70.228 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.229 ",.01)
 ;;I70.229 
 ;;9002226.02101,"454,I70.229 ",.02)
 ;;I70.229 
 ;;9002226.02101,"454,I70.229 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.231 ",.01)
 ;;I70.231 
 ;;9002226.02101,"454,I70.231 ",.02)
 ;;I70.231 
 ;;9002226.02101,"454,I70.231 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.232 ",.01)
 ;;I70.232 
 ;;9002226.02101,"454,I70.232 ",.02)
 ;;I70.232 
 ;;9002226.02101,"454,I70.232 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.233 ",.01)
 ;;I70.233 
 ;;9002226.02101,"454,I70.233 ",.02)
 ;;I70.233 
 ;;9002226.02101,"454,I70.233 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.234 ",.01)
 ;;I70.234 
 ;;9002226.02101,"454,I70.234 ",.02)
 ;;I70.234 
 ;;9002226.02101,"454,I70.234 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.235 ",.01)
 ;;I70.235 
 ;;9002226.02101,"454,I70.235 ",.02)
 ;;I70.235 
 ;;9002226.02101,"454,I70.235 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.238 ",.01)
 ;;I70.238 
 ;;9002226.02101,"454,I70.238 ",.02)
 ;;I70.238 
 ;;9002226.02101,"454,I70.238 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.239 ",.01)
 ;;I70.239 
 ;;9002226.02101,"454,I70.239 ",.02)
 ;;I70.239 
 ;;9002226.02101,"454,I70.239 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.241 ",.01)
 ;;I70.241 
 ;;9002226.02101,"454,I70.241 ",.02)
 ;;I70.241 
 ;;9002226.02101,"454,I70.241 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.242 ",.01)
 ;;I70.242 
 ;;9002226.02101,"454,I70.242 ",.02)
 ;;I70.242 
 ;;9002226.02101,"454,I70.242 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.243 ",.01)
 ;;I70.243 
 ;;9002226.02101,"454,I70.243 ",.02)
 ;;I70.243 
 ;;9002226.02101,"454,I70.243 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.244 ",.01)
 ;;I70.244 
 ;;9002226.02101,"454,I70.244 ",.02)
 ;;I70.244 
 ;;9002226.02101,"454,I70.244 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.245 ",.01)
 ;;I70.245 
 ;;9002226.02101,"454,I70.245 ",.02)
 ;;I70.245 
 ;;9002226.02101,"454,I70.245 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.248 ",.01)
 ;;I70.248 
 ;;9002226.02101,"454,I70.248 ",.02)
 ;;I70.248 
 ;;9002226.02101,"454,I70.248 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.249 ",.01)
 ;;I70.249 
 ;;9002226.02101,"454,I70.249 ",.02)
 ;;I70.249 
 ;;9002226.02101,"454,I70.249 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.25 ",.01)
 ;;I70.25 
 ;;9002226.02101,"454,I70.25 ",.02)
 ;;I70.25 
 ;;9002226.02101,"454,I70.25 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.261 ",.01)
 ;;I70.261 
 ;;9002226.02101,"454,I70.261 ",.02)
 ;;I70.261 
 ;;9002226.02101,"454,I70.261 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.262 ",.01)
 ;;I70.262 
 ;;9002226.02101,"454,I70.262 ",.02)
 ;;I70.262 
 ;;9002226.02101,"454,I70.262 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.263 ",.01)
 ;;I70.263 
 ;;9002226.02101,"454,I70.263 ",.02)
 ;;I70.263 
 ;;9002226.02101,"454,I70.263 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.268 ",.01)
 ;;I70.268 
 ;;9002226.02101,"454,I70.268 ",.02)
 ;;I70.268 
 ;;9002226.02101,"454,I70.268 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.269 ",.01)
 ;;I70.269 
 ;;9002226.02101,"454,I70.269 ",.02)
 ;;I70.269 
 ;;9002226.02101,"454,I70.269 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.291 ",.01)
 ;;I70.291 
 ;;9002226.02101,"454,I70.291 ",.02)
 ;;I70.291 
 ;;9002226.02101,"454,I70.291 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.292 ",.01)
 ;;I70.292 
 ;;9002226.02101,"454,I70.292 ",.02)
 ;;I70.292 
 ;;9002226.02101,"454,I70.292 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.293 ",.01)
 ;;I70.293 
 ;;9002226.02101,"454,I70.293 ",.02)
 ;;I70.293 
 ;;9002226.02101,"454,I70.293 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.298 ",.01)
 ;;I70.298 
 ;;9002226.02101,"454,I70.298 ",.02)
 ;;I70.298 
 ;;9002226.02101,"454,I70.298 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.299 ",.01)
 ;;I70.299 
 ;;9002226.02101,"454,I70.299 ",.02)
 ;;I70.299 
 ;;9002226.02101,"454,I70.299 ",.03)
 ;;30
 ;;9002226.02101,"454,I70.92 ",.01)
 ;;I70.92 
 ;;9002226.02101,"454,I70.92 ",.02)
 ;;I70.92 
 ;;9002226.02101,"454,I70.92 ",.03)
 ;;30
 ;;9002226.02101,"454,I74.01 ",.01)
 ;;I74.01 
 ;;9002226.02101,"454,I74.01 ",.02)
 ;;I74.9 
 ;;9002226.02101,"454,I74.01 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.011 ",.01)
 ;;I75.011 
 ;;9002226.02101,"454,I75.011 ",.02)
 ;;I75.011 
 ;;9002226.02101,"454,I75.011 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.012 ",.01)
 ;;I75.012 
 ;;9002226.02101,"454,I75.012 ",.02)
 ;;I75.012 
 ;;9002226.02101,"454,I75.012 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.013 ",.01)
 ;;I75.013 
 ;;9002226.02101,"454,I75.013 ",.02)
 ;;I75.013 
 ;;9002226.02101,"454,I75.013 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.019 ",.01)
 ;;I75.019 
 ;;9002226.02101,"454,I75.019 ",.02)
 ;;I75.019 
 ;;9002226.02101,"454,I75.019 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.021 ",.01)
 ;;I75.021 
 ;;9002226.02101,"454,I75.021 ",.02)
 ;;I75.021 
 ;;9002226.02101,"454,I75.021 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.022 ",.01)
 ;;I75.022 
 ;;9002226.02101,"454,I75.022 ",.02)
 ;;I75.022 
 ;;9002226.02101,"454,I75.022 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.023 ",.01)
 ;;I75.023 
 ;;9002226.02101,"454,I75.023 ",.02)
 ;;I75.023 
 ;;9002226.02101,"454,I75.023 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.029 ",.01)
 ;;I75.029 
 ;;9002226.02101,"454,I75.029 ",.02)
 ;;I75.029 
 ;;9002226.02101,"454,I75.029 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.81 ",.01)
 ;;I75.81 
 ;;9002226.02101,"454,I75.81 ",.02)
 ;;I75.81 
 ;;9002226.02101,"454,I75.81 ",.03)
 ;;30
 ;;9002226.02101,"454,I75.89 ",.01)
 ;;I75.89 
 ;;9002226.02101,"454,I75.89 ",.02)
 ;;I75.89 
 ;;9002226.02101,"454,I75.89 ",.03)
 ;;30
 ;;9002226.04101,"454,1",.01)
 ;;BGP