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

ATXD4I3.m

Go to the documentation of this file.
ATXD4I3 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 21, 2013;
 ;;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,"747,I70.399 ",.01)
 ;;I70.399 
 ;;9002226.02101,"747,I70.399 ",.02)
 ;;I70.399 
 ;;9002226.02101,"747,I70.399 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.401 ",.01)
 ;;I70.401 
 ;;9002226.02101,"747,I70.401 ",.02)
 ;;I70.401 
 ;;9002226.02101,"747,I70.401 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.402 ",.01)
 ;;I70.402 
 ;;9002226.02101,"747,I70.402 ",.02)
 ;;I70.402 
 ;;9002226.02101,"747,I70.402 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.403 ",.01)
 ;;I70.403 
 ;;9002226.02101,"747,I70.403 ",.02)
 ;;I70.403 
 ;;9002226.02101,"747,I70.403 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.408 ",.01)
 ;;I70.408 
 ;;9002226.02101,"747,I70.408 ",.02)
 ;;I70.408 
 ;;9002226.02101,"747,I70.408 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.409 ",.01)
 ;;I70.409 
 ;;9002226.02101,"747,I70.409 ",.02)
 ;;I70.409 
 ;;9002226.02101,"747,I70.409 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.411 ",.01)
 ;;I70.411 
 ;;9002226.02101,"747,I70.411 ",.02)
 ;;I70.411 
 ;;9002226.02101,"747,I70.411 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.412 ",.01)
 ;;I70.412 
 ;;9002226.02101,"747,I70.412 ",.02)
 ;;I70.412 
 ;;9002226.02101,"747,I70.412 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.413 ",.01)
 ;;I70.413 
 ;;9002226.02101,"747,I70.413 ",.02)
 ;;I70.413 
 ;;9002226.02101,"747,I70.413 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.418 ",.01)
 ;;I70.418 
 ;;9002226.02101,"747,I70.418 ",.02)
 ;;I70.418 
 ;;9002226.02101,"747,I70.418 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.419 ",.01)
 ;;I70.419 
 ;;9002226.02101,"747,I70.419 ",.02)
 ;;I70.419 
 ;;9002226.02101,"747,I70.419 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.421 ",.01)
 ;;I70.421 
 ;;9002226.02101,"747,I70.421 ",.02)
 ;;I70.421 
 ;;9002226.02101,"747,I70.421 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.422 ",.01)
 ;;I70.422 
 ;;9002226.02101,"747,I70.422 ",.02)
 ;;I70.422 
 ;;9002226.02101,"747,I70.422 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.423 ",.01)
 ;;I70.423 
 ;;9002226.02101,"747,I70.423 ",.02)
 ;;I70.423 
 ;;9002226.02101,"747,I70.423 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.428 ",.01)
 ;;I70.428 
 ;;9002226.02101,"747,I70.428 ",.02)
 ;;I70.428 
 ;;9002226.02101,"747,I70.428 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.429 ",.01)
 ;;I70.429 
 ;;9002226.02101,"747,I70.429 ",.02)
 ;;I70.429 
 ;;9002226.02101,"747,I70.429 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.491 ",.01)
 ;;I70.491 
 ;;9002226.02101,"747,I70.491 ",.02)
 ;;I70.491 
 ;;9002226.02101,"747,I70.491 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.492 ",.01)
 ;;I70.492 
 ;;9002226.02101,"747,I70.492 ",.02)
 ;;I70.492 
 ;;9002226.02101,"747,I70.492 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.493 ",.01)
 ;;I70.493 
 ;;9002226.02101,"747,I70.493 ",.02)
 ;;I70.493 
 ;;9002226.02101,"747,I70.493 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.498 ",.01)
 ;;I70.498 
 ;;9002226.02101,"747,I70.498 ",.02)
 ;;I70.498 
 ;;9002226.02101,"747,I70.498 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.499 ",.01)
 ;;I70.499 
 ;;9002226.02101,"747,I70.499 ",.02)
 ;;I70.499 
 ;;9002226.02101,"747,I70.499 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.501 ",.01)
 ;;I70.501 
 ;;9002226.02101,"747,I70.501 ",.02)
 ;;I70.501 
 ;;9002226.02101,"747,I70.501 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.502 ",.01)
 ;;I70.502 
 ;;9002226.02101,"747,I70.502 ",.02)
 ;;I70.502 
 ;;9002226.02101,"747,I70.502 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.503 ",.01)
 ;;I70.503 
 ;;9002226.02101,"747,I70.503 ",.02)
 ;;I70.503 
 ;;9002226.02101,"747,I70.503 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.508 ",.01)
 ;;I70.508 
 ;;9002226.02101,"747,I70.508 ",.02)
 ;;I70.508 
 ;;9002226.02101,"747,I70.508 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.509 ",.01)
 ;;I70.509 
 ;;9002226.02101,"747,I70.509 ",.02)
 ;;I70.509 
 ;;9002226.02101,"747,I70.509 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.511 ",.01)
 ;;I70.511 
 ;;9002226.02101,"747,I70.511 ",.02)
 ;;I70.511 
 ;;9002226.02101,"747,I70.511 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.512 ",.01)
 ;;I70.512 
 ;;9002226.02101,"747,I70.512 ",.02)
 ;;I70.512 
 ;;9002226.02101,"747,I70.512 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.513 ",.01)
 ;;I70.513 
 ;;9002226.02101,"747,I70.513 ",.02)
 ;;I70.513 
 ;;9002226.02101,"747,I70.513 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.518 ",.01)
 ;;I70.518 
 ;;9002226.02101,"747,I70.518 ",.02)
 ;;I70.518 
 ;;9002226.02101,"747,I70.518 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.519 ",.01)
 ;;I70.519 
 ;;9002226.02101,"747,I70.519 ",.02)
 ;;I70.519 
 ;;9002226.02101,"747,I70.519 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.521 ",.01)
 ;;I70.521 
 ;;9002226.02101,"747,I70.521 ",.02)
 ;;I70.521 
 ;;9002226.02101,"747,I70.521 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.522 ",.01)
 ;;I70.522 
 ;;9002226.02101,"747,I70.522 ",.02)
 ;;I70.522 
 ;;9002226.02101,"747,I70.522 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.523 ",.01)
 ;;I70.523 
 ;;9002226.02101,"747,I70.523 ",.02)
 ;;I70.523 
 ;;9002226.02101,"747,I70.523 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.528 ",.01)
 ;;I70.528 
 ;;9002226.02101,"747,I70.528 ",.02)
 ;;I70.528 
 ;;9002226.02101,"747,I70.528 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.529 ",.01)
 ;;I70.529 
 ;;9002226.02101,"747,I70.529 ",.02)
 ;;I70.529 
 ;;9002226.02101,"747,I70.529 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.591 ",.01)
 ;;I70.591 
 ;;9002226.02101,"747,I70.591 ",.02)
 ;;I70.591 
 ;;9002226.02101,"747,I70.591 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.592 ",.01)
 ;;I70.592 
 ;;9002226.02101,"747,I70.592 ",.02)
 ;;I70.592 
 ;;9002226.02101,"747,I70.592 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.593 ",.01)
 ;;I70.593 
 ;;9002226.02101,"747,I70.593 ",.02)
 ;;I70.593 
 ;;9002226.02101,"747,I70.593 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.598 ",.01)
 ;;I70.598 
 ;;9002226.02101,"747,I70.598 ",.02)
 ;;I70.598 
 ;;9002226.02101,"747,I70.598 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.599 ",.01)
 ;;I70.599 
 ;;9002226.02101,"747,I70.599 ",.02)
 ;;I70.599 
 ;;9002226.02101,"747,I70.599 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.601 ",.01)
 ;;I70.601 
 ;;9002226.02101,"747,I70.601 ",.02)
 ;;I70.601 
 ;;9002226.02101,"747,I70.601 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.602 ",.01)
 ;;I70.602 
 ;;9002226.02101,"747,I70.602 ",.02)
 ;;I70.602 
 ;;9002226.02101,"747,I70.602 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.603 ",.01)
 ;;I70.603 
 ;;9002226.02101,"747,I70.603 ",.02)
 ;;I70.603 
 ;;9002226.02101,"747,I70.603 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.608 ",.01)
 ;;I70.608 
 ;;9002226.02101,"747,I70.608 ",.02)
 ;;I70.608 
 ;;9002226.02101,"747,I70.608 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.609 ",.01)
 ;;I70.609 
 ;;9002226.02101,"747,I70.609 ",.02)
 ;;I70.609 
 ;;9002226.02101,"747,I70.609 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.611 ",.01)
 ;;I70.611 
 ;;9002226.02101,"747,I70.611 ",.02)
 ;;I70.611 
 ;;9002226.02101,"747,I70.611 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.612 ",.01)
 ;;I70.612 
 ;;9002226.02101,"747,I70.612 ",.02)
 ;;I70.612 
 ;;9002226.02101,"747,I70.612 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.613 ",.01)
 ;;I70.613 
 ;;9002226.02101,"747,I70.613 ",.02)
 ;;I70.613 
 ;;9002226.02101,"747,I70.613 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.618 ",.01)
 ;;I70.618 
 ;;9002226.02101,"747,I70.618 ",.02)
 ;;I70.618 
 ;;9002226.02101,"747,I70.618 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.619 ",.01)
 ;;I70.619 
 ;;9002226.02101,"747,I70.619 ",.02)
 ;;I70.619 
 ;;9002226.02101,"747,I70.619 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.621 ",.01)
 ;;I70.621 
 ;;9002226.02101,"747,I70.621 ",.02)
 ;;I70.621 
 ;;9002226.02101,"747,I70.621 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.622 ",.01)
 ;;I70.622 
 ;;9002226.02101,"747,I70.622 ",.02)
 ;;I70.622 
 ;;9002226.02101,"747,I70.622 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.623 ",.01)
 ;;I70.623 
 ;;9002226.02101,"747,I70.623 ",.02)
 ;;I70.623 
 ;;9002226.02101,"747,I70.623 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.628 ",.01)
 ;;I70.628 
 ;;9002226.02101,"747,I70.628 ",.02)
 ;;I70.628 
 ;;9002226.02101,"747,I70.628 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.629 ",.01)
 ;;I70.629 
 ;;9002226.02101,"747,I70.629 ",.02)
 ;;I70.629 
 ;;9002226.02101,"747,I70.629 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.691 ",.01)
 ;;I70.691 
 ;;9002226.02101,"747,I70.691 ",.02)
 ;;I70.691 
 ;;9002226.02101,"747,I70.691 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.692 ",.01)
 ;;I70.692 
 ;;9002226.02101,"747,I70.692 ",.02)
 ;;I70.692 
 ;;9002226.02101,"747,I70.692 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.693 ",.01)
 ;;I70.693 
 ;;9002226.02101,"747,I70.693 ",.02)
 ;;I70.693 
 ;;9002226.02101,"747,I70.693 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.698 ",.01)
 ;;I70.698 
 ;;9002226.02101,"747,I70.698 ",.02)
 ;;I70.698 
 ;;9002226.02101,"747,I70.698 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.699 ",.01)
 ;;I70.699 
 ;;9002226.02101,"747,I70.699 ",.02)
 ;;I70.699 
 ;;9002226.02101,"747,I70.699 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.701 ",.01)
 ;;I70.701 
 ;;9002226.02101,"747,I70.701 ",.02)
 ;;I70.701 
 ;;9002226.02101,"747,I70.701 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.702 ",.01)
 ;;I70.702 
 ;;9002226.02101,"747,I70.702 ",.02)
 ;;I70.702 
 ;;9002226.02101,"747,I70.702 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.703 ",.01)
 ;;I70.703 
 ;;9002226.02101,"747,I70.703 ",.02)
 ;;I70.703 
 ;;9002226.02101,"747,I70.703 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.708 ",.01)
 ;;I70.708 
 ;;9002226.02101,"747,I70.708 ",.02)
 ;;I70.708 
 ;;9002226.02101,"747,I70.708 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.709 ",.01)
 ;;I70.709 
 ;;9002226.02101,"747,I70.709 ",.02)
 ;;I70.709 
 ;;9002226.02101,"747,I70.709 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.711 ",.01)
 ;;I70.711 
 ;;9002226.02101,"747,I70.711 ",.02)
 ;;I70.711 
 ;;9002226.02101,"747,I70.711 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.712 ",.01)
 ;;I70.712 
 ;;9002226.02101,"747,I70.712 ",.02)
 ;;I70.712 
 ;;9002226.02101,"747,I70.712 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.713 ",.01)
 ;;I70.713 
 ;;9002226.02101,"747,I70.713 ",.02)
 ;;I70.713 
 ;;9002226.02101,"747,I70.713 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.718 ",.01)
 ;;I70.718 
 ;;9002226.02101,"747,I70.718 ",.02)
 ;;I70.718 
 ;;9002226.02101,"747,I70.718 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.719 ",.01)
 ;;I70.719 
 ;;9002226.02101,"747,I70.719 ",.02)
 ;;I70.719 
 ;;9002226.02101,"747,I70.719 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.721 ",.01)
 ;;I70.721 
 ;;9002226.02101,"747,I70.721 ",.02)
 ;;I70.721 
 ;;9002226.02101,"747,I70.721 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.722 ",.01)
 ;;I70.722 
 ;;9002226.02101,"747,I70.722 ",.02)
 ;;I70.722 
 ;;9002226.02101,"747,I70.722 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.723 ",.01)
 ;;I70.723 
 ;;9002226.02101,"747,I70.723 ",.02)
 ;;I70.723 
 ;;9002226.02101,"747,I70.723 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.728 ",.01)
 ;;I70.728 
 ;;9002226.02101,"747,I70.728 ",.02)
 ;;I70.728 
 ;;9002226.02101,"747,I70.728 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.729 ",.01)
 ;;I70.729 
 ;;9002226.02101,"747,I70.729 ",.02)
 ;;I70.729 
 ;;9002226.02101,"747,I70.729 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.791 ",.01)
 ;;I70.791 
 ;;9002226.02101,"747,I70.791 ",.02)
 ;;I70.791 
 ;;9002226.02101,"747,I70.791 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.792 ",.01)
 ;;I70.792 
 ;;9002226.02101,"747,I70.792 ",.02)
 ;;I70.792 
 ;;9002226.02101,"747,I70.792 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.793 ",.01)
 ;;I70.793 
 ;;9002226.02101,"747,I70.793 ",.02)
 ;;I70.793 
 ;;9002226.02101,"747,I70.793 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.798 ",.01)
 ;;I70.798 
 ;;9002226.02101,"747,I70.798 ",.02)
 ;;I70.798 
 ;;9002226.02101,"747,I70.798 ",.03)
 ;;30
 ;;9002226.02101,"747,I70.799 ",.01)
 ;;I70.799 
 ;;9002226.02101,"747,I70.799 ",.02)
 ;;I70.799 
 ;;9002226.02101,"747,I70.799 ",.03)
 ;;30
 ;;9002226.02101,"747,K55.1 ",.01)
 ;;K55.1 
 ;;9002226.02101,"747,K55.1 ",.02)
 ;;K55.1 
 ;;9002226.02101,"747,K55.1 ",.03)
 ;;30