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

BGP47Y58.m

Go to the documentation of this file.
BGP47Y58 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2014;
 ;;14.1;IHS CLINICAL REPORTING;;MAY 29, 2014;Build 114
 ;
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,"1729,67544-0212-45 ",.01)
 ;;67544-0212-45
 ;;9002226.02101,"1729,67544-0212-45 ",.02)
 ;;67544-0212-45
 ;;9002226.02101,"1729,67544-0212-53 ",.01)
 ;;67544-0212-53
 ;;9002226.02101,"1729,67544-0212-53 ",.02)
 ;;67544-0212-53
 ;;9002226.02101,"1729,67544-0216-80 ",.01)
 ;;67544-0216-80
 ;;9002226.02101,"1729,67544-0216-80 ",.02)
 ;;67544-0216-80
 ;;9002226.02101,"1729,67544-0218-60 ",.01)
 ;;67544-0218-60
 ;;9002226.02101,"1729,67544-0218-60 ",.02)
 ;;67544-0218-60
 ;;9002226.02101,"1729,67544-0218-82 ",.01)
 ;;67544-0218-82
 ;;9002226.02101,"1729,67544-0218-82 ",.02)
 ;;67544-0218-82
 ;;9002226.02101,"1729,67544-0219-15 ",.01)
 ;;67544-0219-15
 ;;9002226.02101,"1729,67544-0219-15 ",.02)
 ;;67544-0219-15
 ;;9002226.02101,"1729,67544-0219-30 ",.01)
 ;;67544-0219-30
 ;;9002226.02101,"1729,67544-0219-30 ",.02)
 ;;67544-0219-30
 ;;9002226.02101,"1729,67544-0219-45 ",.01)
 ;;67544-0219-45
 ;;9002226.02101,"1729,67544-0219-45 ",.02)
 ;;67544-0219-45
 ;;9002226.02101,"1729,67544-0219-60 ",.01)
 ;;67544-0219-60
 ;;9002226.02101,"1729,67544-0219-60 ",.02)
 ;;67544-0219-60
 ;;9002226.02101,"1729,67544-0234-45 ",.01)
 ;;67544-0234-45
 ;;9002226.02101,"1729,67544-0234-45 ",.02)
 ;;67544-0234-45
 ;;9002226.02101,"1729,67544-0234-53 ",.01)
 ;;67544-0234-53
 ;;9002226.02101,"1729,67544-0234-53 ",.02)
 ;;67544-0234-53
 ;;9002226.02101,"1729,67544-0250-60 ",.01)
 ;;67544-0250-60
 ;;9002226.02101,"1729,67544-0250-60 ",.02)
 ;;67544-0250-60
 ;;9002226.02101,"1729,67544-0250-80 ",.01)
 ;;67544-0250-80
 ;;9002226.02101,"1729,67544-0250-80 ",.02)
 ;;67544-0250-80
 ;;9002226.02101,"1729,67544-0276-60 ",.01)
 ;;67544-0276-60
 ;;9002226.02101,"1729,67544-0276-60 ",.02)
 ;;67544-0276-60
 ;;9002226.02101,"1729,67544-0276-80 ",.01)
 ;;67544-0276-80
 ;;9002226.02101,"1729,67544-0276-80 ",.02)
 ;;67544-0276-80
 ;;9002226.02101,"1729,67544-0286-80 ",.01)
 ;;67544-0286-80
 ;;9002226.02101,"1729,67544-0286-80 ",.02)
 ;;67544-0286-80
 ;;9002226.02101,"1729,67544-0300-15 ",.01)
 ;;67544-0300-15
 ;;9002226.02101,"1729,67544-0300-15 ",.02)
 ;;67544-0300-15
 ;;9002226.02101,"1729,67544-0300-30 ",.01)
 ;;67544-0300-30
 ;;9002226.02101,"1729,67544-0300-30 ",.02)
 ;;67544-0300-30
 ;;9002226.02101,"1729,67544-0300-45 ",.01)
 ;;67544-0300-45
 ;;9002226.02101,"1729,67544-0300-45 ",.02)
 ;;67544-0300-45
 ;;9002226.02101,"1729,67544-0306-30 ",.01)
 ;;67544-0306-30
 ;;9002226.02101,"1729,67544-0306-30 ",.02)
 ;;67544-0306-30
 ;;9002226.02101,"1729,67544-0306-40 ",.01)
 ;;67544-0306-40
 ;;9002226.02101,"1729,67544-0306-40 ",.02)
 ;;67544-0306-40
 ;;9002226.02101,"1729,67544-0306-45 ",.01)
 ;;67544-0306-45
 ;;9002226.02101,"1729,67544-0306-45 ",.02)
 ;;67544-0306-45
 ;;9002226.02101,"1729,67544-0306-60 ",.01)
 ;;67544-0306-60
 ;;9002226.02101,"1729,67544-0306-60 ",.02)
 ;;67544-0306-60
 ;;9002226.02101,"1729,67544-0311-30 ",.01)
 ;;67544-0311-30
 ;;9002226.02101,"1729,67544-0311-30 ",.02)
 ;;67544-0311-30
 ;;9002226.02101,"1729,67544-0311-45 ",.01)
 ;;67544-0311-45
 ;;9002226.02101,"1729,67544-0311-45 ",.02)
 ;;67544-0311-45
 ;;9002226.02101,"1729,67544-0315-80 ",.01)
 ;;67544-0315-80
 ;;9002226.02101,"1729,67544-0315-80 ",.02)
 ;;67544-0315-80
 ;;9002226.02101,"1729,67544-0321-15 ",.01)
 ;;67544-0321-15
 ;;9002226.02101,"1729,67544-0321-15 ",.02)
 ;;67544-0321-15
 ;;9002226.02101,"1729,67544-0321-30 ",.01)
 ;;67544-0321-30
 ;;9002226.02101,"1729,67544-0321-30 ",.02)
 ;;67544-0321-30
 ;;9002226.02101,"1729,67544-0321-60 ",.01)
 ;;67544-0321-60
 ;;9002226.02101,"1729,67544-0321-60 ",.02)
 ;;67544-0321-60
 ;;9002226.02101,"1729,67544-0322-15 ",.01)
 ;;67544-0322-15
 ;;9002226.02101,"1729,67544-0322-15 ",.02)
 ;;67544-0322-15
 ;;9002226.02101,"1729,67544-0322-30 ",.01)
 ;;67544-0322-30
 ;;9002226.02101,"1729,67544-0322-30 ",.02)
 ;;67544-0322-30
 ;;9002226.02101,"1729,67544-0322-45 ",.01)
 ;;67544-0322-45
 ;;9002226.02101,"1729,67544-0322-45 ",.02)
 ;;67544-0322-45
 ;;9002226.02101,"1729,67544-0322-53 ",.01)
 ;;67544-0322-53
 ;;9002226.02101,"1729,67544-0322-53 ",.02)
 ;;67544-0322-53
 ;;9002226.02101,"1729,67544-0322-60 ",.01)
 ;;67544-0322-60
 ;;9002226.02101,"1729,67544-0322-60 ",.02)
 ;;67544-0322-60
 ;;9002226.02101,"1729,67544-0322-70 ",.01)
 ;;67544-0322-70
 ;;9002226.02101,"1729,67544-0322-70 ",.02)
 ;;67544-0322-70
 ;;9002226.02101,"1729,67544-0322-73 ",.01)
 ;;67544-0322-73
 ;;9002226.02101,"1729,67544-0322-73 ",.02)
 ;;67544-0322-73
 ;;9002226.02101,"1729,67544-0322-80 ",.01)
 ;;67544-0322-80
 ;;9002226.02101,"1729,67544-0322-80 ",.02)
 ;;67544-0322-80
 ;;9002226.02101,"1729,67544-0322-92 ",.01)
 ;;67544-0322-92
 ;;9002226.02101,"1729,67544-0322-92 ",.02)
 ;;67544-0322-92
 ;;9002226.02101,"1729,67544-0322-94 ",.01)
 ;;67544-0322-94
 ;;9002226.02101,"1729,67544-0322-94 ",.02)
 ;;67544-0322-94
 ;;9002226.02101,"1729,67544-0350-80 ",.01)
 ;;67544-0350-80
 ;;9002226.02101,"1729,67544-0350-80 ",.02)
 ;;67544-0350-80
 ;;9002226.02101,"1729,67544-0377-60 ",.01)
 ;;67544-0377-60
 ;;9002226.02101,"1729,67544-0377-60 ",.02)
 ;;67544-0377-60
 ;;9002226.02101,"1729,67544-0380-30 ",.01)
 ;;67544-0380-30
 ;;9002226.02101,"1729,67544-0380-30 ",.02)
 ;;67544-0380-30
 ;;9002226.02101,"1729,67544-0380-60 ",.01)
 ;;67544-0380-60
 ;;9002226.02101,"1729,67544-0380-60 ",.02)
 ;;67544-0380-60
 ;;9002226.02101,"1729,67544-0381-15 ",.01)
 ;;67544-0381-15
 ;;9002226.02101,"1729,67544-0381-15 ",.02)
 ;;67544-0381-15
 ;;9002226.02101,"1729,67544-0381-30 ",.01)
 ;;67544-0381-30
 ;;9002226.02101,"1729,67544-0381-30 ",.02)
 ;;67544-0381-30
 ;;9002226.02101,"1729,67544-0381-45 ",.01)
 ;;67544-0381-45
 ;;9002226.02101,"1729,67544-0381-45 ",.02)
 ;;67544-0381-45
 ;;9002226.02101,"1729,67544-0381-53 ",.01)
 ;;67544-0381-53
 ;;9002226.02101,"1729,67544-0381-53 ",.02)
 ;;67544-0381-53
 ;;9002226.02101,"1729,67544-0381-60 ",.01)
 ;;67544-0381-60
 ;;9002226.02101,"1729,67544-0381-60 ",.02)
 ;;67544-0381-60
 ;;9002226.02101,"1729,67544-0381-70 ",.01)
 ;;67544-0381-70
 ;;9002226.02101,"1729,67544-0381-70 ",.02)
 ;;67544-0381-70
 ;;9002226.02101,"1729,67544-0381-73 ",.01)
 ;;67544-0381-73
 ;;9002226.02101,"1729,67544-0381-73 ",.02)
 ;;67544-0381-73
 ;;9002226.02101,"1729,67544-0381-80 ",.01)
 ;;67544-0381-80
 ;;9002226.02101,"1729,67544-0381-80 ",.02)
 ;;67544-0381-80
 ;;9002226.02101,"1729,67544-0381-92 ",.01)
 ;;67544-0381-92
 ;;9002226.02101,"1729,67544-0381-92 ",.02)
 ;;67544-0381-92
 ;;9002226.02101,"1729,67544-0381-94 ",.01)
 ;;67544-0381-94
 ;;9002226.02101,"1729,67544-0381-94 ",.02)
 ;;67544-0381-94
 ;;9002226.02101,"1729,67544-0382-30 ",.01)
 ;;67544-0382-30
 ;;9002226.02101,"1729,67544-0382-30 ",.02)
 ;;67544-0382-30
 ;;9002226.02101,"1729,67544-0400-45 ",.01)
 ;;67544-0400-45
 ;;9002226.02101,"1729,67544-0400-45 ",.02)
 ;;67544-0400-45
 ;;9002226.02101,"1729,67544-0403-30 ",.01)
 ;;67544-0403-30
 ;;9002226.02101,"1729,67544-0403-30 ",.02)
 ;;67544-0403-30
 ;;9002226.02101,"1729,67544-0404-30 ",.01)
 ;;67544-0404-30
 ;;9002226.02101,"1729,67544-0404-30 ",.02)
 ;;67544-0404-30
 ;;9002226.02101,"1729,67544-0418-30 ",.01)
 ;;67544-0418-30
 ;;9002226.02101,"1729,67544-0418-30 ",.02)
 ;;67544-0418-30
 ;;9002226.02101,"1729,67544-0418-60 ",.01)
 ;;67544-0418-60
 ;;9002226.02101,"1729,67544-0418-60 ",.02)
 ;;67544-0418-60
 ;;9002226.02101,"1729,67544-0418-80 ",.01)
 ;;67544-0418-80
 ;;9002226.02101,"1729,67544-0418-80 ",.02)
 ;;67544-0418-80
 ;;9002226.02101,"1729,67544-0431-15 ",.01)
 ;;67544-0431-15
 ;;9002226.02101,"1729,67544-0431-15 ",.02)
 ;;67544-0431-15
 ;;9002226.02101,"1729,67544-0431-30 ",.01)
 ;;67544-0431-30
 ;;9002226.02101,"1729,67544-0431-30 ",.02)
 ;;67544-0431-30
 ;;9002226.02101,"1729,67544-0431-45 ",.01)
 ;;67544-0431-45
 ;;9002226.02101,"1729,67544-0431-45 ",.02)
 ;;67544-0431-45
 ;;9002226.02101,"1729,67544-0431-53 ",.01)
 ;;67544-0431-53
 ;;9002226.02101,"1729,67544-0431-53 ",.02)
 ;;67544-0431-53
 ;;9002226.02101,"1729,67544-0431-60 ",.01)
 ;;67544-0431-60
 ;;9002226.02101,"1729,67544-0431-60 ",.02)
 ;;67544-0431-60
 ;;9002226.02101,"1729,67544-0431-70 ",.01)
 ;;67544-0431-70
 ;;9002226.02101,"1729,67544-0431-70 ",.02)
 ;;67544-0431-70
 ;;9002226.02101,"1729,67544-0431-73 ",.01)
 ;;67544-0431-73
 ;;9002226.02101,"1729,67544-0431-73 ",.02)
 ;;67544-0431-73
 ;;9002226.02101,"1729,67544-0431-80 ",.01)
 ;;67544-0431-80
 ;;9002226.02101,"1729,67544-0431-80 ",.02)
 ;;67544-0431-80
 ;;9002226.02101,"1729,67544-0431-92 ",.01)
 ;;67544-0431-92
 ;;9002226.02101,"1729,67544-0431-92 ",.02)
 ;;67544-0431-92
 ;;9002226.02101,"1729,67544-0431-94 ",.01)
 ;;67544-0431-94
 ;;9002226.02101,"1729,67544-0431-94 ",.02)
 ;;67544-0431-94
 ;;9002226.02101,"1729,67544-0454-15 ",.01)
 ;;67544-0454-15
 ;;9002226.02101,"1729,67544-0454-15 ",.02)
 ;;67544-0454-15
 ;;9002226.02101,"1729,67544-0454-30 ",.01)
 ;;67544-0454-30
 ;;9002226.02101,"1729,67544-0454-30 ",.02)
 ;;67544-0454-30
 ;;9002226.02101,"1729,67544-0454-40 ",.01)
 ;;67544-0454-40
 ;;9002226.02101,"1729,67544-0454-40 ",.02)
 ;;67544-0454-40
 ;;9002226.02101,"1729,67544-0454-45 ",.01)
 ;;67544-0454-45
 ;;9002226.02101,"1729,67544-0454-45 ",.02)
 ;;67544-0454-45
 ;;9002226.02101,"1729,67544-0454-60 ",.01)
 ;;67544-0454-60
 ;;9002226.02101,"1729,67544-0454-60 ",.02)
 ;;67544-0454-60
 ;;9002226.02101,"1729,67544-0489-15 ",.01)
 ;;67544-0489-15
 ;;9002226.02101,"1729,67544-0489-15 ",.02)
 ;;67544-0489-15
 ;;9002226.02101,"1729,67544-0489-30 ",.01)
 ;;67544-0489-30
 ;;9002226.02101,"1729,67544-0489-30 ",.02)
 ;;67544-0489-30
 ;;9002226.02101,"1729,67544-0489-60 ",.01)
 ;;67544-0489-60
 ;;9002226.02101,"1729,67544-0489-60 ",.02)
 ;;67544-0489-60
 ;;9002226.02101,"1729,67544-0678-60 ",.01)
 ;;67544-0678-60
 ;;9002226.02101,"1729,67544-0678-60 ",.02)
 ;;67544-0678-60
 ;;9002226.02101,"1729,67544-0992-30 ",.01)
 ;;67544-0992-30
 ;;9002226.02101,"1729,67544-0992-30 ",.02)
 ;;67544-0992-30
 ;;9002226.02101,"1729,67544-0997-30 ",.01)
 ;;67544-0997-30
 ;;9002226.02101,"1729,67544-0997-30 ",.02)
 ;;67544-0997-30
 ;;9002226.02101,"1729,67544-0999-60 ",.01)
 ;;67544-0999-60
 ;;9002226.02101,"1729,67544-0999-60 ",.02)
 ;;67544-0999-60
 ;;9002226.02101,"1729,67544-0999-80 ",.01)
 ;;67544-0999-80
 ;;9002226.02101,"1729,67544-0999-80 ",.02)
 ;;67544-0999-80
 ;;9002226.02101,"1729,67544-1010-30 ",.01)
 ;;67544-1010-30
 ;;9002226.02101,"1729,67544-1010-30 ",.02)
 ;;67544-1010-30
 ;;9002226.02101,"1729,67544-1010-60 ",.01)
 ;;67544-1010-60
 ;;9002226.02101,"1729,67544-1010-60 ",.02)
 ;;67544-1010-60
 ;;9002226.02101,"1729,67544-1038-30 ",.01)
 ;;67544-1038-30
 ;;9002226.02101,"1729,67544-1038-30 ",.02)
 ;;67544-1038-30
 ;;9002226.02101,"1729,67544-1038-45 ",.01)
 ;;67544-1038-45
 ;;9002226.02101,"1729,67544-1038-45 ",.02)
 ;;67544-1038-45
 ;;9002226.02101,"1729,67544-1042-45 ",.01)
 ;;67544-1042-45
 ;;9002226.02101,"1729,67544-1042-45 ",.02)
 ;;67544-1042-45
 ;;9002226.02101,"1729,67544-1042-60 ",.01)
 ;;67544-1042-60
 ;;9002226.02101,"1729,67544-1042-60 ",.02)
 ;;67544-1042-60
 ;;9002226.02101,"1729,67544-1054-30 ",.01)
 ;;67544-1054-30
 ;;9002226.02101,"1729,67544-1054-30 ",.02)
 ;;67544-1054-30
 ;;9002226.02101,"1729,67544-1057-30 ",.01)
 ;;67544-1057-30
 ;;9002226.02101,"1729,67544-1057-30 ",.02)
 ;;67544-1057-30
 ;;9002226.02101,"1729,67544-1082-45 ",.01)
 ;;67544-1082-45
 ;;9002226.02101,"1729,67544-1082-45 ",.02)
 ;;67544-1082-45
 ;;9002226.02101,"1729,67544-1105-30 ",.01)
 ;;67544-1105-30
 ;;9002226.02101,"1729,67544-1105-30 ",.02)
 ;;67544-1105-30
 ;;9002226.02101,"1729,67544-1105-45 ",.01)
 ;;67544-1105-45
 ;;9002226.02101,"1729,67544-1105-45 ",.02)
 ;;67544-1105-45
 ;;9002226.02101,"1729,67544-1348-45 ",.01)
 ;;67544-1348-45
 ;;9002226.02101,"1729,67544-1348-45 ",.02)
 ;;67544-1348-45
 ;;9002226.02101,"1729,67544-1348-60 ",.01)
 ;;67544-1348-60
 ;;9002226.02101,"1729,67544-1348-60 ",.02)
 ;;67544-1348-60
 ;;9002226.02101,"1729,67544-1350-45 ",.01)
 ;;67544-1350-45
 ;;9002226.02101,"1729,67544-1350-45 ",.02)
 ;;67544-1350-45
 ;;9002226.02101,"1729,67544-1350-60 ",.01)
 ;;67544-1350-60
 ;;9002226.02101,"1729,67544-1350-60 ",.02)
 ;;67544-1350-60
 ;;9002226.02101,"1729,67544-1372-45 ",.01)
 ;;67544-1372-45
 ;;9002226.02101,"1729,67544-1372-45 ",.02)
 ;;67544-1372-45
 ;;9002226.02101,"1729,67544-1386-30 ",.01)
 ;;67544-1386-30
 ;;9002226.02101,"1729,67544-1386-30 ",.02)
 ;;67544-1386-30
 ;;9002226.02101,"1729,67544-1386-60 ",.01)
 ;;67544-1386-60
 ;;9002226.02101,"1729,67544-1386-60 ",.02)
 ;;67544-1386-60
 ;;9002226.02101,"1729,67544-1387-45 ",.01)
 ;;67544-1387-45
 ;;9002226.02101,"1729,67544-1387-45 ",.02)
 ;;67544-1387-45
 ;;9002226.02101,"1729,68030-6700-02 ",.01)
 ;;68030-6700-02
 ;;9002226.02101,"1729,68030-6700-02 ",.02)
 ;;68030-6700-02
 ;;9002226.02101,"1729,68030-6701-02 ",.01)
 ;;68030-6701-02
 ;;9002226.02101,"1729,68030-6701-02 ",.02)
 ;;68030-6701-02
 ;;9002226.02101,"1729,68071-0026-30 ",.01)
 ;;68071-0026-30
 ;;9002226.02101,"1729,68071-0026-30 ",.02)
 ;;68071-0026-30
 ;;9002226.02101,"1729,68071-0026-60 ",.01)
 ;;68071-0026-60
 ;;9002226.02101,"1729,68071-0026-60 ",.02)
 ;;68071-0026-60
 ;;9002226.02101,"1729,68071-0026-90 ",.01)
 ;;68071-0026-90
 ;;9002226.02101,"1729,68071-0026-90 ",.02)
 ;;68071-0026-90
 ;;9002226.02101,"1729,68071-0146-30 ",.01)
 ;;68071-0146-30
 ;;9002226.02101,"1729,68071-0146-30 ",.02)
 ;;68071-0146-30
 ;;9002226.02101,"1729,68071-0146-60 ",.01)
 ;;68071-0146-60
 ;;9002226.02101,"1729,68071-0146-60 ",.02)
 ;;68071-0146-60
 ;;9002226.02101,"1729,68071-0146-90 ",.01)
 ;;68071-0146-90