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

BGP82P14.m

Go to the documentation of this file.
BGP82P14 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 09, 2017 ;
 ;;18.0;IHS CLINICAL REPORTING;;NOV 21, 2017;Build 51
 ;
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,"1224,42292-0032-01 ",.01)
 ;;42292-0032-01
 ;;9002226.02101,"1224,42292-0032-01 ",.02)
 ;;42292-0032-01
 ;;9002226.02101,"1224,42292-0032-20 ",.01)
 ;;42292-0032-20
 ;;9002226.02101,"1224,42292-0032-20 ",.02)
 ;;42292-0032-20
 ;;9002226.02101,"1224,42571-0005-90 ",.01)
 ;;42571-0005-90
 ;;9002226.02101,"1224,42571-0005-90 ",.02)
 ;;42571-0005-90
 ;;9002226.02101,"1224,42571-0010-05 ",.01)
 ;;42571-0010-05
 ;;9002226.02101,"1224,42571-0010-05 ",.02)
 ;;42571-0010-05
 ;;9002226.02101,"1224,42571-0010-90 ",.01)
 ;;42571-0010-90
 ;;9002226.02101,"1224,42571-0010-90 ",.02)
 ;;42571-0010-90
 ;;9002226.02101,"1224,42571-0020-10 ",.01)
 ;;42571-0020-10
 ;;9002226.02101,"1224,42571-0020-10 ",.02)
 ;;42571-0020-10
 ;;9002226.02101,"1224,42571-0020-90 ",.01)
 ;;42571-0020-90
 ;;9002226.02101,"1224,42571-0020-90 ",.02)
 ;;42571-0020-90
 ;;9002226.02101,"1224,42571-0040-10 ",.01)
 ;;42571-0040-10
 ;;9002226.02101,"1224,42571-0040-10 ",.02)
 ;;42571-0040-10
 ;;9002226.02101,"1224,42571-0040-90 ",.01)
 ;;42571-0040-90
 ;;9002226.02101,"1224,42571-0040-90 ",.02)
 ;;42571-0040-90
 ;;9002226.02101,"1224,42571-0080-05 ",.01)
 ;;42571-0080-05
 ;;9002226.02101,"1224,42571-0080-05 ",.02)
 ;;42571-0080-05
 ;;9002226.02101,"1224,42571-0080-90 ",.01)
 ;;42571-0080-90
 ;;9002226.02101,"1224,42571-0080-90 ",.02)
 ;;42571-0080-90
 ;;9002226.02101,"1224,43063-0008-01 ",.01)
 ;;43063-0008-01
 ;;9002226.02101,"1224,43063-0008-01 ",.02)
 ;;43063-0008-01
 ;;9002226.02101,"1224,43063-0080-30 ",.01)
 ;;43063-0080-30
 ;;9002226.02101,"1224,43063-0080-30 ",.02)
 ;;43063-0080-30
 ;;9002226.02101,"1224,43063-0080-90 ",.01)
 ;;43063-0080-90
 ;;9002226.02101,"1224,43063-0080-90 ",.02)
 ;;43063-0080-90
 ;;9002226.02101,"1224,43063-0143-30 ",.01)
 ;;43063-0143-30
 ;;9002226.02101,"1224,43063-0143-30 ",.02)
 ;;43063-0143-30
 ;;9002226.02101,"1224,43063-0162-30 ",.01)
 ;;43063-0162-30
 ;;9002226.02101,"1224,43063-0162-30 ",.02)
 ;;43063-0162-30
 ;;9002226.02101,"1224,43063-0195-30 ",.01)
 ;;43063-0195-30
 ;;9002226.02101,"1224,43063-0195-30 ",.02)
 ;;43063-0195-30
 ;;9002226.02101,"1224,43063-0373-30 ",.01)
 ;;43063-0373-30
 ;;9002226.02101,"1224,43063-0373-30 ",.02)
 ;;43063-0373-30
 ;;9002226.02101,"1224,43063-0443-30 ",.01)
 ;;43063-0443-30
 ;;9002226.02101,"1224,43063-0443-30 ",.02)
 ;;43063-0443-30
 ;;9002226.02101,"1224,43063-0444-30 ",.01)
 ;;43063-0444-30
 ;;9002226.02101,"1224,43063-0444-30 ",.02)
 ;;43063-0444-30
 ;;9002226.02101,"1224,43063-0453-30 ",.01)
 ;;43063-0453-30
 ;;9002226.02101,"1224,43063-0453-30 ",.02)
 ;;43063-0453-30
 ;;9002226.02101,"1224,43063-0493-30 ",.01)
 ;;43063-0493-30
 ;;9002226.02101,"1224,43063-0493-30 ",.02)
 ;;43063-0493-30
 ;;9002226.02101,"1224,43063-0496-60 ",.01)
 ;;43063-0496-60
 ;;9002226.02101,"1224,43063-0496-60 ",.02)
 ;;43063-0496-60
 ;;9002226.02101,"1224,43063-0548-14 ",.01)
 ;;43063-0548-14
 ;;9002226.02101,"1224,43063-0548-14 ",.02)
 ;;43063-0548-14
 ;;9002226.02101,"1224,43063-0548-30 ",.01)
 ;;43063-0548-30
 ;;9002226.02101,"1224,43063-0548-30 ",.02)
 ;;43063-0548-30
 ;;9002226.02101,"1224,43063-0548-90 ",.01)
 ;;43063-0548-90
 ;;9002226.02101,"1224,43063-0548-90 ",.02)
 ;;43063-0548-90
 ;;9002226.02101,"1224,43063-0593-30 ",.01)
 ;;43063-0593-30
 ;;9002226.02101,"1224,43063-0593-30 ",.02)
 ;;43063-0593-30
 ;;9002226.02101,"1224,43063-0593-90 ",.01)
 ;;43063-0593-90
 ;;9002226.02101,"1224,43063-0593-90 ",.02)
 ;;43063-0593-90
 ;;9002226.02101,"1224,43063-0692-90 ",.01)
 ;;43063-0692-90
 ;;9002226.02101,"1224,43063-0692-90 ",.02)
 ;;43063-0692-90
 ;;9002226.02101,"1224,43063-0692-93 ",.01)
 ;;43063-0692-93
 ;;9002226.02101,"1224,43063-0692-93 ",.02)
 ;;43063-0692-93
 ;;9002226.02101,"1224,43063-0726-30 ",.01)
 ;;43063-0726-30
 ;;9002226.02101,"1224,43063-0726-30 ",.02)
 ;;43063-0726-30
 ;;9002226.02101,"1224,43063-0726-90 ",.01)
 ;;43063-0726-90
 ;;9002226.02101,"1224,43063-0726-90 ",.02)
 ;;43063-0726-90
 ;;9002226.02101,"1224,43063-0727-30 ",.01)
 ;;43063-0727-30
 ;;9002226.02101,"1224,43063-0727-30 ",.02)
 ;;43063-0727-30
 ;;9002226.02101,"1224,43063-0731-90 ",.01)
 ;;43063-0731-90
 ;;9002226.02101,"1224,43063-0731-90 ",.02)
 ;;43063-0731-90
 ;;9002226.02101,"1224,43063-0733-30 ",.01)
 ;;43063-0733-30
 ;;9002226.02101,"1224,43063-0733-30 ",.02)
 ;;43063-0733-30
 ;;9002226.02101,"1224,43353-0031-15 ",.01)
 ;;43353-0031-15
 ;;9002226.02101,"1224,43353-0031-15 ",.02)
 ;;43353-0031-15
 ;;9002226.02101,"1224,43353-0031-45 ",.01)
 ;;43353-0031-45
 ;;9002226.02101,"1224,43353-0031-45 ",.02)
 ;;43353-0031-45
 ;;9002226.02101,"1224,43353-0031-60 ",.01)
 ;;43353-0031-60
 ;;9002226.02101,"1224,43353-0031-60 ",.02)
 ;;43353-0031-60
 ;;9002226.02101,"1224,43353-0031-82 ",.01)
 ;;43353-0031-82
 ;;9002226.02101,"1224,43353-0031-82 ",.02)
 ;;43353-0031-82
 ;;9002226.02101,"1224,43353-0031-91 ",.01)
 ;;43353-0031-91
 ;;9002226.02101,"1224,43353-0031-91 ",.02)
 ;;43353-0031-91
 ;;9002226.02101,"1224,43353-0115-45 ",.01)
 ;;43353-0115-45
 ;;9002226.02101,"1224,43353-0115-45 ",.02)
 ;;43353-0115-45
 ;;9002226.02101,"1224,43353-0115-60 ",.01)
 ;;43353-0115-60
 ;;9002226.02101,"1224,43353-0115-60 ",.02)
 ;;43353-0115-60
 ;;9002226.02101,"1224,43353-0120-60 ",.01)
 ;;43353-0120-60
 ;;9002226.02101,"1224,43353-0120-60 ",.02)
 ;;43353-0120-60
 ;;9002226.02101,"1224,43353-0181-45 ",.01)
 ;;43353-0181-45
 ;;9002226.02101,"1224,43353-0181-45 ",.02)
 ;;43353-0181-45
 ;;9002226.02101,"1224,43353-0182-15 ",.01)
 ;;43353-0182-15
 ;;9002226.02101,"1224,43353-0182-15 ",.02)
 ;;43353-0182-15
 ;;9002226.02101,"1224,43353-0182-30 ",.01)
 ;;43353-0182-30
 ;;9002226.02101,"1224,43353-0182-30 ",.02)
 ;;43353-0182-30
 ;;9002226.02101,"1224,43353-0182-45 ",.01)
 ;;43353-0182-45
 ;;9002226.02101,"1224,43353-0182-45 ",.02)
 ;;43353-0182-45
 ;;9002226.02101,"1224,43353-0184-15 ",.01)
 ;;43353-0184-15
 ;;9002226.02101,"1224,43353-0184-15 ",.02)
 ;;43353-0184-15
 ;;9002226.02101,"1224,43353-0184-30 ",.01)
 ;;43353-0184-30
 ;;9002226.02101,"1224,43353-0184-30 ",.02)
 ;;43353-0184-30
 ;;9002226.02101,"1224,43353-0184-45 ",.01)
 ;;43353-0184-45
 ;;9002226.02101,"1224,43353-0184-45 ",.02)
 ;;43353-0184-45
 ;;9002226.02101,"1224,43353-0184-60 ",.01)
 ;;43353-0184-60
 ;;9002226.02101,"1224,43353-0184-60 ",.02)
 ;;43353-0184-60
 ;;9002226.02101,"1224,43353-0227-15 ",.01)
 ;;43353-0227-15
 ;;9002226.02101,"1224,43353-0227-15 ",.02)
 ;;43353-0227-15
 ;;9002226.02101,"1224,43353-0227-45 ",.01)
 ;;43353-0227-45
 ;;9002226.02101,"1224,43353-0227-45 ",.02)
 ;;43353-0227-45
 ;;9002226.02101,"1224,43353-0228-15 ",.01)
 ;;43353-0228-15
 ;;9002226.02101,"1224,43353-0228-15 ",.02)
 ;;43353-0228-15
 ;;9002226.02101,"1224,43353-0228-30 ",.01)
 ;;43353-0228-30
 ;;9002226.02101,"1224,43353-0228-30 ",.02)
 ;;43353-0228-30
 ;;9002226.02101,"1224,43353-0228-45 ",.01)
 ;;43353-0228-45
 ;;9002226.02101,"1224,43353-0228-45 ",.02)
 ;;43353-0228-45
 ;;9002226.02101,"1224,43353-0228-60 ",.01)
 ;;43353-0228-60
 ;;9002226.02101,"1224,43353-0228-60 ",.02)
 ;;43353-0228-60
 ;;9002226.02101,"1224,43353-0229-15 ",.01)
 ;;43353-0229-15
 ;;9002226.02101,"1224,43353-0229-15 ",.02)
 ;;43353-0229-15
 ;;9002226.02101,"1224,43353-0229-30 ",.01)
 ;;43353-0229-30
 ;;9002226.02101,"1224,43353-0229-30 ",.02)
 ;;43353-0229-30
 ;;9002226.02101,"1224,43353-0229-45 ",.01)
 ;;43353-0229-45
 ;;9002226.02101,"1224,43353-0229-45 ",.02)
 ;;43353-0229-45
 ;;9002226.02101,"1224,43353-0229-60 ",.01)
 ;;43353-0229-60
 ;;9002226.02101,"1224,43353-0229-60 ",.02)
 ;;43353-0229-60
 ;;9002226.02101,"1224,43353-0245-15 ",.01)
 ;;43353-0245-15
 ;;9002226.02101,"1224,43353-0245-15 ",.02)
 ;;43353-0245-15
 ;;9002226.02101,"1224,43353-0245-18 ",.01)
 ;;43353-0245-18
 ;;9002226.02101,"1224,43353-0245-18 ",.02)
 ;;43353-0245-18
 ;;9002226.02101,"1224,43353-0245-45 ",.01)
 ;;43353-0245-45
 ;;9002226.02101,"1224,43353-0245-45 ",.02)
 ;;43353-0245-45
 ;;9002226.02101,"1224,43353-0245-60 ",.01)
 ;;43353-0245-60
 ;;9002226.02101,"1224,43353-0245-60 ",.02)
 ;;43353-0245-60
 ;;9002226.02101,"1224,43353-0245-82 ",.01)
 ;;43353-0245-82
 ;;9002226.02101,"1224,43353-0245-82 ",.02)
 ;;43353-0245-82
 ;;9002226.02101,"1224,43353-0246-15 ",.01)
 ;;43353-0246-15
 ;;9002226.02101,"1224,43353-0246-15 ",.02)
 ;;43353-0246-15
 ;;9002226.02101,"1224,43353-0246-17 ",.01)
 ;;43353-0246-17
 ;;9002226.02101,"1224,43353-0246-17 ",.02)
 ;;43353-0246-17
 ;;9002226.02101,"1224,43353-0246-45 ",.01)
 ;;43353-0246-45
 ;;9002226.02101,"1224,43353-0246-45 ",.02)
 ;;43353-0246-45
 ;;9002226.02101,"1224,43353-0249-15 ",.01)
 ;;43353-0249-15
 ;;9002226.02101,"1224,43353-0249-15 ",.02)
 ;;43353-0249-15
 ;;9002226.02101,"1224,43353-0249-19 ",.01)
 ;;43353-0249-19
 ;;9002226.02101,"1224,43353-0249-19 ",.02)
 ;;43353-0249-19
 ;;9002226.02101,"1224,43353-0249-45 ",.01)
 ;;43353-0249-45
 ;;9002226.02101,"1224,43353-0249-45 ",.02)
 ;;43353-0249-45
 ;;9002226.02101,"1224,43353-0280-15 ",.01)
 ;;43353-0280-15
 ;;9002226.02101,"1224,43353-0280-15 ",.02)
 ;;43353-0280-15
 ;;9002226.02101,"1224,43353-0280-45 ",.01)
 ;;43353-0280-45
 ;;9002226.02101,"1224,43353-0280-45 ",.02)
 ;;43353-0280-45
 ;;9002226.02101,"1224,43353-0287-15 ",.01)
 ;;43353-0287-15
 ;;9002226.02101,"1224,43353-0287-15 ",.02)
 ;;43353-0287-15
 ;;9002226.02101,"1224,43353-0287-30 ",.01)
 ;;43353-0287-30
 ;;9002226.02101,"1224,43353-0287-30 ",.02)
 ;;43353-0287-30
 ;;9002226.02101,"1224,43353-0287-45 ",.01)
 ;;43353-0287-45
 ;;9002226.02101,"1224,43353-0287-45 ",.02)
 ;;43353-0287-45
 ;;9002226.02101,"1224,43353-0289-15 ",.01)
 ;;43353-0289-15
 ;;9002226.02101,"1224,43353-0289-15 ",.02)
 ;;43353-0289-15
 ;;9002226.02101,"1224,43353-0289-17 ",.01)
 ;;43353-0289-17
 ;;9002226.02101,"1224,43353-0289-17 ",.02)
 ;;43353-0289-17
 ;;9002226.02101,"1224,43353-0289-45 ",.01)
 ;;43353-0289-45
 ;;9002226.02101,"1224,43353-0289-45 ",.02)
 ;;43353-0289-45
 ;;9002226.02101,"1224,43353-0289-91 ",.01)
 ;;43353-0289-91
 ;;9002226.02101,"1224,43353-0289-91 ",.02)
 ;;43353-0289-91
 ;;9002226.02101,"1224,43353-0290-15 ",.01)
 ;;43353-0290-15
 ;;9002226.02101,"1224,43353-0290-15 ",.02)
 ;;43353-0290-15
 ;;9002226.02101,"1224,43353-0290-45 ",.01)
 ;;43353-0290-45
 ;;9002226.02101,"1224,43353-0290-45 ",.02)
 ;;43353-0290-45
 ;;9002226.02101,"1224,43353-0394-15 ",.01)
 ;;43353-0394-15
 ;;9002226.02101,"1224,43353-0394-15 ",.02)
 ;;43353-0394-15
 ;;9002226.02101,"1224,43353-0394-30 ",.01)
 ;;43353-0394-30
 ;;9002226.02101,"1224,43353-0394-30 ",.02)
 ;;43353-0394-30
 ;;9002226.02101,"1224,43353-0394-45 ",.01)
 ;;43353-0394-45
 ;;9002226.02101,"1224,43353-0394-45 ",.02)
 ;;43353-0394-45
 ;;9002226.02101,"1224,43353-0394-60 ",.01)
 ;;43353-0394-60
 ;;9002226.02101,"1224,43353-0394-60 ",.02)
 ;;43353-0394-60
 ;;9002226.02101,"1224,43353-0474-45 ",.01)
 ;;43353-0474-45
 ;;9002226.02101,"1224,43353-0474-45 ",.02)
 ;;43353-0474-45
 ;;9002226.02101,"1224,43353-0496-45 ",.01)
 ;;43353-0496-45
 ;;9002226.02101,"1224,43353-0496-45 ",.02)
 ;;43353-0496-45
 ;;9002226.02101,"1224,43353-0664-15 ",.01)
 ;;43353-0664-15
 ;;9002226.02101,"1224,43353-0664-15 ",.02)
 ;;43353-0664-15
 ;;9002226.02101,"1224,43353-0664-30 ",.01)
 ;;43353-0664-30
 ;;9002226.02101,"1224,43353-0664-30 ",.02)
 ;;43353-0664-30
 ;;9002226.02101,"1224,43353-0664-45 ",.01)
 ;;43353-0664-45
 ;;9002226.02101,"1224,43353-0664-45 ",.02)
 ;;43353-0664-45
 ;;9002226.02101,"1224,43353-0664-60 ",.01)
 ;;43353-0664-60
 ;;9002226.02101,"1224,43353-0664-60 ",.02)
 ;;43353-0664-60
 ;;9002226.02101,"1224,43353-0685-45 ",.01)
 ;;43353-0685-45
 ;;9002226.02101,"1224,43353-0685-45 ",.02)
 ;;43353-0685-45
 ;;9002226.02101,"1224,43353-0718-45 ",.01)
 ;;43353-0718-45