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

BGP61A8.m

Go to the documentation of this file.
BGP61A8 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 18, 2015 ;
 ;;16.1;IHS CLINICAL REPORTING;;MAR 22, 2016;Build 170
 ;
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)
 ;;21,"76478-0501-20 ")
 ;;2356
 ;;21,"76478-0501-50 ")
 ;;2357
 ;;9002226,1799,.01)
 ;;BGP HEDIS CENTRAL NERVOUS NDC
 ;;9002226,1799,.02)
 ;;@
 ;;9002226,1799,.04)
 ;;n
 ;;9002226,1799,.06)
 ;;@
 ;;9002226,1799,.08)
 ;;@
 ;;9002226,1799,.09)
 ;;3150818
 ;;9002226,1799,.11)
 ;;@
 ;;9002226,1799,.12)
 ;;@
 ;;9002226,1799,.13)
 ;;1
 ;;9002226,1799,.14)
 ;;@
 ;;9002226,1799,.15)
 ;;50.67
 ;;9002226,1799,.16)
 ;;@
 ;;9002226,1799,.17)
 ;;@
 ;;9002226,1799,3101)
 ;;@
 ;;9002226.02101,"1799,00024-5401-31 ",.01)
 ;;00024-5401-31
 ;;9002226.02101,"1799,00024-5401-31 ",.02)
 ;;00024-5401-31
 ;;9002226.02101,"1799,00024-5421-31 ",.01)
 ;;00024-5421-31
 ;;9002226.02101,"1799,00024-5421-31 ",.02)
 ;;00024-5421-31
 ;;9002226.02101,"1799,00024-5421-50 ",.01)
 ;;00024-5421-50
 ;;9002226.02101,"1799,00024-5421-50 ",.02)
 ;;00024-5421-50
 ;;9002226.02101,"1799,00024-5501-10 ",.01)
 ;;00024-5501-10
 ;;9002226.02101,"1799,00024-5501-10 ",.02)
 ;;00024-5501-10
 ;;9002226.02101,"1799,00024-5501-31 ",.01)
 ;;00024-5501-31
 ;;9002226.02101,"1799,00024-5501-31 ",.02)
 ;;00024-5501-31
 ;;9002226.02101,"1799,00024-5521-10 ",.01)
 ;;00024-5521-10
 ;;9002226.02101,"1799,00024-5521-10 ",.02)
 ;;00024-5521-10
 ;;9002226.02101,"1799,00024-5521-31 ",.01)
 ;;00024-5521-31
 ;;9002226.02101,"1799,00024-5521-31 ",.02)
 ;;00024-5521-31
 ;;9002226.02101,"1799,00024-5521-50 ",.01)
 ;;00024-5521-50
 ;;9002226.02101,"1799,00024-5521-50 ",.02)
 ;;00024-5521-50
 ;;9002226.02101,"1799,00037-0110-16 ",.01)
 ;;00037-0110-16
 ;;9002226.02101,"1799,00037-0110-16 ",.02)
 ;;00037-0110-16
 ;;9002226.02101,"1799,00037-0113-60 ",.01)
 ;;00037-0113-60
 ;;9002226.02101,"1799,00037-0113-60 ",.02)
 ;;00037-0113-60
 ;;9002226.02101,"1799,00037-0114-60 ",.01)
 ;;00037-0114-60
 ;;9002226.02101,"1799,00037-0114-60 ",.02)
 ;;00037-0114-60
 ;;9002226.02101,"1799,00037-6010-30 ",.01)
 ;;00037-6010-30
 ;;9002226.02101,"1799,00037-6010-30 ",.02)
 ;;00037-6010-30
 ;;9002226.02101,"1799,00037-6050-30 ",.01)
 ;;00037-6050-30
 ;;9002226.02101,"1799,00037-6050-30 ",.02)
 ;;00037-6050-30
 ;;9002226.02101,"1799,00054-0085-25 ",.01)
 ;;00054-0085-25
 ;;9002226.02101,"1799,00054-0085-25 ",.02)
 ;;00054-0085-25
 ;;9002226.02101,"1799,00054-0086-25 ",.01)
 ;;00054-0086-25
 ;;9002226.02101,"1799,00054-0086-25 ",.02)
 ;;00054-0086-25
 ;;9002226.02101,"1799,00054-0086-29 ",.01)
 ;;00054-0086-29
 ;;9002226.02101,"1799,00054-0086-29 ",.02)
 ;;00054-0086-29
 ;;9002226.02101,"1799,00054-0087-25 ",.01)
 ;;00054-0087-25
 ;;9002226.02101,"1799,00054-0087-25 ",.02)
 ;;00054-0087-25
 ;;9002226.02101,"1799,00054-0087-29 ",.01)
 ;;00054-0087-29
 ;;9002226.02101,"1799,00054-0087-29 ",.02)
 ;;00054-0087-29
 ;;9002226.02101,"1799,00054-0273-13 ",.01)
 ;;00054-0273-13
 ;;9002226.02101,"1799,00054-0273-13 ",.02)
 ;;00054-0273-13
 ;;9002226.02101,"1799,00054-0274-13 ",.01)
 ;;00054-0274-13
 ;;9002226.02101,"1799,00054-0274-13 ",.02)
 ;;00054-0274-13
 ;;9002226.02101,"1799,00054-0275-13 ",.01)
 ;;00054-0275-13
 ;;9002226.02101,"1799,00054-0275-13 ",.02)
 ;;00054-0275-13
 ;;9002226.02101,"1799,00054-0276-13 ",.01)
 ;;00054-0276-13
 ;;9002226.02101,"1799,00054-0276-13 ",.02)
 ;;00054-0276-13
 ;;9002226.02101,"1799,00054-0290-13 ",.01)
 ;;00054-0290-13
 ;;9002226.02101,"1799,00054-0290-13 ",.02)
 ;;00054-0290-13
 ;;9002226.02101,"1799,00054-0291-25 ",.01)
 ;;00054-0291-25
 ;;9002226.02101,"1799,00054-0291-25 ",.02)
 ;;00054-0291-25
 ;;9002226.02101,"1799,00054-0292-25 ",.01)
 ;;00054-0292-25
 ;;9002226.02101,"1799,00054-0292-25 ",.02)
 ;;00054-0292-25
 ;;9002226.02101,"1799,00093-0073-01 ",.01)
 ;;00093-0073-01
 ;;9002226.02101,"1799,00093-0073-01 ",.02)
 ;;00093-0073-01
 ;;9002226.02101,"1799,00093-0074-01 ",.01)
 ;;00093-0074-01
 ;;9002226.02101,"1799,00093-0074-01 ",.02)
 ;;00093-0074-01
 ;;9002226.02101,"1799,00093-5268-01 ",.01)
 ;;00093-5268-01
 ;;9002226.02101,"1799,00093-5268-01 ",.02)
 ;;00093-5268-01
 ;;9002226.02101,"1799,00093-5269-01 ",.01)
 ;;00093-5269-01
 ;;9002226.02101,"1799,00093-5269-01 ",.02)
 ;;00093-5269-01
 ;;9002226.02101,"1799,00093-5537-56 ",.01)
 ;;00093-5537-56
 ;;9002226.02101,"1799,00093-5537-56 ",.02)
 ;;00093-5537-56
 ;;9002226.02101,"1799,00093-5538-01 ",.01)
 ;;00093-5538-01
 ;;9002226.02101,"1799,00093-5538-01 ",.02)
 ;;00093-5538-01
 ;;9002226.02101,"1799,00093-5539-01 ",.01)
 ;;00093-5539-01
 ;;9002226.02101,"1799,00093-5539-01 ",.02)
 ;;00093-5539-01
 ;;9002226.02101,"1799,00093-9612-12 ",.01)
 ;;00093-9612-12
 ;;9002226.02101,"1799,00093-9612-12 ",.02)
 ;;00093-9612-12
 ;;9002226.02101,"1799,00095-0240-01 ",.01)
 ;;00095-0240-01
 ;;9002226.02101,"1799,00095-0240-01 ",.02)
 ;;00095-0240-01
 ;;9002226.02101,"1799,00095-0950-05 ",.01)
 ;;00095-0950-05
 ;;9002226.02101,"1799,00095-0950-05 ",.02)
 ;;00095-0950-05
 ;;9002226.02101,"1799,00095-3000-01 ",.01)
 ;;00095-3000-01
 ;;9002226.02101,"1799,00095-3000-01 ",.02)
 ;;00095-3000-01
 ;;9002226.02101,"1799,00095-7029-01 ",.01)
 ;;00095-7029-01
 ;;9002226.02101,"1799,00095-7029-01 ",.02)
 ;;00095-7029-01
 ;;9002226.02101,"1799,00095-7075-01 ",.01)
 ;;00095-7075-01
 ;;9002226.02101,"1799,00095-7075-01 ",.02)
 ;;00095-7075-01
 ;;9002226.02101,"1799,00143-1115-01 ",.01)
 ;;00143-1115-01
 ;;9002226.02101,"1799,00143-1115-01 ",.02)
 ;;00143-1115-01
 ;;9002226.02101,"1799,00143-1115-05 ",.01)
 ;;00143-1115-05
 ;;9002226.02101,"1799,00143-1115-05 ",.02)
 ;;00143-1115-05
 ;;9002226.02101,"1799,00143-1445-05 ",.01)
 ;;00143-1445-05
 ;;9002226.02101,"1799,00143-1445-05 ",.02)
 ;;00143-1445-05
 ;;9002226.02101,"1799,00143-1445-10 ",.01)
 ;;00143-1445-10
 ;;9002226.02101,"1799,00143-1445-10 ",.02)
 ;;00143-1445-10
 ;;9002226.02101,"1799,00143-1450-05 ",.01)
 ;;00143-1450-05
 ;;9002226.02101,"1799,00143-1450-05 ",.02)
 ;;00143-1450-05
 ;;9002226.02101,"1799,00143-1450-10 ",.01)
 ;;00143-1450-10
 ;;9002226.02101,"1799,00143-1450-10 ",.02)
 ;;00143-1450-10
 ;;9002226.02101,"1799,00143-1455-05 ",.01)
 ;;00143-1455-05
 ;;9002226.02101,"1799,00143-1455-05 ",.02)
 ;;00143-1455-05
 ;;9002226.02101,"1799,00143-1455-10 ",.01)
 ;;00143-1455-10
 ;;9002226.02101,"1799,00143-1455-10 ",.02)
 ;;00143-1455-10
 ;;9002226.02101,"1799,00143-1458-05 ",.01)
 ;;00143-1458-05
 ;;9002226.02101,"1799,00143-1458-05 ",.02)
 ;;00143-1458-05
 ;;9002226.02101,"1799,00143-1458-10 ",.01)
 ;;00143-1458-10
 ;;9002226.02101,"1799,00143-1458-10 ",.02)
 ;;00143-1458-10
 ;;9002226.02101,"1799,00143-1785-01 ",.01)
 ;;00143-1785-01
 ;;9002226.02101,"1799,00143-1785-01 ",.02)
 ;;00143-1785-01
 ;;9002226.02101,"1799,00143-1785-10 ",.01)
 ;;00143-1785-10
 ;;9002226.02101,"1799,00143-1785-10 ",.02)
 ;;00143-1785-10
 ;;9002226.02101,"1799,00143-1785-30 ",.01)
 ;;00143-1785-30
 ;;9002226.02101,"1799,00143-1785-30 ",.02)
 ;;00143-1785-30
 ;;9002226.02101,"1799,00143-1787-01 ",.01)
 ;;00143-1787-01
 ;;9002226.02101,"1799,00143-1787-01 ",.02)
 ;;00143-1787-01
 ;;9002226.02101,"1799,00143-1787-05 ",.01)
 ;;00143-1787-05
 ;;9002226.02101,"1799,00143-1787-05 ",.02)
 ;;00143-1787-05
 ;;9002226.02101,"1799,00143-3000-01 ",.01)
 ;;00143-3000-01
 ;;9002226.02101,"1799,00143-3000-01 ",.02)
 ;;00143-3000-01
 ;;9002226.02101,"1799,00143-3909-01 ",.01)
 ;;00143-3909-01
 ;;9002226.02101,"1799,00143-3909-01 ",.02)
 ;;00143-3909-01
 ;;9002226.02101,"1799,00143-3910-01 ",.01)
 ;;00143-3910-01
 ;;9002226.02101,"1799,00143-3910-01 ",.02)
 ;;00143-3910-01
 ;;9002226.02101,"1799,00179-1980-15 ",.01)
 ;;00179-1980-15
 ;;9002226.02101,"1799,00179-1980-15 ",.02)
 ;;00179-1980-15
 ;;9002226.02101,"1799,00179-1980-30 ",.01)
 ;;00179-1980-30
 ;;9002226.02101,"1799,00179-1980-30 ",.02)
 ;;00179-1980-30
 ;;9002226.02101,"1799,00179-1981-30 ",.01)
 ;;00179-1981-30
 ;;9002226.02101,"1799,00179-1981-30 ",.02)
 ;;00179-1981-30
 ;;9002226.02101,"1799,00187-0842-01 ",.01)
 ;;00187-0842-01
 ;;9002226.02101,"1799,00187-0842-01 ",.02)
 ;;00187-0842-01
 ;;9002226.02101,"1799,00187-0844-01 ",.01)
 ;;00187-0844-01
 ;;9002226.02101,"1799,00187-0844-01 ",.02)
 ;;00187-0844-01
 ;;9002226.02101,"1799,00228-3481-11 ",.01)
 ;;00228-3481-11
 ;;9002226.02101,"1799,00228-3481-11 ",.02)
 ;;00228-3481-11
 ;;9002226.02101,"1799,00228-3481-50 ",.01)
 ;;00228-3481-50
 ;;9002226.02101,"1799,00228-3481-50 ",.02)
 ;;00228-3481-50
 ;;9002226.02101,"1799,00228-3482-11 ",.01)
 ;;00228-3482-11
 ;;9002226.02101,"1799,00228-3482-11 ",.02)
 ;;00228-3482-11
 ;;9002226.02101,"1799,00228-3482-50 ",.01)
 ;;00228-3482-50
 ;;9002226.02101,"1799,00228-3482-50 ",.02)
 ;;00228-3482-50
 ;;9002226.02101,"1799,00378-0042-01 ",.01)
 ;;00378-0042-01
 ;;9002226.02101,"1799,00378-0042-01 ",.02)
 ;;00378-0042-01
 ;;9002226.02101,"1799,00378-0073-01 ",.01)
 ;;00378-0073-01
 ;;9002226.02101,"1799,00378-0073-01 ",.02)
 ;;00378-0073-01
 ;;9002226.02101,"1799,00378-0211-01 ",.01)
 ;;00378-0211-01
 ;;9002226.02101,"1799,00378-0211-01 ",.02)
 ;;00378-0211-01
 ;;9002226.02101,"1799,00378-0211-05 ",.01)
 ;;00378-0211-05
 ;;9002226.02101,"1799,00378-0211-05 ",.02)
 ;;00378-0211-05
 ;;9002226.02101,"1799,00378-0277-01 ",.01)
 ;;00378-0277-01
 ;;9002226.02101,"1799,00378-0277-01 ",.02)
 ;;00378-0277-01
 ;;9002226.02101,"1799,00378-0277-05 ",.01)
 ;;00378-0277-05
 ;;9002226.02101,"1799,00378-0277-05 ",.02)
 ;;00378-0277-05
 ;;9002226.02101,"1799,00378-0330-01 ",.01)
 ;;00378-0330-01
 ;;9002226.02101,"1799,00378-0330-01 ",.02)
 ;;00378-0330-01
 ;;9002226.02101,"1799,00378-0330-05 ",.01)
 ;;00378-0330-05
 ;;9002226.02101,"1799,00378-0330-05 ",.02)
 ;;00378-0330-05
 ;;9002226.02101,"1799,00378-0442-01 ",.01)
 ;;00378-0442-01
 ;;9002226.02101,"1799,00378-0442-01 ",.02)
 ;;00378-0442-01
 ;;9002226.02101,"1799,00378-0442-05 ",.01)
 ;;00378-0442-05
 ;;9002226.02101,"1799,00378-0442-05 ",.02)
 ;;00378-0442-05
 ;;9002226.02101,"1799,00378-0574-01 ",.01)
 ;;00378-0574-01
 ;;9002226.02101,"1799,00378-0574-01 ",.02)
 ;;00378-0574-01
 ;;9002226.02101,"1799,00378-0574-05 ",.01)
 ;;00378-0574-05
 ;;9002226.02101,"1799,00378-0574-05 ",.02)
 ;;00378-0574-05
 ;;9002226.02101,"1799,00378-0612-01 ",.01)
 ;;00378-0612-01
 ;;9002226.02101,"1799,00378-0612-01 ",.02)
 ;;00378-0612-01
 ;;9002226.02101,"1799,00378-0614-01 ",.01)
 ;;00378-0614-01
 ;;9002226.02101,"1799,00378-0614-01 ",.02)
 ;;00378-0614-01
 ;;9002226.02101,"1799,00378-0614-10 ",.01)
 ;;00378-0614-10
 ;;9002226.02101,"1799,00378-0614-10 ",.02)
 ;;00378-0614-10
 ;;9002226.02101,"1799,00378-0616-01 ",.01)
 ;;00378-0616-01
 ;;9002226.02101,"1799,00378-0616-01 ",.02)
 ;;00378-0616-01
 ;;9002226.02101,"1799,00378-0616-10 ",.01)
 ;;00378-0616-10
 ;;9002226.02101,"1799,00378-0616-10 ",.02)
 ;;00378-0616-10
 ;;9002226.02101,"1799,00378-0618-01 ",.01)
 ;;00378-0618-01
 ;;9002226.02101,"1799,00378-0618-01 ",.02)
 ;;00378-0618-01
 ;;9002226.02101,"1799,00378-0618-10 ",.01)
 ;;00378-0618-10
 ;;9002226.02101,"1799,00378-0618-10 ",.02)
 ;;00378-0618-10
 ;;9002226.02101,"1799,00378-1049-01 ",.01)
 ;;00378-1049-01
 ;;9002226.02101,"1799,00378-1049-01 ",.02)
 ;;00378-1049-01
 ;;9002226.02101,"1799,00378-1049-10 ",.01)
 ;;00378-1049-10
 ;;9002226.02101,"1799,00378-1049-10 ",.02)
 ;;00378-1049-10
 ;;9002226.02101,"1799,00378-2610-01 ",.01)
 ;;00378-2610-01
 ;;9002226.02101,"1799,00378-2610-01 ",.02)
 ;;00378-2610-01
 ;;9002226.02101,"1799,00378-2610-10 ",.01)
 ;;00378-2610-10
 ;;9002226.02101,"1799,00378-2610-10 ",.02)
 ;;00378-2610-10
 ;;9002226.02101,"1799,00378-2625-01 ",.01)
 ;;00378-2625-01
 ;;9002226.02101,"1799,00378-2625-01 ",.02)
 ;;00378-2625-01
 ;;9002226.02101,"1799,00378-2625-10 ",.01)
 ;;00378-2625-10
 ;;9002226.02101,"1799,00378-2625-10 ",.02)
 ;;00378-2625-10
 ;;9002226.02101,"1799,00378-2650-01 ",.01)
 ;;00378-2650-01