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

BGP47J11.m

Go to the documentation of this file.
BGP47J11 ;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,"618,00378-7030-01 ",.02)
 ;;00378-7030-01
 ;;9002226.02101,"618,00378-7030-10 ",.01)
 ;;00378-7030-10
 ;;9002226.02101,"618,00378-7030-10 ",.02)
 ;;00378-7030-10
 ;;9002226.02101,"618,00406-2040-01 ",.01)
 ;;00406-2040-01
 ;;9002226.02101,"618,00406-2040-01 ",.02)
 ;;00406-2040-01
 ;;9002226.02101,"618,00406-2041-01 ",.01)
 ;;00406-2041-01
 ;;9002226.02101,"618,00406-2041-01 ",.02)
 ;;00406-2041-01
 ;;9002226.02101,"618,00406-2041-10 ",.01)
 ;;00406-2041-10
 ;;9002226.02101,"618,00406-2041-10 ",.02)
 ;;00406-2041-10
 ;;9002226.02101,"618,00406-2042-01 ",.01)
 ;;00406-2042-01
 ;;9002226.02101,"618,00406-2042-01 ",.02)
 ;;00406-2042-01
 ;;9002226.02101,"618,00409-2312-02 ",.01)
 ;;00409-2312-02
 ;;9002226.02101,"618,00409-2312-02 ",.02)
 ;;00409-2312-02
 ;;9002226.02101,"618,00409-2312-31 ",.01)
 ;;00409-2312-31
 ;;9002226.02101,"618,00409-2312-31 ",.02)
 ;;00409-2312-31
 ;;9002226.02101,"618,00440-1617-12 ",.01)
 ;;00440-1617-12
 ;;9002226.02101,"618,00440-1617-12 ",.02)
 ;;00440-1617-12
 ;;9002226.02101,"618,00440-2365-20 ",.01)
 ;;00440-2365-20
 ;;9002226.02101,"618,00440-2365-20 ",.02)
 ;;00440-2365-20
 ;;9002226.02101,"618,00440-7195-30 ",.01)
 ;;00440-7195-30
 ;;9002226.02101,"618,00440-7195-30 ",.02)
 ;;00440-7195-30
 ;;9002226.02101,"618,00440-7195-60 ",.01)
 ;;00440-7195-60
 ;;9002226.02101,"618,00440-7195-60 ",.02)
 ;;00440-7195-60
 ;;9002226.02101,"618,00440-7195-90 ",.01)
 ;;00440-7195-90
 ;;9002226.02101,"618,00440-7195-90 ",.02)
 ;;00440-7195-90
 ;;9002226.02101,"618,00440-7195-92 ",.01)
 ;;00440-7195-92
 ;;9002226.02101,"618,00440-7195-92 ",.02)
 ;;00440-7195-92
 ;;9002226.02101,"618,00440-7196-30 ",.01)
 ;;00440-7196-30
 ;;9002226.02101,"618,00440-7196-30 ",.02)
 ;;00440-7196-30
 ;;9002226.02101,"618,00440-7196-60 ",.01)
 ;;00440-7196-60
 ;;9002226.02101,"618,00440-7196-60 ",.02)
 ;;00440-7196-60
 ;;9002226.02101,"618,00440-7196-90 ",.01)
 ;;00440-7196-90
 ;;9002226.02101,"618,00440-7196-90 ",.02)
 ;;00440-7196-90
 ;;9002226.02101,"618,00440-7196-92 ",.01)
 ;;00440-7196-92
 ;;9002226.02101,"618,00440-7196-92 ",.02)
 ;;00440-7196-92
 ;;9002226.02101,"618,00440-7277-30 ",.01)
 ;;00440-7277-30
 ;;9002226.02101,"618,00440-7277-30 ",.02)
 ;;00440-7277-30
 ;;9002226.02101,"618,00440-7280-30 ",.01)
 ;;00440-7280-30
 ;;9002226.02101,"618,00440-7280-30 ",.02)
 ;;00440-7280-30
 ;;9002226.02101,"618,00440-7360-30 ",.01)
 ;;00440-7360-30
 ;;9002226.02101,"618,00440-7360-30 ",.02)
 ;;00440-7360-30
 ;;9002226.02101,"618,00440-7365-10 ",.01)
 ;;00440-7365-10
 ;;9002226.02101,"618,00440-7365-10 ",.02)
 ;;00440-7365-10
 ;;9002226.02101,"618,00440-7365-12 ",.01)
 ;;00440-7365-12
 ;;9002226.02101,"618,00440-7365-12 ",.02)
 ;;00440-7365-12
 ;;9002226.02101,"618,00440-7365-20 ",.01)
 ;;00440-7365-20
 ;;9002226.02101,"618,00440-7365-20 ",.02)
 ;;00440-7365-20
 ;;9002226.02101,"618,00440-7365-30 ",.01)
 ;;00440-7365-30
 ;;9002226.02101,"618,00440-7365-30 ",.02)
 ;;00440-7365-30
 ;;9002226.02101,"618,00440-7365-60 ",.01)
 ;;00440-7365-60
 ;;9002226.02101,"618,00440-7365-60 ",.02)
 ;;00440-7365-60
 ;;9002226.02101,"618,00440-7425-04 ",.01)
 ;;00440-7425-04
 ;;9002226.02101,"618,00440-7425-04 ",.02)
 ;;00440-7425-04
 ;;9002226.02101,"618,00440-7425-05 ",.01)
 ;;00440-7425-05
 ;;9002226.02101,"618,00440-7425-05 ",.02)
 ;;00440-7425-05
 ;;9002226.02101,"618,00440-7425-06 ",.01)
 ;;00440-7425-06
 ;;9002226.02101,"618,00440-7425-06 ",.02)
 ;;00440-7425-06
 ;;9002226.02101,"618,00440-7425-10 ",.01)
 ;;00440-7425-10
 ;;9002226.02101,"618,00440-7425-10 ",.02)
 ;;00440-7425-10
 ;;9002226.02101,"618,00440-7425-12 ",.01)
 ;;00440-7425-12
 ;;9002226.02101,"618,00440-7425-12 ",.02)
 ;;00440-7425-12
 ;;9002226.02101,"618,00440-7425-16 ",.01)
 ;;00440-7425-16
 ;;9002226.02101,"618,00440-7425-16 ",.02)
 ;;00440-7425-16
 ;;9002226.02101,"618,00440-7425-20 ",.01)
 ;;00440-7425-20
 ;;9002226.02101,"618,00440-7425-20 ",.02)
 ;;00440-7425-20
 ;;9002226.02101,"618,00440-7425-24 ",.01)
 ;;00440-7425-24
 ;;9002226.02101,"618,00440-7425-24 ",.02)
 ;;00440-7425-24
 ;;9002226.02101,"618,00440-7425-30 ",.01)
 ;;00440-7425-30
 ;;9002226.02101,"618,00440-7425-30 ",.02)
 ;;00440-7425-30
 ;;9002226.02101,"618,00440-7425-60 ",.01)
 ;;00440-7425-60
 ;;9002226.02101,"618,00440-7425-60 ",.02)
 ;;00440-7425-60
 ;;9002226.02101,"618,00440-7426-04 ",.01)
 ;;00440-7426-04
 ;;9002226.02101,"618,00440-7426-04 ",.02)
 ;;00440-7426-04
 ;;9002226.02101,"618,00440-7426-06 ",.01)
 ;;00440-7426-06
 ;;9002226.02101,"618,00440-7426-06 ",.02)
 ;;00440-7426-06
 ;;9002226.02101,"618,00440-7426-09 ",.01)
 ;;00440-7426-09
 ;;9002226.02101,"618,00440-7426-09 ",.02)
 ;;00440-7426-09
 ;;9002226.02101,"618,00440-7426-12 ",.01)
 ;;00440-7426-12
 ;;9002226.02101,"618,00440-7426-12 ",.02)
 ;;00440-7426-12
 ;;9002226.02101,"618,00440-7426-20 ",.01)
 ;;00440-7426-20
 ;;9002226.02101,"618,00440-7426-20 ",.02)
 ;;00440-7426-20
 ;;9002226.02101,"618,00440-7426-30 ",.01)
 ;;00440-7426-30
 ;;9002226.02101,"618,00440-7426-30 ",.02)
 ;;00440-7426-30
 ;;9002226.02101,"618,00440-7426-60 ",.01)
 ;;00440-7426-60
 ;;9002226.02101,"618,00440-7426-60 ",.02)
 ;;00440-7426-60
 ;;9002226.02101,"618,00440-7616-30 ",.01)
 ;;00440-7616-30
 ;;9002226.02101,"618,00440-7616-30 ",.02)
 ;;00440-7616-30
 ;;9002226.02101,"618,00440-7617-04 ",.01)
 ;;00440-7617-04
 ;;9002226.02101,"618,00440-7617-04 ",.02)
 ;;00440-7617-04
 ;;9002226.02101,"618,00440-7617-06 ",.01)
 ;;00440-7617-06
 ;;9002226.02101,"618,00440-7617-06 ",.02)
 ;;00440-7617-06
 ;;9002226.02101,"618,00440-7617-12 ",.01)
 ;;00440-7617-12
 ;;9002226.02101,"618,00440-7617-12 ",.02)
 ;;00440-7617-12
 ;;9002226.02101,"618,00440-7617-15 ",.01)
 ;;00440-7617-15
 ;;9002226.02101,"618,00440-7617-15 ",.02)
 ;;00440-7617-15
 ;;9002226.02101,"618,00440-7617-16 ",.01)
 ;;00440-7617-16
 ;;9002226.02101,"618,00440-7617-16 ",.02)
 ;;00440-7617-16
 ;;9002226.02101,"618,00440-7617-21 ",.01)
 ;;00440-7617-21
 ;;9002226.02101,"618,00440-7617-21 ",.02)
 ;;00440-7617-21
 ;;9002226.02101,"618,00440-7617-30 ",.01)
 ;;00440-7617-30
 ;;9002226.02101,"618,00440-7617-30 ",.02)
 ;;00440-7617-30
 ;;9002226.02101,"618,00440-7617-99 ",.01)
 ;;00440-7617-99
 ;;9002226.02101,"618,00440-7617-99 ",.02)
 ;;00440-7617-99
 ;;9002226.02101,"618,00440-7620-04 ",.01)
 ;;00440-7620-04
 ;;9002226.02101,"618,00440-7620-04 ",.02)
 ;;00440-7620-04
 ;;9002226.02101,"618,00440-8195-04 ",.01)
 ;;00440-8195-04
 ;;9002226.02101,"618,00440-8195-04 ",.02)
 ;;00440-8195-04
 ;;9002226.02101,"618,00440-8195-06 ",.01)
 ;;00440-8195-06
 ;;9002226.02101,"618,00440-8195-06 ",.02)
 ;;00440-8195-06
 ;;9002226.02101,"618,00440-8195-10 ",.01)
 ;;00440-8195-10
 ;;9002226.02101,"618,00440-8195-10 ",.02)
 ;;00440-8195-10
 ;;9002226.02101,"618,00440-8195-12 ",.01)
 ;;00440-8195-12
 ;;9002226.02101,"618,00440-8195-12 ",.02)
 ;;00440-8195-12
 ;;9002226.02101,"618,00440-8195-20 ",.01)
 ;;00440-8195-20
 ;;9002226.02101,"618,00440-8195-20 ",.02)
 ;;00440-8195-20
 ;;9002226.02101,"618,00440-8195-99 ",.01)
 ;;00440-8195-99
 ;;9002226.02101,"618,00440-8195-99 ",.02)
 ;;00440-8195-99
 ;;9002226.02101,"618,00440-8255-10 ",.01)
 ;;00440-8255-10
 ;;9002226.02101,"618,00440-8255-10 ",.02)
 ;;00440-8255-10
 ;;9002226.02101,"618,00440-8255-12 ",.01)
 ;;00440-8255-12
 ;;9002226.02101,"618,00440-8255-12 ",.02)
 ;;00440-8255-12
 ;;9002226.02101,"618,00440-8255-14 ",.01)
 ;;00440-8255-14
 ;;9002226.02101,"618,00440-8255-14 ",.02)
 ;;00440-8255-14
 ;;9002226.02101,"618,00440-8255-20 ",.01)
 ;;00440-8255-20
 ;;9002226.02101,"618,00440-8255-20 ",.02)
 ;;00440-8255-20
 ;;9002226.02101,"618,00440-8255-30 ",.01)
 ;;00440-8255-30
 ;;9002226.02101,"618,00440-8255-30 ",.02)
 ;;00440-8255-30
 ;;9002226.02101,"618,00440-8255-60 ",.01)
 ;;00440-8255-60
 ;;9002226.02101,"618,00440-8255-60 ",.02)
 ;;00440-8255-60
 ;;9002226.02101,"618,00450-0108-25 ",.01)
 ;;00450-0108-25
 ;;9002226.02101,"618,00450-0108-25 ",.02)
 ;;00450-0108-25
 ;;9002226.02101,"618,00450-0108-49 ",.01)
 ;;00450-0108-49
 ;;9002226.02101,"618,00450-0108-49 ",.02)
 ;;00450-0108-49
 ;;9002226.02101,"618,00450-0226-14 ",.01)
 ;;00450-0226-14
 ;;9002226.02101,"618,00450-0226-14 ",.02)
 ;;00450-0226-14
 ;;9002226.02101,"618,00451-4000-50 ",.01)
 ;;00451-4000-50
 ;;9002226.02101,"618,00451-4000-50 ",.02)
 ;;00451-4000-50
 ;;9002226.02101,"618,00451-4000-60 ",.01)
 ;;00451-4000-60
 ;;9002226.02101,"618,00451-4000-60 ",.02)
 ;;00451-4000-60
 ;;9002226.02101,"618,00451-4001-50 ",.01)
 ;;00451-4001-50
 ;;9002226.02101,"618,00451-4001-50 ",.02)
 ;;00451-4001-50
 ;;9002226.02101,"618,00451-4001-60 ",.01)
 ;;00451-4001-60
 ;;9002226.02101,"618,00451-4001-60 ",.02)
 ;;00451-4001-60
 ;;9002226.02101,"618,00451-4060-50 ",.01)
 ;;00451-4060-50
 ;;9002226.02101,"618,00451-4060-50 ",.02)
 ;;00451-4060-50
 ;;9002226.02101,"618,00472-0096-12 ",.01)
 ;;00472-0096-12
 ;;9002226.02101,"618,00472-0096-12 ",.02)
 ;;00472-0096-12
 ;;9002226.02101,"618,00472-0727-16 ",.01)
 ;;00472-0727-16
 ;;9002226.02101,"618,00472-0727-16 ",.02)
 ;;00472-0727-16
 ;;9002226.02101,"618,00472-0731-04 ",.01)
 ;;00472-0731-04
 ;;9002226.02101,"618,00472-0731-04 ",.02)
 ;;00472-0731-04
 ;;9002226.02101,"618,00472-0731-16 ",.01)
 ;;00472-0731-16
 ;;9002226.02101,"618,00472-0731-16 ",.02)
 ;;00472-0731-16
 ;;9002226.02101,"618,00472-0731-28 ",.01)
 ;;00472-0731-28
 ;;9002226.02101,"618,00472-0731-28 ",.02)
 ;;00472-0731-28
 ;;9002226.02101,"618,00472-0733-31 ",.01)
 ;;00472-0733-31
 ;;9002226.02101,"618,00472-0733-31 ",.02)
 ;;00472-0733-31
 ;;9002226.02101,"618,00472-0755-16 ",.01)
 ;;00472-0755-16
 ;;9002226.02101,"618,00472-0755-16 ",.02)
 ;;00472-0755-16
 ;;9002226.02101,"618,00472-0771-16 ",.01)
 ;;00472-0771-16
 ;;9002226.02101,"618,00472-0771-16 ",.02)
 ;;00472-0771-16
 ;;9002226.02101,"618,00472-1400-16 ",.01)
 ;;00472-1400-16
 ;;9002226.02101,"618,00472-1400-16 ",.02)
 ;;00472-1400-16
 ;;9002226.02101,"618,00472-1504-04 ",.01)
 ;;00472-1504-04
 ;;9002226.02101,"618,00472-1504-04 ",.02)
 ;;00472-1504-04
 ;;9002226.02101,"618,00472-1504-08 ",.01)
 ;;00472-1504-08
 ;;9002226.02101,"618,00472-1504-08 ",.02)
 ;;00472-1504-08
 ;;9002226.02101,"618,00472-1504-16 ",.01)
 ;;00472-1504-16
 ;;9002226.02101,"618,00472-1504-16 ",.02)
 ;;00472-1504-16
 ;;9002226.02101,"618,00472-1504-28 ",.01)
 ;;00472-1504-28
 ;;9002226.02101,"618,00472-1504-28 ",.02)
 ;;00472-1504-28
 ;;9002226.02101,"618,00472-1627-04 ",.01)
 ;;00472-1627-04
 ;;9002226.02101,"618,00472-1627-04 ",.02)
 ;;00472-1627-04
 ;;9002226.02101,"618,00472-1627-08 ",.01)
 ;;00472-1627-08
 ;;9002226.02101,"618,00472-1627-08 ",.02)
 ;;00472-1627-08
 ;;9002226.02101,"618,00472-1627-16 ",.01)
 ;;00472-1627-16
 ;;9002226.02101,"618,00472-1627-16 ",.02)
 ;;00472-1627-16
 ;;9002226.02101,"618,00472-1627-28 ",.01)
 ;;00472-1627-28
 ;;9002226.02101,"618,00472-1627-28 ",.02)
 ;;00472-1627-28
 ;;9002226.02101,"618,00472-1628-04 ",.01)
 ;;00472-1628-04
 ;;9002226.02101,"618,00472-1628-04 ",.02)
 ;;00472-1628-04
 ;;9002226.02101,"618,00472-1628-08 ",.01)
 ;;00472-1628-08
 ;;9002226.02101,"618,00472-1628-08 ",.02)
 ;;00472-1628-08
 ;;9002226.02101,"618,00472-1628-16 ",.01)
 ;;00472-1628-16
 ;;9002226.02101,"618,00472-1628-16 ",.02)
 ;;00472-1628-16
 ;;9002226.02101,"618,00472-1628-28 ",.01)
 ;;00472-1628-28
 ;;9002226.02101,"618,00472-1628-28 ",.02)
 ;;00472-1628-28
 ;;9002226.02101,"618,00472-1629-04 ",.01)
 ;;00472-1629-04
 ;;9002226.02101,"618,00472-1629-04 ",.02)
 ;;00472-1629-04
 ;;9002226.02101,"618,00472-1629-08 ",.01)
 ;;00472-1629-08
 ;;9002226.02101,"618,00472-1629-08 ",.02)
 ;;00472-1629-08
 ;;9002226.02101,"618,00472-1629-16 ",.01)
 ;;00472-1629-16
 ;;9002226.02101,"618,00472-1629-16 ",.02)
 ;;00472-1629-16
 ;;9002226.02101,"618,00472-1629-28 ",.01)
 ;;00472-1629-28
 ;;9002226.02101,"618,00472-1629-28 ",.02)
 ;;00472-1629-28
 ;;9002226.02101,"618,00472-1630-04 ",.01)
 ;;00472-1630-04
 ;;9002226.02101,"618,00472-1630-04 ",.02)
 ;;00472-1630-04
 ;;9002226.02101,"618,00472-1630-16 ",.01)
 ;;00472-1630-16
 ;;9002226.02101,"618,00472-1630-16 ",.02)
 ;;00472-1630-16
 ;;9002226.02101,"618,00472-1630-28 ",.01)
 ;;00472-1630-28
 ;;9002226.02101,"618,00472-1630-28 ",.02)
 ;;00472-1630-28
 ;;9002226.02101,"618,00472-1633-04 ",.01)
 ;;00472-1633-04
 ;;9002226.02101,"618,00472-1633-04 ",.02)
 ;;00472-1633-04
 ;;9002226.02101,"618,00472-1633-16 ",.01)
 ;;00472-1633-16
 ;;9002226.02101,"618,00472-1633-16 ",.02)
 ;;00472-1633-16
 ;;9002226.02101,"618,00482-0181-10 ",.01)
 ;;00482-0181-10
 ;;9002226.02101,"618,00482-0181-10 ",.02)
 ;;00482-0181-10
 ;;9002226.02101,"618,00482-0181-50 ",.01)
 ;;00482-0181-50
 ;;9002226.02101,"618,00482-0181-50 ",.02)
 ;;00482-0181-50
 ;;9002226.02101,"618,00482-0184-10 ",.01)
 ;;00482-0184-10
 ;;9002226.02101,"618,00482-0184-10 ",.02)
 ;;00482-0184-10
 ;;9002226.02101,"618,00482-0185-16 ",.01)
 ;;00482-0185-16
 ;;9002226.02101,"618,00482-0185-16 ",.02)
 ;;00482-0185-16
 ;;9002226.02101,"618,00485-0054-01 ",.01)
 ;;00485-0054-01
 ;;9002226.02101,"618,00485-0054-01 ",.02)
 ;;00485-0054-01
 ;;9002226.02101,"618,00485-0055-16 ",.01)
 ;;00485-0055-16
 ;;9002226.02101,"618,00485-0055-16 ",.02)
 ;;00485-0055-16
 ;;9002226.02101,"618,00485-0072-01 ",.01)
 ;;00485-0072-01
 ;;9002226.02101,"618,00485-0072-01 ",.02)
 ;;00485-0072-01
 ;;9002226.02101,"618,00485-0074-02 ",.01)
 ;;00485-0074-02
 ;;9002226.02101,"618,00485-0074-02 ",.02)
 ;;00485-0074-02
 ;;9002226.02101,"618,00485-0076-02 ",.01)
 ;;00485-0076-02