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

BGP47P8.m

Go to the documentation of this file.
  1. BGP47P8 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 16, 2014;
  1. ;;14.1;IHS CLINICAL REPORTING;;MAY 29, 2014;Build 114
  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,"806,00378-1125-10 ",.01)
  1. ;;00378-1125-10
  1. ;;9002226.02101,"806,00378-1125-10 ",.02)
  1. ;;00378-1125-10
  1. ;;9002226.02101,"806,00378-1142-01 ",.01)
  1. ;;00378-1142-01
  1. ;;9002226.02101,"806,00378-1142-01 ",.02)
  1. ;;00378-1142-01
  1. ;;9002226.02101,"806,00378-1452-01 ",.01)
  1. ;;00378-1452-01
  1. ;;9002226.02101,"806,00378-1452-01 ",.02)
  1. ;;00378-1452-01
  1. ;;9002226.02101,"806,00378-1452-05 ",.01)
  1. ;;00378-1452-05
  1. ;;9002226.02101,"806,00378-1452-05 ",.02)
  1. ;;00378-1452-05
  1. ;;9002226.02101,"806,00378-1454-01 ",.01)
  1. ;;00378-1454-01
  1. ;;9002226.02101,"806,00378-1454-01 ",.02)
  1. ;;00378-1454-01
  1. ;;9002226.02101,"806,00378-1454-05 ",.01)
  1. ;;00378-1454-05
  1. ;;9002226.02101,"806,00378-1454-05 ",.02)
  1. ;;00378-1454-05
  1. ;;9002226.02101,"806,00378-1458-01 ",.01)
  1. ;;00378-1458-01
  1. ;;9002226.02101,"806,00378-1458-01 ",.02)
  1. ;;00378-1458-01
  1. ;;9002226.02101,"806,00378-1458-05 ",.01)
  1. ;;00378-1458-05
  1. ;;9002226.02101,"806,00378-1458-05 ",.02)
  1. ;;00378-1458-05
  1. ;;9002226.02101,"806,00378-1458-77 ",.01)
  1. ;;00378-1458-77
  1. ;;9002226.02101,"806,00378-1458-77 ",.02)
  1. ;;00378-1458-77
  1. ;;9002226.02101,"806,00378-3349-16 ",.01)
  1. ;;00378-3349-16
  1. ;;9002226.02101,"806,00378-3349-16 ",.02)
  1. ;;00378-3349-16
  1. ;;9002226.02101,"806,00378-3349-99 ",.01)
  1. ;;00378-3349-99
  1. ;;9002226.02101,"806,00378-3349-99 ",.02)
  1. ;;00378-3349-99
  1. ;;9002226.02101,"806,00378-3350-16 ",.01)
  1. ;;00378-3350-16
  1. ;;9002226.02101,"806,00378-3350-16 ",.02)
  1. ;;00378-3350-16
  1. ;;9002226.02101,"806,00378-3350-99 ",.01)
  1. ;;00378-3350-99
  1. ;;9002226.02101,"806,00378-3350-99 ",.02)
  1. ;;00378-3350-99
  1. ;;9002226.02101,"806,00378-3351-16 ",.01)
  1. ;;00378-3351-16
  1. ;;9002226.02101,"806,00378-3351-16 ",.02)
  1. ;;00378-3351-16
  1. ;;9002226.02101,"806,00378-3351-99 ",.01)
  1. ;;00378-3351-99
  1. ;;9002226.02101,"806,00378-3351-99 ",.02)
  1. ;;00378-3351-99
  1. ;;9002226.02101,"806,00378-3352-16 ",.01)
  1. ;;00378-3352-16
  1. ;;9002226.02101,"806,00378-3352-16 ",.02)
  1. ;;00378-3352-16
  1. ;;9002226.02101,"806,00378-3352-99 ",.01)
  1. ;;00378-3352-99
  1. ;;9002226.02101,"806,00378-3352-99 ",.02)
  1. ;;00378-3352-99
  1. ;;9002226.02101,"806,00378-3360-99 ",.01)
  1. ;;00378-3360-99
  1. ;;9002226.02101,"806,00378-3360-99 ",.02)
  1. ;;00378-3360-99
  1. ;;9002226.02101,"806,00378-3361-16 ",.01)
  1. ;;00378-3361-16
  1. ;;9002226.02101,"806,00378-3361-16 ",.02)
  1. ;;00378-3361-16
  1. ;;9002226.02101,"806,00378-3361-99 ",.01)
  1. ;;00378-3361-99
  1. ;;9002226.02101,"806,00378-3361-99 ",.02)
  1. ;;00378-3361-99
  1. ;;9002226.02101,"806,00378-4551-01 ",.01)
  1. ;;00378-4551-01
  1. ;;9002226.02101,"806,00378-4551-01 ",.02)
  1. ;;00378-4551-01
  1. ;;9002226.02101,"806,00378-4553-01 ",.01)
  1. ;;00378-4553-01
  1. ;;9002226.02101,"806,00378-4553-01 ",.02)
  1. ;;00378-4553-01
  1. ;;9002226.02101,"806,00378-4555-01 ",.01)
  1. ;;00378-4555-01
  1. ;;9002226.02101,"806,00378-4555-01 ",.02)
  1. ;;00378-4555-01
  1. ;;9002226.02101,"806,00421-0158-01 ",.01)
  1. ;;00421-0158-01
  1. ;;9002226.02101,"806,00421-0158-01 ",.02)
  1. ;;00421-0158-01
  1. ;;9002226.02101,"806,00421-0748-01 ",.01)
  1. ;;00421-0748-01
  1. ;;9002226.02101,"806,00421-0748-01 ",.02)
  1. ;;00421-0748-01
  1. ;;9002226.02101,"806,00421-0768-01 ",.01)
  1. ;;00421-0768-01
  1. ;;9002226.02101,"806,00421-0768-01 ",.02)
  1. ;;00421-0768-01
  1. ;;9002226.02101,"806,00421-1259-01 ",.01)
  1. ;;00421-1259-01
  1. ;;9002226.02101,"806,00421-1259-01 ",.02)
  1. ;;00421-1259-01
  1. ;;9002226.02101,"806,00430-0021-24 ",.01)
  1. ;;00430-0021-24
  1. ;;9002226.02101,"806,00430-0021-24 ",.02)
  1. ;;00430-0021-24
  1. ;;9002226.02101,"806,00430-0023-24 ",.01)
  1. ;;00430-0023-24
  1. ;;9002226.02101,"806,00430-0023-24 ",.02)
  1. ;;00430-0023-24
  1. ;;9002226.02101,"806,00430-0023-30 ",.01)
  1. ;;00430-0023-30
  1. ;;9002226.02101,"806,00430-0023-30 ",.02)
  1. ;;00430-0023-30
  1. ;;9002226.02101,"806,00430-0024-24 ",.01)
  1. ;;00430-0024-24
  1. ;;9002226.02101,"806,00430-0024-24 ",.02)
  1. ;;00430-0024-24
  1. ;;9002226.02101,"806,00430-0024-30 ",.01)
  1. ;;00430-0024-30
  1. ;;9002226.02101,"806,00430-0024-30 ",.02)
  1. ;;00430-0024-30
  1. ;;9002226.02101,"806,00430-0145-14 ",.01)
  1. ;;00430-0145-14
  1. ;;9002226.02101,"806,00430-0145-14 ",.02)
  1. ;;00430-0145-14
  1. ;;9002226.02101,"806,00430-0145-23 ",.01)
  1. ;;00430-0145-23
  1. ;;9002226.02101,"806,00430-0145-23 ",.02)
  1. ;;00430-0145-23
  1. ;;9002226.02101,"806,00430-0389-24 ",.01)
  1. ;;00430-0389-24
  1. ;;9002226.02101,"806,00430-0389-24 ",.02)
  1. ;;00430-0389-24
  1. ;;9002226.02101,"806,00430-0390-24 ",.01)
  1. ;;00430-0390-24
  1. ;;9002226.02101,"806,00430-0390-24 ",.02)
  1. ;;00430-0390-24
  1. ;;9002226.02101,"806,00430-0544-14 ",.01)
  1. ;;00430-0544-14
  1. ;;9002226.02101,"806,00430-0544-14 ",.02)
  1. ;;00430-0544-14
  1. ;;9002226.02101,"806,00430-0544-23 ",.01)
  1. ;;00430-0544-23
  1. ;;9002226.02101,"806,00430-0544-23 ",.02)
  1. ;;00430-0544-23
  1. ;;9002226.02101,"806,00430-0720-24 ",.01)
  1. ;;00430-0720-24
  1. ;;9002226.02101,"806,00430-0720-24 ",.02)
  1. ;;00430-0720-24
  1. ;;9002226.02101,"806,00430-0721-24 ",.01)
  1. ;;00430-0721-24
  1. ;;9002226.02101,"806,00430-0721-24 ",.02)
  1. ;;00430-0721-24
  1. ;;9002226.02101,"806,00430-0722-24 ",.01)
  1. ;;00430-0722-24
  1. ;;9002226.02101,"806,00430-0722-24 ",.02)
  1. ;;00430-0722-24
  1. ;;9002226.02101,"806,00440-7570-20 ",.01)
  1. ;;00440-7570-20
  1. ;;9002226.02101,"806,00440-7570-20 ",.02)
  1. ;;00440-7570-20
  1. ;;9002226.02101,"806,00440-7571-14 ",.01)
  1. ;;00440-7571-14
  1. ;;9002226.02101,"806,00440-7571-14 ",.02)
  1. ;;00440-7571-14
  1. ;;9002226.02101,"806,00440-7571-30 ",.01)
  1. ;;00440-7571-30
  1. ;;9002226.02101,"806,00440-7571-30 ",.02)
  1. ;;00440-7571-30
  1. ;;9002226.02101,"806,00440-7571-60 ",.01)
  1. ;;00440-7571-60
  1. ;;9002226.02101,"806,00440-7571-60 ",.02)
  1. ;;00440-7571-60
  1. ;;9002226.02101,"806,00440-7571-90 ",.01)
  1. ;;00440-7571-90
  1. ;;9002226.02101,"806,00440-7571-90 ",.02)
  1. ;;00440-7571-90
  1. ;;9002226.02101,"806,00440-7571-91 ",.01)
  1. ;;00440-7571-91
  1. ;;9002226.02101,"806,00440-7571-91 ",.02)
  1. ;;00440-7571-91
  1. ;;9002226.02101,"806,00440-7571-92 ",.01)
  1. ;;00440-7571-92
  1. ;;9002226.02101,"806,00440-7571-92 ",.02)
  1. ;;00440-7571-92
  1. ;;9002226.02101,"806,00440-7571-94 ",.01)
  1. ;;00440-7571-94
  1. ;;9002226.02101,"806,00440-7571-94 ",.02)
  1. ;;00440-7571-94
  1. ;;9002226.02101,"806,00440-7571-95 ",.01)
  1. ;;00440-7571-95
  1. ;;9002226.02101,"806,00440-7571-95 ",.02)
  1. ;;00440-7571-95
  1. ;;9002226.02101,"806,00440-7585-90 ",.01)
  1. ;;00440-7585-90
  1. ;;9002226.02101,"806,00440-7585-90 ",.02)
  1. ;;00440-7585-90
  1. ;;9002226.02101,"806,00440-7587-90 ",.01)
  1. ;;00440-7587-90
  1. ;;9002226.02101,"806,00440-7587-90 ",.02)
  1. ;;00440-7587-90
  1. ;;9002226.02101,"806,00440-7589-90 ",.01)
  1. ;;00440-7589-90
  1. ;;9002226.02101,"806,00440-7589-90 ",.02)
  1. ;;00440-7589-90
  1. ;;9002226.02101,"806,00440-7589-95 ",.01)
  1. ;;00440-7589-95
  1. ;;9002226.02101,"806,00440-7589-95 ",.02)
  1. ;;00440-7589-95
  1. ;;9002226.02101,"806,00440-7749-10 ",.01)
  1. ;;00440-7749-10
  1. ;;9002226.02101,"806,00440-7749-10 ",.02)
  1. ;;00440-7749-10
  1. ;;9002226.02101,"806,00440-7749-20 ",.01)
  1. ;;00440-7749-20
  1. ;;9002226.02101,"806,00440-7749-20 ",.02)
  1. ;;00440-7749-20
  1. ;;9002226.02101,"806,00440-7749-30 ",.01)
  1. ;;00440-7749-30
  1. ;;9002226.02101,"806,00440-7749-30 ",.02)
  1. ;;00440-7749-30
  1. ;;9002226.02101,"806,00440-7749-60 ",.01)
  1. ;;00440-7749-60
  1. ;;9002226.02101,"806,00440-7749-60 ",.02)
  1. ;;00440-7749-60
  1. ;;9002226.02101,"806,00440-8170-30 ",.01)
  1. ;;00440-8170-30
  1. ;;9002226.02101,"806,00440-8170-30 ",.02)
  1. ;;00440-8170-30
  1. ;;9002226.02101,"806,00440-8170-60 ",.01)
  1. ;;00440-8170-60
  1. ;;9002226.02101,"806,00440-8170-60 ",.02)
  1. ;;00440-8170-60
  1. ;;9002226.02101,"806,00440-8170-90 ",.01)
  1. ;;00440-8170-90
  1. ;;9002226.02101,"806,00440-8170-90 ",.02)
  1. ;;00440-8170-90
  1. ;;9002226.02101,"806,00440-8171-30 ",.01)
  1. ;;00440-8171-30
  1. ;;9002226.02101,"806,00440-8171-30 ",.02)
  1. ;;00440-8171-30
  1. ;;9002226.02101,"806,00440-8171-60 ",.01)
  1. ;;00440-8171-60
  1. ;;9002226.02101,"806,00440-8171-60 ",.02)
  1. ;;00440-8171-60
  1. ;;9002226.02101,"806,00440-8171-90 ",.01)
  1. ;;00440-8171-90
  1. ;;9002226.02101,"806,00440-8171-90 ",.02)
  1. ;;00440-8171-90
  1. ;;9002226.02101,"806,00440-8172-30 ",.01)
  1. ;;00440-8172-30
  1. ;;9002226.02101,"806,00440-8172-30 ",.02)
  1. ;;00440-8172-30
  1. ;;9002226.02101,"806,00440-8172-60 ",.01)
  1. ;;00440-8172-60
  1. ;;9002226.02101,"806,00440-8172-60 ",.02)
  1. ;;00440-8172-60
  1. ;;9002226.02101,"806,00440-8172-90 ",.01)
  1. ;;00440-8172-90
  1. ;;9002226.02101,"806,00440-8172-90 ",.02)
  1. ;;00440-8172-90
  1. ;;9002226.02101,"806,00456-0457-01 ",.01)
  1. ;;00456-0457-01
  1. ;;9002226.02101,"806,00456-0457-01 ",.02)
  1. ;;00456-0457-01
  1. ;;9002226.02101,"806,00456-0458-00 ",.01)
  1. ;;00456-0458-00
  1. ;;9002226.02101,"806,00456-0458-00 ",.02)
  1. ;;00456-0458-00
  1. ;;9002226.02101,"806,00456-0458-01 ",.01)
  1. ;;00456-0458-01
  1. ;;9002226.02101,"806,00456-0458-01 ",.02)
  1. ;;00456-0458-01
  1. ;;9002226.02101,"806,00456-0458-11 ",.01)
  1. ;;00456-0458-11
  1. ;;9002226.02101,"806,00456-0458-11 ",.02)
  1. ;;00456-0458-11
  1. ;;9002226.02101,"806,00456-0458-63 ",.01)
  1. ;;00456-0458-63
  1. ;;9002226.02101,"806,00456-0458-63 ",.02)
  1. ;;00456-0458-63
  1. ;;9002226.02101,"806,00456-0458-69 ",.01)
  1. ;;00456-0458-69
  1. ;;9002226.02101,"806,00456-0458-69 ",.02)
  1. ;;00456-0458-69
  1. ;;9002226.02101,"806,00456-0459-00 ",.01)
  1. ;;00456-0459-00
  1. ;;9002226.02101,"806,00456-0459-00 ",.02)
  1. ;;00456-0459-00
  1. ;;9002226.02101,"806,00456-0459-01 ",.01)
  1. ;;00456-0459-01
  1. ;;9002226.02101,"806,00456-0459-01 ",.02)
  1. ;;00456-0459-01
  1. ;;9002226.02101,"806,00456-0459-11 ",.01)
  1. ;;00456-0459-11
  1. ;;9002226.02101,"806,00456-0459-11 ",.02)
  1. ;;00456-0459-11
  1. ;;9002226.02101,"806,00456-0459-51 ",.01)
  1. ;;00456-0459-51
  1. ;;9002226.02101,"806,00456-0459-51 ",.02)
  1. ;;00456-0459-51
  1. ;;9002226.02101,"806,00456-0459-63 ",.01)
  1. ;;00456-0459-63
  1. ;;9002226.02101,"806,00456-0459-63 ",.02)
  1. ;;00456-0459-63
  1. ;;9002226.02101,"806,00456-0459-69 ",.01)
  1. ;;00456-0459-69
  1. ;;9002226.02101,"806,00456-0459-69 ",.02)
  1. ;;00456-0459-69
  1. ;;9002226.02101,"806,00456-0460-01 ",.01)
  1. ;;00456-0460-01
  1. ;;9002226.02101,"806,00456-0460-01 ",.02)
  1. ;;00456-0460-01
  1. ;;9002226.02101,"806,00456-0461-00 ",.01)
  1. ;;00456-0461-00
  1. ;;9002226.02101,"806,00456-0461-00 ",.02)
  1. ;;00456-0461-00
  1. ;;9002226.02101,"806,00456-0461-01 ",.01)
  1. ;;00456-0461-01
  1. ;;9002226.02101,"806,00456-0461-01 ",.02)
  1. ;;00456-0461-01
  1. ;;9002226.02101,"806,00456-0461-63 ",.01)
  1. ;;00456-0461-63
  1. ;;9002226.02101,"806,00456-0461-63 ",.02)
  1. ;;00456-0461-63
  1. ;;9002226.02101,"806,00456-0461-69 ",.01)
  1. ;;00456-0461-69
  1. ;;9002226.02101,"806,00456-0461-69 ",.02)
  1. ;;00456-0461-69
  1. ;;9002226.02101,"806,00456-0462-00 ",.01)
  1. ;;00456-0462-00
  1. ;;9002226.02101,"806,00456-0462-00 ",.02)
  1. ;;00456-0462-00
  1. ;;9002226.02101,"806,00456-0462-01 ",.01)
  1. ;;00456-0462-01
  1. ;;9002226.02101,"806,00456-0462-01 ",.02)
  1. ;;00456-0462-01
  1. ;;9002226.02101,"806,00456-0463-01 ",.01)
  1. ;;00456-0463-01
  1. ;;9002226.02101,"806,00456-0463-01 ",.02)
  1. ;;00456-0463-01
  1. ;;9002226.02101,"806,00456-0464-01 ",.01)
  1. ;;00456-0464-01
  1. ;;9002226.02101,"806,00456-0464-01 ",.02)
  1. ;;00456-0464-01
  1. ;;9002226.02101,"806,00482-4900-02 ",.01)
  1. ;;00482-4900-02
  1. ;;9002226.02101,"806,00482-4900-02 ",.02)
  1. ;;00482-4900-02
  1. ;;9002226.02101,"806,00527-1409-01 ",.01)
  1. ;;00527-1409-01
  1. ;;9002226.02101,"806,00527-1409-01 ",.02)
  1. ;;00527-1409-01
  1. ;;9002226.02101,"806,00527-1409-10 ",.01)
  1. ;;00527-1409-10
  1. ;;9002226.02101,"806,00527-1409-10 ",.02)
  1. ;;00527-1409-10
  1. ;;9002226.02101,"806,00527-1410-01 ",.01)
  1. ;;00527-1410-01
  1. ;;9002226.02101,"806,00527-1410-01 ",.02)
  1. ;;00527-1410-01
  1. ;;9002226.02101,"806,00527-1410-10 ",.01)
  1. ;;00527-1410-10
  1. ;;9002226.02101,"806,00527-1410-10 ",.02)
  1. ;;00527-1410-10
  1. ;;9002226.02101,"806,00555-0606-02 ",.01)
  1. ;;00555-0606-02
  1. ;;9002226.02101,"806,00555-0606-02 ",.02)
  1. ;;00555-0606-02
  1. ;;9002226.02101,"806,00555-0607-02 ",.01)
  1. ;;00555-0607-02
  1. ;;9002226.02101,"806,00555-0607-02 ",.02)
  1. ;;00555-0607-02
  1. ;;9002226.02101,"806,00555-0607-03 ",.01)
  1. ;;00555-0607-03
  1. ;;9002226.02101,"806,00555-0607-03 ",.02)
  1. ;;00555-0607-03
  1. ;;9002226.02101,"806,00555-0607-04 ",.01)
  1. ;;00555-0607-04
  1. ;;9002226.02101,"806,00555-0607-04 ",.02)
  1. ;;00555-0607-04
  1. ;;9002226.02101,"806,00555-0727-02 ",.01)
  1. ;;00555-0727-02
  1. ;;9002226.02101,"806,00555-0727-02 ",.02)
  1. ;;00555-0727-02
  1. ;;9002226.02101,"806,00555-0728-02 ",.01)
  1. ;;00555-0728-02
  1. ;;9002226.02101,"806,00555-0728-02 ",.02)
  1. ;;00555-0728-02
  1. ;;9002226.02101,"806,00555-0729-02 ",.01)
  1. ;;00555-0729-02
  1. ;;9002226.02101,"806,00555-0729-02 ",.02)
  1. ;;00555-0729-02
  1. ;;9002226.02101,"806,00555-0886-02 ",.01)
  1. ;;00555-0886-02
  1. ;;9002226.02101,"806,00555-0886-02 ",.02)
  1. ;;00555-0886-02
  1. ;;9002226.02101,"806,00555-0886-04 ",.01)
  1. ;;00555-0886-04
  1. ;;9002226.02101,"806,00555-0886-04 ",.02)
  1. ;;00555-0886-04
  1. ;;9002226.02101,"806,00555-0887-02 ",.01)
  1. ;;00555-0887-02
  1. ;;9002226.02101,"806,00555-0887-02 ",.02)
  1. ;;00555-0887-02
  1. ;;9002226.02101,"806,00555-0887-04 ",.01)
  1. ;;00555-0887-04
  1. ;;9002226.02101,"806,00555-0887-04 ",.02)
  1. ;;00555-0887-04
  1. ;;9002226.02101,"806,00555-0899-02 ",.01)
  1. ;;00555-0899-02
  1. ;;9002226.02101,"806,00555-0899-02 ",.02)
  1. ;;00555-0899-02
  1. ;;9002226.02101,"806,00574-0870-05 ",.01)
  1. ;;00574-0870-05
  1. ;;9002226.02101,"806,00574-0870-05 ",.02)
  1. ;;00574-0870-05
  1. ;;9002226.02101,"806,00574-0872-05 ",.01)
  1. ;;00574-0872-05
  1. ;;9002226.02101,"806,00574-0872-05 ",.02)
  1. ;;00574-0872-05
  1. ;;9002226.02101,"806,00591-0414-01 ",.01)
  1. ;;00591-0414-01
  1. ;;9002226.02101,"806,00591-0414-01 ",.02)
  1. ;;00591-0414-01
  1. ;;9002226.02101,"806,00591-0415-01 ",.01)
  1. ;;00591-0415-01
  1. ;;9002226.02101,"806,00591-0415-01 ",.02)
  1. ;;00591-0415-01
  1. ;;9002226.02101,"806,00591-0416-01 ",.01)
  1. ;;00591-0416-01
  1. ;;9002226.02101,"806,00591-0416-01 ",.02)
  1. ;;00591-0416-01
  1. ;;9002226.02101,"806,00591-0487-01 ",.01)
  1. ;;00591-0487-01
  1. ;;9002226.02101,"806,00591-0487-01 ",.02)
  1. ;;00591-0487-01