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

BGP72G9.m

Go to the documentation of this file.
BGP72G9 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;
 ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29
 ;
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,"1905,42549-0497-30 ",.02)
 ;;42549-0497-30
 ;;9002226.02101,"1905,43063-0176-14 ",.01)
 ;;43063-0176-14
 ;;9002226.02101,"1905,43063-0176-14 ",.02)
 ;;43063-0176-14
 ;;9002226.02101,"1905,43063-0218-30 ",.01)
 ;;43063-0218-30
 ;;9002226.02101,"1905,43063-0218-30 ",.02)
 ;;43063-0218-30
 ;;9002226.02101,"1905,43063-0471-30 ",.01)
 ;;43063-0471-30
 ;;9002226.02101,"1905,43063-0471-30 ",.02)
 ;;43063-0471-30
 ;;9002226.02101,"1905,43063-0655-30 ",.01)
 ;;43063-0655-30
 ;;9002226.02101,"1905,43063-0655-30 ",.02)
 ;;43063-0655-30
 ;;9002226.02101,"1905,43353-0021-30 ",.01)
 ;;43353-0021-30
 ;;9002226.02101,"1905,43353-0021-30 ",.02)
 ;;43353-0021-30
 ;;9002226.02101,"1905,43353-0021-35 ",.01)
 ;;43353-0021-35
 ;;9002226.02101,"1905,43353-0021-35 ",.02)
 ;;43353-0021-35
 ;;9002226.02101,"1905,43353-0021-40 ",.01)
 ;;43353-0021-40
 ;;9002226.02101,"1905,43353-0021-40 ",.02)
 ;;43353-0021-40
 ;;9002226.02101,"1905,43353-0021-45 ",.01)
 ;;43353-0021-45
 ;;9002226.02101,"1905,43353-0021-45 ",.02)
 ;;43353-0021-45
 ;;9002226.02101,"1905,43353-0021-50 ",.01)
 ;;43353-0021-50
 ;;9002226.02101,"1905,43353-0021-50 ",.02)
 ;;43353-0021-50
 ;;9002226.02101,"1905,43353-0021-53 ",.01)
 ;;43353-0021-53
 ;;9002226.02101,"1905,43353-0021-53 ",.02)
 ;;43353-0021-53
 ;;9002226.02101,"1905,43353-0021-55 ",.01)
 ;;43353-0021-55
 ;;9002226.02101,"1905,43353-0021-55 ",.02)
 ;;43353-0021-55
 ;;9002226.02101,"1905,43353-0021-60 ",.01)
 ;;43353-0021-60
 ;;9002226.02101,"1905,43353-0021-60 ",.02)
 ;;43353-0021-60
 ;;9002226.02101,"1905,43353-0021-61 ",.01)
 ;;43353-0021-61
 ;;9002226.02101,"1905,43353-0021-61 ",.02)
 ;;43353-0021-61
 ;;9002226.02101,"1905,43353-0021-70 ",.01)
 ;;43353-0021-70
 ;;9002226.02101,"1905,43353-0021-70 ",.02)
 ;;43353-0021-70
 ;;9002226.02101,"1905,43353-0023-11 ",.01)
 ;;43353-0023-11
 ;;9002226.02101,"1905,43353-0023-11 ",.02)
 ;;43353-0023-11
 ;;9002226.02101,"1905,43353-0023-15 ",.01)
 ;;43353-0023-15
 ;;9002226.02101,"1905,43353-0023-15 ",.02)
 ;;43353-0023-15
 ;;9002226.02101,"1905,43353-0023-20 ",.01)
 ;;43353-0023-20
 ;;9002226.02101,"1905,43353-0023-20 ",.02)
 ;;43353-0023-20
 ;;9002226.02101,"1905,43353-0023-21 ",.01)
 ;;43353-0023-21
 ;;9002226.02101,"1905,43353-0023-21 ",.02)
 ;;43353-0023-21
 ;;9002226.02101,"1905,43353-0023-25 ",.01)
 ;;43353-0023-25
 ;;9002226.02101,"1905,43353-0023-25 ",.02)
 ;;43353-0023-25
 ;;9002226.02101,"1905,43353-0023-28 ",.01)
 ;;43353-0023-28
 ;;9002226.02101,"1905,43353-0023-28 ",.02)
 ;;43353-0023-28
 ;;9002226.02101,"1905,43353-0023-30 ",.01)
 ;;43353-0023-30
 ;;9002226.02101,"1905,43353-0023-30 ",.02)
 ;;43353-0023-30
 ;;9002226.02101,"1905,43353-0023-35 ",.01)
 ;;43353-0023-35
 ;;9002226.02101,"1905,43353-0023-35 ",.02)
 ;;43353-0023-35
 ;;9002226.02101,"1905,43353-0023-38 ",.01)
 ;;43353-0023-38
 ;;9002226.02101,"1905,43353-0023-38 ",.02)
 ;;43353-0023-38
 ;;9002226.02101,"1905,43353-0023-40 ",.01)
 ;;43353-0023-40
 ;;9002226.02101,"1905,43353-0023-40 ",.02)
 ;;43353-0023-40
 ;;9002226.02101,"1905,43353-0023-44 ",.01)
 ;;43353-0023-44
 ;;9002226.02101,"1905,43353-0023-44 ",.02)
 ;;43353-0023-44
 ;;9002226.02101,"1905,43353-0023-45 ",.01)
 ;;43353-0023-45
 ;;9002226.02101,"1905,43353-0023-45 ",.02)
 ;;43353-0023-45
 ;;9002226.02101,"1905,43353-0023-47 ",.01)
 ;;43353-0023-47
 ;;9002226.02101,"1905,43353-0023-47 ",.02)
 ;;43353-0023-47
 ;;9002226.02101,"1905,43353-0023-50 ",.01)
 ;;43353-0023-50
 ;;9002226.02101,"1905,43353-0023-50 ",.02)
 ;;43353-0023-50
 ;;9002226.02101,"1905,43353-0023-53 ",.01)
 ;;43353-0023-53
 ;;9002226.02101,"1905,43353-0023-53 ",.02)
 ;;43353-0023-53
 ;;9002226.02101,"1905,43353-0023-55 ",.01)
 ;;43353-0023-55
 ;;9002226.02101,"1905,43353-0023-55 ",.02)
 ;;43353-0023-55
 ;;9002226.02101,"1905,43353-0023-57 ",.01)
 ;;43353-0023-57
 ;;9002226.02101,"1905,43353-0023-57 ",.02)
 ;;43353-0023-57
 ;;9002226.02101,"1905,43353-0023-59 ",.01)
 ;;43353-0023-59
 ;;9002226.02101,"1905,43353-0023-59 ",.02)
 ;;43353-0023-59
 ;;9002226.02101,"1905,43353-0023-60 ",.01)
 ;;43353-0023-60
 ;;9002226.02101,"1905,43353-0023-60 ",.02)
 ;;43353-0023-60
 ;;9002226.02101,"1905,43353-0023-61 ",.01)
 ;;43353-0023-61
 ;;9002226.02101,"1905,43353-0023-61 ",.02)
 ;;43353-0023-61
 ;;9002226.02101,"1905,43353-0023-65 ",.01)
 ;;43353-0023-65
 ;;9002226.02101,"1905,43353-0023-65 ",.02)
 ;;43353-0023-65
 ;;9002226.02101,"1905,43353-0023-68 ",.01)
 ;;43353-0023-68
 ;;9002226.02101,"1905,43353-0023-68 ",.02)
 ;;43353-0023-68
 ;;9002226.02101,"1905,43353-0023-70 ",.01)
 ;;43353-0023-70
 ;;9002226.02101,"1905,43353-0023-70 ",.02)
 ;;43353-0023-70
 ;;9002226.02101,"1905,43353-0023-78 ",.01)
 ;;43353-0023-78
 ;;9002226.02101,"1905,43353-0023-78 ",.02)
 ;;43353-0023-78
 ;;9002226.02101,"1905,43353-0028-30 ",.01)
 ;;43353-0028-30
 ;;9002226.02101,"1905,43353-0028-30 ",.02)
 ;;43353-0028-30
 ;;9002226.02101,"1905,43353-0028-60 ",.01)
 ;;43353-0028-60
 ;;9002226.02101,"1905,43353-0028-60 ",.02)
 ;;43353-0028-60
 ;;9002226.02101,"1905,43353-0029-30 ",.01)
 ;;43353-0029-30
 ;;9002226.02101,"1905,43353-0029-30 ",.02)
 ;;43353-0029-30
 ;;9002226.02101,"1905,43353-0029-35 ",.01)
 ;;43353-0029-35
 ;;9002226.02101,"1905,43353-0029-35 ",.02)
 ;;43353-0029-35
 ;;9002226.02101,"1905,43353-0029-40 ",.01)
 ;;43353-0029-40
 ;;9002226.02101,"1905,43353-0029-40 ",.02)
 ;;43353-0029-40
 ;;9002226.02101,"1905,43353-0029-45 ",.01)
 ;;43353-0029-45
 ;;9002226.02101,"1905,43353-0029-45 ",.02)
 ;;43353-0029-45
 ;;9002226.02101,"1905,43353-0029-53 ",.01)
 ;;43353-0029-53
 ;;9002226.02101,"1905,43353-0029-53 ",.02)
 ;;43353-0029-53
 ;;9002226.02101,"1905,43353-0029-60 ",.01)
 ;;43353-0029-60
 ;;9002226.02101,"1905,43353-0029-60 ",.02)
 ;;43353-0029-60
 ;;9002226.02101,"1905,43353-0030-30 ",.01)
 ;;43353-0030-30
 ;;9002226.02101,"1905,43353-0030-30 ",.02)
 ;;43353-0030-30
 ;;9002226.02101,"1905,43353-0030-60 ",.01)
 ;;43353-0030-60
 ;;9002226.02101,"1905,43353-0030-60 ",.02)
 ;;43353-0030-60
 ;;9002226.02101,"1905,43353-0033-30 ",.01)
 ;;43353-0033-30
 ;;9002226.02101,"1905,43353-0033-30 ",.02)
 ;;43353-0033-30
 ;;9002226.02101,"1905,43353-0049-30 ",.01)
 ;;43353-0049-30
 ;;9002226.02101,"1905,43353-0049-30 ",.02)
 ;;43353-0049-30
 ;;9002226.02101,"1905,43353-0049-60 ",.01)
 ;;43353-0049-60
 ;;9002226.02101,"1905,43353-0049-60 ",.02)
 ;;43353-0049-60
 ;;9002226.02101,"1905,43353-0050-11 ",.01)
 ;;43353-0050-11
 ;;9002226.02101,"1905,43353-0050-11 ",.02)
 ;;43353-0050-11
 ;;9002226.02101,"1905,43353-0050-15 ",.01)
 ;;43353-0050-15
 ;;9002226.02101,"1905,43353-0050-15 ",.02)
 ;;43353-0050-15
 ;;9002226.02101,"1905,43353-0050-20 ",.01)
 ;;43353-0050-20
 ;;9002226.02101,"1905,43353-0050-20 ",.02)
 ;;43353-0050-20
 ;;9002226.02101,"1905,43353-0050-21 ",.01)
 ;;43353-0050-21
 ;;9002226.02101,"1905,43353-0050-21 ",.02)
 ;;43353-0050-21
 ;;9002226.02101,"1905,43353-0050-25 ",.01)
 ;;43353-0050-25
 ;;9002226.02101,"1905,43353-0050-25 ",.02)
 ;;43353-0050-25
 ;;9002226.02101,"1905,43353-0050-28 ",.01)
 ;;43353-0050-28
 ;;9002226.02101,"1905,43353-0050-28 ",.02)
 ;;43353-0050-28
 ;;9002226.02101,"1905,43353-0050-30 ",.01)
 ;;43353-0050-30
 ;;9002226.02101,"1905,43353-0050-30 ",.02)
 ;;43353-0050-30
 ;;9002226.02101,"1905,43353-0050-35 ",.01)
 ;;43353-0050-35
 ;;9002226.02101,"1905,43353-0050-35 ",.02)
 ;;43353-0050-35
 ;;9002226.02101,"1905,43353-0050-38 ",.01)
 ;;43353-0050-38
 ;;9002226.02101,"1905,43353-0050-38 ",.02)
 ;;43353-0050-38
 ;;9002226.02101,"1905,43353-0050-40 ",.01)
 ;;43353-0050-40
 ;;9002226.02101,"1905,43353-0050-40 ",.02)
 ;;43353-0050-40
 ;;9002226.02101,"1905,43353-0050-44 ",.01)
 ;;43353-0050-44
 ;;9002226.02101,"1905,43353-0050-44 ",.02)
 ;;43353-0050-44
 ;;9002226.02101,"1905,43353-0050-45 ",.01)
 ;;43353-0050-45
 ;;9002226.02101,"1905,43353-0050-45 ",.02)
 ;;43353-0050-45
 ;;9002226.02101,"1905,43353-0050-46 ",.01)
 ;;43353-0050-46
 ;;9002226.02101,"1905,43353-0050-46 ",.02)
 ;;43353-0050-46
 ;;9002226.02101,"1905,43353-0050-47 ",.01)
 ;;43353-0050-47
 ;;9002226.02101,"1905,43353-0050-47 ",.02)
 ;;43353-0050-47
 ;;9002226.02101,"1905,43353-0050-50 ",.01)
 ;;43353-0050-50
 ;;9002226.02101,"1905,43353-0050-50 ",.02)
 ;;43353-0050-50
 ;;9002226.02101,"1905,43353-0050-53 ",.01)
 ;;43353-0050-53
 ;;9002226.02101,"1905,43353-0050-53 ",.02)
 ;;43353-0050-53
 ;;9002226.02101,"1905,43353-0050-55 ",.01)
 ;;43353-0050-55
 ;;9002226.02101,"1905,43353-0050-55 ",.02)
 ;;43353-0050-55
 ;;9002226.02101,"1905,43353-0050-57 ",.01)
 ;;43353-0050-57
 ;;9002226.02101,"1905,43353-0050-57 ",.02)
 ;;43353-0050-57
 ;;9002226.02101,"1905,43353-0050-59 ",.01)
 ;;43353-0050-59
 ;;9002226.02101,"1905,43353-0050-59 ",.02)
 ;;43353-0050-59
 ;;9002226.02101,"1905,43353-0050-60 ",.01)
 ;;43353-0050-60
 ;;9002226.02101,"1905,43353-0050-60 ",.02)
 ;;43353-0050-60
 ;;9002226.02101,"1905,43353-0050-61 ",.01)
 ;;43353-0050-61
 ;;9002226.02101,"1905,43353-0050-61 ",.02)
 ;;43353-0050-61
 ;;9002226.02101,"1905,43353-0050-65 ",.01)
 ;;43353-0050-65
 ;;9002226.02101,"1905,43353-0050-65 ",.02)
 ;;43353-0050-65
 ;;9002226.02101,"1905,43353-0050-68 ",.01)
 ;;43353-0050-68
 ;;9002226.02101,"1905,43353-0050-68 ",.02)
 ;;43353-0050-68
 ;;9002226.02101,"1905,43353-0050-70 ",.01)
 ;;43353-0050-70
 ;;9002226.02101,"1905,43353-0050-70 ",.02)
 ;;43353-0050-70
 ;;9002226.02101,"1905,43353-0050-78 ",.01)
 ;;43353-0050-78
 ;;9002226.02101,"1905,43353-0050-78 ",.02)
 ;;43353-0050-78
 ;;9002226.02101,"1905,43353-0053-30 ",.01)
 ;;43353-0053-30
 ;;9002226.02101,"1905,43353-0053-30 ",.02)
 ;;43353-0053-30
 ;;9002226.02101,"1905,43353-0054-30 ",.01)
 ;;43353-0054-30
 ;;9002226.02101,"1905,43353-0054-30 ",.02)
 ;;43353-0054-30
 ;;9002226.02101,"1905,43353-0089-30 ",.01)
 ;;43353-0089-30
 ;;9002226.02101,"1905,43353-0089-30 ",.02)
 ;;43353-0089-30
 ;;9002226.02101,"1905,43353-0089-60 ",.01)
 ;;43353-0089-60
 ;;9002226.02101,"1905,43353-0089-60 ",.02)
 ;;43353-0089-60
 ;;9002226.02101,"1905,43353-0142-30 ",.01)
 ;;43353-0142-30
 ;;9002226.02101,"1905,43353-0142-30 ",.02)
 ;;43353-0142-30
 ;;9002226.02101,"1905,43353-0142-35 ",.01)
 ;;43353-0142-35
 ;;9002226.02101,"1905,43353-0142-35 ",.02)
 ;;43353-0142-35
 ;;9002226.02101,"1905,43353-0142-40 ",.01)
 ;;43353-0142-40
 ;;9002226.02101,"1905,43353-0142-40 ",.02)
 ;;43353-0142-40
 ;;9002226.02101,"1905,43353-0142-45 ",.01)
 ;;43353-0142-45
 ;;9002226.02101,"1905,43353-0142-45 ",.02)
 ;;43353-0142-45
 ;;9002226.02101,"1905,43353-0142-53 ",.01)
 ;;43353-0142-53
 ;;9002226.02101,"1905,43353-0142-53 ",.02)
 ;;43353-0142-53
 ;;9002226.02101,"1905,43353-0142-60 ",.01)
 ;;43353-0142-60
 ;;9002226.02101,"1905,43353-0142-60 ",.02)
 ;;43353-0142-60
 ;;9002226.02101,"1905,43353-0491-30 ",.01)
 ;;43353-0491-30
 ;;9002226.02101,"1905,43353-0491-30 ",.02)
 ;;43353-0491-30
 ;;9002226.02101,"1905,43353-0492-30 ",.01)
 ;;43353-0492-30
 ;;9002226.02101,"1905,43353-0492-30 ",.02)
 ;;43353-0492-30
 ;;9002226.02101,"1905,43353-0492-60 ",.01)
 ;;43353-0492-60
 ;;9002226.02101,"1905,43353-0492-60 ",.02)
 ;;43353-0492-60
 ;;9002226.02101,"1905,43353-0493-30 ",.01)
 ;;43353-0493-30
 ;;9002226.02101,"1905,43353-0493-30 ",.02)
 ;;43353-0493-30
 ;;9002226.02101,"1905,43353-0493-60 ",.01)
 ;;43353-0493-60
 ;;9002226.02101,"1905,43353-0493-60 ",.02)
 ;;43353-0493-60
 ;;9002226.02101,"1905,43353-0494-30 ",.01)
 ;;43353-0494-30
 ;;9002226.02101,"1905,43353-0494-30 ",.02)
 ;;43353-0494-30
 ;;9002226.02101,"1905,43353-0578-09 ",.01)
 ;;43353-0578-09
 ;;9002226.02101,"1905,43353-0578-09 ",.02)
 ;;43353-0578-09
 ;;9002226.02101,"1905,43353-0578-30 ",.01)
 ;;43353-0578-30
 ;;9002226.02101,"1905,43353-0578-30 ",.02)
 ;;43353-0578-30