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

BGP31P11.m

Go to the documentation of this file.
  1. BGP31P11 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 29, 2012;
  1. ;;13.0;IHS CLINICAL REPORTING;;NOV 20, 2012;Build 81
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;9002226.02101,"730,00078-0103-05 ",.02)
  1. ;;00078-0103-05
  1. ;;9002226.02101,"730,00078-0103-08 ",.01)
  1. ;;00078-0103-08
  1. ;;9002226.02101,"730,00078-0103-08 ",.02)
  1. ;;00078-0103-08
  1. ;;9002226.02101,"730,00078-0107-05 ",.01)
  1. ;;00078-0107-05
  1. ;;9002226.02101,"730,00078-0107-05 ",.02)
  1. ;;00078-0107-05
  1. ;;9002226.02101,"730,00078-0243-05 ",.01)
  1. ;;00078-0243-05
  1. ;;9002226.02101,"730,00078-0243-05 ",.02)
  1. ;;00078-0243-05
  1. ;;9002226.02101,"730,00078-0316-06 ",.01)
  1. ;;00078-0316-06
  1. ;;9002226.02101,"730,00078-0316-06 ",.02)
  1. ;;00078-0316-06
  1. ;;9002226.02101,"730,00078-0317-05 ",.01)
  1. ;;00078-0317-05
  1. ;;9002226.02101,"730,00078-0317-05 ",.02)
  1. ;;00078-0317-05
  1. ;;9002226.02101,"730,00078-0317-06 ",.01)
  1. ;;00078-0317-06
  1. ;;9002226.02101,"730,00078-0317-06 ",.02)
  1. ;;00078-0317-06
  1. ;;9002226.02101,"730,00078-0318-05 ",.01)
  1. ;;00078-0318-05
  1. ;;9002226.02101,"730,00078-0318-05 ",.02)
  1. ;;00078-0318-05
  1. ;;9002226.02101,"730,00085-0287-04 ",.01)
  1. ;;00085-0287-04
  1. ;;9002226.02101,"730,00085-0287-04 ",.02)
  1. ;;00085-0287-04
  1. ;;9002226.02101,"730,00085-0287-08 ",.01)
  1. ;;00085-0287-08
  1. ;;9002226.02101,"730,00085-0287-08 ",.02)
  1. ;;00085-0287-08
  1. ;;9002226.02101,"730,00085-0598-04 ",.01)
  1. ;;00085-0598-04
  1. ;;9002226.02101,"730,00085-0598-04 ",.02)
  1. ;;00085-0598-04
  1. ;;9002226.02101,"730,00085-0598-08 ",.01)
  1. ;;00085-0598-08
  1. ;;9002226.02101,"730,00085-0598-08 ",.02)
  1. ;;00085-0598-08
  1. ;;9002226.02101,"730,00085-0720-04 ",.01)
  1. ;;00085-0720-04
  1. ;;9002226.02101,"730,00085-0720-04 ",.02)
  1. ;;00085-0720-04
  1. ;;9002226.02101,"730,00085-0720-08 ",.01)
  1. ;;00085-0720-08
  1. ;;9002226.02101,"730,00085-0720-08 ",.02)
  1. ;;00085-0720-08
  1. ;;9002226.02101,"730,00086-0925-81 ",.01)
  1. ;;00086-0925-81
  1. ;;9002226.02101,"730,00086-0925-81 ",.02)
  1. ;;00086-0925-81
  1. ;;9002226.02101,"730,00086-0926-81 ",.01)
  1. ;;00086-0926-81
  1. ;;9002226.02101,"730,00086-0926-81 ",.02)
  1. ;;00086-0926-81
  1. ;;9002226.02101,"730,00087-0543-01 ",.01)
  1. ;;00087-0543-01
  1. ;;9002226.02101,"730,00087-0543-01 ",.02)
  1. ;;00087-0543-01
  1. ;;9002226.02101,"730,00087-0544-01 ",.01)
  1. ;;00087-0544-01
  1. ;;9002226.02101,"730,00087-0544-01 ",.02)
  1. ;;00087-0544-01
  1. ;;9002226.02101,"730,00093-0073-01 ",.01)
  1. ;;00093-0073-01
  1. ;;9002226.02101,"730,00093-0073-01 ",.02)
  1. ;;00093-0073-01
  1. ;;9002226.02101,"730,00093-0074-01 ",.01)
  1. ;;00093-0074-01
  1. ;;9002226.02101,"730,00093-0074-01 ",.02)
  1. ;;00093-0074-01
  1. ;;9002226.02101,"730,00093-0854-01 ",.01)
  1. ;;00093-0854-01
  1. ;;9002226.02101,"730,00093-0854-01 ",.02)
  1. ;;00093-0854-01
  1. ;;9002226.02101,"730,00093-0956-01 ",.01)
  1. ;;00093-0956-01
  1. ;;9002226.02101,"730,00093-0956-01 ",.02)
  1. ;;00093-0956-01
  1. ;;9002226.02101,"730,00093-0958-01 ",.01)
  1. ;;00093-0958-01
  1. ;;9002226.02101,"730,00093-0958-01 ",.02)
  1. ;;00093-0958-01
  1. ;;9002226.02101,"730,00093-0960-01 ",.01)
  1. ;;00093-0960-01
  1. ;;9002226.02101,"730,00093-0960-01 ",.02)
  1. ;;00093-0960-01
  1. ;;9002226.02101,"730,00093-5268-01 ",.01)
  1. ;;00093-5268-01
  1. ;;9002226.02101,"730,00093-5268-01 ",.02)
  1. ;;00093-5268-01
  1. ;;9002226.02101,"730,00093-5269-01 ",.01)
  1. ;;00093-5269-01
  1. ;;9002226.02101,"730,00093-5269-01 ",.02)
  1. ;;00093-5269-01
  1. ;;9002226.02101,"730,00093-9612-12 ",.01)
  1. ;;00093-9612-12
  1. ;;9002226.02101,"730,00093-9612-12 ",.02)
  1. ;;00093-9612-12
  1. ;;9002226.02101,"730,00095-0240-01 ",.01)
  1. ;;00095-0240-01
  1. ;;9002226.02101,"730,00095-0240-01 ",.02)
  1. ;;00095-0240-01
  1. ;;9002226.02101,"730,00095-0240-05 ",.01)
  1. ;;00095-0240-05
  1. ;;9002226.02101,"730,00095-0240-05 ",.02)
  1. ;;00095-0240-05
  1. ;;9002226.02101,"730,00095-0950-05 ",.01)
  1. ;;00095-0950-05
  1. ;;9002226.02101,"730,00095-0950-05 ",.02)
  1. ;;00095-0950-05
  1. ;;9002226.02101,"730,00095-7075-01 ",.01)
  1. ;;00095-7075-01
  1. ;;9002226.02101,"730,00095-7075-01 ",.02)
  1. ;;00095-7075-01
  1. ;;9002226.02101,"730,00121-0531-05 ",.01)
  1. ;;00121-0531-05
  1. ;;9002226.02101,"730,00121-0531-05 ",.02)
  1. ;;00121-0531-05
  1. ;;9002226.02101,"730,00121-0531-07 ",.01)
  1. ;;00121-0531-07
  1. ;;9002226.02101,"730,00121-0531-07 ",.02)
  1. ;;00121-0531-07
  1. ;;9002226.02101,"730,00121-0531-15 ",.01)
  1. ;;00121-0531-15
  1. ;;9002226.02101,"730,00121-0531-15 ",.02)
  1. ;;00121-0531-15
  1. ;;9002226.02101,"730,00121-0531-16 ",.01)
  1. ;;00121-0531-16
  1. ;;9002226.02101,"730,00121-0531-16 ",.02)
  1. ;;00121-0531-16
  1. ;;9002226.02101,"730,00121-0532-04 ",.01)
  1. ;;00121-0532-04
  1. ;;9002226.02101,"730,00121-0532-04 ",.02)
  1. ;;00121-0532-04
  1. ;;9002226.02101,"730,00121-0532-05 ",.01)
  1. ;;00121-0532-05
  1. ;;9002226.02101,"730,00121-0532-05 ",.02)
  1. ;;00121-0532-05
  1. ;;9002226.02101,"730,00121-0532-16 ",.01)
  1. ;;00121-0532-16
  1. ;;9002226.02101,"730,00121-0532-16 ",.02)
  1. ;;00121-0532-16
  1. ;;9002226.02101,"730,00121-0661-04 ",.01)
  1. ;;00121-0661-04
  1. ;;9002226.02101,"730,00121-0661-04 ",.02)
  1. ;;00121-0661-04
  1. ;;9002226.02101,"730,00121-0662-04 ",.01)
  1. ;;00121-0662-04
  1. ;;9002226.02101,"730,00121-0662-04 ",.02)
  1. ;;00121-0662-04
  1. ;;9002226.02101,"730,00143-1115-01 ",.01)
  1. ;;00143-1115-01
  1. ;;9002226.02101,"730,00143-1115-01 ",.02)
  1. ;;00143-1115-01
  1. ;;9002226.02101,"730,00143-1115-05 ",.01)
  1. ;;00143-1115-05
  1. ;;9002226.02101,"730,00143-1115-05 ",.02)
  1. ;;00143-1115-05
  1. ;;9002226.02101,"730,00143-1140-10 ",.01)
  1. ;;00143-1140-10
  1. ;;9002226.02101,"730,00143-1140-10 ",.02)
  1. ;;00143-1140-10
  1. ;;9002226.02101,"730,00143-1140-51 ",.01)
  1. ;;00143-1140-51
  1. ;;9002226.02101,"730,00143-1140-51 ",.02)
  1. ;;00143-1140-51
  1. ;;9002226.02101,"730,00143-1445-05 ",.01)
  1. ;;00143-1445-05
  1. ;;9002226.02101,"730,00143-1445-05 ",.02)
  1. ;;00143-1445-05
  1. ;;9002226.02101,"730,00143-1445-10 ",.01)
  1. ;;00143-1445-10
  1. ;;9002226.02101,"730,00143-1445-10 ",.02)
  1. ;;00143-1445-10
  1. ;;9002226.02101,"730,00143-1450-05 ",.01)
  1. ;;00143-1450-05
  1. ;;9002226.02101,"730,00143-1450-05 ",.02)
  1. ;;00143-1450-05
  1. ;;9002226.02101,"730,00143-1450-10 ",.01)
  1. ;;00143-1450-10
  1. ;;9002226.02101,"730,00143-1450-10 ",.02)
  1. ;;00143-1450-10
  1. ;;9002226.02101,"730,00143-1455-05 ",.01)
  1. ;;00143-1455-05
  1. ;;9002226.02101,"730,00143-1455-05 ",.02)
  1. ;;00143-1455-05
  1. ;;9002226.02101,"730,00143-1455-10 ",.01)
  1. ;;00143-1455-10
  1. ;;9002226.02101,"730,00143-1455-10 ",.02)
  1. ;;00143-1455-10
  1. ;;9002226.02101,"730,00143-1458-01 ",.01)
  1. ;;00143-1458-01
  1. ;;9002226.02101,"730,00143-1458-01 ",.02)
  1. ;;00143-1458-01
  1. ;;9002226.02101,"730,00143-1458-05 ",.01)
  1. ;;00143-1458-05
  1. ;;9002226.02101,"730,00143-1458-05 ",.02)
  1. ;;00143-1458-05
  1. ;;9002226.02101,"730,00143-1458-10 ",.01)
  1. ;;00143-1458-10
  1. ;;9002226.02101,"730,00143-1458-10 ",.02)
  1. ;;00143-1458-10
  1. ;;9002226.02101,"730,00143-1785-01 ",.01)
  1. ;;00143-1785-01
  1. ;;9002226.02101,"730,00143-1785-01 ",.02)
  1. ;;00143-1785-01
  1. ;;9002226.02101,"730,00143-1785-10 ",.01)
  1. ;;00143-1785-10
  1. ;;9002226.02101,"730,00143-1785-10 ",.02)
  1. ;;00143-1785-10
  1. ;;9002226.02101,"730,00143-1785-30 ",.01)
  1. ;;00143-1785-30
  1. ;;9002226.02101,"730,00143-1785-30 ",.02)
  1. ;;00143-1785-30
  1. ;;9002226.02101,"730,00143-1787-01 ",.01)
  1. ;;00143-1787-01
  1. ;;9002226.02101,"730,00143-1787-01 ",.02)
  1. ;;00143-1787-01
  1. ;;9002226.02101,"730,00143-1787-05 ",.01)
  1. ;;00143-1787-05
  1. ;;9002226.02101,"730,00143-1787-05 ",.02)
  1. ;;00143-1787-05
  1. ;;9002226.02101,"730,00143-3000-01 ",.01)
  1. ;;00143-3000-01
  1. ;;9002226.02101,"730,00143-3000-01 ",.02)
  1. ;;00143-3000-01
  1. ;;9002226.02101,"730,00143-3909-01 ",.01)
  1. ;;00143-3909-01
  1. ;;9002226.02101,"730,00143-3909-01 ",.02)
  1. ;;00143-3909-01
  1. ;;9002226.02101,"730,00143-3910-01 ",.01)
  1. ;;00143-3910-01
  1. ;;9002226.02101,"730,00143-3910-01 ",.02)
  1. ;;00143-3910-01
  1. ;;9002226.02101,"730,00172-2959-60 ",.01)
  1. ;;00172-2959-60
  1. ;;9002226.02101,"730,00172-2959-60 ",.02)
  1. ;;00172-2959-60
  1. ;;9002226.02101,"730,00182-0314-40 ",.01)
  1. ;;00182-0314-40
  1. ;;9002226.02101,"730,00182-0314-40 ",.02)
  1. ;;00182-0314-40
  1. ;;9002226.02101,"730,00182-0686-40 ",.01)
  1. ;;00182-0686-40
  1. ;;9002226.02101,"730,00182-0686-40 ",.02)
  1. ;;00182-0686-40
  1. ;;9002226.02101,"730,00182-1018-89 ",.01)
  1. ;;00182-1018-89
  1. ;;9002226.02101,"730,00182-1018-89 ",.02)
  1. ;;00182-1018-89
  1. ;;9002226.02101,"730,00182-1019-10 ",.01)
  1. ;;00182-1019-10
  1. ;;9002226.02101,"730,00182-1019-10 ",.02)
  1. ;;00182-1019-10
  1. ;;9002226.02101,"730,00182-1019-89 ",.01)
  1. ;;00182-1019-89
  1. ;;9002226.02101,"730,00182-1019-89 ",.02)
  1. ;;00182-1019-89
  1. ;;9002226.02101,"730,00182-1020-89 ",.01)
  1. ;;00182-1020-89
  1. ;;9002226.02101,"730,00182-1020-89 ",.02)
  1. ;;00182-1020-89
  1. ;;9002226.02101,"730,00182-1021-89 ",.01)
  1. ;;00182-1021-89
  1. ;;9002226.02101,"730,00182-1021-89 ",.02)
  1. ;;00182-1021-89
  1. ;;9002226.02101,"730,00182-1063-89 ",.01)
  1. ;;00182-1063-89
  1. ;;9002226.02101,"730,00182-1063-89 ",.02)
  1. ;;00182-1063-89
  1. ;;9002226.02101,"730,00182-1631-01 ",.01)
  1. ;;00182-1631-01
  1. ;;9002226.02101,"730,00182-1631-01 ",.02)
  1. ;;00182-1631-01
  1. ;;9002226.02101,"730,00182-2659-01 ",.01)
  1. ;;00182-2659-01
  1. ;;9002226.02101,"730,00182-2659-01 ",.02)
  1. ;;00182-2659-01
  1. ;;9002226.02101,"730,00182-2659-05 ",.01)
  1. ;;00182-2659-05
  1. ;;9002226.02101,"730,00182-2659-05 ",.02)
  1. ;;00182-2659-05
  1. ;;9002226.02101,"730,00182-2693-01 ",.01)
  1. ;;00182-2693-01
  1. ;;9002226.02101,"730,00182-2693-01 ",.02)
  1. ;;00182-2693-01
  1. ;;9002226.02101,"730,00182-2694-01 ",.01)
  1. ;;00182-2694-01
  1. ;;9002226.02101,"730,00182-2694-01 ",.02)
  1. ;;00182-2694-01
  1. ;;9002226.02101,"730,00185-0716-10 ",.01)
  1. ;;00185-0716-10
  1. ;;9002226.02101,"730,00185-0716-10 ",.02)
  1. ;;00185-0716-10
  1. ;;9002226.02101,"730,00185-0717-01 ",.01)
  1. ;;00185-0717-01
  1. ;;9002226.02101,"730,00185-0717-01 ",.02)
  1. ;;00185-0717-01
  1. ;;9002226.02101,"730,00185-0717-10 ",.01)
  1. ;;00185-0717-10
  1. ;;9002226.02101,"730,00185-0717-10 ",.02)
  1. ;;00185-0717-10
  1. ;;9002226.02101,"730,00187-0842-01 ",.01)
  1. ;;00187-0842-01
  1. ;;9002226.02101,"730,00187-0842-01 ",.02)
  1. ;;00187-0842-01
  1. ;;9002226.02101,"730,00187-0843-01 ",.01)
  1. ;;00187-0843-01
  1. ;;9002226.02101,"730,00187-0843-01 ",.02)
  1. ;;00187-0843-01
  1. ;;9002226.02101,"730,00187-0844-01 ",.01)
  1. ;;00187-0844-01
  1. ;;9002226.02101,"730,00187-0844-01 ",.02)
  1. ;;00187-0844-01
  1. ;;9002226.02101,"730,00187-0844-02 ",.01)
  1. ;;00187-0844-02
  1. ;;9002226.02101,"730,00187-0844-02 ",.02)
  1. ;;00187-0844-02
  1. ;;9002226.02101,"730,00187-3805-10 ",.01)
  1. ;;00187-3805-10
  1. ;;9002226.02101,"730,00187-3805-10 ",.02)
  1. ;;00187-3805-10
  1. ;;9002226.02101,"730,00187-3806-10 ",.01)
  1. ;;00187-3806-10
  1. ;;9002226.02101,"730,00187-3806-10 ",.02)
  1. ;;00187-3806-10
  1. ;;9002226.02101,"730,00228-2023-10 ",.01)
  1. ;;00228-2023-10
  1. ;;9002226.02101,"730,00228-2023-10 ",.02)
  1. ;;00228-2023-10
  1. ;;9002226.02101,"730,00228-2023-96 ",.01)
  1. ;;00228-2023-96
  1. ;;9002226.02101,"730,00228-2023-96 ",.02)
  1. ;;00228-2023-96
  1. ;;9002226.02101,"730,00228-2026-96 ",.01)
  1. ;;00228-2026-96
  1. ;;9002226.02101,"730,00228-2026-96 ",.02)
  1. ;;00228-2026-96
  1. ;;9002226.02101,"730,00228-2028-96 ",.01)
  1. ;;00228-2028-96
  1. ;;9002226.02101,"730,00228-2028-96 ",.02)
  1. ;;00228-2028-96
  1. ;;9002226.02101,"730,00228-2888-10 ",.01)
  1. ;;00228-2888-10
  1. ;;9002226.02101,"730,00228-2888-10 ",.02)
  1. ;;00228-2888-10
  1. ;;9002226.02101,"730,00228-2888-50 ",.01)
  1. ;;00228-2888-50
  1. ;;9002226.02101,"730,00228-2888-50 ",.02)
  1. ;;00228-2888-50
  1. ;;9002226.02101,"730,00228-2889-10 ",.01)
  1. ;;00228-2889-10
  1. ;;9002226.02101,"730,00228-2889-10 ",.02)
  1. ;;00228-2889-10
  1. ;;9002226.02101,"730,00228-2889-50 ",.01)
  1. ;;00228-2889-50
  1. ;;9002226.02101,"730,00228-2889-50 ",.02)
  1. ;;00228-2889-50
  1. ;;9002226.02101,"730,00228-3481-11 ",.01)
  1. ;;00228-3481-11
  1. ;;9002226.02101,"730,00228-3481-11 ",.02)
  1. ;;00228-3481-11
  1. ;;9002226.02101,"730,00228-3481-50 ",.01)
  1. ;;00228-3481-50
  1. ;;9002226.02101,"730,00228-3481-50 ",.02)
  1. ;;00228-3481-50
  1. ;;9002226.02101,"730,00228-3482-11 ",.01)
  1. ;;00228-3482-11
  1. ;;9002226.02101,"730,00228-3482-11 ",.02)
  1. ;;00228-3482-11
  1. ;;9002226.02101,"730,00228-3482-50 ",.01)
  1. ;;00228-3482-50
  1. ;;9002226.02101,"730,00228-3482-50 ",.02)
  1. ;;00228-3482-50
  1. ;;9002226.02101,"730,00247-0138-04 ",.01)
  1. ;;00247-0138-04
  1. ;;9002226.02101,"730,00247-0138-04 ",.02)
  1. ;;00247-0138-04
  1. ;;9002226.02101,"730,00247-0138-08 ",.01)
  1. ;;00247-0138-08
  1. ;;9002226.02101,"730,00247-0138-08 ",.02)
  1. ;;00247-0138-08
  1. ;;9002226.02101,"730,00247-0138-10 ",.01)
  1. ;;00247-0138-10
  1. ;;9002226.02101,"730,00247-0138-10 ",.02)
  1. ;;00247-0138-10
  1. ;;9002226.02101,"730,00247-0138-12 ",.01)
  1. ;;00247-0138-12
  1. ;;9002226.02101,"730,00247-0138-12 ",.02)
  1. ;;00247-0138-12
  1. ;;9002226.02101,"730,00247-0138-15 ",.01)
  1. ;;00247-0138-15
  1. ;;9002226.02101,"730,00247-0138-15 ",.02)
  1. ;;00247-0138-15
  1. ;;9002226.02101,"730,00247-0138-16 ",.01)
  1. ;;00247-0138-16
  1. ;;9002226.02101,"730,00247-0138-16 ",.02)
  1. ;;00247-0138-16
  1. ;;9002226.02101,"730,00247-0138-20 ",.01)
  1. ;;00247-0138-20
  1. ;;9002226.02101,"730,00247-0138-20 ",.02)
  1. ;;00247-0138-20
  1. ;;9002226.02101,"730,00247-0138-24 ",.01)
  1. ;;00247-0138-24
  1. ;;9002226.02101,"730,00247-0138-24 ",.02)
  1. ;;00247-0138-24
  1. ;;9002226.02101,"730,00247-0138-28 ",.01)
  1. ;;00247-0138-28
  1. ;;9002226.02101,"730,00247-0138-28 ",.02)
  1. ;;00247-0138-28
  1. ;;9002226.02101,"730,00247-0138-30 ",.01)
  1. ;;00247-0138-30
  1. ;;9002226.02101,"730,00247-0138-30 ",.02)
  1. ;;00247-0138-30
  1. ;;9002226.02101,"730,00247-0138-40 ",.01)
  1. ;;00247-0138-40
  1. ;;9002226.02101,"730,00247-0138-40 ",.02)
  1. ;;00247-0138-40
  1. ;;9002226.02101,"730,00247-0185-05 ",.01)
  1. ;;00247-0185-05
  1. ;;9002226.02101,"730,00247-0185-05 ",.02)
  1. ;;00247-0185-05
  1. ;;9002226.02101,"730,00247-0185-10 ",.01)
  1. ;;00247-0185-10
  1. ;;9002226.02101,"730,00247-0185-10 ",.02)
  1. ;;00247-0185-10
  1. ;;9002226.02101,"730,00247-0185-12 ",.01)
  1. ;;00247-0185-12
  1. ;;9002226.02101,"730,00247-0185-12 ",.02)
  1. ;;00247-0185-12
  1. ;;9002226.02101,"730,00247-0185-20 ",.01)
  1. ;;00247-0185-20
  1. ;;9002226.02101,"730,00247-0185-20 ",.02)
  1. ;;00247-0185-20
  1. ;;9002226.02101,"730,00247-0185-24 ",.01)
  1. ;;00247-0185-24