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

BGPMBTXX.m

Go to the documentation of this file.
BGPMBTXX ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON FEB 11, 2011;
 ;;11.0;IHS CLINICAL REPORTING;**4**;JAN 06, 2011;Build 84
 ;
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,"768,011673019502 ",.02)
 ;;011673019502
 ;;9002226.02101,"768,011673019602 ",.01)
 ;;011673019602
 ;;9002226.02101,"768,011673019602 ",.02)
 ;;011673019602
 ;;9002226.02101,"768,011673022904 ",.01)
 ;;011673022904
 ;;9002226.02101,"768,011673022904 ",.02)
 ;;011673022904
 ;;9002226.02101,"768,011673022905 ",.01)
 ;;011673022905
 ;;9002226.02101,"768,011673022905 ",.02)
 ;;011673022905
 ;;9002226.02101,"768,011673023004 ",.01)
 ;;011673023004
 ;;9002226.02101,"768,011673023004 ",.02)
 ;;011673023004
 ;;9002226.02101,"768,011673023005 ",.01)
 ;;011673023005
 ;;9002226.02101,"768,011673023005 ",.02)
 ;;011673023005
 ;;9002226.02101,"768,011673034405 ",.01)
 ;;011673034405
 ;;9002226.02101,"768,011673034405 ",.02)
 ;;011673034405
 ;;9002226.02101,"768,011673034406 ",.01)
 ;;011673034406
 ;;9002226.02101,"768,011673034406 ",.02)
 ;;011673034406
 ;;9002226.02101,"768,011673034416 ",.01)
 ;;011673034416
 ;;9002226.02101,"768,011673034416 ",.02)
 ;;011673034416
 ;;9002226.02101,"768,011673065702 ",.01)
 ;;011673065702
 ;;9002226.02101,"768,011673065702 ",.02)
 ;;011673065702
 ;;9002226.02101,"768,011673065703 ",.01)
 ;;011673065703
 ;;9002226.02101,"768,011673065703 ",.02)
 ;;011673065703
 ;;9002226.02101,"768,011673065802 ",.01)
 ;;011673065802
 ;;9002226.02101,"768,011673065802 ",.02)
 ;;011673065802
 ;;9002226.02101,"768,011673065803 ",.01)
 ;;011673065803
 ;;9002226.02101,"768,011673065803 ",.02)
 ;;011673065803
 ;;9002226.02101,"768,011673087305 ",.01)
 ;;011673087305
 ;;9002226.02101,"768,011673087305 ",.02)
 ;;011673087305
 ;;9002226.02101,"768,011673087306 ",.01)
 ;;011673087306
 ;;9002226.02101,"768,011673087306 ",.02)
 ;;011673087306
 ;;9002226.02101,"768,011673087308 ",.01)
 ;;011673087308
 ;;9002226.02101,"768,011673087308 ",.02)
 ;;011673087308
 ;;9002226.02101,"768,011673087310 ",.01)
 ;;011673087310
 ;;9002226.02101,"768,011673087310 ",.02)
 ;;011673087310
 ;;9002226.02101,"768,011673087316 ",.01)
 ;;011673087316
 ;;9002226.02101,"768,011673087316 ",.02)
 ;;011673087316
 ;;9002226.02101,"768,011822087301 ",.01)
 ;;011822087301
 ;;9002226.02101,"768,011822087301 ",.02)
 ;;011822087301
 ;;9002226.02101,"768,021130034405 ",.01)
 ;;021130034405
 ;;9002226.02101,"768,021130034405 ",.02)
 ;;021130034405
 ;;9002226.02101,"768,024385017158 ",.01)
 ;;024385017158
 ;;9002226.02101,"768,024385017158 ",.02)
 ;;024385017158
 ;;9002226.02101,"768,024385059471 ",.01)
 ;;024385059471
 ;;9002226.02101,"768,024385059471 ",.02)
 ;;024385059471
 ;;9002226.02101,"768,024385097567 ",.01)
 ;;024385097567
 ;;9002226.02101,"768,024385097567 ",.02)
 ;;024385097567
 ;;9002226.02101,"768,024385097667 ",.01)
 ;;024385097667
 ;;9002226.02101,"768,024385097667 ",.02)
 ;;024385097667
 ;;9002226.02101,"768,030142034405 ",.01)
 ;;030142034405
 ;;9002226.02101,"768,030142034405 ",.02)
 ;;030142034405
 ;;9002226.02101,"768,030142034406 ",.01)
 ;;030142034406
 ;;9002226.02101,"768,030142034406 ",.02)
 ;;030142034406
 ;;9002226.02101,"768,030142087305 ",.01)
 ;;030142087305
 ;;9002226.02101,"768,030142087305 ",.02)
 ;;030142087305
 ;;9002226.02101,"768,030142087306 ",.01)
 ;;030142087306
 ;;9002226.02101,"768,030142087306 ",.02)
 ;;030142087306
 ;;9002226.02101,"768,036800002925 ",.01)
 ;;036800002925
 ;;9002226.02101,"768,036800002925 ",.02)
 ;;036800002925
 ;;9002226.02101,"768,036800017025 ",.01)
 ;;036800017025
 ;;9002226.02101,"768,036800017025 ",.02)
 ;;036800017025
 ;;9002226.02101,"768,036800017071 ",.01)
 ;;036800017071
 ;;9002226.02101,"768,036800017071 ",.02)
 ;;036800017071
 ;;9002226.02101,"768,036800020625 ",.01)
 ;;036800020625
 ;;9002226.02101,"768,036800020625 ",.02)
 ;;036800020625
 ;;9002226.02101,"768,036800034405 ",.01)
 ;;036800034405
 ;;9002226.02101,"768,036800034405 ",.02)
 ;;036800034405
 ;;9002226.02101,"768,036800042260 ",.01)
 ;;036800042260
 ;;9002226.02101,"768,036800042260 ",.02)
 ;;036800042260
 ;;9002226.02101,"768,036800042271 ",.01)
 ;;036800042271
 ;;9002226.02101,"768,036800042271 ",.02)
 ;;036800042271
 ;;9002226.02101,"768,036800045676 ",.01)
 ;;036800045676
 ;;9002226.02101,"768,036800045676 ",.02)
 ;;036800045676
 ;;9002226.02101,"768,036800045678 ",.01)
 ;;036800045678
 ;;9002226.02101,"768,036800045678 ",.02)
 ;;036800045678
 ;;9002226.02101,"768,036800053276 ",.01)
 ;;036800053276
 ;;9002226.02101,"768,036800053276 ",.02)
 ;;036800053276
 ;;9002226.02101,"768,036800053278 ",.01)
 ;;036800053278
 ;;9002226.02101,"768,036800053278 ",.02)
 ;;036800053278
 ;;9002226.02101,"768,036800087305 ",.01)
 ;;036800087305
 ;;9002226.02101,"768,036800087305 ",.02)
 ;;036800087305
 ;;9002226.02101,"768,037205020371 ",.01)
 ;;037205020371
 ;;9002226.02101,"768,037205020371 ",.02)
 ;;037205020371
 ;;9002226.02101,"768,037205020377 ",.01)
 ;;037205020377
 ;;9002226.02101,"768,037205020377 ",.02)
 ;;037205020377
 ;;9002226.02101,"768,037205020467 ",.01)
 ;;037205020467
 ;;9002226.02101,"768,037205020467 ",.02)
 ;;037205020467
 ;;9002226.02101,"768,037205036374 ",.01)
 ;;037205036374
 ;;9002226.02101,"768,037205036374 ",.02)
 ;;037205036374
 ;;9002226.02101,"768,037808034403 ",.01)
 ;;037808034403
 ;;9002226.02101,"768,037808034403 ",.02)
 ;;037808034403
 ;;9002226.02101,"768,037808034405 ",.01)
 ;;037808034405
 ;;9002226.02101,"768,037808034405 ",.02)
 ;;037808034405
 ;;9002226.02101,"768,037808034406 ",.01)
 ;;037808034406
 ;;9002226.02101,"768,037808034406 ",.02)
 ;;037808034406
 ;;9002226.02101,"768,041163034405 ",.01)
 ;;041163034405
 ;;9002226.02101,"768,041163034405 ",.02)
 ;;041163034405
 ;;9002226.02101,"768,041163087305 ",.01)
 ;;041163087305
 ;;9002226.02101,"768,041163087305 ",.02)
 ;;041163087305
 ;;9002226.02101,"768,041250019003 ",.01)
 ;;041250019003
 ;;9002226.02101,"768,041250019003 ",.02)
 ;;041250019003
 ;;9002226.02101,"768,041250019005 ",.01)
 ;;041250019005
 ;;9002226.02101,"768,041250019005 ",.02)
 ;;041250019005
 ;;9002226.02101,"768,041250042403 ",.01)
 ;;041250042403
 ;;9002226.02101,"768,041250042403 ",.02)
 ;;041250042403
 ;;9002226.02101,"768,041250042405 ",.01)
 ;;041250042405
 ;;9002226.02101,"768,041250042405 ",.02)
 ;;041250042405
 ;;9002226.02101,"768,041250089488 ",.01)
 ;;041250089488
 ;;9002226.02101,"768,041250089488 ",.02)
 ;;041250089488
 ;;9002226.02101,"768,041250089588 ",.01)
 ;;041250089588
 ;;9002226.02101,"768,041250089588 ",.02)
 ;;041250089588
 ;;9002226.02101,"768,041250089688 ",.01)
 ;;041250089688
 ;;9002226.02101,"768,041250089688 ",.02)
 ;;041250089688
 ;;9002226.02101,"768,041268034404 ",.01)
 ;;041268034404
 ;;9002226.02101,"768,041268034404 ",.02)
 ;;041268034404
 ;;9002226.02101,"768,049035012410 ",.01)
 ;;049035012410
 ;;9002226.02101,"768,049035012410 ",.02)
 ;;049035012410
 ;;9002226.02101,"768,049035019010 ",.01)
 ;;049035019010
 ;;9002226.02101,"768,049035019010 ",.02)
 ;;049035019010
 ;;9002226.02101,"768,049035083007 ",.01)
 ;;049035083007
 ;;9002226.02101,"768,049035083007 ",.02)
 ;;049035083007
 ;;9002226.02101,"768,049035083014 ",.01)
 ;;049035083014
 ;;9002226.02101,"768,049035083014 ",.02)
 ;;049035083014
 ;;9002226.02101,"768,049035084007 ",.01)
 ;;049035084007
 ;;9002226.02101,"768,049035084007 ",.02)
 ;;049035084007
 ;;9002226.02101,"768,049035084014 ",.01)
 ;;049035084014
 ;;9002226.02101,"768,049035084014 ",.02)
 ;;049035084014
 ;;9002226.02101,"768,049035089488 ",.01)
 ;;049035089488
 ;;9002226.02101,"768,049035089488 ",.02)
 ;;049035089488
 ;;9002226.02101,"768,049035089588 ",.01)
 ;;049035089588
 ;;9002226.02101,"768,049035089588 ",.02)
 ;;049035089588
 ;;9002226.02101,"768,049035089653 ",.01)
 ;;049035089653
 ;;9002226.02101,"768,049035089653 ",.02)
 ;;049035089653
 ;;9002226.02101,"768,049035089688 ",.01)
 ;;049035089688
 ;;9002226.02101,"768,049035089688 ",.02)
 ;;049035089688
 ;;9002226.02101,"768,049348057208 ",.01)
 ;;049348057208
 ;;9002226.02101,"768,049348057208 ",.02)
 ;;049348057208
 ;;9002226.02101,"768,049348057236 ",.01)
 ;;049348057236
 ;;9002226.02101,"768,049348057236 ",.02)
 ;;049348057236
 ;;9002226.02101,"768,049348057308 ",.01)
 ;;049348057308
 ;;9002226.02101,"768,049348057308 ",.02)
 ;;049348057308
 ;;9002226.02101,"768,049348057336 ",.01)
 ;;049348057336
 ;;9002226.02101,"768,049348057336 ",.02)
 ;;049348057336
 ;;9002226.02101,"768,049348069109 ",.01)
 ;;049348069109
 ;;9002226.02101,"768,049348069109 ",.02)
 ;;049348069109
 ;;9002226.02101,"768,049348069136 ",.01)
 ;;049348069136
 ;;9002226.02101,"768,049348069136 ",.02)
 ;;049348069136
 ;;9002226.02101,"768,049348069164 ",.01)
 ;;049348069164
 ;;9002226.02101,"768,049348069164 ",.02)
 ;;049348069164
 ;;9002226.02101,"768,049348069209 ",.01)
 ;;049348069209
 ;;9002226.02101,"768,049348069209 ",.02)
 ;;049348069209
 ;;9002226.02101,"768,049348069236 ",.01)
 ;;049348069236
 ;;9002226.02101,"768,049348069236 ",.02)
 ;;049348069236
 ;;9002226.02101,"768,049348069264 ",.01)
 ;;049348069264
 ;;9002226.02101,"768,049348069264 ",.02)
 ;;049348069264
 ;;9002226.02101,"768,049348078710 ",.01)
 ;;049348078710
 ;;9002226.02101,"768,049348078710 ",.02)
 ;;049348078710
 ;;9002226.02101,"768,049348078759 ",.01)
 ;;049348078759
 ;;9002226.02101,"768,049348078759 ",.02)
 ;;049348078759
 ;;9002226.02101,"768,049348078810 ",.01)
 ;;049348078810
 ;;9002226.02101,"768,049348078810 ",.02)
 ;;049348078810
 ;;9002226.02101,"768,049348078859 ",.01)
 ;;049348078859
 ;;9002226.02101,"768,049348078859 ",.02)
 ;;049348078859
 ;;9002226.02101,"768,049348085216 ",.01)
 ;;049348085216
 ;;9002226.02101,"768,049348085216 ",.02)
 ;;049348085216
 ;;9002226.02101,"768,049348085316 ",.01)
 ;;049348085316
 ;;9002226.02101,"768,049348085316 ",.02)
 ;;049348085316
 ;;9002226.02101,"768,049884005872 ",.01)
 ;;049884005872
 ;;9002226.02101,"768,049884005872 ",.02)
 ;;049884005872
 ;;9002226.02101,"768,049884005972 ",.01)
 ;;049884005972
 ;;9002226.02101,"768,049884005972 ",.02)
 ;;049884005972
 ;;9002226.02101,"768,049884006372 ",.01)
 ;;049884006372
 ;;9002226.02101,"768,049884006372 ",.02)
 ;;049884006372
 ;;9002226.02101,"768,050428000773 ",.01)
 ;;050428000773
 ;;9002226.02101,"768,050428000773 ",.02)
 ;;050428000773
 ;;9002226.02101,"768,050428000774 ",.01)
 ;;050428000774
 ;;9002226.02101,"768,050428000774 ",.02)
 ;;050428000774
 ;;9002226.02101,"768,050428000775 ",.01)
 ;;050428000775
 ;;9002226.02101,"768,050428000775 ",.02)
 ;;050428000775
 ;;9002226.02101,"768,050428000776 ",.01)
 ;;050428000776
 ;;9002226.02101,"768,050428000776 ",.02)
 ;;050428000776
 ;;9002226.02101,"768,050428003053 ",.01)
 ;;050428003053
 ;;9002226.02101,"768,050428003053 ",.02)
 ;;050428003053
 ;;9002226.02101,"768,050428101972 ",.01)
 ;;050428101972
 ;;9002226.02101,"768,050428101972 ",.02)
 ;;050428101972
 ;;9002226.02101,"768,050428102053 ",.01)
 ;;050428102053
 ;;9002226.02101,"768,050428102053 ",.02)
 ;;050428102053
 ;;9002226.02101,"768,050428102194 ",.01)
 ;;050428102194
 ;;9002226.02101,"768,050428102194 ",.02)
 ;;050428102194
 ;;9002226.02101,"768,050428102202 ",.01)
 ;;050428102202
 ;;9002226.02101,"768,050428102202 ",.02)
 ;;050428102202
 ;;9002226.02101,"768,050428133177 ",.01)
 ;;050428133177
 ;;9002226.02101,"768,050428133177 ",.02)
 ;;050428133177
 ;;9002226.02101,"768,050428394372 ",.01)
 ;;050428394372
 ;;9002226.02101,"768,050428394372 ",.02)
 ;;050428394372
 ;;9002226.02101,"768,050428394373 ",.01)
 ;;050428394373
 ;;9002226.02101,"768,050428394373 ",.02)
 ;;050428394373
 ;;9002226.02101,"768,050428394374 ",.01)
 ;;050428394374
 ;;9002226.02101,"768,050428394374 ",.02)
 ;;050428394374
 ;;9002226.02101,"768,050428394375 ",.01)
 ;;050428394375
 ;;9002226.02101,"768,050428394375 ",.02)
 ;;050428394375
 ;;9002226.02101,"768,050428456109 ",.01)
 ;;050428456109
 ;;9002226.02101,"768,050428456109 ",.02)
 ;;050428456109
 ;;9002226.02101,"768,050428456112 ",.01)
 ;;050428456112
 ;;9002226.02101,"768,050428456112 ",.02)
 ;;050428456112
 ;;9002226.02101,"768,053261004696 ",.01)
 ;;053261004696
 ;;9002226.02101,"768,053261004696 ",.02)
 ;;053261004696
 ;;9002226.02101,"768,055154524505 ",.01)
 ;;055154524505
 ;;9002226.02101,"768,055154524505 ",.02)
 ;;055154524505
 ;;9002226.02101,"768,059779012403 ",.01)
 ;;059779012403
 ;;9002226.02101,"768,059779012403 ",.02)
 ;;059779012403
 ;;9002226.02101,"768,059779012405 ",.01)
 ;;059779012405
 ;;9002226.02101,"768,059779012405 ",.02)
 ;;059779012405
 ;;9002226.02101,"768,059779019003 ",.01)
 ;;059779019003
 ;;9002226.02101,"768,059779019003 ",.02)
 ;;059779019003
 ;;9002226.02101,"768,059779019005 ",.01)
 ;;059779019005
 ;;9002226.02101,"768,059779019005 ",.02)
 ;;059779019005
 ;;9002226.02101,"768,059779034401 ",.01)
 ;;059779034401
 ;;9002226.02101,"768,059779034401 ",.02)
 ;;059779034401
 ;;9002226.02101,"768,059779034403 ",.01)
 ;;059779034403
 ;;9002226.02101,"768,059779034403 ",.02)
 ;;059779034403
 ;;9002226.02101,"768,059779034404 ",.01)
 ;;059779034404
 ;;9002226.02101,"768,059779034404 ",.02)
 ;;059779034404
 ;;9002226.02101,"768,059779034405 ",.01)
 ;;059779034405
 ;;9002226.02101,"768,059779034405 ",.02)
 ;;059779034405
 ;;9002226.02101,"768,059779034408 ",.01)
 ;;059779034408
 ;;9002226.02101,"768,059779034408 ",.02)
 ;;059779034408
 ;;9002226.02101,"768,059779034423 ",.01)
 ;;059779034423
 ;;9002226.02101,"768,059779034423 ",.02)
 ;;059779034423
 ;;9002226.02101,"768,059779034444 ",.01)
 ;;059779034444
 ;;9002226.02101,"768,059779034444 ",.02)
 ;;059779034444