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

BGP14C17.m

Go to the documentation of this file.
BGP14C17 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON APR 14, 2011 ;
 ;;11.1;IHS CLINICAL REPORTING SYSTEM;;JUN 27, 2011;Build 33
 ;
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,"1105,66105-0120-09 ",.01)
 ;;66105-0120-09
 ;;9002226.02101,"1105,66105-0120-09 ",.02)
 ;;66105-0120-09
 ;;9002226.02101,"1105,66105-0120-15 ",.01)
 ;;66105-0120-15
 ;;9002226.02101,"1105,66105-0120-15 ",.02)
 ;;66105-0120-15
 ;;9002226.02101,"1105,66105-0121-01 ",.01)
 ;;66105-0121-01
 ;;9002226.02101,"1105,66105-0121-01 ",.02)
 ;;66105-0121-01
 ;;9002226.02101,"1105,66105-0121-03 ",.01)
 ;;66105-0121-03
 ;;9002226.02101,"1105,66105-0121-03 ",.02)
 ;;66105-0121-03
 ;;9002226.02101,"1105,66105-0121-06 ",.01)
 ;;66105-0121-06
 ;;9002226.02101,"1105,66105-0121-06 ",.02)
 ;;66105-0121-06
 ;;9002226.02101,"1105,66105-0121-09 ",.01)
 ;;66105-0121-09
 ;;9002226.02101,"1105,66105-0121-09 ",.02)
 ;;66105-0121-09
 ;;9002226.02101,"1105,66105-0121-15 ",.01)
 ;;66105-0121-15
 ;;9002226.02101,"1105,66105-0121-15 ",.02)
 ;;66105-0121-15
 ;;9002226.02101,"1105,66105-0122-01 ",.01)
 ;;66105-0122-01
 ;;9002226.02101,"1105,66105-0122-01 ",.02)
 ;;66105-0122-01
 ;;9002226.02101,"1105,66105-0122-03 ",.01)
 ;;66105-0122-03
 ;;9002226.02101,"1105,66105-0122-03 ",.02)
 ;;66105-0122-03
 ;;9002226.02101,"1105,66105-0122-06 ",.01)
 ;;66105-0122-06
 ;;9002226.02101,"1105,66105-0122-06 ",.02)
 ;;66105-0122-06
 ;;9002226.02101,"1105,66105-0122-09 ",.01)
 ;;66105-0122-09
 ;;9002226.02101,"1105,66105-0122-09 ",.02)
 ;;66105-0122-09
 ;;9002226.02101,"1105,66105-0122-15 ",.01)
 ;;66105-0122-15
 ;;9002226.02101,"1105,66105-0122-15 ",.02)
 ;;66105-0122-15
 ;;9002226.02101,"1105,66105-0147-01 ",.01)
 ;;66105-0147-01
 ;;9002226.02101,"1105,66105-0147-01 ",.02)
 ;;66105-0147-01
 ;;9002226.02101,"1105,66105-0147-03 ",.01)
 ;;66105-0147-03
 ;;9002226.02101,"1105,66105-0147-03 ",.02)
 ;;66105-0147-03
 ;;9002226.02101,"1105,66105-0147-06 ",.01)
 ;;66105-0147-06
 ;;9002226.02101,"1105,66105-0147-06 ",.02)
 ;;66105-0147-06
 ;;9002226.02101,"1105,66105-0147-09 ",.01)
 ;;66105-0147-09
 ;;9002226.02101,"1105,66105-0147-09 ",.02)
 ;;66105-0147-09
 ;;9002226.02101,"1105,66105-0147-10 ",.01)
 ;;66105-0147-10
 ;;9002226.02101,"1105,66105-0147-10 ",.02)
 ;;66105-0147-10
 ;;9002226.02101,"1105,66105-0506-01 ",.01)
 ;;66105-0506-01
 ;;9002226.02101,"1105,66105-0506-01 ",.02)
 ;;66105-0506-01
 ;;9002226.02101,"1105,66105-0506-03 ",.01)
 ;;66105-0506-03
 ;;9002226.02101,"1105,66105-0506-03 ",.02)
 ;;66105-0506-03
 ;;9002226.02101,"1105,66105-0506-06 ",.01)
 ;;66105-0506-06
 ;;9002226.02101,"1105,66105-0506-06 ",.02)
 ;;66105-0506-06
 ;;9002226.02101,"1105,66105-0506-09 ",.01)
 ;;66105-0506-09
 ;;9002226.02101,"1105,66105-0506-09 ",.02)
 ;;66105-0506-09
 ;;9002226.02101,"1105,66105-0506-10 ",.01)
 ;;66105-0506-10
 ;;9002226.02101,"1105,66105-0506-10 ",.02)
 ;;66105-0506-10
 ;;9002226.02101,"1105,66105-0988-03 ",.01)
 ;;66105-0988-03
 ;;9002226.02101,"1105,66105-0988-03 ",.02)
 ;;66105-0988-03
 ;;9002226.02101,"1105,66116-0238-30 ",.01)
 ;;66116-0238-30
 ;;9002226.02101,"1105,66116-0238-30 ",.02)
 ;;66116-0238-30
 ;;9002226.02101,"1105,66116-0276-30 ",.01)
 ;;66116-0276-30
 ;;9002226.02101,"1105,66116-0276-30 ",.02)
 ;;66116-0276-30
 ;;9002226.02101,"1105,66116-0277-30 ",.01)
 ;;66116-0277-30
 ;;9002226.02101,"1105,66116-0277-30 ",.02)
 ;;66116-0277-30
 ;;9002226.02101,"1105,66267-0561-30 ",.01)
 ;;66267-0561-30
 ;;9002226.02101,"1105,66267-0561-30 ",.02)
 ;;66267-0561-30
 ;;9002226.02101,"1105,66267-0561-60 ",.01)
 ;;66267-0561-60
 ;;9002226.02101,"1105,66267-0561-60 ",.02)
 ;;66267-0561-60
 ;;9002226.02101,"1105,66267-0561-90 ",.01)
 ;;66267-0561-90
 ;;9002226.02101,"1105,66267-0561-90 ",.02)
 ;;66267-0561-90
 ;;9002226.02101,"1105,66336-0310-05 ",.01)
 ;;66336-0310-05
 ;;9002226.02101,"1105,66336-0310-05 ",.02)
 ;;66336-0310-05
 ;;9002226.02101,"1105,66336-0310-30 ",.01)
 ;;66336-0310-30
 ;;9002226.02101,"1105,66336-0310-30 ",.02)
 ;;66336-0310-30
 ;;9002226.02101,"1105,66336-0310-60 ",.01)
 ;;66336-0310-60
 ;;9002226.02101,"1105,66336-0310-60 ",.02)
 ;;66336-0310-60
 ;;9002226.02101,"1105,66336-0412-05 ",.01)
 ;;66336-0412-05
 ;;9002226.02101,"1105,66336-0412-05 ",.02)
 ;;66336-0412-05
 ;;9002226.02101,"1105,66336-0412-30 ",.01)
 ;;66336-0412-30
 ;;9002226.02101,"1105,66336-0412-30 ",.02)
 ;;66336-0412-30
 ;;9002226.02101,"1105,66336-0602-05 ",.01)
 ;;66336-0602-05
 ;;9002226.02101,"1105,66336-0602-05 ",.02)
 ;;66336-0602-05
 ;;9002226.02101,"1105,66336-0674-30 ",.01)
 ;;66336-0674-30
 ;;9002226.02101,"1105,66336-0674-30 ",.02)
 ;;66336-0674-30
 ;;9002226.02101,"1105,66336-0685-30 ",.01)
 ;;66336-0685-30
 ;;9002226.02101,"1105,66336-0685-30 ",.02)
 ;;66336-0685-30
 ;;9002226.02101,"1105,66336-0685-90 ",.01)
 ;;66336-0685-90
 ;;9002226.02101,"1105,66336-0685-90 ",.02)
 ;;66336-0685-90
 ;;9002226.02101,"1105,66336-0813-30 ",.01)
 ;;66336-0813-30
 ;;9002226.02101,"1105,66336-0813-30 ",.02)
 ;;66336-0813-30
 ;;9002226.02101,"1105,66336-0813-90 ",.01)
 ;;66336-0813-90
 ;;9002226.02101,"1105,66336-0813-90 ",.02)
 ;;66336-0813-90
 ;;9002226.02101,"1105,66336-0953-30 ",.01)
 ;;66336-0953-30
 ;;9002226.02101,"1105,66336-0953-30 ",.02)
 ;;66336-0953-30
 ;;9002226.02101,"1105,66336-0953-90 ",.01)
 ;;66336-0953-90
 ;;9002226.02101,"1105,66336-0953-90 ",.02)
 ;;66336-0953-90
 ;;9002226.02101,"1105,66336-0954-30 ",.01)
 ;;66336-0954-30
 ;;9002226.02101,"1105,66336-0954-30 ",.02)
 ;;66336-0954-30
 ;;9002226.02101,"1105,66336-0954-90 ",.01)
 ;;66336-0954-90
 ;;9002226.02101,"1105,66336-0954-90 ",.02)
 ;;66336-0954-90
 ;;9002226.02101,"1105,66336-0986-30 ",.01)
 ;;66336-0986-30
 ;;9002226.02101,"1105,66336-0986-30 ",.02)
 ;;66336-0986-30
 ;;9002226.02101,"1105,66582-0311-01 ",.01)
 ;;66582-0311-01
 ;;9002226.02101,"1105,66582-0311-01 ",.02)
 ;;66582-0311-01
 ;;9002226.02101,"1105,66582-0311-28 ",.01)
 ;;66582-0311-28
 ;;9002226.02101,"1105,66582-0311-28 ",.02)
 ;;66582-0311-28
 ;;9002226.02101,"1105,66582-0311-31 ",.01)
 ;;66582-0311-31
 ;;9002226.02101,"1105,66582-0311-31 ",.02)
 ;;66582-0311-31
 ;;9002226.02101,"1105,66582-0311-54 ",.01)
 ;;66582-0311-54
 ;;9002226.02101,"1105,66582-0311-54 ",.02)
 ;;66582-0311-54
 ;;9002226.02101,"1105,66582-0311-82 ",.01)
 ;;66582-0311-82
 ;;9002226.02101,"1105,66582-0311-82 ",.02)
 ;;66582-0311-82
 ;;9002226.02101,"1105,66582-0312-01 ",.01)
 ;;66582-0312-01
 ;;9002226.02101,"1105,66582-0312-01 ",.02)
 ;;66582-0312-01
 ;;9002226.02101,"1105,66582-0312-28 ",.01)
 ;;66582-0312-28
 ;;9002226.02101,"1105,66582-0312-28 ",.02)
 ;;66582-0312-28
 ;;9002226.02101,"1105,66582-0312-31 ",.01)
 ;;66582-0312-31
 ;;9002226.02101,"1105,66582-0312-31 ",.02)
 ;;66582-0312-31
 ;;9002226.02101,"1105,66582-0312-54 ",.01)
 ;;66582-0312-54
 ;;9002226.02101,"1105,66582-0312-54 ",.02)
 ;;66582-0312-54
 ;;9002226.02101,"1105,66582-0312-82 ",.01)
 ;;66582-0312-82
 ;;9002226.02101,"1105,66582-0312-82 ",.02)
 ;;66582-0312-82
 ;;9002226.02101,"1105,66582-0312-87 ",.01)
 ;;66582-0312-87
 ;;9002226.02101,"1105,66582-0312-87 ",.02)
 ;;66582-0312-87
 ;;9002226.02101,"1105,66582-0313-01 ",.01)
 ;;66582-0313-01
 ;;9002226.02101,"1105,66582-0313-01 ",.02)
 ;;66582-0313-01
 ;;9002226.02101,"1105,66582-0313-31 ",.01)
 ;;66582-0313-31
 ;;9002226.02101,"1105,66582-0313-31 ",.02)
 ;;66582-0313-31
 ;;9002226.02101,"1105,66582-0313-52 ",.01)
 ;;66582-0313-52
 ;;9002226.02101,"1105,66582-0313-52 ",.02)
 ;;66582-0313-52
 ;;9002226.02101,"1105,66582-0313-54 ",.01)
 ;;66582-0313-54
 ;;9002226.02101,"1105,66582-0313-54 ",.02)
 ;;66582-0313-54
 ;;9002226.02101,"1105,66582-0313-74 ",.01)
 ;;66582-0313-74
 ;;9002226.02101,"1105,66582-0313-74 ",.02)
 ;;66582-0313-74
 ;;9002226.02101,"1105,66582-0313-86 ",.01)
 ;;66582-0313-86
 ;;9002226.02101,"1105,66582-0313-86 ",.02)
 ;;66582-0313-86
 ;;9002226.02101,"1105,66582-0315-01 ",.01)
 ;;66582-0315-01
 ;;9002226.02101,"1105,66582-0315-01 ",.02)
 ;;66582-0315-01
 ;;9002226.02101,"1105,66582-0315-31 ",.01)
 ;;66582-0315-31
 ;;9002226.02101,"1105,66582-0315-31 ",.02)
 ;;66582-0315-31
 ;;9002226.02101,"1105,66582-0315-52 ",.01)
 ;;66582-0315-52
 ;;9002226.02101,"1105,66582-0315-52 ",.02)
 ;;66582-0315-52
 ;;9002226.02101,"1105,66582-0315-54 ",.01)
 ;;66582-0315-54
 ;;9002226.02101,"1105,66582-0315-54 ",.02)
 ;;66582-0315-54
 ;;9002226.02101,"1105,66582-0315-66 ",.01)
 ;;66582-0315-66
 ;;9002226.02101,"1105,66582-0315-66 ",.02)
 ;;66582-0315-66
 ;;9002226.02101,"1105,66582-0315-74 ",.01)
 ;;66582-0315-74
 ;;9002226.02101,"1105,66582-0315-74 ",.02)
 ;;66582-0315-74
 ;;9002226.02101,"1105,67544-0050-15 ",.01)
 ;;67544-0050-15
 ;;9002226.02101,"1105,67544-0050-15 ",.02)
 ;;67544-0050-15
 ;;9002226.02101,"1105,67544-0050-30 ",.01)
 ;;67544-0050-30
 ;;9002226.02101,"1105,67544-0050-30 ",.02)
 ;;67544-0050-30
 ;;9002226.02101,"1105,67544-0050-45 ",.01)
 ;;67544-0050-45
 ;;9002226.02101,"1105,67544-0050-45 ",.02)
 ;;67544-0050-45
 ;;9002226.02101,"1105,67544-0050-53 ",.01)
 ;;67544-0050-53
 ;;9002226.02101,"1105,67544-0050-53 ",.02)
 ;;67544-0050-53
 ;;9002226.02101,"1105,67544-0050-60 ",.01)
 ;;67544-0050-60
 ;;9002226.02101,"1105,67544-0050-60 ",.02)
 ;;67544-0050-60
 ;;9002226.02101,"1105,67544-0051-15 ",.01)
 ;;67544-0051-15
 ;;9002226.02101,"1105,67544-0051-15 ",.02)
 ;;67544-0051-15
 ;;9002226.02101,"1105,67544-0051-16 ",.01)
 ;;67544-0051-16
 ;;9002226.02101,"1105,67544-0051-16 ",.02)
 ;;67544-0051-16
 ;;9002226.02101,"1105,67544-0051-45 ",.01)
 ;;67544-0051-45
 ;;9002226.02101,"1105,67544-0051-45 ",.02)
 ;;67544-0051-45
 ;;9002226.02101,"1105,67544-0051-53 ",.01)
 ;;67544-0051-53
 ;;9002226.02101,"1105,67544-0051-53 ",.02)
 ;;67544-0051-53
 ;;9002226.02101,"1105,67544-0060-15 ",.01)
 ;;67544-0060-15
 ;;9002226.02101,"1105,67544-0060-15 ",.02)
 ;;67544-0060-15
 ;;9002226.02101,"1105,67544-0060-30 ",.01)
 ;;67544-0060-30
 ;;9002226.02101,"1105,67544-0060-30 ",.02)
 ;;67544-0060-30
 ;;9002226.02101,"1105,67544-0060-45 ",.01)
 ;;67544-0060-45
 ;;9002226.02101,"1105,67544-0060-45 ",.02)
 ;;67544-0060-45
 ;;9002226.02101,"1105,67544-0060-60 ",.01)
 ;;67544-0060-60
 ;;9002226.02101,"1105,67544-0060-60 ",.02)
 ;;67544-0060-60
 ;;9002226.02101,"1105,67544-0081-15 ",.01)
 ;;67544-0081-15
 ;;9002226.02101,"1105,67544-0081-15 ",.02)
 ;;67544-0081-15
 ;;9002226.02101,"1105,67544-0081-30 ",.01)
 ;;67544-0081-30
 ;;9002226.02101,"1105,67544-0081-30 ",.02)
 ;;67544-0081-30
 ;;9002226.02101,"1105,67544-0081-45 ",.01)
 ;;67544-0081-45
 ;;9002226.02101,"1105,67544-0081-45 ",.02)
 ;;67544-0081-45
 ;;9002226.02101,"1105,67544-0081-60 ",.01)
 ;;67544-0081-60
 ;;9002226.02101,"1105,67544-0081-60 ",.02)
 ;;67544-0081-60
 ;;9002226.02101,"1105,67544-0082-15 ",.01)
 ;;67544-0082-15
 ;;9002226.02101,"1105,67544-0082-15 ",.02)
 ;;67544-0082-15
 ;;9002226.02101,"1105,67544-0082-45 ",.01)
 ;;67544-0082-45
 ;;9002226.02101,"1105,67544-0082-45 ",.02)
 ;;67544-0082-45
 ;;9002226.02101,"1105,67544-0106-15 ",.01)
 ;;67544-0106-15
 ;;9002226.02101,"1105,67544-0106-15 ",.02)
 ;;67544-0106-15
 ;;9002226.02101,"1105,67544-0106-30 ",.01)
 ;;67544-0106-30
 ;;9002226.02101,"1105,67544-0106-30 ",.02)
 ;;67544-0106-30
 ;;9002226.02101,"1105,67544-0106-45 ",.01)
 ;;67544-0106-45
 ;;9002226.02101,"1105,67544-0106-45 ",.02)
 ;;67544-0106-45
 ;;9002226.02101,"1105,67544-0106-53 ",.01)
 ;;67544-0106-53
 ;;9002226.02101,"1105,67544-0106-53 ",.02)
 ;;67544-0106-53
 ;;9002226.02101,"1105,67544-0106-60 ",.01)
 ;;67544-0106-60
 ;;9002226.02101,"1105,67544-0106-60 ",.02)
 ;;67544-0106-60
 ;;9002226.02101,"1105,67544-0106-80 ",.01)
 ;;67544-0106-80
 ;;9002226.02101,"1105,67544-0106-80 ",.02)
 ;;67544-0106-80
 ;;9002226.02101,"1105,67544-0225-15 ",.01)
 ;;67544-0225-15
 ;;9002226.02101,"1105,67544-0225-15 ",.02)
 ;;67544-0225-15
 ;;9002226.02101,"1105,67544-0225-30 ",.01)
 ;;67544-0225-30
 ;;9002226.02101,"1105,67544-0225-30 ",.02)
 ;;67544-0225-30
 ;;9002226.02101,"1105,67544-0225-45 ",.01)
 ;;67544-0225-45
 ;;9002226.02101,"1105,67544-0225-45 ",.02)
 ;;67544-0225-45
 ;;9002226.02101,"1105,67544-0225-53 ",.01)
 ;;67544-0225-53
 ;;9002226.02101,"1105,67544-0225-53 ",.02)
 ;;67544-0225-53
 ;;9002226.02101,"1105,67544-0225-60 ",.01)
 ;;67544-0225-60
 ;;9002226.02101,"1105,67544-0225-60 ",.02)
 ;;67544-0225-60
 ;;9002226.02101,"1105,67544-0225-80 ",.01)
 ;;67544-0225-80
 ;;9002226.02101,"1105,67544-0225-80 ",.02)
 ;;67544-0225-80
 ;;9002226.02101,"1105,67544-0245-30 ",.01)
 ;;67544-0245-30
 ;;9002226.02101,"1105,67544-0245-30 ",.02)
 ;;67544-0245-30
 ;;9002226.02101,"1105,67544-0245-60 ",.01)
 ;;67544-0245-60
 ;;9002226.02101,"1105,67544-0245-60 ",.02)
 ;;67544-0245-60
 ;;9002226.02101,"1105,67544-0247-30 ",.01)
 ;;67544-0247-30
 ;;9002226.02101,"1105,67544-0247-30 ",.02)
 ;;67544-0247-30