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

BUD2ZD7.m

Go to the documentation of this file.
BUD2ZD7 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON NOV 16, 2012;
 ;;10.0;IHS/RPMS UNIFORM DATA SYSTEM;;FEB 04, 2016;Build 50
 ;
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,"1327,49856002709 ",.02)
 ;;49856002709
 ;;9002226.02101,"1327,49856025301 ",.01)
 ;;49856025301
 ;;9002226.02101,"1327,49856025301 ",.02)
 ;;49856025301
 ;;9002226.02101,"1327,49856025302 ",.01)
 ;;49856025302
 ;;9002226.02101,"1327,49856025302 ",.02)
 ;;49856025302
 ;;9002226.02101,"1327,49856025303 ",.01)
 ;;49856025303
 ;;9002226.02101,"1327,49856025303 ",.02)
 ;;49856025303
 ;;9002226.02101,"1327,49856025304 ",.01)
 ;;49856025304
 ;;9002226.02101,"1327,49856025304 ",.02)
 ;;49856025304
 ;;9002226.02101,"1327,49999035930 ",.01)
 ;;49999035930
 ;;9002226.02101,"1327,49999035930 ",.02)
 ;;49999035930
 ;;9002226.02101,"1327,49999081300 ",.01)
 ;;49999081300
 ;;9002226.02101,"1327,49999081300 ",.02)
 ;;49999081300
 ;;9002226.02101,"1327,49999081330 ",.01)
 ;;49999081330
 ;;9002226.02101,"1327,49999081330 ",.02)
 ;;49999081330
 ;;9002226.02101,"1327,50428126148 ",.01)
 ;;50428126148
 ;;9002226.02101,"1327,50428126148 ",.02)
 ;;50428126148
 ;;9002226.02101,"1327,50428140897 ",.01)
 ;;50428140897
 ;;9002226.02101,"1327,50428140897 ",.02)
 ;;50428140897
 ;;9002226.02101,"1327,50428152314 ",.01)
 ;;50428152314
 ;;9002226.02101,"1327,50428152314 ",.02)
 ;;50428152314
 ;;9002226.02101,"1327,50428218859 ",.01)
 ;;50428218859
 ;;9002226.02101,"1327,50428218859 ",.02)
 ;;50428218859
 ;;9002226.02101,"1327,50428230268 ",.01)
 ;;50428230268
 ;;9002226.02101,"1327,50428230268 ",.02)
 ;;50428230268
 ;;9002226.02101,"1327,50428271255 ",.01)
 ;;50428271255
 ;;9002226.02101,"1327,50428271255 ",.02)
 ;;50428271255
 ;;9002226.02101,"1327,50428458871 ",.01)
 ;;50428458871
 ;;9002226.02101,"1327,50428458871 ",.02)
 ;;50428458871
 ;;9002226.02101,"1327,51469030101 ",.01)
 ;;51469030101
 ;;9002226.02101,"1327,51469030101 ",.02)
 ;;51469030101
 ;;9002226.02101,"1327,51645071236 ",.01)
 ;;51645071236
 ;;9002226.02101,"1327,51645071236 ",.02)
 ;;51645071236
 ;;9002226.02101,"1327,51645071308 ",.01)
 ;;51645071308
 ;;9002226.02101,"1327,51645071308 ",.02)
 ;;51645071308
 ;;9002226.02101,"1327,51645071310 ",.01)
 ;;51645071310
 ;;9002226.02101,"1327,51645071310 ",.02)
 ;;51645071310
 ;;9002226.02101,"1327,51645071401 ",.01)
 ;;51645071401
 ;;9002226.02101,"1327,51645071401 ",.02)
 ;;51645071401
 ;;9002226.02101,"1327,51645071410 ",.01)
 ;;51645071410
 ;;9002226.02101,"1327,51645071410 ",.02)
 ;;51645071410
 ;;9002226.02101,"1327,51645071601 ",.01)
 ;;51645071601
 ;;9002226.02101,"1327,51645071601 ",.02)
 ;;51645071601
 ;;9002226.02101,"1327,51645071610 ",.01)
 ;;51645071610
 ;;9002226.02101,"1327,51645071610 ",.02)
 ;;51645071610
 ;;9002226.02101,"1327,51824016436 ",.01)
 ;;51824016436
 ;;9002226.02101,"1327,51824016436 ",.02)
 ;;51824016436
 ;;9002226.02101,"1327,51824054701 ",.01)
 ;;51824054701
 ;;9002226.02101,"1327,51824054701 ",.02)
 ;;51824054701
 ;;9002226.02101,"1327,52124001101 ",.01)
 ;;52124001101
 ;;9002226.02101,"1327,52124001101 ",.02)
 ;;52124001101
 ;;9002226.02101,"1327,52124001201 ",.01)
 ;;52124001201
 ;;9002226.02101,"1327,52124001201 ",.02)
 ;;52124001201
 ;;9002226.02101,"1327,52204010399 ",.01)
 ;;52204010399
 ;;9002226.02101,"1327,52204010399 ",.02)
 ;;52204010399
 ;;9002226.02101,"1327,52204011199 ",.01)
 ;;52204011199
 ;;9002226.02101,"1327,52204011199 ",.02)
 ;;52204011199
 ;;9002226.02101,"1327,52297013378 ",.01)
 ;;52297013378
 ;;9002226.02101,"1327,52297013378 ",.02)
 ;;52297013378
 ;;9002226.02101,"1327,52297013778 ",.01)
 ;;52297013778
 ;;9002226.02101,"1327,52297013778 ",.02)
 ;;52297013778
 ;;9002226.02101,"1327,52297013978 ",.01)
 ;;52297013978
 ;;9002226.02101,"1327,52297013978 ",.02)
 ;;52297013978
 ;;9002226.02101,"1327,52297014668 ",.01)
 ;;52297014668
 ;;9002226.02101,"1327,52297014668 ",.02)
 ;;52297014668
 ;;9002226.02101,"1327,52297026072 ",.01)
 ;;52297026072
 ;;9002226.02101,"1327,52297026072 ",.02)
 ;;52297026072
 ;;9002226.02101,"1327,52297026672 ",.01)
 ;;52297026672
 ;;9002226.02101,"1327,52297026672 ",.02)
 ;;52297026672
 ;;9002226.02101,"1327,52297029287 ",.01)
 ;;52297029287
 ;;9002226.02101,"1327,52297029287 ",.02)
 ;;52297029287
 ;;9002226.02101,"1327,52297041187 ",.01)
 ;;52297041187
 ;;9002226.02101,"1327,52297041187 ",.02)
 ;;52297041187
 ;;9002226.02101,"1327,52297041660 ",.01)
 ;;52297041660
 ;;9002226.02101,"1327,52297041660 ",.02)
 ;;52297041660
 ;;9002226.02101,"1327,52297041678 ",.01)
 ;;52297041678
 ;;9002226.02101,"1327,52297041678 ",.02)
 ;;52297041678
 ;;9002226.02101,"1327,52297042974 ",.01)
 ;;52297042974
 ;;9002226.02101,"1327,52297042974 ",.02)
 ;;52297042974
 ;;9002226.02101,"1327,52297042978 ",.01)
 ;;52297042978
 ;;9002226.02101,"1327,52297042978 ",.02)
 ;;52297042978
 ;;9002226.02101,"1327,52297044878 ",.01)
 ;;52297044878
 ;;9002226.02101,"1327,52297044878 ",.02)
 ;;52297044878
 ;;9002226.02101,"1327,52297046768 ",.01)
 ;;52297046768
 ;;9002226.02101,"1327,52297046768 ",.02)
 ;;52297046768
 ;;9002226.02101,"1327,52297050776 ",.01)
 ;;52297050776
 ;;9002226.02101,"1327,52297050776 ",.02)
 ;;52297050776
 ;;9002226.02101,"1327,52297050876 ",.01)
 ;;52297050876
 ;;9002226.02101,"1327,52297050876 ",.02)
 ;;52297050876
 ;;9002226.02101,"1327,52297083568 ",.01)
 ;;52297083568
 ;;9002226.02101,"1327,52297083568 ",.02)
 ;;52297083568
 ;;9002226.02101,"1327,52297091885 ",.01)
 ;;52297091885
 ;;9002226.02101,"1327,52297091885 ",.02)
 ;;52297091885
 ;;9002226.02101,"1327,52735070201 ",.01)
 ;;52735070201
 ;;9002226.02101,"1327,52735070201 ",.02)
 ;;52735070201
 ;;9002226.02101,"1327,52735070209 ",.01)
 ;;52735070209
 ;;9002226.02101,"1327,52735070209 ",.02)
 ;;52735070209
 ;;9002226.02101,"1327,52735070301 ",.01)
 ;;52735070301
 ;;9002226.02101,"1327,52735070301 ",.02)
 ;;52735070301
 ;;9002226.02101,"1327,52735070370 ",.01)
 ;;52735070370
 ;;9002226.02101,"1327,52735070370 ",.02)
 ;;52735070370
 ;;9002226.02101,"1327,52735073313 ",.01)
 ;;52735073313
 ;;9002226.02101,"1327,52735073313 ",.02)
 ;;52735073313
 ;;9002226.02101,"1327,52735076123 ",.01)
 ;;52735076123
 ;;9002226.02101,"1327,52735076123 ",.02)
 ;;52735076123
 ;;9002226.02101,"1327,52959001800 ",.01)
 ;;52959001800
 ;;9002226.02101,"1327,52959001800 ",.02)
 ;;52959001800
 ;;9002226.02101,"1327,52959001814 ",.01)
 ;;52959001814
 ;;9002226.02101,"1327,52959001814 ",.02)
 ;;52959001814
 ;;9002226.02101,"1327,52959001820 ",.01)
 ;;52959001820
 ;;9002226.02101,"1327,52959001820 ",.02)
 ;;52959001820
 ;;9002226.02101,"1327,52959001824 ",.01)
 ;;52959001824
 ;;9002226.02101,"1327,52959001824 ",.02)
 ;;52959001824
 ;;9002226.02101,"1327,52959001830 ",.01)
 ;;52959001830
 ;;9002226.02101,"1327,52959001830 ",.02)
 ;;52959001830
 ;;9002226.02101,"1327,52959001840 ",.01)
 ;;52959001840
 ;;9002226.02101,"1327,52959001840 ",.02)
 ;;52959001840
 ;;9002226.02101,"1327,52959001860 ",.01)
 ;;52959001860
 ;;9002226.02101,"1327,52959001860 ",.02)
 ;;52959001860
 ;;9002226.02101,"1327,52959001880 ",.01)
 ;;52959001880
 ;;9002226.02101,"1327,52959001880 ",.02)
 ;;52959001880
 ;;9002226.02101,"1327,52959072400 ",.01)
 ;;52959072400
 ;;9002226.02101,"1327,52959072400 ",.02)
 ;;52959072400
 ;;9002226.02101,"1327,52959072410 ",.01)
 ;;52959072410
 ;;9002226.02101,"1327,52959072410 ",.02)
 ;;52959072410
 ;;9002226.02101,"1327,52959072414 ",.01)
 ;;52959072414
 ;;9002226.02101,"1327,52959072414 ",.02)
 ;;52959072414
 ;;9002226.02101,"1327,52959072415 ",.01)
 ;;52959072415
 ;;9002226.02101,"1327,52959072415 ",.02)
 ;;52959072415
 ;;9002226.02101,"1327,52959072420 ",.01)
 ;;52959072420
 ;;9002226.02101,"1327,52959072420 ",.02)
 ;;52959072420
 ;;9002226.02101,"1327,52959072424 ",.01)
 ;;52959072424
 ;;9002226.02101,"1327,52959072424 ",.02)
 ;;52959072424
 ;;9002226.02101,"1327,52959072430 ",.01)
 ;;52959072430
 ;;9002226.02101,"1327,52959072430 ",.02)
 ;;52959072430
 ;;9002226.02101,"1327,53978302703 ",.01)
 ;;53978302703
 ;;9002226.02101,"1327,53978302703 ",.02)
 ;;53978302703
 ;;9002226.02101,"1327,54257076917 ",.01)
 ;;54257076917
 ;;9002226.02101,"1327,54257076917 ",.02)
 ;;54257076917
 ;;9002226.02101,"1327,54257076918 ",.01)
 ;;54257076918
 ;;9002226.02101,"1327,54257076918 ",.02)
 ;;54257076918
 ;;9002226.02101,"1327,54569000504 ",.01)
 ;;54569000504
 ;;9002226.02101,"1327,54569000504 ",.02)
 ;;54569000504
 ;;9002226.02101,"1327,54569000508 ",.01)
 ;;54569000508
 ;;9002226.02101,"1327,54569000508 ",.02)
 ;;54569000508
 ;;9002226.02101,"1327,54569001401 ",.01)
 ;;54569001401
 ;;9002226.02101,"1327,54569001401 ",.02)
 ;;54569001401
 ;;9002226.02101,"1327,54569001403 ",.01)
 ;;54569001403
 ;;9002226.02101,"1327,54569001403 ",.02)
 ;;54569001403
 ;;9002226.02101,"1327,54569423301 ",.01)
 ;;54569423301
 ;;9002226.02101,"1327,54569423301 ",.02)
 ;;54569423301
 ;;9002226.02101,"1327,54569565900 ",.01)
 ;;54569565900
 ;;9002226.02101,"1327,54569565900 ",.02)
 ;;54569565900
 ;;9002226.02101,"1327,54629080101 ",.01)
 ;;54629080101
 ;;9002226.02101,"1327,54629080101 ",.02)
 ;;54629080101
 ;;9002226.02101,"1327,54629080303 ",.01)
 ;;54629080303
 ;;9002226.02101,"1327,54629080303 ",.02)
 ;;54629080303
 ;;9002226.02101,"1327,54738011103 ",.01)
 ;;54738011103
 ;;9002226.02101,"1327,54738011103 ",.02)
 ;;54738011103
 ;;9002226.02101,"1327,54868119800 ",.01)
 ;;54868119800
 ;;9002226.02101,"1327,54868119800 ",.02)
 ;;54868119800
 ;;9002226.02101,"1327,54868119802 ",.01)
 ;;54868119802
 ;;9002226.02101,"1327,54868119802 ",.02)
 ;;54868119802
 ;;9002226.02101,"1327,54868141200 ",.01)
 ;;54868141200
 ;;9002226.02101,"1327,54868141200 ",.02)
 ;;54868141200
 ;;9002226.02101,"1327,54868199601 ",.01)
 ;;54868199601
 ;;9002226.02101,"1327,54868199601 ",.02)
 ;;54868199601
 ;;9002226.02101,"1327,54868240501 ",.01)
 ;;54868240501
 ;;9002226.02101,"1327,54868240501 ",.02)
 ;;54868240501
 ;;9002226.02101,"1327,54868240502 ",.01)
 ;;54868240502
 ;;9002226.02101,"1327,54868240502 ",.02)
 ;;54868240502
 ;;9002226.02101,"1327,54868240503 ",.01)
 ;;54868240503
 ;;9002226.02101,"1327,54868240503 ",.02)
 ;;54868240503
 ;;9002226.02101,"1327,54868244001 ",.01)
 ;;54868244001
 ;;9002226.02101,"1327,54868244001 ",.02)
 ;;54868244001
 ;;9002226.02101,"1327,54868453000 ",.01)
 ;;54868453000
 ;;9002226.02101,"1327,54868453000 ",.02)
 ;;54868453000
 ;;9002226.02101,"1327,54868506200 ",.01)
 ;;54868506200
 ;;9002226.02101,"1327,54868506200 ",.02)
 ;;54868506200
 ;;9002226.02101,"1327,54868554600 ",.01)
 ;;54868554600
 ;;9002226.02101,"1327,54868554600 ",.02)
 ;;54868554600
 ;;9002226.02101,"1327,55111019601 ",.01)
 ;;55111019601
 ;;9002226.02101,"1327,55111019601 ",.02)
 ;;55111019601
 ;;9002226.02101,"1327,55111019630 ",.01)
 ;;55111019630
 ;;9002226.02101,"1327,55111019630 ",.02)
 ;;55111019630
 ;;9002226.02101,"1327,55111019690 ",.01)
 ;;55111019690
 ;;9002226.02101,"1327,55111019690 ",.02)
 ;;55111019690
 ;;9002226.02101,"1327,55154074709 ",.01)
 ;;55154074709
 ;;9002226.02101,"1327,55154074709 ",.02)
 ;;55154074709
 ;;9002226.02101,"1327,55154074809 ",.01)
 ;;55154074809
 ;;9002226.02101,"1327,55154074809 ",.02)
 ;;55154074809
 ;;9002226.02101,"1327,55154147300 ",.01)
 ;;55154147300
 ;;9002226.02101,"1327,55154147300 ",.02)
 ;;55154147300
 ;;9002226.02101,"1327,55154147600 ",.01)
 ;;55154147600
 ;;9002226.02101,"1327,55154147600 ",.02)
 ;;55154147600
 ;;9002226.02101,"1327,55154675200 ",.01)
 ;;55154675200
 ;;9002226.02101,"1327,55154675200 ",.02)
 ;;55154675200
 ;;9002226.02101,"1327,55154675500 ",.01)
 ;;55154675500
 ;;9002226.02101,"1327,55154675500 ",.02)
 ;;55154675500
 ;;9002226.02101,"1327,55154680809 ",.01)
 ;;55154680809
 ;;9002226.02101,"1327,55154680809 ",.02)
 ;;55154680809
 ;;9002226.02101,"1327,55289019101 ",.01)
 ;;55289019101
 ;;9002226.02101,"1327,55289019101 ",.02)
 ;;55289019101
 ;;9002226.02101,"1327,55289019130 ",.01)
 ;;55289019130
 ;;9002226.02101,"1327,55289019130 ",.02)
 ;;55289019130
 ;;9002226.02101,"1327,55289019135 ",.01)
 ;;55289019135
 ;;9002226.02101,"1327,55289019135 ",.02)
 ;;55289019135
 ;;9002226.02101,"1327,55289019190 ",.01)
 ;;55289019190
 ;;9002226.02101,"1327,55289019190 ",.02)
 ;;55289019190
 ;;9002226.02101,"1327,55289035601 ",.01)
 ;;55289035601
 ;;9002226.02101,"1327,55289035601 ",.02)
 ;;55289035601
 ;;9002226.02101,"1327,55289074324 ",.01)
 ;;55289074324
 ;;9002226.02101,"1327,55289074324 ",.02)
 ;;55289074324
 ;;9002226.02101,"1327,55289088601 ",.01)
 ;;55289088601
 ;;9002226.02101,"1327,55289088601 ",.02)
 ;;55289088601
 ;;9002226.02101,"1327,55289088635 ",.01)
 ;;55289088635
 ;;9002226.02101,"1327,55289088635 ",.02)
 ;;55289088635
 ;;9002226.02101,"1327,55289088690 ",.01)
 ;;55289088690
 ;;9002226.02101,"1327,55289088690 ",.02)
 ;;55289088690
 ;;9002226.02101,"1327,55289088698 ",.01)
 ;;55289088698
 ;;9002226.02101,"1327,55289088698 ",.02)
 ;;55289088698
 ;;9002226.02101,"1327,55312027748 ",.01)
 ;;55312027748
 ;;9002226.02101,"1327,55312027748 ",.02)
 ;;55312027748
 ;;9002226.02101,"1327,55312046768 ",.01)
 ;;55312046768
 ;;9002226.02101,"1327,55312046768 ",.02)
 ;;55312046768
 ;;9002226.02101,"1327,55312053576 ",.01)
 ;;55312053576
 ;;9002226.02101,"1327,55312053576 ",.02)
 ;;55312053576
 ;;9002226.02101,"1327,55316053576 ",.01)
 ;;55316053576
 ;;9002226.02101,"1327,55316053576 ",.02)
 ;;55316053576
 ;;9002226.02101,"1327,55567005400 ",.01)
 ;;55567005400
 ;;9002226.02101,"1327,55567005400 ",.02)
 ;;55567005400
 ;;9002226.02101,"1327,55567005407 ",.01)
 ;;55567005407
 ;;9002226.02101,"1327,55567005407 ",.02)
 ;;55567005407