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

BGP71J10.m

Go to the documentation of this file.
BGP71J10 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 11, 2016 ;
 ;;17.1;IHS CLINICAL REPORTING;;MAY 10, 2017;Build 29
 ;
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,"1795,35356-0671-12 ",.02)
 ;;35356-0671-12
 ;;9002226.02101,"1795,35356-0671-15 ",.01)
 ;;35356-0671-15
 ;;9002226.02101,"1795,35356-0671-15 ",.02)
 ;;35356-0671-15
 ;;9002226.02101,"1795,35356-0701-30 ",.01)
 ;;35356-0701-30
 ;;9002226.02101,"1795,35356-0701-30 ",.02)
 ;;35356-0701-30
 ;;9002226.02101,"1795,35356-0701-60 ",.01)
 ;;35356-0701-60
 ;;9002226.02101,"1795,35356-0701-60 ",.02)
 ;;35356-0701-60
 ;;9002226.02101,"1795,35356-0938-20 ",.01)
 ;;35356-0938-20
 ;;9002226.02101,"1795,35356-0938-20 ",.02)
 ;;35356-0938-20
 ;;9002226.02101,"1795,35356-0939-30 ",.01)
 ;;35356-0939-30
 ;;9002226.02101,"1795,35356-0939-30 ",.02)
 ;;35356-0939-30
 ;;9002226.02101,"1795,35356-0939-60 ",.01)
 ;;35356-0939-60
 ;;9002226.02101,"1795,35356-0939-60 ",.02)
 ;;35356-0939-60
 ;;9002226.02101,"1795,35356-0942-30 ",.01)
 ;;35356-0942-30
 ;;9002226.02101,"1795,35356-0942-30 ",.02)
 ;;35356-0942-30
 ;;9002226.02101,"1795,35356-0942-60 ",.01)
 ;;35356-0942-60
 ;;9002226.02101,"1795,35356-0942-60 ",.02)
 ;;35356-0942-60
 ;;9002226.02101,"1795,35573-0105-60 ",.01)
 ;;35573-0105-60
 ;;9002226.02101,"1795,35573-0105-60 ",.02)
 ;;35573-0105-60
 ;;9002226.02101,"1795,39822-5500-02 ",.01)
 ;;39822-5500-02
 ;;9002226.02101,"1795,39822-5500-02 ",.02)
 ;;39822-5500-02
 ;;9002226.02101,"1795,39822-5500-03 ",.01)
 ;;39822-5500-03
 ;;9002226.02101,"1795,39822-5500-03 ",.02)
 ;;39822-5500-03
 ;;9002226.02101,"1795,39822-5500-05 ",.01)
 ;;39822-5500-05
 ;;9002226.02101,"1795,39822-5500-05 ",.02)
 ;;39822-5500-05
 ;;9002226.02101,"1795,39822-5500-06 ",.01)
 ;;39822-5500-06
 ;;9002226.02101,"1795,39822-5500-06 ",.02)
 ;;39822-5500-06
 ;;9002226.02101,"1795,40076-0318-12 ",.01)
 ;;40076-0318-12
 ;;9002226.02101,"1795,40076-0318-12 ",.02)
 ;;40076-0318-12
 ;;9002226.02101,"1795,40076-0319-12 ",.01)
 ;;40076-0319-12
 ;;9002226.02101,"1795,40076-0319-12 ",.02)
 ;;40076-0319-12
 ;;9002226.02101,"1795,40076-0320-12 ",.01)
 ;;40076-0320-12
 ;;9002226.02101,"1795,40076-0320-12 ",.02)
 ;;40076-0320-12
 ;;9002226.02101,"1795,40085-0218-12 ",.01)
 ;;40085-0218-12
 ;;9002226.02101,"1795,40085-0218-12 ",.02)
 ;;40085-0218-12
 ;;9002226.02101,"1795,40085-0219-12 ",.01)
 ;;40085-0219-12
 ;;9002226.02101,"1795,40085-0219-12 ",.02)
 ;;40085-0219-12
 ;;9002226.02101,"1795,40085-0220-12 ",.01)
 ;;40085-0220-12
 ;;9002226.02101,"1795,40085-0220-12 ",.02)
 ;;40085-0220-12
 ;;9002226.02101,"1795,42192-0508-30 ",.01)
 ;;42192-0508-30
 ;;9002226.02101,"1795,42192-0508-30 ",.02)
 ;;42192-0508-30
 ;;9002226.02101,"1795,42192-0514-16 ",.01)
 ;;42192-0514-16
 ;;9002226.02101,"1795,42192-0514-16 ",.02)
 ;;42192-0514-16
 ;;9002226.02101,"1795,42254-0045-10 ",.01)
 ;;42254-0045-10
 ;;9002226.02101,"1795,42254-0045-10 ",.02)
 ;;42254-0045-10
 ;;9002226.02101,"1795,42254-0045-15 ",.01)
 ;;42254-0045-15
 ;;9002226.02101,"1795,42254-0045-15 ",.02)
 ;;42254-0045-15
 ;;9002226.02101,"1795,42254-0045-20 ",.01)
 ;;42254-0045-20
 ;;9002226.02101,"1795,42254-0045-20 ",.02)
 ;;42254-0045-20
 ;;9002226.02101,"1795,42254-0045-30 ",.01)
 ;;42254-0045-30
 ;;9002226.02101,"1795,42254-0045-30 ",.02)
 ;;42254-0045-30
 ;;9002226.02101,"1795,42254-0140-04 ",.01)
 ;;42254-0140-04
 ;;9002226.02101,"1795,42254-0140-04 ",.02)
 ;;42254-0140-04
 ;;9002226.02101,"1795,42291-0225-01 ",.01)
 ;;42291-0225-01
 ;;9002226.02101,"1795,42291-0225-01 ",.02)
 ;;42291-0225-01
 ;;9002226.02101,"1795,42291-0225-10 ",.01)
 ;;42291-0225-10
 ;;9002226.02101,"1795,42291-0225-10 ",.02)
 ;;42291-0225-10
 ;;9002226.02101,"1795,42291-0322-50 ",.01)
 ;;42291-0322-50
 ;;9002226.02101,"1795,42291-0322-50 ",.02)
 ;;42291-0322-50
 ;;9002226.02101,"1795,42291-0322-90 ",.01)
 ;;42291-0322-90
 ;;9002226.02101,"1795,42291-0322-90 ",.02)
 ;;42291-0322-90
 ;;9002226.02101,"1795,42291-0323-50 ",.01)
 ;;42291-0323-50
 ;;9002226.02101,"1795,42291-0323-50 ",.02)
 ;;42291-0323-50
 ;;9002226.02101,"1795,42291-0323-90 ",.01)
 ;;42291-0323-90
 ;;9002226.02101,"1795,42291-0323-90 ",.02)
 ;;42291-0323-90
 ;;9002226.02101,"1795,42549-0528-30 ",.01)
 ;;42549-0528-30
 ;;9002226.02101,"1795,42549-0528-30 ",.02)
 ;;42549-0528-30
 ;;9002226.02101,"1795,42549-0543-10 ",.01)
 ;;42549-0543-10
 ;;9002226.02101,"1795,42549-0543-10 ",.02)
 ;;42549-0543-10
 ;;9002226.02101,"1795,42549-0543-20 ",.01)
 ;;42549-0543-20
 ;;9002226.02101,"1795,42549-0543-20 ",.02)
 ;;42549-0543-20
 ;;9002226.02101,"1795,42549-0543-30 ",.01)
 ;;42549-0543-30
 ;;9002226.02101,"1795,42549-0543-30 ",.02)
 ;;42549-0543-30
 ;;9002226.02101,"1795,42806-0159-01 ",.01)
 ;;42806-0159-01
 ;;9002226.02101,"1795,42806-0159-01 ",.02)
 ;;42806-0159-01
 ;;9002226.02101,"1795,42806-0159-05 ",.01)
 ;;42806-0159-05
 ;;9002226.02101,"1795,42806-0159-05 ",.02)
 ;;42806-0159-05
 ;;9002226.02101,"1795,42806-0159-10 ",.01)
 ;;42806-0159-10
 ;;9002226.02101,"1795,42806-0159-10 ",.02)
 ;;42806-0159-10
 ;;9002226.02101,"1795,42806-0160-01 ",.01)
 ;;42806-0160-01
 ;;9002226.02101,"1795,42806-0160-01 ",.02)
 ;;42806-0160-01
 ;;9002226.02101,"1795,42806-0160-05 ",.01)
 ;;42806-0160-05
 ;;9002226.02101,"1795,42806-0160-05 ",.02)
 ;;42806-0160-05
 ;;9002226.02101,"1795,42806-0160-10 ",.01)
 ;;42806-0160-10
 ;;9002226.02101,"1795,42806-0160-10 ",.02)
 ;;42806-0160-10
 ;;9002226.02101,"1795,42806-0161-01 ",.01)
 ;;42806-0161-01
 ;;9002226.02101,"1795,42806-0161-01 ",.02)
 ;;42806-0161-01
 ;;9002226.02101,"1795,42806-0161-05 ",.01)
 ;;42806-0161-05
 ;;9002226.02101,"1795,42806-0161-05 ",.02)
 ;;42806-0161-05
 ;;9002226.02101,"1795,42806-0161-10 ",.01)
 ;;42806-0161-10
 ;;9002226.02101,"1795,42806-0161-10 ",.02)
 ;;42806-0161-10
 ;;9002226.02101,"1795,43063-0049-02 ",.01)
 ;;43063-0049-02
 ;;9002226.02101,"1795,43063-0049-02 ",.02)
 ;;43063-0049-02
 ;;9002226.02101,"1795,43063-0049-06 ",.01)
 ;;43063-0049-06
 ;;9002226.02101,"1795,43063-0049-06 ",.02)
 ;;43063-0049-06
 ;;9002226.02101,"1795,43063-0060-02 ",.01)
 ;;43063-0060-02
 ;;9002226.02101,"1795,43063-0060-02 ",.02)
 ;;43063-0060-02
 ;;9002226.02101,"1795,43063-0060-04 ",.01)
 ;;43063-0060-04
 ;;9002226.02101,"1795,43063-0060-04 ",.02)
 ;;43063-0060-04
 ;;9002226.02101,"1795,43063-0060-06 ",.01)
 ;;43063-0060-06
 ;;9002226.02101,"1795,43063-0060-06 ",.02)
 ;;43063-0060-06
 ;;9002226.02101,"1795,43063-0095-06 ",.01)
 ;;43063-0095-06
 ;;9002226.02101,"1795,43063-0095-06 ",.02)
 ;;43063-0095-06
 ;;9002226.02101,"1795,43063-0095-12 ",.01)
 ;;43063-0095-12
 ;;9002226.02101,"1795,43063-0095-12 ",.02)
 ;;43063-0095-12
 ;;9002226.02101,"1795,43063-0095-20 ",.01)
 ;;43063-0095-20
 ;;9002226.02101,"1795,43063-0095-20 ",.02)
 ;;43063-0095-20
 ;;9002226.02101,"1795,43063-0172-01 ",.01)
 ;;43063-0172-01
 ;;9002226.02101,"1795,43063-0172-01 ",.02)
 ;;43063-0172-01
 ;;9002226.02101,"1795,43063-0172-04 ",.01)
 ;;43063-0172-04
 ;;9002226.02101,"1795,43063-0172-04 ",.02)
 ;;43063-0172-04
 ;;9002226.02101,"1795,43063-0207-30 ",.01)
 ;;43063-0207-30
 ;;9002226.02101,"1795,43063-0207-30 ",.02)
 ;;43063-0207-30
 ;;9002226.02101,"1795,43063-0251-10 ",.01)
 ;;43063-0251-10
 ;;9002226.02101,"1795,43063-0251-10 ",.02)
 ;;43063-0251-10
 ;;9002226.02101,"1795,43063-0267-90 ",.01)
 ;;43063-0267-90
 ;;9002226.02101,"1795,43063-0267-90 ",.02)
 ;;43063-0267-90
 ;;9002226.02101,"1795,43063-0376-01 ",.01)
 ;;43063-0376-01
 ;;9002226.02101,"1795,43063-0376-01 ",.02)
 ;;43063-0376-01
 ;;9002226.02101,"1795,43063-0405-02 ",.01)
 ;;43063-0405-02
 ;;9002226.02101,"1795,43063-0405-02 ",.02)
 ;;43063-0405-02
 ;;9002226.02101,"1795,43063-0405-04 ",.01)
 ;;43063-0405-04
 ;;9002226.02101,"1795,43063-0405-04 ",.02)
 ;;43063-0405-04
 ;;9002226.02101,"1795,43063-0405-05 ",.01)
 ;;43063-0405-05
 ;;9002226.02101,"1795,43063-0405-05 ",.02)
 ;;43063-0405-05
 ;;9002226.02101,"1795,43063-0405-10 ",.01)
 ;;43063-0405-10
 ;;9002226.02101,"1795,43063-0405-10 ",.02)
 ;;43063-0405-10
 ;;9002226.02101,"1795,43063-0405-12 ",.01)
 ;;43063-0405-12
 ;;9002226.02101,"1795,43063-0405-12 ",.02)
 ;;43063-0405-12
 ;;9002226.02101,"1795,43063-0405-15 ",.01)
 ;;43063-0405-15
 ;;9002226.02101,"1795,43063-0405-15 ",.02)
 ;;43063-0405-15
 ;;9002226.02101,"1795,43063-0405-20 ",.01)
 ;;43063-0405-20
 ;;9002226.02101,"1795,43063-0405-20 ",.02)
 ;;43063-0405-20
 ;;9002226.02101,"1795,43063-0405-25 ",.01)
 ;;43063-0405-25
 ;;9002226.02101,"1795,43063-0405-25 ",.02)
 ;;43063-0405-25
 ;;9002226.02101,"1795,43063-0405-30 ",.01)
 ;;43063-0405-30
 ;;9002226.02101,"1795,43063-0405-30 ",.02)
 ;;43063-0405-30
 ;;9002226.02101,"1795,43063-0405-60 ",.01)
 ;;43063-0405-60
 ;;9002226.02101,"1795,43063-0405-60 ",.02)
 ;;43063-0405-60
 ;;9002226.02101,"1795,43063-0405-79 ",.01)
 ;;43063-0405-79
 ;;9002226.02101,"1795,43063-0405-79 ",.02)
 ;;43063-0405-79
 ;;9002226.02101,"1795,43063-0406-10 ",.01)
 ;;43063-0406-10
 ;;9002226.02101,"1795,43063-0406-10 ",.02)
 ;;43063-0406-10
 ;;9002226.02101,"1795,43063-0406-15 ",.01)
 ;;43063-0406-15
 ;;9002226.02101,"1795,43063-0406-15 ",.02)
 ;;43063-0406-15
 ;;9002226.02101,"1795,43063-0406-30 ",.01)
 ;;43063-0406-30
 ;;9002226.02101,"1795,43063-0406-30 ",.02)
 ;;43063-0406-30
 ;;9002226.02101,"1795,43063-0435-20 ",.01)
 ;;43063-0435-20
 ;;9002226.02101,"1795,43063-0435-20 ",.02)
 ;;43063-0435-20
 ;;9002226.02101,"1795,43063-0435-30 ",.01)
 ;;43063-0435-30
 ;;9002226.02101,"1795,43063-0435-30 ",.02)
 ;;43063-0435-30
 ;;9002226.02101,"1795,43063-0447-04 ",.01)
 ;;43063-0447-04
 ;;9002226.02101,"1795,43063-0447-04 ",.02)
 ;;43063-0447-04
 ;;9002226.02101,"1795,43063-0517-60 ",.01)
 ;;43063-0517-60
 ;;9002226.02101,"1795,43063-0517-60 ",.02)
 ;;43063-0517-60
 ;;9002226.02101,"1795,43063-0518-06 ",.01)
 ;;43063-0518-06
 ;;9002226.02101,"1795,43063-0518-06 ",.02)
 ;;43063-0518-06
 ;;9002226.02101,"1795,43063-0518-28 ",.01)
 ;;43063-0518-28
 ;;9002226.02101,"1795,43063-0518-28 ",.02)
 ;;43063-0518-28
 ;;9002226.02101,"1795,43063-0518-40 ",.01)
 ;;43063-0518-40
 ;;9002226.02101,"1795,43063-0518-40 ",.02)
 ;;43063-0518-40
 ;;9002226.02101,"1795,43063-0518-90 ",.01)
 ;;43063-0518-90
 ;;9002226.02101,"1795,43063-0518-90 ",.02)
 ;;43063-0518-90
 ;;9002226.02101,"1795,43093-0104-01 ",.01)
 ;;43093-0104-01
 ;;9002226.02101,"1795,43093-0104-01 ",.02)
 ;;43093-0104-01
 ;;9002226.02101,"1795,43353-0094-30 ",.01)
 ;;43353-0094-30
 ;;9002226.02101,"1795,43353-0094-30 ",.02)
 ;;43353-0094-30
 ;;9002226.02101,"1795,43353-0094-53 ",.01)
 ;;43353-0094-53
 ;;9002226.02101,"1795,43353-0094-53 ",.02)
 ;;43353-0094-53
 ;;9002226.02101,"1795,43353-0094-60 ",.01)
 ;;43353-0094-60
 ;;9002226.02101,"1795,43353-0094-60 ",.02)
 ;;43353-0094-60
 ;;9002226.02101,"1795,43353-0094-70 ",.01)
 ;;43353-0094-70
 ;;9002226.02101,"1795,43353-0094-70 ",.02)
 ;;43353-0094-70
 ;;9002226.02101,"1795,43353-0199-30 ",.01)
 ;;43353-0199-30
 ;;9002226.02101,"1795,43353-0199-30 ",.02)
 ;;43353-0199-30
 ;;9002226.02101,"1795,43353-0199-53 ",.01)
 ;;43353-0199-53
 ;;9002226.02101,"1795,43353-0199-53 ",.02)
 ;;43353-0199-53
 ;;9002226.02101,"1795,43353-0199-60 ",.01)
 ;;43353-0199-60
 ;;9002226.02101,"1795,43353-0199-60 ",.02)
 ;;43353-0199-60
 ;;9002226.02101,"1795,43353-0199-70 ",.01)
 ;;43353-0199-70
 ;;9002226.02101,"1795,43353-0199-70 ",.02)
 ;;43353-0199-70
 ;;9002226.02101,"1795,43353-0199-80 ",.01)
 ;;43353-0199-80
 ;;9002226.02101,"1795,43353-0199-80 ",.02)
 ;;43353-0199-80
 ;;9002226.02101,"1795,43353-0796-30 ",.01)
 ;;43353-0796-30
 ;;9002226.02101,"1795,43353-0796-30 ",.02)
 ;;43353-0796-30
 ;;9002226.02101,"1795,43353-0796-53 ",.01)
 ;;43353-0796-53
 ;;9002226.02101,"1795,43353-0796-53 ",.02)
 ;;43353-0796-53
 ;;9002226.02101,"1795,43353-0913-09 ",.01)
 ;;43353-0913-09
 ;;9002226.02101,"1795,43353-0913-09 ",.02)
 ;;43353-0913-09