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

BGPM5AQD.m

Go to the documentation of this file.
  1. BGPM5AQD ;IHS/MSC/SAT-CREATED BY ^ATXSTX ON AUG 16, 2011;
  1. ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;21,"60505269101 ")
  1. ;;3467
  1. ;;21,"60598008001 ")
  1. ;;3468
  1. ;;21,"60598010001 ")
  1. ;;3469
  1. ;;21,"60598010101 ")
  1. ;;3470
  1. ;;21,"60763101100 ")
  1. ;;3471
  1. ;;21,"60763101102 ")
  1. ;;3472
  1. ;;21,"60763101200 ")
  1. ;;3473
  1. ;;21,"60763101202 ")
  1. ;;3474
  1. ;;21,"60763101300 ")
  1. ;;3475
  1. ;;21,"60763101302 ")
  1. ;;3476
  1. ;;21,"60763101400 ")
  1. ;;3477
  1. ;;21,"60793071001 ")
  1. ;;3478
  1. ;;21,"60793071005 ")
  1. ;;3479
  1. ;;21,"60793071101 ")
  1. ;;3480
  1. ;;21,"60793071105 ")
  1. ;;3481
  1. ;;21,"60793071180 ")
  1. ;;3482
  1. ;;21,"60793071201 ")
  1. ;;3483
  1. ;;21,"60793091001 ")
  1. ;;3484
  1. ;;21,"60793091005 ")
  1. ;;3485
  1. ;;21,"60793091101 ")
  1. ;;3486
  1. ;;21,"60793091105 ")
  1. ;;3487
  1. ;;21,"60793091501 ")
  1. ;;3488
  1. ;;21,"60793091505 ")
  1. ;;3489
  1. ;;21,"60793091507 ")
  1. ;;3490
  1. ;;21,"60951072170 ")
  1. ;;3491
  1. ;;21,"60951072270 ")
  1. ;;3492
  1. ;;21,"60951072470 ")
  1. ;;3493
  1. ;;21,"60951072770 ")
  1. ;;3494
  1. ;;21,"60951073170 ")
  1. ;;3495
  1. ;;21,"60951073370 ")
  1. ;;3496
  1. ;;21,"60951073970 ")
  1. ;;3497
  1. ;;21,"60951074170 ")
  1. ;;3498
  1. ;;21,"61392042625 ")
  1. ;;3499
  1. ;;21,"61392042630 ")
  1. ;;3500
  1. ;;21,"61392045425 ")
  1. ;;3501
  1. ;;21,"61392045430 ")
  1. ;;3502
  1. ;;21,"61392045431 ")
  1. ;;3503
  1. ;;21,"61392045439 ")
  1. ;;3504
  1. ;;21,"61392047425 ")
  1. ;;3505
  1. ;;21,"61392047430 ")
  1. ;;3506
  1. ;;21,"61392047431 ")
  1. ;;3507
  1. ;;21,"61392047439 ")
  1. ;;3508
  1. ;;21,"61392060425 ")
  1. ;;3509
  1. ;;21,"61392060430 ")
  1. ;;3510
  1. ;;21,"61392060460 ")
  1. ;;3511
  1. ;;21,"61392060490 ")
  1. ;;3512
  1. ;;21,"61392060525 ")
  1. ;;3513
  1. ;;21,"61392060530 ")
  1. ;;3514
  1. ;;21,"61392060531 ")
  1. ;;3515
  1. ;;21,"61392060539 ")
  1. ;;3516
  1. ;;21,"61392060560 ")
  1. ;;3517
  1. ;;21,"61392060565 ")
  1. ;;3518
  1. ;;21,"61392060590 ")
  1. ;;3519
  1. ;;21,"61392060595 ")
  1. ;;3520
  1. ;;21,"61392064925 ")
  1. ;;3521
  1. ;;21,"61392064930 ")
  1. ;;3522
  1. ;;21,"61392064931 ")
  1. ;;3523
  1. ;;21,"61392064939 ")
  1. ;;3524
  1. ;;21,"61392064960 ")
  1. ;;3525
  1. ;;21,"61392064965 ")
  1. ;;3526
  1. ;;21,"61392064990 ")
  1. ;;3527
  1. ;;21,"61392064995 ")
  1. ;;3528
  1. ;;21,"61392065025 ")
  1. ;;3529
  1. ;;21,"61392065030 ")
  1. ;;3530
  1. ;;21,"61392065031 ")
  1. ;;3531
  1. ;;21,"61392065039 ")
  1. ;;3532
  1. ;;21,"61392065060 ")
  1. ;;3533
  1. ;;21,"61392065065 ")
  1. ;;3534
  1. ;;21,"61392065090 ")
  1. ;;3535
  1. ;;21,"61392065095 ")
  1. ;;3536
  1. ;;21,"61392065125 ")
  1. ;;3537
  1. ;;21,"61392065130 ")
  1. ;;3538
  1. ;;21,"61392065131 ")
  1. ;;3539
  1. ;;21,"61392065139 ")
  1. ;;3540
  1. ;;21,"61392065160 ")
  1. ;;3541
  1. ;;21,"61392065165 ")
  1. ;;3542
  1. ;;21,"61392065190 ")
  1. ;;3543
  1. ;;21,"61392065195 ")
  1. ;;3544
  1. ;;21,"61392065225 ")
  1. ;;3545
  1. ;;21,"61392065230 ")
  1. ;;3546
  1. ;;21,"61392065231 ")
  1. ;;3547
  1. ;;21,"61392065239 ")
  1. ;;3548
  1. ;;21,"61392065260 ")
  1. ;;3549
  1. ;;21,"61392065265 ")
  1. ;;3550
  1. ;;21,"61392065290 ")
  1. ;;3551
  1. ;;21,"61392065295 ")
  1. ;;3552
  1. ;;21,"61392069323 ")
  1. ;;3553
  1. ;;21,"61392069325 ")
  1. ;;3554
  1. ;;21,"61392069330 ")
  1. ;;3555
  1. ;;21,"61392069331 ")
  1. ;;3556
  1. ;;21,"61392069339 ")
  1. ;;3557
  1. ;;21,"61392069360 ")
  1. ;;3558
  1. ;;21,"61392069365 ")
  1. ;;3559
  1. ;;21,"61392069390 ")
  1. ;;3560
  1. ;;21,"61392069395 ")
  1. ;;3561
  1. ;;21,"61392069423 ")
  1. ;;3562
  1. ;;21,"61392069425 ")
  1. ;;3563
  1. ;;21,"61392069430 ")
  1. ;;3564
  1. ;;21,"61392069431 ")
  1. ;;3565
  1. ;;21,"61392069439 ")
  1. ;;3566
  1. ;;21,"61392069460 ")
  1. ;;3567
  1. ;;21,"61392069465 ")
  1. ;;3568
  1. ;;21,"61392069490 ")
  1. ;;3569
  1. ;;21,"61392069495 ")
  1. ;;3570
  1. ;;21,"61392069525 ")
  1. ;;3571
  1. ;;21,"61392069530 ")
  1. ;;3572
  1. ;;21,"61392069531 ")
  1. ;;3573
  1. ;;21,"61392069539 ")
  1. ;;3574
  1. ;;21,"61392069560 ")
  1. ;;3575
  1. ;;21,"61392069625 ")
  1. ;;3576
  1. ;;21,"61392069630 ")
  1. ;;3577
  1. ;;21,"61392069660 ")
  1. ;;3578
  1. ;;21,"61392069690 ")
  1. ;;3579
  1. ;;21,"61392069725 ")
  1. ;;3580
  1. ;;21,"61392069730 ")
  1. ;;3581
  1. ;;21,"61392069731 ")
  1. ;;3582
  1. ;;21,"61392069739 ")
  1. ;;3583
  1. ;;21,"61392069760 ")
  1. ;;3584
  1. ;;21,"61392069765 ")
  1. ;;3585
  1. ;;21,"61392069790 ")
  1. ;;3586
  1. ;;21,"61392069795 ")
  1. ;;3587
  1. ;;21,"61392069825 ")
  1. ;;3588
  1. ;;21,"61392069830 ")
  1. ;;3589
  1. ;;21,"61392069831 ")
  1. ;;3590
  1. ;;21,"61392069839 ")
  1. ;;3591
  1. ;;21,"61392069860 ")
  1. ;;3592
  1. ;;21,"61392069865 ")
  1. ;;3593
  1. ;;21,"61392069890 ")
  1. ;;3594
  1. ;;21,"61392069895 ")
  1. ;;3595
  1. ;;21,"61392086831 ")
  1. ;;3596
  1. ;;21,"61392086839 ")
  1. ;;3597
  1. ;;21,"61392088631 ")
  1. ;;3598
  1. ;;21,"61392088639 ")
  1. ;;3599
  1. ;;21,"61392089831 ")
  1. ;;3600
  1. ;;21,"61392089839 ")
  1. ;;3601
  1. ;;21,"61392092925 ")
  1. ;;3602
  1. ;;21,"61392092930 ")
  1. ;;3603
  1. ;;21,"61392092931 ")
  1. ;;3604
  1. ;;21,"61392092939 ")
  1. ;;3605
  1. ;;21,"61392092960 ")
  1. ;;3606
  1. ;;21,"61392092965 ")
  1. ;;3607
  1. ;;21,"61392092990 ")
  1. ;;3608
  1. ;;21,"61392092995 ")
  1. ;;3609
  1. ;;21,"61392093025 ")
  1. ;;3610
  1. ;;21,"61392093030 ")
  1. ;;3611
  1. ;;21,"61392093031 ")
  1. ;;3612
  1. ;;21,"61392093039 ")
  1. ;;3613
  1. ;;21,"61392093060 ")
  1. ;;3614
  1. ;;21,"61392093065 ")
  1. ;;3615
  1. ;;21,"61392093090 ")
  1. ;;3616
  1. ;;21,"61392093095 ")
  1. ;;3617
  1. ;;21,"61392093125 ")
  1. ;;3618
  1. ;;21,"61392093130 ")
  1. ;;3619
  1. ;;21,"61392093131 ")
  1. ;;3620
  1. ;;21,"61392093139 ")
  1. ;;3621
  1. ;;21,"61392093160 ")
  1. ;;3622
  1. ;;21,"61392093165 ")
  1. ;;3623
  1. ;;21,"61392093190 ")
  1. ;;3624
  1. ;;21,"61392093195 ")
  1. ;;3625
  1. ;;21,"61392093225 ")
  1. ;;3626
  1. ;;21,"61392093230 ")
  1. ;;3627
  1. ;;21,"61392093231 ")
  1. ;;3628
  1. ;;21,"61392093239 ")
  1. ;;3629
  1. ;;21,"61392093260 ")
  1. ;;3630
  1. ;;21,"61392093265 ")
  1. ;;3631
  1. ;;21,"61392093290 ")
  1. ;;3632
  1. ;;21,"61392093295 ")
  1. ;;3633
  1. ;;21,"61570011001 ")
  1. ;;3634
  1. ;;21,"61570011056 ")
  1. ;;3635
  1. ;;21,"61570011101 ")
  1. ;;3636
  1. ;;21,"61570011105 ")
  1. ;;3637
  1. ;;21,"61570011107 ")
  1. ;;3638
  1. ;;21,"61570011150 ")
  1. ;;3639
  1. ;;21,"61570011156 ")
  1. ;;3640
  1. ;;21,"61570011201 ")
  1. ;;3641
  1. ;;21,"61570011205 ")
  1. ;;3642
  1. ;;21,"61570011207 ")
  1. ;;3643
  1. ;;21,"61570011250 ")
  1. ;;3644
  1. ;;21,"61570011256 ")
  1. ;;3645
  1. ;;21,"61570012001 ")
  1. ;;3646
  1. ;;21,"61570012005 ")
  1. ;;3647
  1. ;;21,"61570012007 ")
  1. ;;3648
  1. ;;21,"61570012080 ")
  1. ;;3649
  1. ;;21,"61703023716 ")
  1. ;;3650
  1. ;;21,"61703023744 ")
  1. ;;3651
  1. ;;21,"62022094501 ")
  1. ;;3652
  1. ;;21,"62022094505 ")
  1. ;;3653
  1. ;;21,"62022094510 ")
  1. ;;3654
  1. ;;21,"62022094601 ")
  1. ;;3655
  1. ;;21,"62022094605 ")
  1. ;;3656
  1. ;;21,"62022094610 ")
  1. ;;3657
  1. ;;21,"62033010120 ")
  1. ;;3658
  1. ;;21,"62037053110 ")
  1. ;;3659
  1. ;;21,"62037053190 ")
  1. ;;3660
  1. ;;21,"62037053210 ")
  1. ;;3661
  1. ;;21,"62037053290 ")
  1. ;;3662
  1. ;;21,"62037053310 ")
  1. ;;3663
  1. ;;21,"62037053390 ")
  1. ;;3664
  1. ;;21,"62037053410 ")
  1. ;;3665
  1. ;;21,"62037053490 ")
  1. ;;3666
  1. ;;21,"62037093505 ")
  1. ;;3667
  1. ;;21,"62037093510 ")
  1. ;;3668
  1. ;;21,"62037093530 ")
  1. ;;3669
  1. ;;21,"62037093590 ")
  1. ;;3670
  1. ;;21,"62037093605 ")
  1. ;;3671
  1. ;;21,"62037093610 ")
  1. ;;3672
  1. ;;21,"62037093630 ")
  1. ;;3673
  1. ;;21,"62037093690 ")
  1. ;;3674
  1. ;;21,"62037093705 ")
  1. ;;3675
  1. ;;21,"62037093710 ")
  1. ;;3676
  1. ;;21,"62037093730 ")
  1. ;;3677
  1. ;;21,"62037093790 ")
  1. ;;3678
  1. ;;21,"62175017137 ")
  1. ;;3679
  1. ;;21,"62175017737 ")
  1. ;;3680
  1. ;;21,"62301004444 ")
  1. ;;3681
  1. ;;21,"62301006767 ")
  1. ;;3682
  1. ;;21,"62301006969 ")
  1. ;;3683
  1. ;;21,"62318018400 ")
  1. ;;3684
  1. ;;21,"62318018401 ")
  1. ;;3685
  1. ;;21,"62318018500 ")
  1. ;;3686
  1. ;;21,"62318018501 ")
  1. ;;3687
  1. ;;21,"62318018600 ")
  1. ;;3688
  1. ;;21,"62318018601 ")
  1. ;;3689
  1. ;;21,"62318018700 ")
  1. ;;3690
  1. ;;21,"62318018701 ")
  1. ;;3691
  1. ;;21,"62318018800 ")
  1. ;;3692
  1. ;;21,"62318018801 ")
  1. ;;3693
  1. ;;21,"62318018900 ")
  1. ;;3694
  1. ;;21,"62318018901 ")
  1. ;;3695
  1. ;;21,"62540722203 ")
  1. ;;3696
  1. ;;21,"62540722205 ")
  1. ;;3697
  1. ;;21,"62540722303 ")
  1. ;;3698
  1. ;;21,"62540722305 ")
  1. ;;3699
  1. ;;21,"62540722403 ")
  1. ;;3700
  1. ;;21,"62540722405 ")
  1. ;;3701
  1. ;;21,"62584016041 ")
  1. ;;3702
  1. ;;21,"62584016045 ")
  1. ;;3703
  1. ;;21,"62584032250 ")
  1. ;;3704
  1. ;;21,"62584032450 ")
  1. ;;3705
  1. ;;21,"62584043550 ")
  1. ;;3706
  1. ;;21,"62584048250 ")
  1. ;;3707
  1. ;;21,"62584048350 ")
  1. ;;3708
  1. ;;21,"62584048450 ")
  1. ;;3709
  1. ;;21,"62584048541 ")
  1. ;;3710
  1. ;;21,"62584048641 ")
  1. ;;3711
  1. ;;21,"62584092550 ")
  1. ;;3712
  1. ;;21,"62584092590 ")
  1. ;;3713
  1. ;;21,"62584096200 ")
  1. ;;3714
  1. ;;21,"62584096250 ")
  1. ;;3715
  1. ;;21,"62584096585 ")
  1. ;;3716
  1. ;;21,"62645040110 ")
  1. ;;3717
  1. ;;21,"62756031008 ")
  1. ;;3718
  1. ;;21,"62756031018 ")
  1. ;;3719
  1. ;;21,"62756031081 ")
  1. ;;3720
  1. ;;21,"62756031083 ")
  1. ;;3721
  1. ;;21,"62756031088 ")
  1. ;;3722
  1. ;;21,"62756031108 ")
  1. ;;3723
  1. ;;21,"62756031118 ")
  1. ;;3724
  1. ;;21,"62756031181 ")
  1. ;;3725
  1. ;;21,"62756031183 ")
  1. ;;3726
  1. ;;21,"62756031188 ")
  1. ;;3727
  1. ;;21,"62756031208 ")
  1. ;;3728
  1. ;;21,"62756031218 ")
  1. ;;3729
  1. ;;21,"62756031281 ")
  1. ;;3730
  1. ;;21,"62756031283 ")
  1. ;;3731
  1. ;;21,"62756031288 ")
  1. ;;3732
  1. ;;21,"62756031308 ")
  1. ;;3733
  1. ;;21,"62756031318 ")
  1. ;;3734
  1. ;;21,"62756031381 ")
  1. ;;3735
  1. ;;21,"62756031383 ")
  1. ;;3736
  1. ;;21,"62756031388 ")
  1. ;;3737
  1. ;;21,"62778008101 ")
  1. ;;3738
  1. ;;21,"62778008102 ")
  1. ;;3739
  1. ;;21,"62778008201 ")
  1. ;;3740
  1. ;;21,"62778008202 ")
  1. ;;3741
  1. ;;21,"63304040301 ")
  1. ;;3742
  1. ;;21,"63304040310 ")
  1. ;;3743
  1. ;;21,"63304040330 ")
  1. ;;3744
  1. ;;21,"63304040401 ")
  1. ;;3745
  1. ;;21,"63304040410 ")
  1. ;;3746
  1. ;;21,"63304040430 ")
  1. ;;3747
  1. ;;21,"63304052201 ")
  1. ;;3748
  1. ;;21,"63304052210 ")
  1. ;;3749
  1. ;;21,"63304052301 ")
  1. ;;3750
  1. ;;21,"63304052310 ")
  1. ;;3751
  1. ;;21,"63304052401 ")
  1. ;;3752
  1. ;;21,"63304052410 ")
  1. ;;3753
  1. ;;21,"63304052501 ")
  1. ;;3754
  1. ;;21,"63304052510 ")
  1. ;;3755
  1. ;;21,"63304053101 ")
  1. ;;3756
  1. ;;21,"63304053111 ")
  1. ;;3757
  1. ;;21,"63304053177 ")
  1. ;;3758
  1. ;;21,"63304053201 ")
  1. ;;3759
  1. ;;21,"63304053210 ")
  1. ;;3760
  1. ;;21,"63304053211 ")
  1. ;;3761
  1. ;;21,"63304053277 ")
  1. ;;3762
  1. ;;21,"63304053301 ")
  1. ;;3763
  1. ;;21,"63304053310 ")
  1. ;;3764
  1. ;;21,"63304053311 ")
  1. ;;3765
  1. ;;21,"63304053377 ")
  1. ;;3766
  1. ;;21,"63304053401 ")
  1. ;;3767
  1. ;;21,"63304053410 ")
  1. ;;3768
  1. ;;21,"63304053411 ")
  1. ;;3769
  1. ;;21,"63304053477 ")
  1. ;;3770
  1. ;;21,"63304053501 ")
  1. ;;3771
  1. ;;21,"63304053510 ")
  1. ;;3772
  1. ;;21,"63304053511 ")
  1. ;;3773
  1. ;;21,"63304053577 ")
  1. ;;3774
  1. ;;21,"63304053601 ")
  1. ;;3775
  1. ;;21,"63304053605 ")
  1. ;;3776
  1. ;;21,"63304053701 ")
  1. ;;3777
  1. ;;21,"63304053705 ")
  1. ;;3778
  1. ;;21,"63304053801 ")
  1. ;;3779
  1. ;;21,"63304053805 ")
  1. ;;3780
  1. ;;21,"63304054890 ")
  1. ;;3781
  1. ;;21,"63304054990 ")
  1. ;;3782
  1. ;;21,"63304055090 ")
  1. ;;3783
  1. ;;21,"63304055190 ")
  1. ;;3784
  1. ;;21,"63304059901 ")
  1. ;;3785
  1. ;;21,"63304059910 ")
  1. ;;3786
  1. ;;21,"63304077501 ")
  1. ;;3787
  1. ;;21,"63304077505 ")
  1. ;;3788
  1. ;;21,"63304077510 ")
  1. ;;3789
  1. ;;21,"63304077530 ")
  1. ;;3790
  1. ;;21,"63304077590 ")
  1. ;;3791
  1. ;;21,"63304077601 ")
  1. ;;3792
  1. ;;21,"63304077605 ")
  1. ;;3793
  1. ;;21,"63304077610 ")
  1. ;;3794
  1. ;;21,"63304077630 ")
  1. ;;3795
  1. ;;21,"63304077690 ")
  1. ;;3796
  1. ;;21,"63304077701 ")
  1. ;;3797
  1. ;;21,"63304077705 ")
  1. ;;3798
  1. ;;21,"63304077710 ")
  1. ;;3799
  1. ;;21,"63304077730 ")
  1. ;;3800
  1. ;;21,"63304077790 ")
  1. ;;3801
  1. ;;21,"63304083401 ")
  1. ;;3802
  1. ;;21,"63304083410 ")
  1. ;;3803
  1. ;;21,"63304083501 ")
  1. ;;3804
  1. ;;21,"63304083510 ")
  1. ;;3805
  1. ;;21,"63304083601 ")
  1. ;;3806
  1. ;;21,"63304083610 ")
  1. ;;3807
  1. ;;21,"63304083701 ")
  1. ;;3808
  1. ;;21,"63304083710 ")
  1. ;;3809
  1. ;;21,"63629124001 ")
  1. ;;3810
  1. ;;21,"63629124101 ")
  1. ;;3811
  1. ;;21,"63629124201 ")
  1. ;;3812
  1. ;;21,"63629133801 ")
  1. ;;3813
  1. ;;21,"63629133802 ")
  1. ;;3814
  1. ;;21,"63629133803 ")
  1. ;;3815
  1. ;;21,"63629152201 ")
  1. ;;3816
  1. ;;21,"63629152202 ")
  1. ;;3817
  1. ;;21,"63629152203 ")
  1. ;;3818