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

BGPMBTXW.m

Go to the documentation of this file.
BGPMBTXW ;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,000067512628 ",.01)
 ;;000067512628
 ;;9002226.02101,"768,000067512628 ",.02)
 ;;000067512628
 ;;9002226.02101,"768,000067612814 ",.01)
 ;;000067612814
 ;;9002226.02101,"768,000067612814 ",.02)
 ;;000067612814
 ;;9002226.02101,"768,000067612914 ",.01)
 ;;000067612914
 ;;9002226.02101,"768,000067612914 ",.02)
 ;;000067612914
 ;;9002226.02101,"768,000067613014 ",.01)
 ;;000067613014
 ;;9002226.02101,"768,000067613014 ",.02)
 ;;000067613014
 ;;9002226.02101,"768,000068004501 ",.01)
 ;;000068004501
 ;;9002226.02101,"768,000068004501 ",.02)
 ;;000068004501
 ;;9002226.02101,"768,000068004525 ",.01)
 ;;000068004525
 ;;9002226.02101,"768,000068004525 ",.02)
 ;;000068004525
 ;;9002226.02101,"768,000071985308 ",.01)
 ;;000071985308
 ;;9002226.02101,"768,000071985308 ",.02)
 ;;000071985308
 ;;9002226.02101,"768,000113020625 ",.01)
 ;;000113020625
 ;;9002226.02101,"768,000113020625 ",.02)
 ;;000113020625
 ;;9002226.02101,"768,000113034405 ",.01)
 ;;000113034405
 ;;9002226.02101,"768,000113034405 ",.02)
 ;;000113034405
 ;;9002226.02101,"768,000113042225 ",.01)
 ;;000113042225
 ;;9002226.02101,"768,000113042225 ",.02)
 ;;000113042225
 ;;9002226.02101,"768,000113045678 ",.01)
 ;;000113045678
 ;;9002226.02101,"768,000113045678 ",.02)
 ;;000113045678
 ;;9002226.02101,"768,000113053278 ",.01)
 ;;000113053278
 ;;9002226.02101,"768,000113053278 ",.02)
 ;;000113053278
 ;;9002226.02101,"768,000113087305 ",.01)
 ;;000113087305
 ;;9002226.02101,"768,000113087305 ",.02)
 ;;000113087305
 ;;9002226.02101,"768,000247056507 ",.01)
 ;;000247056507
 ;;9002226.02101,"768,000247056507 ",.02)
 ;;000247056507
 ;;9002226.02101,"768,000247056514 ",.01)
 ;;000247056514
 ;;9002226.02101,"768,000247056514 ",.02)
 ;;000247056514
 ;;9002226.02101,"768,000247192907 ",.01)
 ;;000247192907
 ;;9002226.02101,"768,000247192907 ",.02)
 ;;000247192907
 ;;9002226.02101,"768,000247192915 ",.01)
 ;;000247192915
 ;;9002226.02101,"768,000247192915 ",.02)
 ;;000247192915
 ;;9002226.02101,"768,000247192930 ",.01)
 ;;000247192930
 ;;9002226.02101,"768,000247192930 ",.02)
 ;;000247192930
 ;;9002226.02101,"768,000247193007 ",.01)
 ;;000247193007
 ;;9002226.02101,"768,000247193007 ",.02)
 ;;000247193007
 ;;9002226.02101,"768,000247193015 ",.01)
 ;;000247193015
 ;;9002226.02101,"768,000247193015 ",.02)
 ;;000247193015
 ;;9002226.02101,"768,000247193030 ",.01)
 ;;000247193030
 ;;9002226.02101,"768,000247193030 ",.02)
 ;;000247193030
 ;;9002226.02101,"768,000247193107 ",.01)
 ;;000247193107
 ;;9002226.02101,"768,000247193107 ",.02)
 ;;000247193107
 ;;9002226.02101,"768,000247193115 ",.01)
 ;;000247193115
 ;;9002226.02101,"768,000247193115 ",.02)
 ;;000247193115
 ;;9002226.02101,"768,000247193130 ",.01)
 ;;000247193130
 ;;9002226.02101,"768,000247193130 ",.02)
 ;;000247193130
 ;;9002226.02101,"768,000363012403 ",.01)
 ;;000363012403
 ;;9002226.02101,"768,000363012403 ",.02)
 ;;000363012403
 ;;9002226.02101,"768,000363012405 ",.01)
 ;;000363012405
 ;;9002226.02101,"768,000363012405 ",.02)
 ;;000363012405
 ;;9002226.02101,"768,000363012406 ",.01)
 ;;000363012406
 ;;9002226.02101,"768,000363012406 ",.02)
 ;;000363012406
 ;;9002226.02101,"768,000363012409 ",.01)
 ;;000363012409
 ;;9002226.02101,"768,000363012409 ",.02)
 ;;000363012409
 ;;9002226.02101,"768,000363012410 ",.01)
 ;;000363012410
 ;;9002226.02101,"768,000363012410 ",.02)
 ;;000363012410
 ;;9002226.02101,"768,000363019003 ",.01)
 ;;000363019003
 ;;9002226.02101,"768,000363019003 ",.02)
 ;;000363019003
 ;;9002226.02101,"768,000363019005 ",.01)
 ;;000363019005
 ;;9002226.02101,"768,000363019005 ",.02)
 ;;000363019005
 ;;9002226.02101,"768,000363019006 ",.01)
 ;;000363019006
 ;;9002226.02101,"768,000363019006 ",.02)
 ;;000363019006
 ;;9002226.02101,"768,000363019009 ",.01)
 ;;000363019009
 ;;9002226.02101,"768,000363019009 ",.02)
 ;;000363019009
 ;;9002226.02101,"768,000363019010 ",.01)
 ;;000363019010
 ;;9002226.02101,"768,000363019010 ",.02)
 ;;000363019010
 ;;9002226.02101,"768,000363019402 ",.01)
 ;;000363019402
 ;;9002226.02101,"768,000363019402 ",.02)
 ;;000363019402
 ;;9002226.02101,"768,000363019502 ",.01)
 ;;000363019502
 ;;9002226.02101,"768,000363019502 ",.02)
 ;;000363019502
 ;;9002226.02101,"768,000363019602 ",.01)
 ;;000363019602
 ;;9002226.02101,"768,000363019602 ",.02)
 ;;000363019602
 ;;9002226.02101,"768,000363020801 ",.01)
 ;;000363020801
 ;;9002226.02101,"768,000363020801 ",.02)
 ;;000363020801
 ;;9002226.02101,"768,000363020807 ",.01)
 ;;000363020807
 ;;9002226.02101,"768,000363020807 ",.02)
 ;;000363020807
 ;;9002226.02101,"768,000363020901 ",.01)
 ;;000363020901
 ;;9002226.02101,"768,000363020901 ",.02)
 ;;000363020901
 ;;9002226.02101,"768,000363020907 ",.01)
 ;;000363020907
 ;;9002226.02101,"768,000363020907 ",.02)
 ;;000363020907
 ;;9002226.02101,"768,000363034408 ",.01)
 ;;000363034408
 ;;9002226.02101,"768,000363034408 ",.02)
 ;;000363034408
 ;;9002226.02101,"768,000363034467 ",.01)
 ;;000363034467
 ;;9002226.02101,"768,000363034467 ",.02)
 ;;000363034467
 ;;9002226.02101,"768,000363042050 ",.01)
 ;;000363042050
 ;;9002226.02101,"768,000363042050 ",.02)
 ;;000363042050
 ;;9002226.02101,"768,000363042062 ",.01)
 ;;000363042062
 ;;9002226.02101,"768,000363042062 ",.02)
 ;;000363042062
 ;;9002226.02101,"768,000363042098 ",.01)
 ;;000363042098
 ;;9002226.02101,"768,000363042098 ",.02)
 ;;000363042098
 ;;9002226.02101,"768,000363042150 ",.01)
 ;;000363042150
 ;;9002226.02101,"768,000363042150 ",.02)
 ;;000363042150
 ;;9002226.02101,"768,000363042162 ",.01)
 ;;000363042162
 ;;9002226.02101,"768,000363042162 ",.02)
 ;;000363042162
 ;;9002226.02101,"768,000363042198 ",.01)
 ;;000363042198
 ;;9002226.02101,"768,000363042198 ",.02)
 ;;000363042198
 ;;9002226.02101,"768,000363042405 ",.01)
 ;;000363042405
 ;;9002226.02101,"768,000363042405 ",.02)
 ;;000363042405
 ;;9002226.02101,"768,000363042406 ",.01)
 ;;000363042406
 ;;9002226.02101,"768,000363042406 ",.02)
 ;;000363042406
 ;;9002226.02101,"768,000363045678 ",.01)
 ;;000363045678
 ;;9002226.02101,"768,000363045678 ",.02)
 ;;000363045678
 ;;9002226.02101,"768,000363053258 ",.01)
 ;;000363053258
 ;;9002226.02101,"768,000363053258 ",.02)
 ;;000363053258
 ;;9002226.02101,"768,000363053278 ",.01)
 ;;000363053278
 ;;9002226.02101,"768,000363053278 ",.02)
 ;;000363053278
 ;;9002226.02101,"768,000363087308 ",.01)
 ;;000363087308
 ;;9002226.02101,"768,000363087308 ",.02)
 ;;000363087308
 ;;9002226.02101,"768,000363087323 ",.01)
 ;;000363087323
 ;;9002226.02101,"768,000363087323 ",.02)
 ;;000363087323
 ;;9002226.02101,"768,000363087367 ",.01)
 ;;000363087367
 ;;9002226.02101,"768,000363087367 ",.02)
 ;;000363087367
 ;;9002226.02101,"768,000363412250 ",.01)
 ;;000363412250
 ;;9002226.02101,"768,000363412250 ",.02)
 ;;000363412250
 ;;9002226.02101,"768,000363412262 ",.01)
 ;;000363412262
 ;;9002226.02101,"768,000363412262 ",.02)
 ;;000363412262
 ;;9002226.02101,"768,000363412298 ",.01)
 ;;000363412298
 ;;9002226.02101,"768,000363412298 ",.02)
 ;;000363412298
 ;;9002226.02101,"768,000363414950 ",.01)
 ;;000363414950
 ;;9002226.02101,"768,000363414950 ",.02)
 ;;000363414950
 ;;9002226.02101,"768,000363414962 ",.01)
 ;;000363414962
 ;;9002226.02101,"768,000363414962 ",.02)
 ;;000363414962
 ;;9002226.02101,"768,000363414998 ",.01)
 ;;000363414998
 ;;9002226.02101,"768,000363414998 ",.02)
 ;;000363414998
 ;;9002226.02101,"768,000364289030 ",.01)
 ;;000364289030
 ;;9002226.02101,"768,000364289030 ",.02)
 ;;000364289030
 ;;9002226.02101,"768,000364289330 ",.01)
 ;;000364289330
 ;;9002226.02101,"768,000364289330 ",.02)
 ;;000364289330
 ;;9002226.02101,"768,000364290130 ",.01)
 ;;000364290130
 ;;9002226.02101,"768,000364290130 ",.02)
 ;;000364290130
 ;;9002226.02101,"768,000536136206 ",.01)
 ;;000536136206
 ;;9002226.02101,"768,000536136206 ",.02)
 ;;000536136206
 ;;9002226.02101,"768,000536136223 ",.01)
 ;;000536136223
 ;;9002226.02101,"768,000536136223 ",.02)
 ;;000536136223
 ;;9002226.02101,"768,000536136234 ",.01)
 ;;000536136234
 ;;9002226.02101,"768,000536136234 ",.02)
 ;;000536136234
 ;;9002226.02101,"768,000536137206 ",.01)
 ;;000536137206
 ;;9002226.02101,"768,000536137206 ",.02)
 ;;000536137206
 ;;9002226.02101,"768,000536137223 ",.01)
 ;;000536137223
 ;;9002226.02101,"768,000536137223 ",.02)
 ;;000536137223
 ;;9002226.02101,"768,000536137234 ",.01)
 ;;000536137234
 ;;9002226.02101,"768,000536137234 ",.02)
 ;;000536137234
 ;;9002226.02101,"768,000536302906 ",.01)
 ;;000536302906
 ;;9002226.02101,"768,000536302906 ",.02)
 ;;000536302906
 ;;9002226.02101,"768,000536302923 ",.01)
 ;;000536302923
 ;;9002226.02101,"768,000536302923 ",.02)
 ;;000536302923
 ;;9002226.02101,"768,000536303006 ",.01)
 ;;000536303006
 ;;9002226.02101,"768,000536303006 ",.02)
 ;;000536303006
 ;;9002226.02101,"768,000536303023 ",.01)
 ;;000536303023
 ;;9002226.02101,"768,000536303023 ",.02)
 ;;000536303023
 ;;9002226.02101,"768,000536310606 ",.01)
 ;;000536310606
 ;;9002226.02101,"768,000536310606 ",.02)
 ;;000536310606
 ;;9002226.02101,"768,000536310618 ",.01)
 ;;000536310618
 ;;9002226.02101,"768,000536310618 ",.02)
 ;;000536310618
 ;;9002226.02101,"768,000536310623 ",.01)
 ;;000536310623
 ;;9002226.02101,"768,000536310623 ",.02)
 ;;000536310623
 ;;9002226.02101,"768,000536310634 ",.01)
 ;;000536310634
 ;;9002226.02101,"768,000536310634 ",.02)
 ;;000536310634
 ;;9002226.02101,"768,000536310643 ",.01)
 ;;000536310643
 ;;9002226.02101,"768,000536310643 ",.02)
 ;;000536310643
 ;;9002226.02101,"768,000536310706 ",.01)
 ;;000536310706
 ;;9002226.02101,"768,000536310706 ",.02)
 ;;000536310706
 ;;9002226.02101,"768,000536310718 ",.01)
 ;;000536310718
 ;;9002226.02101,"768,000536310718 ",.02)
 ;;000536310718
 ;;9002226.02101,"768,000536310723 ",.01)
 ;;000536310723
 ;;9002226.02101,"768,000536310723 ",.02)
 ;;000536310723
 ;;9002226.02101,"768,000536310734 ",.01)
 ;;000536310734
 ;;9002226.02101,"768,000536310734 ",.02)
 ;;000536310734
 ;;9002226.02101,"768,000536310743 ",.01)
 ;;000536310743
 ;;9002226.02101,"768,000536310743 ",.02)
 ;;000536310743
 ;;9002226.02101,"768,000536311201 ",.01)
 ;;000536311201
 ;;9002226.02101,"768,000536311201 ",.02)
 ;;000536311201
 ;;9002226.02101,"768,000536311237 ",.01)
 ;;000536311237
 ;;9002226.02101,"768,000536311237 ",.02)
 ;;000536311237
 ;;9002226.02101,"768,000536311301 ",.01)
 ;;000536311301
 ;;9002226.02101,"768,000536311301 ",.02)
 ;;000536311301
 ;;9002226.02101,"768,000536311337 ",.01)
 ;;000536311337
 ;;9002226.02101,"768,000536311337 ",.02)
 ;;000536311337
 ;;9002226.02101,"768,000536338601 ",.01)
 ;;000536338601
 ;;9002226.02101,"768,000536338601 ",.02)
 ;;000536338601
 ;;9002226.02101,"768,000536338637 ",.01)
 ;;000536338637
 ;;9002226.02101,"768,000536338637 ",.02)
 ;;000536338637
 ;;9002226.02101,"768,000536338701 ",.01)
 ;;000536338701
 ;;9002226.02101,"768,000536338701 ",.02)
 ;;000536338701
 ;;9002226.02101,"768,000536338737 ",.01)
 ;;000536338737
 ;;9002226.02101,"768,000536338737 ",.02)
 ;;000536338737
 ;;9002226.02101,"768,000536340401 ",.01)
 ;;000536340401
 ;;9002226.02101,"768,000536340401 ",.02)
 ;;000536340401
 ;;9002226.02101,"768,000536340407 ",.01)
 ;;000536340407
 ;;9002226.02101,"768,000536340407 ",.02)
 ;;000536340407
 ;;9002226.02101,"768,000536340437 ",.01)
 ;;000536340437
 ;;9002226.02101,"768,000536340437 ",.02)
 ;;000536340437
 ;;9002226.02101,"768,000536340501 ",.01)
 ;;000536340501
 ;;9002226.02101,"768,000536340501 ",.02)
 ;;000536340501
 ;;9002226.02101,"768,000536340537 ",.01)
 ;;000536340537
 ;;9002226.02101,"768,000536340537 ",.02)
 ;;000536340537
 ;;9002226.02101,"768,000536589488 ",.01)
 ;;000536589488
 ;;9002226.02101,"768,000536589488 ",.02)
 ;;000536589488
 ;;9002226.02101,"768,000536589588 ",.01)
 ;;000536589588
 ;;9002226.02101,"768,000536589588 ",.02)
 ;;000536589588
 ;;9002226.02101,"768,000536589688 ",.01)
 ;;000536589688
 ;;9002226.02101,"768,000536589688 ",.02)
 ;;000536589688
 ;;9002226.02101,"768,000591289030 ",.01)
 ;;000591289030
 ;;9002226.02101,"768,000591289030 ",.02)
 ;;000591289030
 ;;9002226.02101,"768,000591289330 ",.01)
 ;;000591289330
 ;;9002226.02101,"768,000591289330 ",.02)
 ;;000591289330
 ;;9002226.02101,"768,000591290130 ",.01)
 ;;000591290130
 ;;9002226.02101,"768,000591290130 ",.02)
 ;;000591290130
 ;;9002226.02101,"768,000591290154 ",.01)
 ;;000591290154
 ;;9002226.02101,"768,000591290154 ",.02)
 ;;000591290154
 ;;9002226.02101,"768,000766150010 ",.01)
 ;;000766150010
 ;;9002226.02101,"768,000766150010 ",.02)
 ;;000766150010
 ;;9002226.02101,"768,000766150020 ",.01)
 ;;000766150020
 ;;9002226.02101,"768,000766150020 ",.02)
 ;;000766150020
 ;;9002226.02101,"768,000766150030 ",.01)
 ;;000766150030
 ;;9002226.02101,"768,000766150030 ",.02)
 ;;000766150030
 ;;9002226.02101,"768,000766150040 ",.01)
 ;;000766150040
 ;;9002226.02101,"768,000766150040 ",.02)
 ;;000766150040
 ;;9002226.02101,"768,000766155170 ",.01)
 ;;000766155170
 ;;9002226.02101,"768,000766155170 ",.02)
 ;;000766155170
 ;;9002226.02101,"768,005888783026 ",.01)
 ;;005888783026
 ;;9002226.02101,"768,005888783026 ",.02)
 ;;005888783026
 ;;9002226.02101,"768,011673019401 ",.01)
 ;;011673019401
 ;;9002226.02101,"768,011673019401 ",.02)
 ;;011673019401
 ;;9002226.02101,"768,011673019402 ",.01)
 ;;011673019402
 ;;9002226.02101,"768,011673019402 ",.02)
 ;;011673019402
 ;;9002226.02101,"768,011673019502 ",.01)
 ;;011673019502