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

BGP82U14.m

Go to the documentation of this file.
BGP82U14 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 09, 2017 ;
 ;;18.0;IHS CLINICAL REPORTING;;NOV 21, 2017;Build 51
 ;
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,66267-0268-30 ",.02)
 ;;66267-0268-30
 ;;9002226.02101,"1905,66267-0285-30 ",.01)
 ;;66267-0285-30
 ;;9002226.02101,"1905,66267-0285-30 ",.02)
 ;;66267-0285-30
 ;;9002226.02101,"1905,66267-0628-00 ",.01)
 ;;66267-0628-00
 ;;9002226.02101,"1905,66267-0628-00 ",.02)
 ;;66267-0628-00
 ;;9002226.02101,"1905,66267-0629-00 ",.01)
 ;;66267-0629-00
 ;;9002226.02101,"1905,66267-0629-00 ",.02)
 ;;66267-0629-00
 ;;9002226.02101,"1905,66267-0630-00 ",.01)
 ;;66267-0630-00
 ;;9002226.02101,"1905,66267-0630-00 ",.02)
 ;;66267-0630-00
 ;;9002226.02101,"1905,66267-0631-00 ",.01)
 ;;66267-0631-00
 ;;9002226.02101,"1905,66267-0631-00 ",.02)
 ;;66267-0631-00
 ;;9002226.02101,"1905,66267-0632-00 ",.01)
 ;;66267-0632-00
 ;;9002226.02101,"1905,66267-0632-00 ",.02)
 ;;66267-0632-00
 ;;9002226.02101,"1905,66267-0633-00 ",.01)
 ;;66267-0633-00
 ;;9002226.02101,"1905,66267-0633-00 ",.02)
 ;;66267-0633-00
 ;;9002226.02101,"1905,66267-0634-00 ",.01)
 ;;66267-0634-00
 ;;9002226.02101,"1905,66267-0634-00 ",.02)
 ;;66267-0634-00
 ;;9002226.02101,"1905,66267-0635-00 ",.01)
 ;;66267-0635-00
 ;;9002226.02101,"1905,66267-0635-00 ",.02)
 ;;66267-0635-00
 ;;9002226.02101,"1905,66267-0636-00 ",.01)
 ;;66267-0636-00
 ;;9002226.02101,"1905,66267-0636-00 ",.02)
 ;;66267-0636-00
 ;;9002226.02101,"1905,66647-7123-44 ",.01)
 ;;66647-7123-44
 ;;9002226.02101,"1905,66647-7123-44 ",.02)
 ;;66647-7123-44
 ;;9002226.02101,"1905,66647-8100-44 ",.01)
 ;;66647-8100-44
 ;;9002226.02101,"1905,66647-8100-44 ",.02)
 ;;66647-8100-44
 ;;9002226.02101,"1905,67457-0582-00 ",.01)
 ;;67457-0582-00
 ;;9002226.02101,"1905,67457-0582-00 ",.02)
 ;;67457-0582-00
 ;;9002226.02101,"1905,67457-0582-10 ",.01)
 ;;67457-0582-10
 ;;9002226.02101,"1905,67457-0582-10 ",.02)
 ;;67457-0582-10
 ;;9002226.02101,"1905,67457-0583-00 ",.01)
 ;;67457-0583-00
 ;;9002226.02101,"1905,67457-0583-00 ",.02)
 ;;67457-0583-00
 ;;9002226.02101,"1905,67457-0583-04 ",.01)
 ;;67457-0583-04
 ;;9002226.02101,"1905,67457-0583-04 ",.02)
 ;;67457-0583-04
 ;;9002226.02101,"1905,67457-0584-00 ",.01)
 ;;67457-0584-00
 ;;9002226.02101,"1905,67457-0584-00 ",.02)
 ;;67457-0584-00
 ;;9002226.02101,"1905,67457-0584-06 ",.01)
 ;;67457-0584-06
 ;;9002226.02101,"1905,67457-0584-06 ",.02)
 ;;67457-0584-06
 ;;9002226.02101,"1905,67457-0585-00 ",.01)
 ;;67457-0585-00
 ;;9002226.02101,"1905,67457-0585-00 ",.02)
 ;;67457-0585-00
 ;;9002226.02101,"1905,67457-0585-08 ",.01)
 ;;67457-0585-08
 ;;9002226.02101,"1905,67457-0585-08 ",.02)
 ;;67457-0585-08
 ;;9002226.02101,"1905,67457-0592-00 ",.01)
 ;;67457-0592-00
 ;;9002226.02101,"1905,67457-0592-00 ",.02)
 ;;67457-0592-00
 ;;9002226.02101,"1905,67457-0592-10 ",.01)
 ;;67457-0592-10
 ;;9002226.02101,"1905,67457-0592-10 ",.02)
 ;;67457-0592-10
 ;;9002226.02101,"1905,67457-0593-00 ",.01)
 ;;67457-0593-00
 ;;9002226.02101,"1905,67457-0593-00 ",.02)
 ;;67457-0593-00
 ;;9002226.02101,"1905,67457-0593-04 ",.01)
 ;;67457-0593-04
 ;;9002226.02101,"1905,67457-0593-04 ",.02)
 ;;67457-0593-04
 ;;9002226.02101,"1905,67457-0594-00 ",.01)
 ;;67457-0594-00
 ;;9002226.02101,"1905,67457-0594-00 ",.02)
 ;;67457-0594-00
 ;;9002226.02101,"1905,67457-0594-06 ",.01)
 ;;67457-0594-06
 ;;9002226.02101,"1905,67457-0594-06 ",.02)
 ;;67457-0594-06
 ;;9002226.02101,"1905,67457-0595-00 ",.01)
 ;;67457-0595-00
 ;;9002226.02101,"1905,67457-0595-00 ",.02)
 ;;67457-0595-00
 ;;9002226.02101,"1905,67457-0595-08 ",.01)
 ;;67457-0595-08
 ;;9002226.02101,"1905,67457-0595-08 ",.02)
 ;;67457-0595-08
 ;;9002226.02101,"1905,67457-0693-00 ",.01)
 ;;67457-0693-00
 ;;9002226.02101,"1905,67457-0693-00 ",.02)
 ;;67457-0693-00
 ;;9002226.02101,"1905,67457-0693-10 ",.01)
 ;;67457-0693-10
 ;;9002226.02101,"1905,67457-0693-10 ",.02)
 ;;67457-0693-10
 ;;9002226.02101,"1905,67457-0694-00 ",.01)
 ;;67457-0694-00
 ;;9002226.02101,"1905,67457-0694-00 ",.02)
 ;;67457-0694-00
 ;;9002226.02101,"1905,67457-0694-10 ",.01)
 ;;67457-0694-10
 ;;9002226.02101,"1905,67457-0694-10 ",.02)
 ;;67457-0694-10
 ;;9002226.02101,"1905,67457-0695-00 ",.01)
 ;;67457-0695-00
 ;;9002226.02101,"1905,67457-0695-00 ",.02)
 ;;67457-0695-00
 ;;9002226.02101,"1905,67457-0695-10 ",.01)
 ;;67457-0695-10
 ;;9002226.02101,"1905,67457-0695-10 ",.02)
 ;;67457-0695-10
 ;;9002226.02101,"1905,67457-0696-00 ",.01)
 ;;67457-0696-00
 ;;9002226.02101,"1905,67457-0696-00 ",.02)
 ;;67457-0696-00
 ;;9002226.02101,"1905,67457-0696-10 ",.01)
 ;;67457-0696-10
 ;;9002226.02101,"1905,67457-0696-10 ",.02)
 ;;67457-0696-10
 ;;9002226.02101,"1905,67544-0052-15 ",.01)
 ;;67544-0052-15
 ;;9002226.02101,"1905,67544-0052-15 ",.02)
 ;;67544-0052-15
 ;;9002226.02101,"1905,67544-0052-20 ",.01)
 ;;67544-0052-20
 ;;9002226.02101,"1905,67544-0052-20 ",.02)
 ;;67544-0052-20
 ;;9002226.02101,"1905,67544-0052-25 ",.01)
 ;;67544-0052-25
 ;;9002226.02101,"1905,67544-0052-25 ",.02)
 ;;67544-0052-25
 ;;9002226.02101,"1905,67544-0052-28 ",.01)
 ;;67544-0052-28
 ;;9002226.02101,"1905,67544-0052-28 ",.02)
 ;;67544-0052-28
 ;;9002226.02101,"1905,67544-0052-30 ",.01)
 ;;67544-0052-30
 ;;9002226.02101,"1905,67544-0052-30 ",.02)
 ;;67544-0052-30
 ;;9002226.02101,"1905,67544-0052-35 ",.01)
 ;;67544-0052-35
 ;;9002226.02101,"1905,67544-0052-35 ",.02)
 ;;67544-0052-35
 ;;9002226.02101,"1905,67544-0052-38 ",.01)
 ;;67544-0052-38
 ;;9002226.02101,"1905,67544-0052-38 ",.02)
 ;;67544-0052-38
 ;;9002226.02101,"1905,67544-0052-40 ",.01)
 ;;67544-0052-40
 ;;9002226.02101,"1905,67544-0052-40 ",.02)
 ;;67544-0052-40
 ;;9002226.02101,"1905,67544-0052-45 ",.01)
 ;;67544-0052-45
 ;;9002226.02101,"1905,67544-0052-45 ",.02)
 ;;67544-0052-45
 ;;9002226.02101,"1905,67544-0052-50 ",.01)
 ;;67544-0052-50
 ;;9002226.02101,"1905,67544-0052-50 ",.02)
 ;;67544-0052-50
 ;;9002226.02101,"1905,67544-0052-53 ",.01)
 ;;67544-0052-53
 ;;9002226.02101,"1905,67544-0052-53 ",.02)
 ;;67544-0052-53
 ;;9002226.02101,"1905,67544-0052-55 ",.01)
 ;;67544-0052-55
 ;;9002226.02101,"1905,67544-0052-55 ",.02)
 ;;67544-0052-55
 ;;9002226.02101,"1905,67544-0052-57 ",.01)
 ;;67544-0052-57
 ;;9002226.02101,"1905,67544-0052-57 ",.02)
 ;;67544-0052-57
 ;;9002226.02101,"1905,67544-0052-60 ",.01)
 ;;67544-0052-60
 ;;9002226.02101,"1905,67544-0052-60 ",.02)
 ;;67544-0052-60
 ;;9002226.02101,"1905,67544-0052-61 ",.01)
 ;;67544-0052-61
 ;;9002226.02101,"1905,67544-0052-61 ",.02)
 ;;67544-0052-61
 ;;9002226.02101,"1905,67544-0052-65 ",.01)
 ;;67544-0052-65
 ;;9002226.02101,"1905,67544-0052-65 ",.02)
 ;;67544-0052-65
 ;;9002226.02101,"1905,67544-0052-68 ",.01)
 ;;67544-0052-68
 ;;9002226.02101,"1905,67544-0052-68 ",.02)
 ;;67544-0052-68
 ;;9002226.02101,"1905,67544-0052-70 ",.01)
 ;;67544-0052-70
 ;;9002226.02101,"1905,67544-0052-70 ",.02)
 ;;67544-0052-70
 ;;9002226.02101,"1905,67544-0052-78 ",.01)
 ;;67544-0052-78
 ;;9002226.02101,"1905,67544-0052-78 ",.02)
 ;;67544-0052-78
 ;;9002226.02101,"1905,67544-0070-30 ",.01)
 ;;67544-0070-30
 ;;9002226.02101,"1905,67544-0070-30 ",.02)
 ;;67544-0070-30
 ;;9002226.02101,"1905,67544-0194-30 ",.01)
 ;;67544-0194-30
 ;;9002226.02101,"1905,67544-0194-30 ",.02)
 ;;67544-0194-30
 ;;9002226.02101,"1905,67544-0194-60 ",.01)
 ;;67544-0194-60
 ;;9002226.02101,"1905,67544-0194-60 ",.02)
 ;;67544-0194-60
 ;;9002226.02101,"1905,67544-0195-30 ",.01)
 ;;67544-0195-30
 ;;9002226.02101,"1905,67544-0195-30 ",.02)
 ;;67544-0195-30
 ;;9002226.02101,"1905,67544-0195-40 ",.01)
 ;;67544-0195-40
 ;;9002226.02101,"1905,67544-0195-40 ",.02)
 ;;67544-0195-40
 ;;9002226.02101,"1905,67544-0195-45 ",.01)
 ;;67544-0195-45
 ;;9002226.02101,"1905,67544-0195-45 ",.02)
 ;;67544-0195-45
 ;;9002226.02101,"1905,67544-0195-53 ",.01)
 ;;67544-0195-53
 ;;9002226.02101,"1905,67544-0195-53 ",.02)
 ;;67544-0195-53
 ;;9002226.02101,"1905,67544-0195-60 ",.01)
 ;;67544-0195-60
 ;;9002226.02101,"1905,67544-0195-60 ",.02)
 ;;67544-0195-60
 ;;9002226.02101,"1905,67544-0318-15 ",.01)
 ;;67544-0318-15
 ;;9002226.02101,"1905,67544-0318-15 ",.02)
 ;;67544-0318-15
 ;;9002226.02101,"1905,67544-0318-30 ",.01)
 ;;67544-0318-30
 ;;9002226.02101,"1905,67544-0318-30 ",.02)
 ;;67544-0318-30
 ;;9002226.02101,"1905,67544-0318-35 ",.01)
 ;;67544-0318-35
 ;;9002226.02101,"1905,67544-0318-35 ",.02)
 ;;67544-0318-35
 ;;9002226.02101,"1905,67544-0318-40 ",.01)
 ;;67544-0318-40
 ;;9002226.02101,"1905,67544-0318-40 ",.02)
 ;;67544-0318-40
 ;;9002226.02101,"1905,67544-0318-45 ",.01)
 ;;67544-0318-45
 ;;9002226.02101,"1905,67544-0318-45 ",.02)
 ;;67544-0318-45
 ;;9002226.02101,"1905,67544-0318-50 ",.01)
 ;;67544-0318-50
 ;;9002226.02101,"1905,67544-0318-50 ",.02)
 ;;67544-0318-50
 ;;9002226.02101,"1905,67544-0318-53 ",.01)
 ;;67544-0318-53
 ;;9002226.02101,"1905,67544-0318-53 ",.02)
 ;;67544-0318-53
 ;;9002226.02101,"1905,67544-0318-55 ",.01)
 ;;67544-0318-55
 ;;9002226.02101,"1905,67544-0318-55 ",.02)
 ;;67544-0318-55
 ;;9002226.02101,"1905,67544-0318-60 ",.01)
 ;;67544-0318-60
 ;;9002226.02101,"1905,67544-0318-60 ",.02)
 ;;67544-0318-60
 ;;9002226.02101,"1905,67544-0318-61 ",.01)
 ;;67544-0318-61
 ;;9002226.02101,"1905,67544-0318-61 ",.02)
 ;;67544-0318-61
 ;;9002226.02101,"1905,67544-0318-70 ",.01)
 ;;67544-0318-70
 ;;9002226.02101,"1905,67544-0318-70 ",.02)
 ;;67544-0318-70
 ;;9002226.02101,"1905,67544-0401-15 ",.01)
 ;;67544-0401-15
 ;;9002226.02101,"1905,67544-0401-15 ",.02)
 ;;67544-0401-15
 ;;9002226.02101,"1905,67544-0401-30 ",.01)
 ;;67544-0401-30
 ;;9002226.02101,"1905,67544-0401-30 ",.02)
 ;;67544-0401-30
 ;;9002226.02101,"1905,67544-0401-35 ",.01)
 ;;67544-0401-35
 ;;9002226.02101,"1905,67544-0401-35 ",.02)
 ;;67544-0401-35
 ;;9002226.02101,"1905,67544-0401-40 ",.01)
 ;;67544-0401-40
 ;;9002226.02101,"1905,67544-0401-40 ",.02)
 ;;67544-0401-40
 ;;9002226.02101,"1905,67544-0401-45 ",.01)
 ;;67544-0401-45
 ;;9002226.02101,"1905,67544-0401-45 ",.02)
 ;;67544-0401-45
 ;;9002226.02101,"1905,67544-0401-50 ",.01)
 ;;67544-0401-50
 ;;9002226.02101,"1905,67544-0401-50 ",.02)
 ;;67544-0401-50
 ;;9002226.02101,"1905,67544-0401-53 ",.01)
 ;;67544-0401-53
 ;;9002226.02101,"1905,67544-0401-53 ",.02)
 ;;67544-0401-53
 ;;9002226.02101,"1905,67544-0401-55 ",.01)
 ;;67544-0401-55
 ;;9002226.02101,"1905,67544-0401-55 ",.02)
 ;;67544-0401-55
 ;;9002226.02101,"1905,67544-0401-60 ",.01)
 ;;67544-0401-60
 ;;9002226.02101,"1905,67544-0401-60 ",.02)
 ;;67544-0401-60
 ;;9002226.02101,"1905,67544-0401-61 ",.01)
 ;;67544-0401-61
 ;;9002226.02101,"1905,67544-0401-61 ",.02)
 ;;67544-0401-61
 ;;9002226.02101,"1905,67544-0401-70 ",.01)
 ;;67544-0401-70
 ;;9002226.02101,"1905,67544-0401-70 ",.02)
 ;;67544-0401-70
 ;;9002226.02101,"1905,68084-0027-01 ",.01)
 ;;68084-0027-01
 ;;9002226.02101,"1905,68084-0027-01 ",.02)
 ;;68084-0027-01
 ;;9002226.02101,"1905,68084-0027-11 ",.01)
 ;;68084-0027-11
 ;;9002226.02101,"1905,68084-0027-11 ",.02)
 ;;68084-0027-11
 ;;9002226.02101,"1905,68084-0027-77 ",.01)
 ;;68084-0027-77
 ;;9002226.02101,"1905,68084-0027-77 ",.02)
 ;;68084-0027-77
 ;;9002226.02101,"1905,68382-0052-01 ",.01)
 ;;68382-0052-01
 ;;9002226.02101,"1905,68382-0052-01 ",.02)
 ;;68382-0052-01
 ;;9002226.02101,"1905,68382-0052-10 ",.01)
 ;;68382-0052-10
 ;;9002226.02101,"1905,68382-0052-10 ",.02)
 ;;68382-0052-10
 ;;9002226.02101,"1905,68382-0053-01 ",.01)
 ;;68382-0053-01
 ;;9002226.02101,"1905,68382-0053-01 ",.02)
 ;;68382-0053-01
 ;;9002226.02101,"1905,68382-0053-10 ",.01)
 ;;68382-0053-10
 ;;9002226.02101,"1905,68382-0053-10 ",.02)
 ;;68382-0053-10
 ;;9002226.02101,"1905,68382-0054-01 ",.01)
 ;;68382-0054-01
 ;;9002226.02101,"1905,68382-0054-01 ",.02)
 ;;68382-0054-01
 ;;9002226.02101,"1905,68382-0054-10 ",.01)
 ;;68382-0054-10
 ;;9002226.02101,"1905,68382-0054-10 ",.02)
 ;;68382-0054-10