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

BGP47Y33.m

Go to the documentation of this file.
BGP47Y33 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAR 17, 2014;
 ;;14.1;IHS CLINICAL REPORTING;;MAY 29, 2014;Build 114
 ;
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,"1729,43353-0350-60 ",.02)
 ;;43353-0350-60
 ;;9002226.02101,"1729,43353-0350-80 ",.01)
 ;;43353-0350-80
 ;;9002226.02101,"1729,43353-0350-80 ",.02)
 ;;43353-0350-80
 ;;9002226.02101,"1729,43353-0365-15 ",.01)
 ;;43353-0365-15
 ;;9002226.02101,"1729,43353-0365-15 ",.02)
 ;;43353-0365-15
 ;;9002226.02101,"1729,43353-0365-30 ",.01)
 ;;43353-0365-30
 ;;9002226.02101,"1729,43353-0365-30 ",.02)
 ;;43353-0365-30
 ;;9002226.02101,"1729,43353-0365-45 ",.01)
 ;;43353-0365-45
 ;;9002226.02101,"1729,43353-0365-45 ",.02)
 ;;43353-0365-45
 ;;9002226.02101,"1729,43353-0365-60 ",.01)
 ;;43353-0365-60
 ;;9002226.02101,"1729,43353-0365-60 ",.02)
 ;;43353-0365-60
 ;;9002226.02101,"1729,43353-0371-15 ",.01)
 ;;43353-0371-15
 ;;9002226.02101,"1729,43353-0371-15 ",.02)
 ;;43353-0371-15
 ;;9002226.02101,"1729,43353-0371-30 ",.01)
 ;;43353-0371-30
 ;;9002226.02101,"1729,43353-0371-30 ",.02)
 ;;43353-0371-30
 ;;9002226.02101,"1729,43353-0371-45 ",.01)
 ;;43353-0371-45
 ;;9002226.02101,"1729,43353-0371-45 ",.02)
 ;;43353-0371-45
 ;;9002226.02101,"1729,43353-0371-60 ",.01)
 ;;43353-0371-60
 ;;9002226.02101,"1729,43353-0371-60 ",.02)
 ;;43353-0371-60
 ;;9002226.02101,"1729,43353-0371-80 ",.01)
 ;;43353-0371-80
 ;;9002226.02101,"1729,43353-0371-80 ",.02)
 ;;43353-0371-80
 ;;9002226.02101,"1729,43353-0411-60 ",.01)
 ;;43353-0411-60
 ;;9002226.02101,"1729,43353-0411-60 ",.02)
 ;;43353-0411-60
 ;;9002226.02101,"1729,43353-0459-45 ",.01)
 ;;43353-0459-45
 ;;9002226.02101,"1729,43353-0459-45 ",.02)
 ;;43353-0459-45
 ;;9002226.02101,"1729,43353-0488-45 ",.01)
 ;;43353-0488-45
 ;;9002226.02101,"1729,43353-0488-45 ",.02)
 ;;43353-0488-45
 ;;9002226.02101,"1729,43353-0488-60 ",.01)
 ;;43353-0488-60
 ;;9002226.02101,"1729,43353-0488-60 ",.02)
 ;;43353-0488-60
 ;;9002226.02101,"1729,43353-0516-45 ",.01)
 ;;43353-0516-45
 ;;9002226.02101,"1729,43353-0516-45 ",.02)
 ;;43353-0516-45
 ;;9002226.02101,"1729,43353-0521-60 ",.01)
 ;;43353-0521-60
 ;;9002226.02101,"1729,43353-0521-60 ",.02)
 ;;43353-0521-60
 ;;9002226.02101,"1729,43353-0521-80 ",.01)
 ;;43353-0521-80
 ;;9002226.02101,"1729,43353-0521-80 ",.02)
 ;;43353-0521-80
 ;;9002226.02101,"1729,43353-0596-30 ",.01)
 ;;43353-0596-30
 ;;9002226.02101,"1729,43353-0596-30 ",.02)
 ;;43353-0596-30
 ;;9002226.02101,"1729,43353-0596-60 ",.01)
 ;;43353-0596-60
 ;;9002226.02101,"1729,43353-0596-60 ",.02)
 ;;43353-0596-60
 ;;9002226.02101,"1729,43353-0626-60 ",.01)
 ;;43353-0626-60
 ;;9002226.02101,"1729,43353-0626-60 ",.02)
 ;;43353-0626-60
 ;;9002226.02101,"1729,43353-0643-60 ",.01)
 ;;43353-0643-60
 ;;9002226.02101,"1729,43353-0643-60 ",.02)
 ;;43353-0643-60
 ;;9002226.02101,"1729,43353-0655-60 ",.01)
 ;;43353-0655-60
 ;;9002226.02101,"1729,43353-0655-60 ",.02)
 ;;43353-0655-60
 ;;9002226.02101,"1729,43353-0662-80 ",.01)
 ;;43353-0662-80
 ;;9002226.02101,"1729,43353-0662-80 ",.02)
 ;;43353-0662-80
 ;;9002226.02101,"1729,43353-0667-60 ",.01)
 ;;43353-0667-60
 ;;9002226.02101,"1729,43353-0667-60 ",.02)
 ;;43353-0667-60
 ;;9002226.02101,"1729,43353-0668-45 ",.01)
 ;;43353-0668-45
 ;;9002226.02101,"1729,43353-0668-45 ",.02)
 ;;43353-0668-45
 ;;9002226.02101,"1729,43353-0668-60 ",.01)
 ;;43353-0668-60
 ;;9002226.02101,"1729,43353-0668-60 ",.02)
 ;;43353-0668-60
 ;;9002226.02101,"1729,43353-0671-30 ",.01)
 ;;43353-0671-30
 ;;9002226.02101,"1729,43353-0671-30 ",.02)
 ;;43353-0671-30
 ;;9002226.02101,"1729,43353-0671-45 ",.01)
 ;;43353-0671-45
 ;;9002226.02101,"1729,43353-0671-45 ",.02)
 ;;43353-0671-45
 ;;9002226.02101,"1729,43353-0676-60 ",.01)
 ;;43353-0676-60
 ;;9002226.02101,"1729,43353-0676-60 ",.02)
 ;;43353-0676-60
 ;;9002226.02101,"1729,43353-0712-60 ",.01)
 ;;43353-0712-60
 ;;9002226.02101,"1729,43353-0712-60 ",.02)
 ;;43353-0712-60
 ;;9002226.02101,"1729,43353-0722-60 ",.01)
 ;;43353-0722-60
 ;;9002226.02101,"1729,43353-0722-60 ",.02)
 ;;43353-0722-60
 ;;9002226.02101,"1729,43353-0726-60 ",.01)
 ;;43353-0726-60
 ;;9002226.02101,"1729,43353-0726-60 ",.02)
 ;;43353-0726-60
 ;;9002226.02101,"1729,43353-0726-80 ",.01)
 ;;43353-0726-80
 ;;9002226.02101,"1729,43353-0726-80 ",.02)
 ;;43353-0726-80
 ;;9002226.02101,"1729,43353-0728-60 ",.01)
 ;;43353-0728-60
 ;;9002226.02101,"1729,43353-0728-60 ",.02)
 ;;43353-0728-60
 ;;9002226.02101,"1729,43353-0729-30 ",.01)
 ;;43353-0729-30
 ;;9002226.02101,"1729,43353-0729-30 ",.02)
 ;;43353-0729-30
 ;;9002226.02101,"1729,43353-0729-45 ",.01)
 ;;43353-0729-45
 ;;9002226.02101,"1729,43353-0729-45 ",.02)
 ;;43353-0729-45
 ;;9002226.02101,"1729,43353-0729-60 ",.01)
 ;;43353-0729-60
 ;;9002226.02101,"1729,43353-0729-60 ",.02)
 ;;43353-0729-60
 ;;9002226.02101,"1729,43353-0730-30 ",.01)
 ;;43353-0730-30
 ;;9002226.02101,"1729,43353-0730-30 ",.02)
 ;;43353-0730-30
 ;;9002226.02101,"1729,43353-0730-60 ",.01)
 ;;43353-0730-60
 ;;9002226.02101,"1729,43353-0730-60 ",.02)
 ;;43353-0730-60
 ;;9002226.02101,"1729,43353-0800-60 ",.01)
 ;;43353-0800-60
 ;;9002226.02101,"1729,43353-0800-60 ",.02)
 ;;43353-0800-60
 ;;9002226.02101,"1729,43353-0865-60 ",.01)
 ;;43353-0865-60
 ;;9002226.02101,"1729,43353-0865-60 ",.02)
 ;;43353-0865-60
 ;;9002226.02101,"1729,43353-0865-80 ",.01)
 ;;43353-0865-80
 ;;9002226.02101,"1729,43353-0865-80 ",.02)
 ;;43353-0865-80
 ;;9002226.02101,"1729,43353-0866-30 ",.01)
 ;;43353-0866-30
 ;;9002226.02101,"1729,43353-0866-30 ",.02)
 ;;43353-0866-30
 ;;9002226.02101,"1729,43353-0866-60 ",.01)
 ;;43353-0866-60
 ;;9002226.02101,"1729,43353-0866-60 ",.02)
 ;;43353-0866-60
 ;;9002226.02101,"1729,43353-0867-60 ",.01)
 ;;43353-0867-60
 ;;9002226.02101,"1729,43353-0867-60 ",.02)
 ;;43353-0867-60
 ;;9002226.02101,"1729,43386-0710-05 ",.01)
 ;;43386-0710-05
 ;;9002226.02101,"1729,43386-0710-05 ",.02)
 ;;43386-0710-05
 ;;9002226.02101,"1729,43386-0710-09 ",.01)
 ;;43386-0710-09
 ;;9002226.02101,"1729,43386-0710-09 ",.02)
 ;;43386-0710-09
 ;;9002226.02101,"1729,43386-0711-05 ",.01)
 ;;43386-0711-05
 ;;9002226.02101,"1729,43386-0711-05 ",.02)
 ;;43386-0711-05
 ;;9002226.02101,"1729,43386-0711-09 ",.01)
 ;;43386-0711-09
 ;;9002226.02101,"1729,43386-0711-09 ",.02)
 ;;43386-0711-09
 ;;9002226.02101,"1729,43386-0712-05 ",.01)
 ;;43386-0712-05
 ;;9002226.02101,"1729,43386-0712-05 ",.02)
 ;;43386-0712-05
 ;;9002226.02101,"1729,43386-0712-09 ",.01)
 ;;43386-0712-09
 ;;9002226.02101,"1729,43386-0712-09 ",.02)
 ;;43386-0712-09
 ;;9002226.02101,"1729,43547-0277-03 ",.01)
 ;;43547-0277-03
 ;;9002226.02101,"1729,43547-0277-03 ",.02)
 ;;43547-0277-03
 ;;9002226.02101,"1729,43547-0277-09 ",.01)
 ;;43547-0277-09
 ;;9002226.02101,"1729,43547-0277-09 ",.02)
 ;;43547-0277-09
 ;;9002226.02101,"1729,43547-0277-50 ",.01)
 ;;43547-0277-50
 ;;9002226.02101,"1729,43547-0277-50 ",.02)
 ;;43547-0277-50
 ;;9002226.02101,"1729,43547-0278-03 ",.01)
 ;;43547-0278-03
 ;;9002226.02101,"1729,43547-0278-03 ",.02)
 ;;43547-0278-03
 ;;9002226.02101,"1729,43547-0278-09 ",.01)
 ;;43547-0278-09
 ;;9002226.02101,"1729,43547-0278-09 ",.02)
 ;;43547-0278-09
 ;;9002226.02101,"1729,43547-0278-50 ",.01)
 ;;43547-0278-50
 ;;9002226.02101,"1729,43547-0278-50 ",.02)
 ;;43547-0278-50
 ;;9002226.02101,"1729,43547-0279-03 ",.01)
 ;;43547-0279-03
 ;;9002226.02101,"1729,43547-0279-03 ",.02)
 ;;43547-0279-03
 ;;9002226.02101,"1729,43547-0279-09 ",.01)
 ;;43547-0279-09
 ;;9002226.02101,"1729,43547-0279-09 ",.02)
 ;;43547-0279-09
 ;;9002226.02101,"1729,43547-0279-50 ",.01)
 ;;43547-0279-50
 ;;9002226.02101,"1729,43547-0279-50 ",.02)
 ;;43547-0279-50
 ;;9002226.02101,"1729,43683-0147-30 ",.01)
 ;;43683-0147-30
 ;;9002226.02101,"1729,43683-0147-30 ",.02)
 ;;43683-0147-30
 ;;9002226.02101,"1729,43683-0148-30 ",.01)
 ;;43683-0148-30
 ;;9002226.02101,"1729,43683-0148-30 ",.02)
 ;;43683-0148-30
 ;;9002226.02101,"1729,47463-0020-30 ",.01)
 ;;47463-0020-30
 ;;9002226.02101,"1729,47463-0020-30 ",.02)
 ;;47463-0020-30
 ;;9002226.02101,"1729,47463-0021-30 ",.01)
 ;;47463-0021-30
 ;;9002226.02101,"1729,47463-0021-30 ",.02)
 ;;47463-0021-30
 ;;9002226.02101,"1729,47463-0022-30 ",.01)
 ;;47463-0022-30
 ;;9002226.02101,"1729,47463-0022-30 ",.02)
 ;;47463-0022-30
 ;;9002226.02101,"1729,47463-0023-30 ",.01)
 ;;47463-0023-30
 ;;9002226.02101,"1729,47463-0023-30 ",.02)
 ;;47463-0023-30
 ;;9002226.02101,"1729,47463-0024-30 ",.01)
 ;;47463-0024-30
 ;;9002226.02101,"1729,47463-0024-30 ",.02)
 ;;47463-0024-30
 ;;9002226.02101,"1729,47463-0039-30 ",.01)
 ;;47463-0039-30
 ;;9002226.02101,"1729,47463-0039-30 ",.02)
 ;;47463-0039-30
 ;;9002226.02101,"1729,47463-0040-30 ",.01)
 ;;47463-0040-30
 ;;9002226.02101,"1729,47463-0040-30 ",.02)
 ;;47463-0040-30
 ;;9002226.02101,"1729,47463-0043-30 ",.01)
 ;;47463-0043-30
 ;;9002226.02101,"1729,47463-0043-30 ",.02)
 ;;47463-0043-30
 ;;9002226.02101,"1729,47463-0220-30 ",.01)
 ;;47463-0220-30
 ;;9002226.02101,"1729,47463-0220-30 ",.02)
 ;;47463-0220-30
 ;;9002226.02101,"1729,47463-0221-30 ",.01)
 ;;47463-0221-30
 ;;9002226.02101,"1729,47463-0221-30 ",.02)
 ;;47463-0221-30
 ;;9002226.02101,"1729,47463-0222-30 ",.01)
 ;;47463-0222-30
 ;;9002226.02101,"1729,47463-0222-30 ",.02)
 ;;47463-0222-30
 ;;9002226.02101,"1729,47463-0223-30 ",.01)
 ;;47463-0223-30
 ;;9002226.02101,"1729,47463-0223-30 ",.02)
 ;;47463-0223-30
 ;;9002226.02101,"1729,47463-0250-30 ",.01)
 ;;47463-0250-30
 ;;9002226.02101,"1729,47463-0250-30 ",.02)
 ;;47463-0250-30
 ;;9002226.02101,"1729,47463-0251-30 ",.01)
 ;;47463-0251-30
 ;;9002226.02101,"1729,47463-0251-30 ",.02)
 ;;47463-0251-30
 ;;9002226.02101,"1729,47463-0252-30 ",.01)
 ;;47463-0252-30
 ;;9002226.02101,"1729,47463-0252-30 ",.02)
 ;;47463-0252-30
 ;;9002226.02101,"1729,47463-0253-30 ",.01)
 ;;47463-0253-30
 ;;9002226.02101,"1729,47463-0253-30 ",.02)
 ;;47463-0253-30
 ;;9002226.02101,"1729,47463-0375-30 ",.01)
 ;;47463-0375-30
 ;;9002226.02101,"1729,47463-0375-30 ",.02)
 ;;47463-0375-30
 ;;9002226.02101,"1729,47463-0376-30 ",.01)
 ;;47463-0376-30
 ;;9002226.02101,"1729,47463-0376-30 ",.02)
 ;;47463-0376-30
 ;;9002226.02101,"1729,47463-0387-30 ",.01)
 ;;47463-0387-30
 ;;9002226.02101,"1729,47463-0387-30 ",.02)
 ;;47463-0387-30
 ;;9002226.02101,"1729,47463-0387-60 ",.01)
 ;;47463-0387-60
 ;;9002226.02101,"1729,47463-0387-60 ",.02)
 ;;47463-0387-60
 ;;9002226.02101,"1729,47463-0387-90 ",.01)
 ;;47463-0387-90
 ;;9002226.02101,"1729,47463-0387-90 ",.02)
 ;;47463-0387-90
 ;;9002226.02101,"1729,47463-0388-30 ",.01)
 ;;47463-0388-30
 ;;9002226.02101,"1729,47463-0388-30 ",.02)
 ;;47463-0388-30
 ;;9002226.02101,"1729,47463-0388-60 ",.01)
 ;;47463-0388-60
 ;;9002226.02101,"1729,47463-0388-60 ",.02)
 ;;47463-0388-60
 ;;9002226.02101,"1729,47463-0388-90 ",.01)
 ;;47463-0388-90
 ;;9002226.02101,"1729,47463-0388-90 ",.02)
 ;;47463-0388-90
 ;;9002226.02101,"1729,47463-0389-30 ",.01)
 ;;47463-0389-30
 ;;9002226.02101,"1729,47463-0389-30 ",.02)
 ;;47463-0389-30
 ;;9002226.02101,"1729,47463-0390-30 ",.01)
 ;;47463-0390-30
 ;;9002226.02101,"1729,47463-0390-30 ",.02)
 ;;47463-0390-30
 ;;9002226.02101,"1729,47463-0390-60 ",.01)
 ;;47463-0390-60
 ;;9002226.02101,"1729,47463-0390-60 ",.02)
 ;;47463-0390-60
 ;;9002226.02101,"1729,47463-0409-30 ",.01)
 ;;47463-0409-30
 ;;9002226.02101,"1729,47463-0409-30 ",.02)
 ;;47463-0409-30
 ;;9002226.02101,"1729,47463-0410-30 ",.01)
 ;;47463-0410-30
 ;;9002226.02101,"1729,47463-0410-30 ",.02)
 ;;47463-0410-30
 ;;9002226.02101,"1729,47463-0410-90 ",.01)
 ;;47463-0410-90
 ;;9002226.02101,"1729,47463-0410-90 ",.02)
 ;;47463-0410-90
 ;;9002226.02101,"1729,47463-0429-30 ",.01)
 ;;47463-0429-30
 ;;9002226.02101,"1729,47463-0429-30 ",.02)
 ;;47463-0429-30
 ;;9002226.02101,"1729,47463-0618-30 ",.01)
 ;;47463-0618-30
 ;;9002226.02101,"1729,47463-0618-30 ",.02)
 ;;47463-0618-30
 ;;9002226.02101,"1729,47463-0619-30 ",.01)
 ;;47463-0619-30
 ;;9002226.02101,"1729,47463-0619-30 ",.02)
 ;;47463-0619-30
 ;;9002226.02101,"1729,47463-0620-30 ",.01)
 ;;47463-0620-30
 ;;9002226.02101,"1729,47463-0620-30 ",.02)
 ;;47463-0620-30
 ;;9002226.02101,"1729,47463-4402-30 ",.01)
 ;;47463-4402-30
 ;;9002226.02101,"1729,47463-4402-30 ",.02)
 ;;47463-4402-30
 ;;9002226.02101,"1729,47463-4402-60 ",.01)
 ;;47463-4402-60
 ;;9002226.02101,"1729,47463-4402-60 ",.02)
 ;;47463-4402-60
 ;;9002226.02101,"1729,47463-4402-90 ",.01)
 ;;47463-4402-90
 ;;9002226.02101,"1729,47463-4402-90 ",.02)
 ;;47463-4402-90
 ;;9002226.02101,"1729,47463-4424-30 ",.01)
 ;;47463-4424-30
 ;;9002226.02101,"1729,47463-4424-30 ",.02)
 ;;47463-4424-30
 ;;9002226.02101,"1729,49158-0500-01 ",.01)
 ;;49158-0500-01
 ;;9002226.02101,"1729,49158-0500-01 ",.02)
 ;;49158-0500-01
 ;;9002226.02101,"1729,49158-0500-10 ",.01)
 ;;49158-0500-10
 ;;9002226.02101,"1729,49158-0500-10 ",.02)
 ;;49158-0500-10
 ;;9002226.02101,"1729,49158-0501-01 ",.01)
 ;;49158-0501-01
 ;;9002226.02101,"1729,49158-0501-01 ",.02)
 ;;49158-0501-01
 ;;9002226.02101,"1729,49158-0501-10 ",.01)
 ;;49158-0501-10
 ;;9002226.02101,"1729,49158-0501-10 ",.02)
 ;;49158-0501-10
 ;;9002226.02101,"1729,49158-0502-01 ",.01)
 ;;49158-0502-01
 ;;9002226.02101,"1729,49158-0502-01 ",.02)
 ;;49158-0502-01
 ;;9002226.02101,"1729,49158-0502-10 ",.01)
 ;;49158-0502-10
 ;;9002226.02101,"1729,49158-0502-10 ",.02)
 ;;49158-0502-10
 ;;9002226.02101,"1729,49158-0503-01 ",.01)
 ;;49158-0503-01
 ;;9002226.02101,"1729,49158-0503-01 ",.02)
 ;;49158-0503-01
 ;;9002226.02101,"1729,49158-0503-10 ",.01)
 ;;49158-0503-10
 ;;9002226.02101,"1729,49158-0503-10 ",.02)
 ;;49158-0503-10
 ;;9002226.02101,"1729,49848-0008-90 ",.01)
 ;;49848-0008-90
 ;;9002226.02101,"1729,49848-0008-90 ",.02)
 ;;49848-0008-90