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

BGP50F27.m

Go to the documentation of this file.
BGP50F27 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 05, 2014;
 ;;15.1;IHS CLINICAL REPORTING;;MAY 06, 2015;Build 143
 ;
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,"1728,42571-0110-10 ",.01)
 ;;42571-0110-10
 ;;9002226.02101,"1728,42571-0110-10 ",.02)
 ;;42571-0110-10
 ;;9002226.02101,"1728,42571-0110-90 ",.01)
 ;;42571-0110-90
 ;;9002226.02101,"1728,42571-0110-90 ",.02)
 ;;42571-0110-90
 ;;9002226.02101,"1728,42571-0111-10 ",.01)
 ;;42571-0111-10
 ;;9002226.02101,"1728,42571-0111-10 ",.02)
 ;;42571-0111-10
 ;;9002226.02101,"1728,42571-0111-90 ",.01)
 ;;42571-0111-90
 ;;9002226.02101,"1728,42571-0111-90 ",.02)
 ;;42571-0111-90
 ;;9002226.02101,"1728,42571-0112-10 ",.01)
 ;;42571-0112-10
 ;;9002226.02101,"1728,42571-0112-10 ",.02)
 ;;42571-0112-10
 ;;9002226.02101,"1728,42571-0112-90 ",.01)
 ;;42571-0112-90
 ;;9002226.02101,"1728,42571-0112-90 ",.02)
 ;;42571-0112-90
 ;;9002226.02101,"1728,43063-0007-01 ",.01)
 ;;43063-0007-01
 ;;9002226.02101,"1728,43063-0007-01 ",.02)
 ;;43063-0007-01
 ;;9002226.02101,"1728,43063-0007-14 ",.01)
 ;;43063-0007-14
 ;;9002226.02101,"1728,43063-0007-14 ",.02)
 ;;43063-0007-14
 ;;9002226.02101,"1728,43063-0007-30 ",.01)
 ;;43063-0007-30
 ;;9002226.02101,"1728,43063-0007-30 ",.02)
 ;;43063-0007-30
 ;;9002226.02101,"1728,43063-0007-60 ",.01)
 ;;43063-0007-60
 ;;9002226.02101,"1728,43063-0007-60 ",.02)
 ;;43063-0007-60
 ;;9002226.02101,"1728,43063-0007-90 ",.01)
 ;;43063-0007-90
 ;;9002226.02101,"1728,43063-0007-90 ",.02)
 ;;43063-0007-90
 ;;9002226.02101,"1728,43063-0007-98 ",.01)
 ;;43063-0007-98
 ;;9002226.02101,"1728,43063-0007-98 ",.02)
 ;;43063-0007-98
 ;;9002226.02101,"1728,43063-0032-01 ",.01)
 ;;43063-0032-01
 ;;9002226.02101,"1728,43063-0032-01 ",.02)
 ;;43063-0032-01
 ;;9002226.02101,"1728,43063-0065-30 ",.01)
 ;;43063-0065-30
 ;;9002226.02101,"1728,43063-0065-30 ",.02)
 ;;43063-0065-30
 ;;9002226.02101,"1728,43063-0065-90 ",.01)
 ;;43063-0065-90
 ;;9002226.02101,"1728,43063-0065-90 ",.02)
 ;;43063-0065-90
 ;;9002226.02101,"1728,43063-0118-30 ",.01)
 ;;43063-0118-30
 ;;9002226.02101,"1728,43063-0118-30 ",.02)
 ;;43063-0118-30
 ;;9002226.02101,"1728,43063-0118-90 ",.01)
 ;;43063-0118-90
 ;;9002226.02101,"1728,43063-0118-90 ",.02)
 ;;43063-0118-90
 ;;9002226.02101,"1728,43063-0130-90 ",.01)
 ;;43063-0130-90
 ;;9002226.02101,"1728,43063-0130-90 ",.02)
 ;;43063-0130-90
 ;;9002226.02101,"1728,43063-0131-30 ",.01)
 ;;43063-0131-30
 ;;9002226.02101,"1728,43063-0131-30 ",.02)
 ;;43063-0131-30
 ;;9002226.02101,"1728,43063-0132-30 ",.01)
 ;;43063-0132-30
 ;;9002226.02101,"1728,43063-0132-30 ",.02)
 ;;43063-0132-30
 ;;9002226.02101,"1728,43063-0138-90 ",.01)
 ;;43063-0138-90
 ;;9002226.02101,"1728,43063-0138-90 ",.02)
 ;;43063-0138-90
 ;;9002226.02101,"1728,43063-0146-30 ",.01)
 ;;43063-0146-30
 ;;9002226.02101,"1728,43063-0146-30 ",.02)
 ;;43063-0146-30
 ;;9002226.02101,"1728,43063-0171-14 ",.01)
 ;;43063-0171-14
 ;;9002226.02101,"1728,43063-0171-14 ",.02)
 ;;43063-0171-14
 ;;9002226.02101,"1728,43063-0232-30 ",.01)
 ;;43063-0232-30
 ;;9002226.02101,"1728,43063-0232-30 ",.02)
 ;;43063-0232-30
 ;;9002226.02101,"1728,43063-0232-60 ",.01)
 ;;43063-0232-60
 ;;9002226.02101,"1728,43063-0232-60 ",.02)
 ;;43063-0232-60
 ;;9002226.02101,"1728,43063-0233-60 ",.01)
 ;;43063-0233-60
 ;;9002226.02101,"1728,43063-0233-60 ",.02)
 ;;43063-0233-60
 ;;9002226.02101,"1728,43063-0234-60 ",.01)
 ;;43063-0234-60
 ;;9002226.02101,"1728,43063-0234-60 ",.02)
 ;;43063-0234-60
 ;;9002226.02101,"1728,43063-0288-30 ",.01)
 ;;43063-0288-30
 ;;9002226.02101,"1728,43063-0288-30 ",.02)
 ;;43063-0288-30
 ;;9002226.02101,"1728,43063-0288-90 ",.01)
 ;;43063-0288-90
 ;;9002226.02101,"1728,43063-0288-90 ",.02)
 ;;43063-0288-90
 ;;9002226.02101,"1728,43063-0303-30 ",.01)
 ;;43063-0303-30
 ;;9002226.02101,"1728,43063-0303-30 ",.02)
 ;;43063-0303-30
 ;;9002226.02101,"1728,43063-0347-30 ",.01)
 ;;43063-0347-30
 ;;9002226.02101,"1728,43063-0347-30 ",.02)
 ;;43063-0347-30
 ;;9002226.02101,"1728,43063-0402-60 ",.01)
 ;;43063-0402-60
 ;;9002226.02101,"1728,43063-0402-60 ",.02)
 ;;43063-0402-60
 ;;9002226.02101,"1728,43063-0403-30 ",.01)
 ;;43063-0403-30
 ;;9002226.02101,"1728,43063-0403-30 ",.02)
 ;;43063-0403-30
 ;;9002226.02101,"1728,43063-0414-01 ",.01)
 ;;43063-0414-01
 ;;9002226.02101,"1728,43063-0414-01 ",.02)
 ;;43063-0414-01
 ;;9002226.02101,"1728,43063-0414-90 ",.01)
 ;;43063-0414-90
 ;;9002226.02101,"1728,43063-0414-90 ",.02)
 ;;43063-0414-90
 ;;9002226.02101,"1728,43063-0458-30 ",.01)
 ;;43063-0458-30
 ;;9002226.02101,"1728,43063-0458-30 ",.02)
 ;;43063-0458-30
 ;;9002226.02101,"1728,43063-0458-90 ",.01)
 ;;43063-0458-90
 ;;9002226.02101,"1728,43063-0458-90 ",.02)
 ;;43063-0458-90
 ;;9002226.02101,"1728,43353-0045-80 ",.01)
 ;;43353-0045-80
 ;;9002226.02101,"1728,43353-0045-80 ",.02)
 ;;43353-0045-80
 ;;9002226.02101,"1728,43353-0293-30 ",.01)
 ;;43353-0293-30
 ;;9002226.02101,"1728,43353-0293-30 ",.02)
 ;;43353-0293-30
 ;;9002226.02101,"1728,43353-0293-60 ",.01)
 ;;43353-0293-60
 ;;9002226.02101,"1728,43353-0293-60 ",.02)
 ;;43353-0293-60
 ;;9002226.02101,"1728,43353-0313-15 ",.01)
 ;;43353-0313-15
 ;;9002226.02101,"1728,43353-0313-15 ",.02)
 ;;43353-0313-15
 ;;9002226.02101,"1728,43353-0313-60 ",.01)
 ;;43353-0313-60
 ;;9002226.02101,"1728,43353-0313-60 ",.02)
 ;;43353-0313-60
 ;;9002226.02101,"1728,43353-0318-60 ",.01)
 ;;43353-0318-60
 ;;9002226.02101,"1728,43353-0318-60 ",.02)
 ;;43353-0318-60
 ;;9002226.02101,"1728,43353-0333-30 ",.01)
 ;;43353-0333-30
 ;;9002226.02101,"1728,43353-0333-30 ",.02)
 ;;43353-0333-30
 ;;9002226.02101,"1728,43353-0333-45 ",.01)
 ;;43353-0333-45
 ;;9002226.02101,"1728,43353-0333-45 ",.02)
 ;;43353-0333-45
 ;;9002226.02101,"1728,43353-0350-30 ",.01)
 ;;43353-0350-30
 ;;9002226.02101,"1728,43353-0350-30 ",.02)
 ;;43353-0350-30
 ;;9002226.02101,"1728,43353-0350-45 ",.01)
 ;;43353-0350-45
 ;;9002226.02101,"1728,43353-0350-45 ",.02)
 ;;43353-0350-45
 ;;9002226.02101,"1728,43353-0350-60 ",.01)
 ;;43353-0350-60
 ;;9002226.02101,"1728,43353-0350-60 ",.02)
 ;;43353-0350-60
 ;;9002226.02101,"1728,43353-0350-80 ",.01)
 ;;43353-0350-80
 ;;9002226.02101,"1728,43353-0350-80 ",.02)
 ;;43353-0350-80
 ;;9002226.02101,"1728,43353-0365-15 ",.01)
 ;;43353-0365-15
 ;;9002226.02101,"1728,43353-0365-15 ",.02)
 ;;43353-0365-15
 ;;9002226.02101,"1728,43353-0365-30 ",.01)
 ;;43353-0365-30
 ;;9002226.02101,"1728,43353-0365-30 ",.02)
 ;;43353-0365-30
 ;;9002226.02101,"1728,43353-0365-45 ",.01)
 ;;43353-0365-45
 ;;9002226.02101,"1728,43353-0365-45 ",.02)
 ;;43353-0365-45
 ;;9002226.02101,"1728,43353-0365-60 ",.01)
 ;;43353-0365-60
 ;;9002226.02101,"1728,43353-0365-60 ",.02)
 ;;43353-0365-60
 ;;9002226.02101,"1728,43353-0371-45 ",.01)
 ;;43353-0371-45
 ;;9002226.02101,"1728,43353-0371-45 ",.02)
 ;;43353-0371-45
 ;;9002226.02101,"1728,43353-0371-60 ",.01)
 ;;43353-0371-60
 ;;9002226.02101,"1728,43353-0371-60 ",.02)
 ;;43353-0371-60
 ;;9002226.02101,"1728,43353-0411-60 ",.01)
 ;;43353-0411-60
 ;;9002226.02101,"1728,43353-0411-60 ",.02)
 ;;43353-0411-60
 ;;9002226.02101,"1728,43353-0459-45 ",.01)
 ;;43353-0459-45
 ;;9002226.02101,"1728,43353-0459-45 ",.02)
 ;;43353-0459-45
 ;;9002226.02101,"1728,43353-0488-45 ",.01)
 ;;43353-0488-45
 ;;9002226.02101,"1728,43353-0488-45 ",.02)
 ;;43353-0488-45
 ;;9002226.02101,"1728,43353-0488-60 ",.01)
 ;;43353-0488-60
 ;;9002226.02101,"1728,43353-0488-60 ",.02)
 ;;43353-0488-60
 ;;9002226.02101,"1728,43353-0516-45 ",.01)
 ;;43353-0516-45
 ;;9002226.02101,"1728,43353-0516-45 ",.02)
 ;;43353-0516-45
 ;;9002226.02101,"1728,43353-0521-60 ",.01)
 ;;43353-0521-60
 ;;9002226.02101,"1728,43353-0521-60 ",.02)
 ;;43353-0521-60
 ;;9002226.02101,"1728,43353-0521-80 ",.01)
 ;;43353-0521-80
 ;;9002226.02101,"1728,43353-0521-80 ",.02)
 ;;43353-0521-80
 ;;9002226.02101,"1728,43353-0596-30 ",.01)
 ;;43353-0596-30
 ;;9002226.02101,"1728,43353-0596-30 ",.02)
 ;;43353-0596-30
 ;;9002226.02101,"1728,43353-0596-60 ",.01)
 ;;43353-0596-60
 ;;9002226.02101,"1728,43353-0596-60 ",.02)
 ;;43353-0596-60
 ;;9002226.02101,"1728,43353-0626-60 ",.01)
 ;;43353-0626-60
 ;;9002226.02101,"1728,43353-0626-60 ",.02)
 ;;43353-0626-60
 ;;9002226.02101,"1728,43353-0643-60 ",.01)
 ;;43353-0643-60
 ;;9002226.02101,"1728,43353-0643-60 ",.02)
 ;;43353-0643-60
 ;;9002226.02101,"1728,43353-0655-60 ",.01)
 ;;43353-0655-60
 ;;9002226.02101,"1728,43353-0655-60 ",.02)
 ;;43353-0655-60
 ;;9002226.02101,"1728,43353-0662-80 ",.01)
 ;;43353-0662-80
 ;;9002226.02101,"1728,43353-0662-80 ",.02)
 ;;43353-0662-80
 ;;9002226.02101,"1728,43353-0667-60 ",.01)
 ;;43353-0667-60
 ;;9002226.02101,"1728,43353-0667-60 ",.02)
 ;;43353-0667-60
 ;;9002226.02101,"1728,43353-0668-45 ",.01)
 ;;43353-0668-45
 ;;9002226.02101,"1728,43353-0668-45 ",.02)
 ;;43353-0668-45
 ;;9002226.02101,"1728,43353-0668-60 ",.01)
 ;;43353-0668-60
 ;;9002226.02101,"1728,43353-0668-60 ",.02)
 ;;43353-0668-60
 ;;9002226.02101,"1728,43353-0671-30 ",.01)
 ;;43353-0671-30
 ;;9002226.02101,"1728,43353-0671-30 ",.02)
 ;;43353-0671-30
 ;;9002226.02101,"1728,43353-0671-45 ",.01)
 ;;43353-0671-45
 ;;9002226.02101,"1728,43353-0671-45 ",.02)
 ;;43353-0671-45
 ;;9002226.02101,"1728,43353-0676-60 ",.01)
 ;;43353-0676-60
 ;;9002226.02101,"1728,43353-0676-60 ",.02)
 ;;43353-0676-60
 ;;9002226.02101,"1728,43353-0712-60 ",.01)
 ;;43353-0712-60
 ;;9002226.02101,"1728,43353-0712-60 ",.02)
 ;;43353-0712-60
 ;;9002226.02101,"1728,43353-0722-60 ",.01)
 ;;43353-0722-60
 ;;9002226.02101,"1728,43353-0722-60 ",.02)
 ;;43353-0722-60
 ;;9002226.02101,"1728,43353-0726-60 ",.01)
 ;;43353-0726-60
 ;;9002226.02101,"1728,43353-0726-60 ",.02)
 ;;43353-0726-60
 ;;9002226.02101,"1728,43353-0726-80 ",.01)
 ;;43353-0726-80
 ;;9002226.02101,"1728,43353-0726-80 ",.02)
 ;;43353-0726-80
 ;;9002226.02101,"1728,43353-0728-60 ",.01)
 ;;43353-0728-60
 ;;9002226.02101,"1728,43353-0728-60 ",.02)
 ;;43353-0728-60
 ;;9002226.02101,"1728,43353-0729-30 ",.01)
 ;;43353-0729-30
 ;;9002226.02101,"1728,43353-0729-30 ",.02)
 ;;43353-0729-30
 ;;9002226.02101,"1728,43353-0729-45 ",.01)
 ;;43353-0729-45
 ;;9002226.02101,"1728,43353-0729-45 ",.02)
 ;;43353-0729-45
 ;;9002226.02101,"1728,43353-0729-60 ",.01)
 ;;43353-0729-60
 ;;9002226.02101,"1728,43353-0729-60 ",.02)
 ;;43353-0729-60
 ;;9002226.02101,"1728,43353-0730-30 ",.01)
 ;;43353-0730-30
 ;;9002226.02101,"1728,43353-0730-30 ",.02)
 ;;43353-0730-30
 ;;9002226.02101,"1728,43353-0730-60 ",.01)
 ;;43353-0730-60
 ;;9002226.02101,"1728,43353-0730-60 ",.02)
 ;;43353-0730-60
 ;;9002226.02101,"1728,43353-0800-60 ",.01)
 ;;43353-0800-60
 ;;9002226.02101,"1728,43353-0800-60 ",.02)
 ;;43353-0800-60
 ;;9002226.02101,"1728,43353-0865-60 ",.01)
 ;;43353-0865-60
 ;;9002226.02101,"1728,43353-0865-60 ",.02)
 ;;43353-0865-60
 ;;9002226.02101,"1728,43353-0865-80 ",.01)
 ;;43353-0865-80
 ;;9002226.02101,"1728,43353-0865-80 ",.02)
 ;;43353-0865-80
 ;;9002226.02101,"1728,43353-0866-30 ",.01)
 ;;43353-0866-30
 ;;9002226.02101,"1728,43353-0866-30 ",.02)
 ;;43353-0866-30
 ;;9002226.02101,"1728,43353-0866-60 ",.01)
 ;;43353-0866-60
 ;;9002226.02101,"1728,43353-0866-60 ",.02)
 ;;43353-0866-60
 ;;9002226.02101,"1728,43353-0867-60 ",.01)
 ;;43353-0867-60
 ;;9002226.02101,"1728,43353-0867-60 ",.02)
 ;;43353-0867-60
 ;;9002226.02101,"1728,43386-0710-05 ",.01)
 ;;43386-0710-05
 ;;9002226.02101,"1728,43386-0710-05 ",.02)
 ;;43386-0710-05
 ;;9002226.02101,"1728,43386-0710-09 ",.01)
 ;;43386-0710-09
 ;;9002226.02101,"1728,43386-0710-09 ",.02)
 ;;43386-0710-09
 ;;9002226.02101,"1728,43386-0711-05 ",.01)
 ;;43386-0711-05
 ;;9002226.02101,"1728,43386-0711-05 ",.02)
 ;;43386-0711-05
 ;;9002226.02101,"1728,43386-0711-09 ",.01)
 ;;43386-0711-09
 ;;9002226.02101,"1728,43386-0711-09 ",.02)
 ;;43386-0711-09
 ;;9002226.02101,"1728,43386-0712-05 ",.01)
 ;;43386-0712-05
 ;;9002226.02101,"1728,43386-0712-05 ",.02)
 ;;43386-0712-05
 ;;9002226.02101,"1728,43386-0712-09 ",.01)
 ;;43386-0712-09
 ;;9002226.02101,"1728,43386-0712-09 ",.02)
 ;;43386-0712-09
 ;;9002226.02101,"1728,43547-0277-03 ",.01)
 ;;43547-0277-03
 ;;9002226.02101,"1728,43547-0277-03 ",.02)
 ;;43547-0277-03
 ;;9002226.02101,"1728,43547-0277-09 ",.01)
 ;;43547-0277-09
 ;;9002226.02101,"1728,43547-0277-09 ",.02)
 ;;43547-0277-09
 ;;9002226.02101,"1728,43547-0277-50 ",.01)
 ;;43547-0277-50
 ;;9002226.02101,"1728,43547-0277-50 ",.02)
 ;;43547-0277-50
 ;;9002226.02101,"1728,43547-0278-03 ",.01)
 ;;43547-0278-03
 ;;9002226.02101,"1728,43547-0278-03 ",.02)
 ;;43547-0278-03
 ;;9002226.02101,"1728,43547-0278-09 ",.01)
 ;;43547-0278-09
 ;;9002226.02101,"1728,43547-0278-09 ",.02)
 ;;43547-0278-09
 ;;9002226.02101,"1728,43547-0278-50 ",.01)
 ;;43547-0278-50
 ;;9002226.02101,"1728,43547-0278-50 ",.02)
 ;;43547-0278-50
 ;;9002226.02101,"1728,43547-0279-03 ",.01)
 ;;43547-0279-03
 ;;9002226.02101,"1728,43547-0279-03 ",.02)
 ;;43547-0279-03
 ;;9002226.02101,"1728,43547-0279-09 ",.01)
 ;;43547-0279-09
 ;;9002226.02101,"1728,43547-0279-09 ",.02)
 ;;43547-0279-09
 ;;9002226.02101,"1728,43547-0279-50 ",.01)
 ;;43547-0279-50
 ;;9002226.02101,"1728,43547-0279-50 ",.02)
 ;;43547-0279-50
 ;;9002226.02101,"1728,43547-0330-03 ",.01)
 ;;43547-0330-03
 ;;9002226.02101,"1728,43547-0330-03 ",.02)
 ;;43547-0330-03
 ;;9002226.02101,"1728,43547-0330-09 ",.01)
 ;;43547-0330-09
 ;;9002226.02101,"1728,43547-0330-09 ",.02)
 ;;43547-0330-09
 ;;9002226.02101,"1728,43547-0331-03 ",.01)
 ;;43547-0331-03
 ;;9002226.02101,"1728,43547-0331-03 ",.02)
 ;;43547-0331-03
 ;;9002226.02101,"1728,43547-0331-09 ",.01)
 ;;43547-0331-09
 ;;9002226.02101,"1728,43547-0331-09 ",.02)
 ;;43547-0331-09
 ;;9002226.02101,"1728,43547-0335-10 ",.01)
 ;;43547-0335-10