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

BGP47N11.m

Go to the documentation of this file.
BGP47N11 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 16, 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,"730,00049-5100-47 ",.02)
 ;;00049-5100-47
 ;;9002226.02101,"730,00049-5340-66 ",.01)
 ;;00049-5340-66
 ;;9002226.02101,"730,00049-5340-66 ",.02)
 ;;00049-5340-66
 ;;9002226.02101,"730,00049-5350-66 ",.01)
 ;;00049-5350-66
 ;;9002226.02101,"730,00049-5350-66 ",.02)
 ;;00049-5350-66
 ;;9002226.02101,"730,00049-5360-66 ",.01)
 ;;00049-5360-66
 ;;9002226.02101,"730,00049-5360-66 ",.02)
 ;;00049-5360-66
 ;;9002226.02101,"730,00049-5370-50 ",.01)
 ;;00049-5370-50
 ;;9002226.02101,"730,00049-5370-50 ",.02)
 ;;00049-5370-50
 ;;9002226.02101,"730,00049-5380-66 ",.01)
 ;;00049-5380-66
 ;;9002226.02101,"730,00049-5380-66 ",.02)
 ;;00049-5380-66
 ;;9002226.02101,"730,00049-5390-66 ",.01)
 ;;00049-5390-66
 ;;9002226.02101,"730,00049-5390-66 ",.02)
 ;;00049-5390-66
 ;;9002226.02101,"730,00054-0084-25 ",.01)
 ;;00054-0084-25
 ;;9002226.02101,"730,00054-0084-25 ",.02)
 ;;00054-0084-25
 ;;9002226.02101,"730,00054-0085-25 ",.01)
 ;;00054-0085-25
 ;;9002226.02101,"730,00054-0085-25 ",.02)
 ;;00054-0085-25
 ;;9002226.02101,"730,00054-0086-20 ",.01)
 ;;00054-0086-20
 ;;9002226.02101,"730,00054-0086-20 ",.02)
 ;;00054-0086-20
 ;;9002226.02101,"730,00054-0086-25 ",.01)
 ;;00054-0086-25
 ;;9002226.02101,"730,00054-0086-25 ",.02)
 ;;00054-0086-25
 ;;9002226.02101,"730,00054-0086-29 ",.01)
 ;;00054-0086-29
 ;;9002226.02101,"730,00054-0086-29 ",.02)
 ;;00054-0086-29
 ;;9002226.02101,"730,00054-0087-20 ",.01)
 ;;00054-0087-20
 ;;9002226.02101,"730,00054-0087-20 ",.02)
 ;;00054-0087-20
 ;;9002226.02101,"730,00054-0087-25 ",.01)
 ;;00054-0087-25
 ;;9002226.02101,"730,00054-0087-25 ",.02)
 ;;00054-0087-25
 ;;9002226.02101,"730,00054-0087-29 ",.01)
 ;;00054-0087-29
 ;;9002226.02101,"730,00054-0087-29 ",.02)
 ;;00054-0087-29
 ;;9002226.02101,"730,00054-0273-13 ",.01)
 ;;00054-0273-13
 ;;9002226.02101,"730,00054-0273-13 ",.02)
 ;;00054-0273-13
 ;;9002226.02101,"730,00054-0274-13 ",.01)
 ;;00054-0274-13
 ;;9002226.02101,"730,00054-0274-13 ",.02)
 ;;00054-0274-13
 ;;9002226.02101,"730,00054-0275-13 ",.01)
 ;;00054-0275-13
 ;;9002226.02101,"730,00054-0275-13 ",.02)
 ;;00054-0275-13
 ;;9002226.02101,"730,00054-0276-13 ",.01)
 ;;00054-0276-13
 ;;9002226.02101,"730,00054-0276-13 ",.02)
 ;;00054-0276-13
 ;;9002226.02101,"730,00054-3860-50 ",.01)
 ;;00054-3860-50
 ;;9002226.02101,"730,00054-3860-50 ",.02)
 ;;00054-3860-50
 ;;9002226.02101,"730,00054-3861-50 ",.01)
 ;;00054-3861-50
 ;;9002226.02101,"730,00054-3861-50 ",.02)
 ;;00054-3861-50
 ;;9002226.02101,"730,00074-1540-01 ",.01)
 ;;00074-1540-01
 ;;9002226.02101,"730,00074-1540-01 ",.02)
 ;;00074-1540-01
 ;;9002226.02101,"730,00074-2343-01 ",.01)
 ;;00074-2343-01
 ;;9002226.02101,"730,00074-2343-01 ",.02)
 ;;00074-2343-01
 ;;9002226.02101,"730,00074-2343-31 ",.01)
 ;;00074-2343-31
 ;;9002226.02101,"730,00074-2343-31 ",.02)
 ;;00074-2343-31
 ;;9002226.02101,"730,00074-2349-01 ",.01)
 ;;00074-2349-01
 ;;9002226.02101,"730,00074-2349-01 ",.02)
 ;;00074-2349-01
 ;;9002226.02101,"730,00074-2349-31 ",.01)
 ;;00074-2349-31
 ;;9002226.02101,"730,00074-2349-31 ",.02)
 ;;00074-2349-31
 ;;9002226.02101,"730,00074-3778-04 ",.01)
 ;;00074-3778-04
 ;;9002226.02101,"730,00074-3778-04 ",.02)
 ;;00074-3778-04
 ;;9002226.02101,"730,00074-3778-05 ",.01)
 ;;00074-3778-05
 ;;9002226.02101,"730,00074-3778-05 ",.02)
 ;;00074-3778-05
 ;;9002226.02101,"730,00078-0001-31 ",.01)
 ;;00078-0001-31
 ;;9002226.02101,"730,00078-0001-31 ",.02)
 ;;00078-0001-31
 ;;9002226.02101,"730,00078-0002-05 ",.01)
 ;;00078-0002-05
 ;;9002226.02101,"730,00078-0002-05 ",.02)
 ;;00078-0002-05
 ;;9002226.02101,"730,00078-0003-05 ",.01)
 ;;00078-0003-05
 ;;9002226.02101,"730,00078-0003-05 ",.02)
 ;;00078-0003-05
 ;;9002226.02101,"730,00078-0005-05 ",.01)
 ;;00078-0005-05
 ;;9002226.02101,"730,00078-0005-05 ",.02)
 ;;00078-0005-05
 ;;9002226.02101,"730,00078-0006-05 ",.01)
 ;;00078-0006-05
 ;;9002226.02101,"730,00078-0006-05 ",.02)
 ;;00078-0006-05
 ;;9002226.02101,"730,00078-0007-05 ",.01)
 ;;00078-0007-05
 ;;9002226.02101,"730,00078-0007-05 ",.02)
 ;;00078-0007-05
 ;;9002226.02101,"730,00078-0008-05 ",.01)
 ;;00078-0008-05
 ;;9002226.02101,"730,00078-0008-05 ",.02)
 ;;00078-0008-05
 ;;9002226.02101,"730,00078-0070-06 ",.01)
 ;;00078-0070-06
 ;;9002226.02101,"730,00078-0070-06 ",.02)
 ;;00078-0070-06
 ;;9002226.02101,"730,00078-0070-08 ",.01)
 ;;00078-0070-08
 ;;9002226.02101,"730,00078-0070-08 ",.02)
 ;;00078-0070-08
 ;;9002226.02101,"730,00078-0084-05 ",.01)
 ;;00078-0084-05
 ;;9002226.02101,"730,00078-0084-05 ",.02)
 ;;00078-0084-05
 ;;9002226.02101,"730,00078-0084-08 ",.01)
 ;;00078-0084-08
 ;;9002226.02101,"730,00078-0084-08 ",.02)
 ;;00078-0084-08
 ;;9002226.02101,"730,00078-0103-05 ",.01)
 ;;00078-0103-05
 ;;9002226.02101,"730,00078-0103-05 ",.02)
 ;;00078-0103-05
 ;;9002226.02101,"730,00078-0103-08 ",.01)
 ;;00078-0103-08
 ;;9002226.02101,"730,00078-0103-08 ",.02)
 ;;00078-0103-08
 ;;9002226.02101,"730,00078-0107-05 ",.01)
 ;;00078-0107-05
 ;;9002226.02101,"730,00078-0107-05 ",.02)
 ;;00078-0107-05
 ;;9002226.02101,"730,00078-0243-05 ",.01)
 ;;00078-0243-05
 ;;9002226.02101,"730,00078-0243-05 ",.02)
 ;;00078-0243-05
 ;;9002226.02101,"730,00078-0316-06 ",.01)
 ;;00078-0316-06
 ;;9002226.02101,"730,00078-0316-06 ",.02)
 ;;00078-0316-06
 ;;9002226.02101,"730,00078-0317-05 ",.01)
 ;;00078-0317-05
 ;;9002226.02101,"730,00078-0317-05 ",.02)
 ;;00078-0317-05
 ;;9002226.02101,"730,00078-0317-06 ",.01)
 ;;00078-0317-06
 ;;9002226.02101,"730,00078-0317-06 ",.02)
 ;;00078-0317-06
 ;;9002226.02101,"730,00078-0318-05 ",.01)
 ;;00078-0318-05
 ;;9002226.02101,"730,00078-0318-05 ",.02)
 ;;00078-0318-05
 ;;9002226.02101,"730,00085-0287-04 ",.01)
 ;;00085-0287-04
 ;;9002226.02101,"730,00085-0287-04 ",.02)
 ;;00085-0287-04
 ;;9002226.02101,"730,00085-0287-08 ",.01)
 ;;00085-0287-08
 ;;9002226.02101,"730,00085-0287-08 ",.02)
 ;;00085-0287-08
 ;;9002226.02101,"730,00085-0598-04 ",.01)
 ;;00085-0598-04
 ;;9002226.02101,"730,00085-0598-04 ",.02)
 ;;00085-0598-04
 ;;9002226.02101,"730,00085-0598-08 ",.01)
 ;;00085-0598-08
 ;;9002226.02101,"730,00085-0598-08 ",.02)
 ;;00085-0598-08
 ;;9002226.02101,"730,00085-0720-04 ",.01)
 ;;00085-0720-04
 ;;9002226.02101,"730,00085-0720-04 ",.02)
 ;;00085-0720-04
 ;;9002226.02101,"730,00085-0720-08 ",.01)
 ;;00085-0720-08
 ;;9002226.02101,"730,00085-0720-08 ",.02)
 ;;00085-0720-08
 ;;9002226.02101,"730,00086-0925-81 ",.01)
 ;;00086-0925-81
 ;;9002226.02101,"730,00086-0925-81 ",.02)
 ;;00086-0925-81
 ;;9002226.02101,"730,00086-0926-81 ",.01)
 ;;00086-0926-81
 ;;9002226.02101,"730,00086-0926-81 ",.02)
 ;;00086-0926-81
 ;;9002226.02101,"730,00087-0543-01 ",.01)
 ;;00087-0543-01
 ;;9002226.02101,"730,00087-0543-01 ",.02)
 ;;00087-0543-01
 ;;9002226.02101,"730,00087-0544-01 ",.01)
 ;;00087-0544-01
 ;;9002226.02101,"730,00087-0544-01 ",.02)
 ;;00087-0544-01
 ;;9002226.02101,"730,00093-0073-01 ",.01)
 ;;00093-0073-01
 ;;9002226.02101,"730,00093-0073-01 ",.02)
 ;;00093-0073-01
 ;;9002226.02101,"730,00093-0074-01 ",.01)
 ;;00093-0074-01
 ;;9002226.02101,"730,00093-0074-01 ",.02)
 ;;00093-0074-01
 ;;9002226.02101,"730,00093-0854-01 ",.01)
 ;;00093-0854-01
 ;;9002226.02101,"730,00093-0854-01 ",.02)
 ;;00093-0854-01
 ;;9002226.02101,"730,00093-0956-01 ",.01)
 ;;00093-0956-01
 ;;9002226.02101,"730,00093-0956-01 ",.02)
 ;;00093-0956-01
 ;;9002226.02101,"730,00093-0958-01 ",.01)
 ;;00093-0958-01
 ;;9002226.02101,"730,00093-0958-01 ",.02)
 ;;00093-0958-01
 ;;9002226.02101,"730,00093-0960-01 ",.01)
 ;;00093-0960-01
 ;;9002226.02101,"730,00093-0960-01 ",.02)
 ;;00093-0960-01
 ;;9002226.02101,"730,00093-5268-01 ",.01)
 ;;00093-5268-01
 ;;9002226.02101,"730,00093-5268-01 ",.02)
 ;;00093-5268-01
 ;;9002226.02101,"730,00093-5269-01 ",.01)
 ;;00093-5269-01
 ;;9002226.02101,"730,00093-5269-01 ",.02)
 ;;00093-5269-01
 ;;9002226.02101,"730,00093-9612-12 ",.01)
 ;;00093-9612-12
 ;;9002226.02101,"730,00093-9612-12 ",.02)
 ;;00093-9612-12
 ;;9002226.02101,"730,00095-0240-01 ",.01)
 ;;00095-0240-01
 ;;9002226.02101,"730,00095-0240-01 ",.02)
 ;;00095-0240-01
 ;;9002226.02101,"730,00095-0240-05 ",.01)
 ;;00095-0240-05
 ;;9002226.02101,"730,00095-0240-05 ",.02)
 ;;00095-0240-05
 ;;9002226.02101,"730,00095-0950-05 ",.01)
 ;;00095-0950-05
 ;;9002226.02101,"730,00095-0950-05 ",.02)
 ;;00095-0950-05
 ;;9002226.02101,"730,00095-3000-01 ",.01)
 ;;00095-3000-01
 ;;9002226.02101,"730,00095-3000-01 ",.02)
 ;;00095-3000-01
 ;;9002226.02101,"730,00095-7029-01 ",.01)
 ;;00095-7029-01
 ;;9002226.02101,"730,00095-7029-01 ",.02)
 ;;00095-7029-01
 ;;9002226.02101,"730,00095-7075-01 ",.01)
 ;;00095-7075-01
 ;;9002226.02101,"730,00095-7075-01 ",.02)
 ;;00095-7075-01
 ;;9002226.02101,"730,00121-0531-05 ",.01)
 ;;00121-0531-05
 ;;9002226.02101,"730,00121-0531-05 ",.02)
 ;;00121-0531-05
 ;;9002226.02101,"730,00121-0531-07 ",.01)
 ;;00121-0531-07
 ;;9002226.02101,"730,00121-0531-07 ",.02)
 ;;00121-0531-07
 ;;9002226.02101,"730,00121-0531-15 ",.01)
 ;;00121-0531-15
 ;;9002226.02101,"730,00121-0531-15 ",.02)
 ;;00121-0531-15
 ;;9002226.02101,"730,00121-0531-16 ",.01)
 ;;00121-0531-16
 ;;9002226.02101,"730,00121-0531-16 ",.02)
 ;;00121-0531-16
 ;;9002226.02101,"730,00121-0532-04 ",.01)
 ;;00121-0532-04
 ;;9002226.02101,"730,00121-0532-04 ",.02)
 ;;00121-0532-04
 ;;9002226.02101,"730,00121-0532-05 ",.01)
 ;;00121-0532-05
 ;;9002226.02101,"730,00121-0532-05 ",.02)
 ;;00121-0532-05
 ;;9002226.02101,"730,00121-0532-16 ",.01)
 ;;00121-0532-16
 ;;9002226.02101,"730,00121-0532-16 ",.02)
 ;;00121-0532-16
 ;;9002226.02101,"730,00121-0661-04 ",.01)
 ;;00121-0661-04
 ;;9002226.02101,"730,00121-0661-04 ",.02)
 ;;00121-0661-04
 ;;9002226.02101,"730,00121-0662-04 ",.01)
 ;;00121-0662-04
 ;;9002226.02101,"730,00121-0662-04 ",.02)
 ;;00121-0662-04
 ;;9002226.02101,"730,00143-1115-01 ",.01)
 ;;00143-1115-01
 ;;9002226.02101,"730,00143-1115-01 ",.02)
 ;;00143-1115-01
 ;;9002226.02101,"730,00143-1115-05 ",.01)
 ;;00143-1115-05
 ;;9002226.02101,"730,00143-1115-05 ",.02)
 ;;00143-1115-05
 ;;9002226.02101,"730,00143-1445-05 ",.01)
 ;;00143-1445-05
 ;;9002226.02101,"730,00143-1445-05 ",.02)
 ;;00143-1445-05
 ;;9002226.02101,"730,00143-1445-10 ",.01)
 ;;00143-1445-10
 ;;9002226.02101,"730,00143-1445-10 ",.02)
 ;;00143-1445-10
 ;;9002226.02101,"730,00143-1450-05 ",.01)
 ;;00143-1450-05
 ;;9002226.02101,"730,00143-1450-05 ",.02)
 ;;00143-1450-05
 ;;9002226.02101,"730,00143-1450-10 ",.01)
 ;;00143-1450-10
 ;;9002226.02101,"730,00143-1450-10 ",.02)
 ;;00143-1450-10
 ;;9002226.02101,"730,00143-1455-05 ",.01)
 ;;00143-1455-05
 ;;9002226.02101,"730,00143-1455-05 ",.02)
 ;;00143-1455-05
 ;;9002226.02101,"730,00143-1455-10 ",.01)
 ;;00143-1455-10
 ;;9002226.02101,"730,00143-1455-10 ",.02)
 ;;00143-1455-10
 ;;9002226.02101,"730,00143-1458-05 ",.01)
 ;;00143-1458-05
 ;;9002226.02101,"730,00143-1458-05 ",.02)
 ;;00143-1458-05
 ;;9002226.02101,"730,00143-1458-10 ",.01)
 ;;00143-1458-10
 ;;9002226.02101,"730,00143-1458-10 ",.02)
 ;;00143-1458-10
 ;;9002226.02101,"730,00143-1785-01 ",.01)
 ;;00143-1785-01
 ;;9002226.02101,"730,00143-1785-01 ",.02)
 ;;00143-1785-01
 ;;9002226.02101,"730,00143-1785-10 ",.01)
 ;;00143-1785-10
 ;;9002226.02101,"730,00143-1785-10 ",.02)
 ;;00143-1785-10
 ;;9002226.02101,"730,00143-1785-30 ",.01)
 ;;00143-1785-30
 ;;9002226.02101,"730,00143-1785-30 ",.02)
 ;;00143-1785-30
 ;;9002226.02101,"730,00143-1787-01 ",.01)
 ;;00143-1787-01
 ;;9002226.02101,"730,00143-1787-01 ",.02)
 ;;00143-1787-01
 ;;9002226.02101,"730,00143-1787-05 ",.01)
 ;;00143-1787-05
 ;;9002226.02101,"730,00143-1787-05 ",.02)
 ;;00143-1787-05
 ;;9002226.02101,"730,00143-3000-01 ",.01)
 ;;00143-3000-01
 ;;9002226.02101,"730,00143-3000-01 ",.02)
 ;;00143-3000-01
 ;;9002226.02101,"730,00143-3909-01 ",.01)
 ;;00143-3909-01
 ;;9002226.02101,"730,00143-3909-01 ",.02)
 ;;00143-3909-01
 ;;9002226.02101,"730,00143-3910-01 ",.01)
 ;;00143-3910-01
 ;;9002226.02101,"730,00143-3910-01 ",.02)
 ;;00143-3910-01
 ;;9002226.02101,"730,00172-2959-60 ",.01)
 ;;00172-2959-60
 ;;9002226.02101,"730,00172-2959-60 ",.02)
 ;;00172-2959-60
 ;;9002226.02101,"730,00182-0314-40 ",.01)
 ;;00182-0314-40
 ;;9002226.02101,"730,00182-0314-40 ",.02)
 ;;00182-0314-40
 ;;9002226.02101,"730,00182-0686-40 ",.01)
 ;;00182-0686-40
 ;;9002226.02101,"730,00182-0686-40 ",.02)
 ;;00182-0686-40
 ;;9002226.02101,"730,00182-1018-89 ",.01)
 ;;00182-1018-89
 ;;9002226.02101,"730,00182-1018-89 ",.02)
 ;;00182-1018-89
 ;;9002226.02101,"730,00182-1019-10 ",.01)
 ;;00182-1019-10
 ;;9002226.02101,"730,00182-1019-10 ",.02)
 ;;00182-1019-10
 ;;9002226.02101,"730,00182-1019-89 ",.01)
 ;;00182-1019-89
 ;;9002226.02101,"730,00182-1019-89 ",.02)
 ;;00182-1019-89
 ;;9002226.02101,"730,00182-1020-89 ",.01)
 ;;00182-1020-89
 ;;9002226.02101,"730,00182-1020-89 ",.02)
 ;;00182-1020-89
 ;;9002226.02101,"730,00182-1021-89 ",.01)
 ;;00182-1021-89
 ;;9002226.02101,"730,00182-1021-89 ",.02)
 ;;00182-1021-89
 ;;9002226.02101,"730,00182-1063-89 ",.01)
 ;;00182-1063-89
 ;;9002226.02101,"730,00182-1063-89 ",.02)
 ;;00182-1063-89
 ;;9002226.02101,"730,00182-1631-01 ",.01)
 ;;00182-1631-01
 ;;9002226.02101,"730,00182-1631-01 ",.02)
 ;;00182-1631-01
 ;;9002226.02101,"730,00182-2659-01 ",.01)
 ;;00182-2659-01
 ;;9002226.02101,"730,00182-2659-01 ",.02)
 ;;00182-2659-01
 ;;9002226.02101,"730,00182-2659-05 ",.01)
 ;;00182-2659-05
 ;;9002226.02101,"730,00182-2659-05 ",.02)
 ;;00182-2659-05
 ;;9002226.02101,"730,00182-2693-01 ",.01)
 ;;00182-2693-01