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

BGPM5AWV.m

Go to the documentation of this file.
BGPM5AWV ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON AUG 29, 2011;
 ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
 ;
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,"1033,66267055920 ",.01)
 ;;66267055920
 ;;9002226.02101,"1033,66267055920 ",.02)
 ;;66267055920
 ;;9002226.02101,"1033,66267055928 ",.01)
 ;;66267055928
 ;;9002226.02101,"1033,66267055928 ",.02)
 ;;66267055928
 ;;9002226.02101,"1033,66267055930 ",.01)
 ;;66267055930
 ;;9002226.02101,"1033,66267055930 ",.02)
 ;;66267055930
 ;;9002226.02101,"1033,66267055940 ",.01)
 ;;66267055940
 ;;9002226.02101,"1033,66267055940 ",.02)
 ;;66267055940
 ;;9002226.02101,"1033,66267059510 ",.01)
 ;;66267059510
 ;;9002226.02101,"1033,66267059510 ",.02)
 ;;66267059510
 ;;9002226.02101,"1033,66267059520 ",.01)
 ;;66267059520
 ;;9002226.02101,"1033,66267059520 ",.02)
 ;;66267059520
 ;;9002226.02101,"1033,66267059530 ",.01)
 ;;66267059530
 ;;9002226.02101,"1033,66267059530 ",.02)
 ;;66267059530
 ;;9002226.02101,"1033,66267059540 ",.01)
 ;;66267059540
 ;;9002226.02101,"1033,66267059540 ",.02)
 ;;66267059540
 ;;9002226.02101,"1033,66267059560 ",.01)
 ;;66267059560
 ;;9002226.02101,"1033,66267059560 ",.02)
 ;;66267059560
 ;;9002226.02101,"1033,66267071203 ",.01)
 ;;66267071203
 ;;9002226.02101,"1033,66267071203 ",.02)
 ;;66267071203
 ;;9002226.02101,"1033,66267071205 ",.01)
 ;;66267071205
 ;;9002226.02101,"1033,66267071205 ",.02)
 ;;66267071205
 ;;9002226.02101,"1033,66267071210 ",.01)
 ;;66267071210
 ;;9002226.02101,"1033,66267071210 ",.02)
 ;;66267071210
 ;;9002226.02101,"1033,66267071214 ",.01)
 ;;66267071214
 ;;9002226.02101,"1033,66267071214 ",.02)
 ;;66267071214
 ;;9002226.02101,"1033,66267071604 ",.01)
 ;;66267071604
 ;;9002226.02101,"1033,66267071604 ",.02)
 ;;66267071604
 ;;9002226.02101,"1033,66267071606 ",.01)
 ;;66267071606
 ;;9002226.02101,"1033,66267071606 ",.02)
 ;;66267071606
 ;;9002226.02101,"1033,66267076304 ",.01)
 ;;66267076304
 ;;9002226.02101,"1033,66267076304 ",.02)
 ;;66267076304
 ;;9002226.02101,"1033,66267076306 ",.01)
 ;;66267076306
 ;;9002226.02101,"1033,66267076306 ",.02)
 ;;66267076306
 ;;9002226.02101,"1033,66267076309 ",.01)
 ;;66267076309
 ;;9002226.02101,"1033,66267076309 ",.02)
 ;;66267076309
 ;;9002226.02101,"1033,66267076406 ",.01)
 ;;66267076406
 ;;9002226.02101,"1033,66267076406 ",.02)
 ;;66267076406
 ;;9002226.02101,"1033,66267076409 ",.01)
 ;;66267076409
 ;;9002226.02101,"1033,66267076409 ",.02)
 ;;66267076409
 ;;9002226.02101,"1033,66267076418 ",.01)
 ;;66267076418
 ;;9002226.02101,"1033,66267076418 ",.02)
 ;;66267076418
 ;;9002226.02101,"1033,66267076802 ",.01)
 ;;66267076802
 ;;9002226.02101,"1033,66267076802 ",.02)
 ;;66267076802
 ;;9002226.02101,"1033,66267076806 ",.01)
 ;;66267076806
 ;;9002226.02101,"1033,66267076806 ",.02)
 ;;66267076806
 ;;9002226.02101,"1033,66267076904 ",.01)
 ;;66267076904
 ;;9002226.02101,"1033,66267076904 ",.02)
 ;;66267076904
 ;;9002226.02101,"1033,66267076906 ",.01)
 ;;66267076906
 ;;9002226.02101,"1033,66267076906 ",.02)
 ;;66267076906
 ;;9002226.02101,"1033,66267076908 ",.01)
 ;;66267076908
 ;;9002226.02101,"1033,66267076908 ",.02)
 ;;66267076908
 ;;9002226.02101,"1033,66267077003 ",.01)
 ;;66267077003
 ;;9002226.02101,"1033,66267077003 ",.02)
 ;;66267077003
 ;;9002226.02101,"1033,66267077004 ",.01)
 ;;66267077004
 ;;9002226.02101,"1033,66267077004 ",.02)
 ;;66267077004
 ;;9002226.02101,"1033,66267077006 ",.01)
 ;;66267077006
 ;;9002226.02101,"1033,66267077006 ",.02)
 ;;66267077006
 ;;9002226.02101,"1033,66267077009 ",.01)
 ;;66267077009
 ;;9002226.02101,"1033,66267077009 ",.02)
 ;;66267077009
 ;;9002226.02101,"1033,66267077406 ",.01)
 ;;66267077406
 ;;9002226.02101,"1033,66267077406 ",.02)
 ;;66267077406
 ;;9002226.02101,"1033,66267077706 ",.01)
 ;;66267077706
 ;;9002226.02101,"1033,66267077706 ",.02)
 ;;66267077706
 ;;9002226.02101,"1033,66267078106 ",.01)
 ;;66267078106
 ;;9002226.02101,"1033,66267078106 ",.02)
 ;;66267078106
 ;;9002226.02101,"1033,66267080806 ",.01)
 ;;66267080806
 ;;9002226.02101,"1033,66267080806 ",.02)
 ;;66267080806
 ;;9002226.02101,"1033,66267080809 ",.01)
 ;;66267080809
 ;;9002226.02101,"1033,66267080809 ",.02)
 ;;66267080809
 ;;9002226.02101,"1033,66267080904 ",.01)
 ;;66267080904
 ;;9002226.02101,"1033,66267080904 ",.02)
 ;;66267080904
 ;;9002226.02101,"1033,66267080906 ",.01)
 ;;66267080906
 ;;9002226.02101,"1033,66267080906 ",.02)
 ;;66267080906
 ;;9002226.02101,"1033,66267081602 ",.01)
 ;;66267081602
 ;;9002226.02101,"1033,66267081602 ",.02)
 ;;66267081602
 ;;9002226.02101,"1033,66267081606 ",.01)
 ;;66267081606
 ;;9002226.02101,"1033,66267081606 ",.02)
 ;;66267081606
 ;;9002226.02101,"1033,66267081940 ",.01)
 ;;66267081940
 ;;9002226.02101,"1033,66267081940 ",.02)
 ;;66267081940
 ;;9002226.02101,"1033,66267082506 ",.01)
 ;;66267082506
 ;;9002226.02101,"1033,66267082506 ",.02)
 ;;66267082506
 ;;9002226.02101,"1033,66267085620 ",.01)
 ;;66267085620
 ;;9002226.02101,"1033,66267085620 ",.02)
 ;;66267085620
 ;;9002226.02101,"1033,66267085703 ",.01)
 ;;66267085703
 ;;9002226.02101,"1033,66267085703 ",.02)
 ;;66267085703
 ;;9002226.02101,"1033,66267085704 ",.01)
 ;;66267085704
 ;;9002226.02101,"1033,66267085704 ",.02)
 ;;66267085704
 ;;9002226.02101,"1033,66267085902 ",.01)
 ;;66267085902
 ;;9002226.02101,"1033,66267085902 ",.02)
 ;;66267085902
 ;;9002226.02101,"1033,66267085903 ",.01)
 ;;66267085903
 ;;9002226.02101,"1033,66267085903 ",.02)
 ;;66267085903
 ;;9002226.02101,"1033,66267085904 ",.01)
 ;;66267085904
 ;;9002226.02101,"1033,66267085904 ",.02)
 ;;66267085904
 ;;9002226.02101,"1033,66267086530 ",.01)
 ;;66267086530
 ;;9002226.02101,"1033,66267086530 ",.02)
 ;;66267086530
 ;;9002226.02101,"1033,66267086540 ",.01)
 ;;66267086540
 ;;9002226.02101,"1033,66267086540 ",.02)
 ;;66267086540
 ;;9002226.02101,"1033,66267087103 ",.01)
 ;;66267087103
 ;;9002226.02101,"1033,66267087103 ",.02)
 ;;66267087103
 ;;9002226.02101,"1033,66267087104 ",.01)
 ;;66267087104
 ;;9002226.02101,"1033,66267087104 ",.02)
 ;;66267087104
 ;;9002226.02101,"1033,66267087630 ",.01)
 ;;66267087630
 ;;9002226.02101,"1033,66267087630 ",.02)
 ;;66267087630
 ;;9002226.02101,"1033,66267087642 ",.01)
 ;;66267087642
 ;;9002226.02101,"1033,66267087642 ",.02)
 ;;66267087642
 ;;9002226.02101,"1033,66267087840 ",.01)
 ;;66267087840
 ;;9002226.02101,"1033,66267087840 ",.02)
 ;;66267087840
 ;;9002226.02101,"1033,66267087906 ",.01)
 ;;66267087906
 ;;9002226.02101,"1033,66267087906 ",.02)
 ;;66267087906
 ;;9002226.02101,"1033,66267087930 ",.01)
 ;;66267087930
 ;;9002226.02101,"1033,66267087930 ",.02)
 ;;66267087930
 ;;9002226.02101,"1033,66267087942 ",.01)
 ;;66267087942
 ;;9002226.02101,"1033,66267087942 ",.02)
 ;;66267087942
 ;;9002226.02101,"1033,66267088205 ",.01)
 ;;66267088205
 ;;9002226.02101,"1033,66267088205 ",.02)
 ;;66267088205
 ;;9002226.02101,"1033,66267088206 ",.01)
 ;;66267088206
 ;;9002226.02101,"1033,66267088206 ",.02)
 ;;66267088206
 ;;9002226.02101,"1033,66267088220 ",.01)
 ;;66267088220
 ;;9002226.02101,"1033,66267088220 ",.02)
 ;;66267088220
 ;;9002226.02101,"1033,66267088508 ",.01)
 ;;66267088508
 ;;9002226.02101,"1033,66267088508 ",.02)
 ;;66267088508
 ;;9002226.02101,"1033,66267088514 ",.01)
 ;;66267088514
 ;;9002226.02101,"1033,66267088514 ",.02)
 ;;66267088514
 ;;9002226.02101,"1033,66267088520 ",.01)
 ;;66267088520
 ;;9002226.02101,"1033,66267088520 ",.02)
 ;;66267088520
 ;;9002226.02101,"1033,66267088528 ",.01)
 ;;66267088528
 ;;9002226.02101,"1033,66267088528 ",.02)
 ;;66267088528
 ;;9002226.02101,"1033,66267089030 ",.01)
 ;;66267089030
 ;;9002226.02101,"1033,66267089030 ",.02)
 ;;66267089030
 ;;9002226.02101,"1033,66267089040 ",.01)
 ;;66267089040
 ;;9002226.02101,"1033,66267089040 ",.02)
 ;;66267089040
 ;;9002226.02101,"1033,66267089140 ",.01)
 ;;66267089140
 ;;9002226.02101,"1033,66267089140 ",.02)
 ;;66267089140
 ;;9002226.02101,"1033,66267089940 ",.01)
 ;;66267089940
 ;;9002226.02101,"1033,66267089940 ",.02)
 ;;66267089940
 ;;9002226.02101,"1033,66267090005 ",.01)
 ;;66267090005
 ;;9002226.02101,"1033,66267090005 ",.02)
 ;;66267090005
 ;;9002226.02101,"1033,66267090006 ",.01)
 ;;66267090006
 ;;9002226.02101,"1033,66267090006 ",.02)
 ;;66267090006
 ;;9002226.02101,"1033,66267090030 ",.01)
 ;;66267090030
 ;;9002226.02101,"1033,66267090030 ",.02)
 ;;66267090030
 ;;9002226.02101,"1033,66267090040 ",.01)
 ;;66267090040
 ;;9002226.02101,"1033,66267090040 ",.02)
 ;;66267090040
 ;;9002226.02101,"1033,66267090056 ",.01)
 ;;66267090056
 ;;9002226.02101,"1033,66267090056 ",.02)
 ;;66267090056
 ;;9002226.02101,"1033,66267090080 ",.01)
 ;;66267090080
 ;;9002226.02101,"1033,66267090080 ",.02)
 ;;66267090080
 ;;9002226.02101,"1033,66267090805 ",.01)
 ;;66267090805
 ;;9002226.02101,"1033,66267090805 ",.02)
 ;;66267090805
 ;;9002226.02101,"1033,66267090814 ",.01)
 ;;66267090814
 ;;9002226.02101,"1033,66267090814 ",.02)
 ;;66267090814
 ;;9002226.02101,"1033,66267090820 ",.01)
 ;;66267090820
 ;;9002226.02101,"1033,66267090820 ",.02)
 ;;66267090820
 ;;9002226.02101,"1033,66267091901 ",.01)
 ;;66267091901
 ;;9002226.02101,"1033,66267091901 ",.02)
 ;;66267091901
 ;;9002226.02101,"1033,66267091906 ",.01)
 ;;66267091906
 ;;9002226.02101,"1033,66267091906 ",.02)
 ;;66267091906
 ;;9002226.02101,"1033,66267091910 ",.01)
 ;;66267091910
 ;;9002226.02101,"1033,66267091910 ",.02)
 ;;66267091910
 ;;9002226.02101,"1033,66267091914 ",.01)
 ;;66267091914
 ;;9002226.02101,"1033,66267091914 ",.02)
 ;;66267091914
 ;;9002226.02101,"1033,66267091915 ",.01)
 ;;66267091915
 ;;9002226.02101,"1033,66267091915 ",.02)
 ;;66267091915
 ;;9002226.02101,"1033,66267091920 ",.01)
 ;;66267091920
 ;;9002226.02101,"1033,66267091920 ",.02)
 ;;66267091920
 ;;9002226.02101,"1033,66267091928 ",.01)
 ;;66267091928
 ;;9002226.02101,"1033,66267091928 ",.02)
 ;;66267091928
 ;;9002226.02101,"1033,66267091930 ",.01)
 ;;66267091930
 ;;9002226.02101,"1033,66267091930 ",.02)
 ;;66267091930
 ;;9002226.02101,"1033,66267091960 ",.01)
 ;;66267091960
 ;;9002226.02101,"1033,66267091960 ",.02)
 ;;66267091960
 ;;9002226.02101,"1033,66267098120 ",.01)
 ;;66267098120
 ;;9002226.02101,"1033,66267098120 ",.02)
 ;;66267098120
 ;;9002226.02101,"1033,66267098200 ",.01)
 ;;66267098200
 ;;9002226.02101,"1033,66267098200 ",.02)
 ;;66267098200
 ;;9002226.02101,"1033,66267099315 ",.01)
 ;;66267099315
 ;;9002226.02101,"1033,66267099315 ",.02)
 ;;66267099315
 ;;9002226.02101,"1033,66267099400 ",.01)
 ;;66267099400
 ;;9002226.02101,"1033,66267099400 ",.02)
 ;;66267099400
 ;;9002226.02101,"1033,66267100101 ",.01)
 ;;66267100101
 ;;9002226.02101,"1033,66267100101 ",.02)
 ;;66267100101
 ;;9002226.02101,"1033,66267100201 ",.01)
 ;;66267100201
 ;;9002226.02101,"1033,66267100201 ",.02)
 ;;66267100201
 ;;9002226.02101,"1033,66288110001 ",.01)
 ;;66288110001
 ;;9002226.02101,"1033,66288110001 ",.02)
 ;;66288110001
 ;;9002226.02101,"1033,66288130001 ",.01)
 ;;66288130001
 ;;9002226.02101,"1033,66288130001 ",.02)
 ;;66288130001
 ;;9002226.02101,"1033,66304097110 ",.01)
 ;;66304097110
 ;;9002226.02101,"1033,66304097110 ",.02)
 ;;66304097110
 ;;9002226.02101,"1033,66336001808 ",.01)
 ;;66336001808
 ;;9002226.02101,"1033,66336001808 ",.02)
 ;;66336001808
 ;;9002226.02101,"1033,66336001814 ",.01)
 ;;66336001814
 ;;9002226.02101,"1033,66336001814 ",.02)
 ;;66336001814
 ;;9002226.02101,"1033,66336001820 ",.01)
 ;;66336001820
 ;;9002226.02101,"1033,66336001820 ",.02)
 ;;66336001820
 ;;9002226.02101,"1033,66336001828 ",.01)
 ;;66336001828
 ;;9002226.02101,"1033,66336001828 ",.02)
 ;;66336001828
 ;;9002226.02101,"1033,66336001842 ",.01)
 ;;66336001842
 ;;9002226.02101,"1033,66336001842 ",.02)
 ;;66336001842
 ;;9002226.02101,"1033,66336002220 ",.01)
 ;;66336002220