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

BGP47R12.m

Go to the documentation of this file.
BGP47R12 ;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,"1737,60346-0684-62 ",.02)
 ;;60346-0684-62
 ;;9002226.02101,"1737,60346-0684-90 ",.01)
 ;;60346-0684-90
 ;;9002226.02101,"1737,60346-0684-90 ",.02)
 ;;60346-0684-90
 ;;9002226.02101,"1737,60346-0684-94 ",.01)
 ;;60346-0684-94
 ;;9002226.02101,"1737,60346-0684-94 ",.02)
 ;;60346-0684-94
 ;;9002226.02101,"1737,60346-0687-10 ",.01)
 ;;60346-0687-10
 ;;9002226.02101,"1737,60346-0687-10 ",.02)
 ;;60346-0687-10
 ;;9002226.02101,"1737,60346-0687-14 ",.01)
 ;;60346-0687-14
 ;;9002226.02101,"1737,60346-0687-14 ",.02)
 ;;60346-0687-14
 ;;9002226.02101,"1737,60346-0687-20 ",.01)
 ;;60346-0687-20
 ;;9002226.02101,"1737,60346-0687-20 ",.02)
 ;;60346-0687-20
 ;;9002226.02101,"1737,60346-0687-30 ",.01)
 ;;60346-0687-30
 ;;9002226.02101,"1737,60346-0687-30 ",.02)
 ;;60346-0687-30
 ;;9002226.02101,"1737,60346-0733-15 ",.01)
 ;;60346-0733-15
 ;;9002226.02101,"1737,60346-0733-15 ",.02)
 ;;60346-0733-15
 ;;9002226.02101,"1737,60346-0733-20 ",.01)
 ;;60346-0733-20
 ;;9002226.02101,"1737,60346-0733-20 ",.02)
 ;;60346-0733-20
 ;;9002226.02101,"1737,60346-0733-25 ",.01)
 ;;60346-0733-25
 ;;9002226.02101,"1737,60346-0733-25 ",.02)
 ;;60346-0733-25
 ;;9002226.02101,"1737,60346-0733-30 ",.01)
 ;;60346-0733-30
 ;;9002226.02101,"1737,60346-0733-30 ",.02)
 ;;60346-0733-30
 ;;9002226.02101,"1737,60346-0733-90 ",.01)
 ;;60346-0733-90
 ;;9002226.02101,"1737,60346-0733-90 ",.02)
 ;;60346-0733-90
 ;;9002226.02101,"1737,60346-0985-15 ",.01)
 ;;60346-0985-15
 ;;9002226.02101,"1737,60346-0985-15 ",.02)
 ;;60346-0985-15
 ;;9002226.02101,"1737,60346-0985-30 ",.01)
 ;;60346-0985-30
 ;;9002226.02101,"1737,60346-0985-30 ",.02)
 ;;60346-0985-30
 ;;9002226.02101,"1737,60429-0098-21 ",.01)
 ;;60429-0098-21
 ;;9002226.02101,"1737,60429-0098-21 ",.02)
 ;;60429-0098-21
 ;;9002226.02101,"1737,60429-0534-01 ",.01)
 ;;60429-0534-01
 ;;9002226.02101,"1737,60429-0534-01 ",.02)
 ;;60429-0534-01
 ;;9002226.02101,"1737,60429-0535-01 ",.01)
 ;;60429-0535-01
 ;;9002226.02101,"1737,60429-0535-01 ",.02)
 ;;60429-0535-01
 ;;9002226.02101,"1737,60429-0569-01 ",.01)
 ;;60429-0569-01
 ;;9002226.02101,"1737,60429-0569-01 ",.02)
 ;;60429-0569-01
 ;;9002226.02101,"1737,60429-0570-01 ",.01)
 ;;60429-0570-01
 ;;9002226.02101,"1737,60429-0570-01 ",.02)
 ;;60429-0570-01
 ;;9002226.02101,"1737,60505-0705-00 ",.01)
 ;;60505-0705-00
 ;;9002226.02101,"1737,60505-0705-00 ",.02)
 ;;60505-0705-00
 ;;9002226.02101,"1737,60505-0706-00 ",.01)
 ;;60505-0706-00
 ;;9002226.02101,"1737,60505-0706-00 ",.02)
 ;;60505-0706-00
 ;;9002226.02101,"1737,60505-0706-01 ",.01)
 ;;60505-0706-01
 ;;9002226.02101,"1737,60505-0706-01 ",.02)
 ;;60505-0706-01
 ;;9002226.02101,"1737,60505-0710-01 ",.01)
 ;;60505-0710-01
 ;;9002226.02101,"1737,60505-0710-01 ",.02)
 ;;60505-0710-01
 ;;9002226.02101,"1737,60505-0725-01 ",.01)
 ;;60505-0725-01
 ;;9002226.02101,"1737,60505-0725-01 ",.02)
 ;;60505-0725-01
 ;;9002226.02101,"1737,60505-0726-01 ",.01)
 ;;60505-0726-01
 ;;9002226.02101,"1737,60505-0726-01 ",.02)
 ;;60505-0726-01
 ;;9002226.02101,"1737,60505-0726-02 ",.01)
 ;;60505-0726-02
 ;;9002226.02101,"1737,60505-0726-02 ",.02)
 ;;60505-0726-02
 ;;9002226.02101,"1737,60760-0314-20 ",.01)
 ;;60760-0314-20
 ;;9002226.02101,"1737,60760-0314-20 ",.02)
 ;;60760-0314-20
 ;;9002226.02101,"1737,60760-0402-30 ",.01)
 ;;60760-0402-30
 ;;9002226.02101,"1737,60760-0402-30 ",.02)
 ;;60760-0402-30
 ;;9002226.02101,"1737,60760-0607-14 ",.01)
 ;;60760-0607-14
 ;;9002226.02101,"1737,60760-0607-14 ",.02)
 ;;60760-0607-14
 ;;9002226.02101,"1737,61553-0170-41 ",.01)
 ;;61553-0170-41
 ;;9002226.02101,"1737,61553-0170-41 ",.02)
 ;;61553-0170-41
 ;;9002226.02101,"1737,61553-0172-48 ",.01)
 ;;61553-0172-48
 ;;9002226.02101,"1737,61553-0172-48 ",.02)
 ;;61553-0172-48
 ;;9002226.02101,"1737,61553-0173-48 ",.01)
 ;;61553-0173-48
 ;;9002226.02101,"1737,61553-0173-48 ",.02)
 ;;61553-0173-48
 ;;9002226.02101,"1737,61553-0611-75 ",.01)
 ;;61553-0611-75
 ;;9002226.02101,"1737,61553-0611-75 ",.02)
 ;;61553-0611-75
 ;;9002226.02101,"1737,61553-0623-75 ",.01)
 ;;61553-0623-75
 ;;9002226.02101,"1737,61553-0623-75 ",.02)
 ;;61553-0623-75
 ;;9002226.02101,"1737,61553-0674-67 ",.01)
 ;;61553-0674-67
 ;;9002226.02101,"1737,61553-0674-67 ",.02)
 ;;61553-0674-67
 ;;9002226.02101,"1737,61553-0675-76 ",.01)
 ;;61553-0675-76
 ;;9002226.02101,"1737,61553-0675-76 ",.02)
 ;;61553-0675-76
 ;;9002226.02101,"1737,61553-0676-67 ",.01)
 ;;61553-0676-67
 ;;9002226.02101,"1737,61553-0676-67 ",.02)
 ;;61553-0676-67
 ;;9002226.02101,"1737,61553-0677-76 ",.01)
 ;;61553-0677-76
 ;;9002226.02101,"1737,61553-0677-76 ",.02)
 ;;61553-0677-76
 ;;9002226.02101,"1737,61553-0841-48 ",.01)
 ;;61553-0841-48
 ;;9002226.02101,"1737,61553-0841-48 ",.02)
 ;;61553-0841-48
 ;;9002226.02101,"1737,61703-0236-75 ",.01)
 ;;61703-0236-75
 ;;9002226.02101,"1737,61703-0236-75 ",.02)
 ;;61703-0236-75
 ;;9002226.02101,"1737,61703-0236-85 ",.01)
 ;;61703-0236-85
 ;;9002226.02101,"1737,61703-0236-85 ",.02)
 ;;61703-0236-85
 ;;9002226.02101,"1737,62584-0312-60 ",.01)
 ;;62584-0312-60
 ;;9002226.02101,"1737,62584-0312-60 ",.02)
 ;;62584-0312-60
 ;;9002226.02101,"1737,63304-0506-01 ",.01)
 ;;63304-0506-01
 ;;9002226.02101,"1737,63304-0506-01 ",.02)
 ;;63304-0506-01
 ;;9002226.02101,"1737,63323-0161-01 ",.01)
 ;;63323-0161-01
 ;;9002226.02101,"1737,63323-0161-01 ",.02)
 ;;63323-0161-01
 ;;9002226.02101,"1737,63323-0162-01 ",.01)
 ;;63323-0162-01
 ;;9002226.02101,"1737,63323-0162-01 ",.02)
 ;;63323-0162-01
 ;;9002226.02101,"1737,63323-0162-02 ",.01)
 ;;63323-0162-02
 ;;9002226.02101,"1737,63323-0162-02 ",.02)
 ;;63323-0162-02
 ;;9002226.02101,"1737,63323-0659-03 ",.01)
 ;;63323-0659-03
 ;;9002226.02101,"1737,63323-0659-03 ",.02)
 ;;63323-0659-03
 ;;9002226.02101,"1737,63323-0659-94 ",.01)
 ;;63323-0659-94
 ;;9002226.02101,"1737,63323-0659-94 ",.02)
 ;;63323-0659-94
 ;;9002226.02101,"1737,63629-1418-01 ",.01)
 ;;63629-1418-01
 ;;9002226.02101,"1737,63629-1418-01 ",.02)
 ;;63629-1418-01
 ;;9002226.02101,"1737,63629-1418-02 ",.01)
 ;;63629-1418-02
 ;;9002226.02101,"1737,63629-1418-02 ",.02)
 ;;63629-1418-02
 ;;9002226.02101,"1737,63629-1418-03 ",.01)
 ;;63629-1418-03
 ;;9002226.02101,"1737,63629-1418-03 ",.02)
 ;;63629-1418-03
 ;;9002226.02101,"1737,63629-1418-04 ",.01)
 ;;63629-1418-04
 ;;9002226.02101,"1737,63629-1418-04 ",.02)
 ;;63629-1418-04
 ;;9002226.02101,"1737,63629-1418-05 ",.01)
 ;;63629-1418-05
 ;;9002226.02101,"1737,63629-1418-05 ",.02)
 ;;63629-1418-05
 ;;9002226.02101,"1737,63629-1418-06 ",.01)
 ;;63629-1418-06
 ;;9002226.02101,"1737,63629-1418-06 ",.02)
 ;;63629-1418-06
 ;;9002226.02101,"1737,63629-1780-01 ",.01)
 ;;63629-1780-01
 ;;9002226.02101,"1737,63629-1780-01 ",.02)
 ;;63629-1780-01
 ;;9002226.02101,"1737,63629-1780-02 ",.01)
 ;;63629-1780-02
 ;;9002226.02101,"1737,63629-1780-02 ",.02)
 ;;63629-1780-02
 ;;9002226.02101,"1737,63629-1780-03 ",.01)
 ;;63629-1780-03
 ;;9002226.02101,"1737,63629-1780-03 ",.02)
 ;;63629-1780-03
 ;;9002226.02101,"1737,63629-2974-01 ",.01)
 ;;63629-2974-01
 ;;9002226.02101,"1737,63629-2974-01 ",.02)
 ;;63629-2974-01
 ;;9002226.02101,"1737,63629-2974-02 ",.01)
 ;;63629-2974-02
 ;;9002226.02101,"1737,63629-2974-02 ",.02)
 ;;63629-2974-02
 ;;9002226.02101,"1737,63629-2974-03 ",.01)
 ;;63629-2974-03
 ;;9002226.02101,"1737,63629-2974-03 ",.02)
 ;;63629-2974-03
 ;;9002226.02101,"1737,63629-2974-04 ",.01)
 ;;63629-2974-04
 ;;9002226.02101,"1737,63629-2974-04 ",.02)
 ;;63629-2974-04
 ;;9002226.02101,"1737,63629-2974-05 ",.01)
 ;;63629-2974-05
 ;;9002226.02101,"1737,63629-2974-05 ",.02)
 ;;63629-2974-05
 ;;9002226.02101,"1737,63629-2974-06 ",.01)
 ;;63629-2974-06
 ;;9002226.02101,"1737,63629-2974-06 ",.02)
 ;;63629-2974-06
 ;;9002226.02101,"1737,63629-2974-07 ",.01)
 ;;63629-2974-07
 ;;9002226.02101,"1737,63629-2974-07 ",.02)
 ;;63629-2974-07
 ;;9002226.02101,"1737,63629-3201-01 ",.01)
 ;;63629-3201-01
 ;;9002226.02101,"1737,63629-3201-01 ",.02)
 ;;63629-3201-01
 ;;9002226.02101,"1737,63629-3201-02 ",.01)
 ;;63629-3201-02
 ;;9002226.02101,"1737,63629-3201-02 ",.02)
 ;;63629-3201-02
 ;;9002226.02101,"1737,63629-3201-03 ",.01)
 ;;63629-3201-03
 ;;9002226.02101,"1737,63629-3201-03 ",.02)
 ;;63629-3201-03
 ;;9002226.02101,"1737,63629-3206-01 ",.01)
 ;;63629-3206-01
 ;;9002226.02101,"1737,63629-3206-01 ",.02)
 ;;63629-3206-01
 ;;9002226.02101,"1737,63629-3206-02 ",.01)
 ;;63629-3206-02
 ;;9002226.02101,"1737,63629-3206-02 ",.02)
 ;;63629-3206-02
 ;;9002226.02101,"1737,63629-3206-03 ",.01)
 ;;63629-3206-03
 ;;9002226.02101,"1737,63629-3206-03 ",.02)
 ;;63629-3206-03
 ;;9002226.02101,"1737,63629-4549-01 ",.01)
 ;;63629-4549-01
 ;;9002226.02101,"1737,63629-4549-01 ",.02)
 ;;63629-4549-01
 ;;9002226.02101,"1737,63739-0472-05 ",.01)
 ;;63739-0472-05
 ;;9002226.02101,"1737,63739-0472-05 ",.02)
 ;;63739-0472-05
 ;;9002226.02101,"1737,63739-0472-21 ",.01)
 ;;63739-0472-21
 ;;9002226.02101,"1737,63739-0472-21 ",.02)
 ;;63739-0472-21
 ;;9002226.02101,"1737,63874-0220-01 ",.01)
 ;;63874-0220-01
 ;;9002226.02101,"1737,63874-0220-01 ",.02)
 ;;63874-0220-01
 ;;9002226.02101,"1737,63874-0220-03 ",.01)
 ;;63874-0220-03
 ;;9002226.02101,"1737,63874-0220-03 ",.02)
 ;;63874-0220-03
 ;;9002226.02101,"1737,63874-0220-04 ",.01)
 ;;63874-0220-04
 ;;9002226.02101,"1737,63874-0220-04 ",.02)
 ;;63874-0220-04
 ;;9002226.02101,"1737,63874-0220-10 ",.01)
 ;;63874-0220-10
 ;;9002226.02101,"1737,63874-0220-10 ",.02)
 ;;63874-0220-10
 ;;9002226.02101,"1737,63874-0220-12 ",.01)
 ;;63874-0220-12
 ;;9002226.02101,"1737,63874-0220-12 ",.02)
 ;;63874-0220-12
 ;;9002226.02101,"1737,63874-0220-15 ",.01)
 ;;63874-0220-15
 ;;9002226.02101,"1737,63874-0220-15 ",.02)
 ;;63874-0220-15
 ;;9002226.02101,"1737,63874-0220-20 ",.01)
 ;;63874-0220-20
 ;;9002226.02101,"1737,63874-0220-20 ",.02)
 ;;63874-0220-20
 ;;9002226.02101,"1737,63874-0220-30 ",.01)
 ;;63874-0220-30
 ;;9002226.02101,"1737,63874-0220-30 ",.02)
 ;;63874-0220-30
 ;;9002226.02101,"1737,63874-0220-35 ",.01)
 ;;63874-0220-35
 ;;9002226.02101,"1737,63874-0220-35 ",.02)
 ;;63874-0220-35
 ;;9002226.02101,"1737,63874-0220-40 ",.01)
 ;;63874-0220-40
 ;;9002226.02101,"1737,63874-0220-40 ",.02)
 ;;63874-0220-40
 ;;9002226.02101,"1737,63874-0220-60 ",.01)
 ;;63874-0220-60
 ;;9002226.02101,"1737,63874-0220-60 ",.02)
 ;;63874-0220-60
 ;;9002226.02101,"1737,63874-0220-90 ",.01)
 ;;63874-0220-90
 ;;9002226.02101,"1737,63874-0220-90 ",.02)
 ;;63874-0220-90
 ;;9002226.02101,"1737,63874-0318-01 ",.01)
 ;;63874-0318-01
 ;;9002226.02101,"1737,63874-0318-01 ",.02)
 ;;63874-0318-01
 ;;9002226.02101,"1737,63874-0318-02 ",.01)
 ;;63874-0318-02
 ;;9002226.02101,"1737,63874-0318-02 ",.02)
 ;;63874-0318-02
 ;;9002226.02101,"1737,63874-0318-08 ",.01)
 ;;63874-0318-08
 ;;9002226.02101,"1737,63874-0318-08 ",.02)
 ;;63874-0318-08
 ;;9002226.02101,"1737,63874-0318-20 ",.01)
 ;;63874-0318-20
 ;;9002226.02101,"1737,63874-0318-20 ",.02)
 ;;63874-0318-20
 ;;9002226.02101,"1737,63874-0318-21 ",.01)
 ;;63874-0318-21
 ;;9002226.02101,"1737,63874-0318-21 ",.02)
 ;;63874-0318-21
 ;;9002226.02101,"1737,63874-0318-22 ",.01)
 ;;63874-0318-22
 ;;9002226.02101,"1737,63874-0318-22 ",.02)
 ;;63874-0318-22
 ;;9002226.02101,"1737,63874-0318-25 ",.01)
 ;;63874-0318-25
 ;;9002226.02101,"1737,63874-0318-25 ",.02)
 ;;63874-0318-25
 ;;9002226.02101,"1737,63874-0318-28 ",.01)
 ;;63874-0318-28
 ;;9002226.02101,"1737,63874-0318-28 ",.02)
 ;;63874-0318-28
 ;;9002226.02101,"1737,63874-0318-30 ",.01)
 ;;63874-0318-30
 ;;9002226.02101,"1737,63874-0318-30 ",.02)
 ;;63874-0318-30
 ;;9002226.02101,"1737,63874-0318-40 ",.01)
 ;;63874-0318-40
 ;;9002226.02101,"1737,63874-0318-40 ",.02)
 ;;63874-0318-40
 ;;9002226.02101,"1737,63874-0318-50 ",.01)
 ;;63874-0318-50
 ;;9002226.02101,"1737,63874-0318-50 ",.02)
 ;;63874-0318-50
 ;;9002226.02101,"1737,63874-0318-60 ",.01)
 ;;63874-0318-60
 ;;9002226.02101,"1737,63874-0318-60 ",.02)
 ;;63874-0318-60
 ;;9002226.02101,"1737,63874-0318-75 ",.01)
 ;;63874-0318-75
 ;;9002226.02101,"1737,63874-0318-75 ",.02)
 ;;63874-0318-75
 ;;9002226.02101,"1737,63874-0318-90 ",.01)
 ;;63874-0318-90
 ;;9002226.02101,"1737,63874-0318-90 ",.02)
 ;;63874-0318-90
 ;;9002226.02101,"1737,63874-0394-01 ",.01)
 ;;63874-0394-01
 ;;9002226.02101,"1737,63874-0394-01 ",.02)
 ;;63874-0394-01
 ;;9002226.02101,"1737,63874-0394-02 ",.01)
 ;;63874-0394-02
 ;;9002226.02101,"1737,63874-0394-02 ",.02)
 ;;63874-0394-02
 ;;9002226.02101,"1737,63874-0394-03 ",.01)
 ;;63874-0394-03
 ;;9002226.02101,"1737,63874-0394-03 ",.02)
 ;;63874-0394-03
 ;;9002226.02101,"1737,63874-0394-14 ",.01)
 ;;63874-0394-14
 ;;9002226.02101,"1737,63874-0394-14 ",.02)
 ;;63874-0394-14
 ;;9002226.02101,"1737,63874-0394-15 ",.01)
 ;;63874-0394-15
 ;;9002226.02101,"1737,63874-0394-15 ",.02)
 ;;63874-0394-15
 ;;9002226.02101,"1737,63874-0394-20 ",.01)
 ;;63874-0394-20
 ;;9002226.02101,"1737,63874-0394-20 ",.02)
 ;;63874-0394-20
 ;;9002226.02101,"1737,63874-0394-21 ",.01)
 ;;63874-0394-21
 ;;9002226.02101,"1737,63874-0394-21 ",.02)
 ;;63874-0394-21
 ;;9002226.02101,"1737,63874-0394-30 ",.01)
 ;;63874-0394-30
 ;;9002226.02101,"1737,63874-0394-30 ",.02)
 ;;63874-0394-30
 ;;9002226.02101,"1737,63874-0394-40 ",.01)
 ;;63874-0394-40
 ;;9002226.02101,"1737,63874-0394-40 ",.02)
 ;;63874-0394-40
 ;;9002226.02101,"1737,63874-0394-50 ",.01)
 ;;63874-0394-50
 ;;9002226.02101,"1737,63874-0394-50 ",.02)
 ;;63874-0394-50
 ;;9002226.02101,"1737,63874-0394-60 ",.01)
 ;;63874-0394-60
 ;;9002226.02101,"1737,63874-0394-60 ",.02)
 ;;63874-0394-60