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

BGP83A44.m

Go to the documentation of this file.
BGP83A44 ; IHS/CMI/LAB -CREATED BY ^ATXSTX ON AUG 09, 2017 ;
 ;;18.0;IHS CLINICAL REPORTING;;NOV 21, 2017;Build 51
 ;
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,"1828,67544-0629-60 ",.01)
 ;;67544-0629-60
 ;;9002226.02101,"1828,67544-0629-60 ",.02)
 ;;67544-0629-60
 ;;9002226.02101,"1828,67544-0629-70 ",.01)
 ;;67544-0629-70
 ;;9002226.02101,"1828,67544-0629-70 ",.02)
 ;;67544-0629-70
 ;;9002226.02101,"1828,67544-0629-75 ",.01)
 ;;67544-0629-75
 ;;9002226.02101,"1828,67544-0629-75 ",.02)
 ;;67544-0629-75
 ;;9002226.02101,"1828,67544-0629-80 ",.01)
 ;;67544-0629-80
 ;;9002226.02101,"1828,67544-0629-80 ",.02)
 ;;67544-0629-80
 ;;9002226.02101,"1828,67544-0629-90 ",.01)
 ;;67544-0629-90
 ;;9002226.02101,"1828,67544-0629-90 ",.02)
 ;;67544-0629-90
 ;;9002226.02101,"1828,67544-0629-92 ",.01)
 ;;67544-0629-92
 ;;9002226.02101,"1828,67544-0629-92 ",.02)
 ;;67544-0629-92
 ;;9002226.02101,"1828,67544-0639-15 ",.01)
 ;;67544-0639-15
 ;;9002226.02101,"1828,67544-0639-15 ",.02)
 ;;67544-0639-15
 ;;9002226.02101,"1828,67544-0639-30 ",.01)
 ;;67544-0639-30
 ;;9002226.02101,"1828,67544-0639-30 ",.02)
 ;;67544-0639-30
 ;;9002226.02101,"1828,67544-0639-45 ",.01)
 ;;67544-0639-45
 ;;9002226.02101,"1828,67544-0639-45 ",.02)
 ;;67544-0639-45
 ;;9002226.02101,"1828,67544-0639-53 ",.01)
 ;;67544-0639-53
 ;;9002226.02101,"1828,67544-0639-53 ",.02)
 ;;67544-0639-53
 ;;9002226.02101,"1828,67544-0639-60 ",.01)
 ;;67544-0639-60
 ;;9002226.02101,"1828,67544-0639-60 ",.02)
 ;;67544-0639-60
 ;;9002226.02101,"1828,67544-0639-70 ",.01)
 ;;67544-0639-70
 ;;9002226.02101,"1828,67544-0639-70 ",.02)
 ;;67544-0639-70
 ;;9002226.02101,"1828,67544-0639-75 ",.01)
 ;;67544-0639-75
 ;;9002226.02101,"1828,67544-0639-75 ",.02)
 ;;67544-0639-75
 ;;9002226.02101,"1828,67544-0639-80 ",.01)
 ;;67544-0639-80
 ;;9002226.02101,"1828,67544-0639-80 ",.02)
 ;;67544-0639-80
 ;;9002226.02101,"1828,67544-0639-92 ",.01)
 ;;67544-0639-92
 ;;9002226.02101,"1828,67544-0639-92 ",.02)
 ;;67544-0639-92
 ;;9002226.02101,"1828,67544-0640-15 ",.01)
 ;;67544-0640-15
 ;;9002226.02101,"1828,67544-0640-15 ",.02)
 ;;67544-0640-15
 ;;9002226.02101,"1828,67544-0640-20 ",.01)
 ;;67544-0640-20
 ;;9002226.02101,"1828,67544-0640-20 ",.02)
 ;;67544-0640-20
 ;;9002226.02101,"1828,67544-0640-30 ",.01)
 ;;67544-0640-30
 ;;9002226.02101,"1828,67544-0640-30 ",.02)
 ;;67544-0640-30
 ;;9002226.02101,"1828,67544-0640-45 ",.01)
 ;;67544-0640-45
 ;;9002226.02101,"1828,67544-0640-45 ",.02)
 ;;67544-0640-45
 ;;9002226.02101,"1828,67544-0640-53 ",.01)
 ;;67544-0640-53
 ;;9002226.02101,"1828,67544-0640-53 ",.02)
 ;;67544-0640-53
 ;;9002226.02101,"1828,67544-0640-55 ",.01)
 ;;67544-0640-55
 ;;9002226.02101,"1828,67544-0640-55 ",.02)
 ;;67544-0640-55
 ;;9002226.02101,"1828,67544-0640-60 ",.01)
 ;;67544-0640-60
 ;;9002226.02101,"1828,67544-0640-60 ",.02)
 ;;67544-0640-60
 ;;9002226.02101,"1828,67544-0640-70 ",.01)
 ;;67544-0640-70
 ;;9002226.02101,"1828,67544-0640-70 ",.02)
 ;;67544-0640-70
 ;;9002226.02101,"1828,67544-0640-75 ",.01)
 ;;67544-0640-75
 ;;9002226.02101,"1828,67544-0640-75 ",.02)
 ;;67544-0640-75
 ;;9002226.02101,"1828,67544-0640-80 ",.01)
 ;;67544-0640-80
 ;;9002226.02101,"1828,67544-0640-80 ",.02)
 ;;67544-0640-80
 ;;9002226.02101,"1828,67544-0641-15 ",.01)
 ;;67544-0641-15
 ;;9002226.02101,"1828,67544-0641-15 ",.02)
 ;;67544-0641-15
 ;;9002226.02101,"1828,67544-0641-19 ",.01)
 ;;67544-0641-19
 ;;9002226.02101,"1828,67544-0641-19 ",.02)
 ;;67544-0641-19
 ;;9002226.02101,"1828,67544-0641-30 ",.01)
 ;;67544-0641-30
 ;;9002226.02101,"1828,67544-0641-30 ",.02)
 ;;67544-0641-30
 ;;9002226.02101,"1828,67544-0641-45 ",.01)
 ;;67544-0641-45
 ;;9002226.02101,"1828,67544-0641-45 ",.02)
 ;;67544-0641-45
 ;;9002226.02101,"1828,67544-0641-53 ",.01)
 ;;67544-0641-53
 ;;9002226.02101,"1828,67544-0641-53 ",.02)
 ;;67544-0641-53
 ;;9002226.02101,"1828,67544-0641-60 ",.01)
 ;;67544-0641-60
 ;;9002226.02101,"1828,67544-0641-60 ",.02)
 ;;67544-0641-60
 ;;9002226.02101,"1828,67544-0641-70 ",.01)
 ;;67544-0641-70
 ;;9002226.02101,"1828,67544-0641-70 ",.02)
 ;;67544-0641-70
 ;;9002226.02101,"1828,67544-0641-75 ",.01)
 ;;67544-0641-75
 ;;9002226.02101,"1828,67544-0641-75 ",.02)
 ;;67544-0641-75
 ;;9002226.02101,"1828,67544-0641-80 ",.01)
 ;;67544-0641-80
 ;;9002226.02101,"1828,67544-0641-80 ",.02)
 ;;67544-0641-80
 ;;9002226.02101,"1828,67544-0641-90 ",.01)
 ;;67544-0641-90
 ;;9002226.02101,"1828,67544-0641-90 ",.02)
 ;;67544-0641-90
 ;;9002226.02101,"1828,67544-0641-92 ",.01)
 ;;67544-0641-92
 ;;9002226.02101,"1828,67544-0641-92 ",.02)
 ;;67544-0641-92
 ;;9002226.02101,"1828,67544-0697-15 ",.01)
 ;;67544-0697-15
 ;;9002226.02101,"1828,67544-0697-15 ",.02)
 ;;67544-0697-15
 ;;9002226.02101,"1828,67544-0697-30 ",.01)
 ;;67544-0697-30
 ;;9002226.02101,"1828,67544-0697-30 ",.02)
 ;;67544-0697-30
 ;;9002226.02101,"1828,67544-0697-45 ",.01)
 ;;67544-0697-45
 ;;9002226.02101,"1828,67544-0697-45 ",.02)
 ;;67544-0697-45
 ;;9002226.02101,"1828,67544-0697-53 ",.01)
 ;;67544-0697-53
 ;;9002226.02101,"1828,67544-0697-53 ",.02)
 ;;67544-0697-53
 ;;9002226.02101,"1828,67544-0697-60 ",.01)
 ;;67544-0697-60
 ;;9002226.02101,"1828,67544-0697-60 ",.02)
 ;;67544-0697-60
 ;;9002226.02101,"1828,67544-0697-70 ",.01)
 ;;67544-0697-70
 ;;9002226.02101,"1828,67544-0697-70 ",.02)
 ;;67544-0697-70
 ;;9002226.02101,"1828,67544-0697-75 ",.01)
 ;;67544-0697-75
 ;;9002226.02101,"1828,67544-0697-75 ",.02)
 ;;67544-0697-75
 ;;9002226.02101,"1828,67544-0697-80 ",.01)
 ;;67544-0697-80
 ;;9002226.02101,"1828,67544-0697-80 ",.02)
 ;;67544-0697-80
 ;;9002226.02101,"1828,67544-0707-15 ",.01)
 ;;67544-0707-15
 ;;9002226.02101,"1828,67544-0707-15 ",.02)
 ;;67544-0707-15
 ;;9002226.02101,"1828,67544-0707-30 ",.01)
 ;;67544-0707-30
 ;;9002226.02101,"1828,67544-0707-30 ",.02)
 ;;67544-0707-30
 ;;9002226.02101,"1828,67544-0707-45 ",.01)
 ;;67544-0707-45
 ;;9002226.02101,"1828,67544-0707-45 ",.02)
 ;;67544-0707-45
 ;;9002226.02101,"1828,67544-0707-53 ",.01)
 ;;67544-0707-53
 ;;9002226.02101,"1828,67544-0707-53 ",.02)
 ;;67544-0707-53
 ;;9002226.02101,"1828,67544-0707-60 ",.01)
 ;;67544-0707-60
 ;;9002226.02101,"1828,67544-0707-60 ",.02)
 ;;67544-0707-60
 ;;9002226.02101,"1828,67544-0707-70 ",.01)
 ;;67544-0707-70
 ;;9002226.02101,"1828,67544-0707-70 ",.02)
 ;;67544-0707-70
 ;;9002226.02101,"1828,67544-0707-80 ",.01)
 ;;67544-0707-80
 ;;9002226.02101,"1828,67544-0707-80 ",.02)
 ;;67544-0707-80
 ;;9002226.02101,"1828,67544-0720-15 ",.01)
 ;;67544-0720-15
 ;;9002226.02101,"1828,67544-0720-15 ",.02)
 ;;67544-0720-15
 ;;9002226.02101,"1828,67544-0720-30 ",.01)
 ;;67544-0720-30
 ;;9002226.02101,"1828,67544-0720-30 ",.02)
 ;;67544-0720-30
 ;;9002226.02101,"1828,67544-0720-45 ",.01)
 ;;67544-0720-45
 ;;9002226.02101,"1828,67544-0720-45 ",.02)
 ;;67544-0720-45
 ;;9002226.02101,"1828,67544-0720-53 ",.01)
 ;;67544-0720-53
 ;;9002226.02101,"1828,67544-0720-53 ",.02)
 ;;67544-0720-53
 ;;9002226.02101,"1828,67544-0720-60 ",.01)
 ;;67544-0720-60
 ;;9002226.02101,"1828,67544-0720-60 ",.02)
 ;;67544-0720-60
 ;;9002226.02101,"1828,67544-0720-70 ",.01)
 ;;67544-0720-70
 ;;9002226.02101,"1828,67544-0720-70 ",.02)
 ;;67544-0720-70
 ;;9002226.02101,"1828,67544-0720-75 ",.01)
 ;;67544-0720-75
 ;;9002226.02101,"1828,67544-0720-75 ",.02)
 ;;67544-0720-75
 ;;9002226.02101,"1828,67544-0720-80 ",.01)
 ;;67544-0720-80
 ;;9002226.02101,"1828,67544-0720-80 ",.02)
 ;;67544-0720-80
 ;;9002226.02101,"1828,67544-0720-90 ",.01)
 ;;67544-0720-90
 ;;9002226.02101,"1828,67544-0720-90 ",.02)
 ;;67544-0720-90
 ;;9002226.02101,"1828,67544-0725-30 ",.01)
 ;;67544-0725-30
 ;;9002226.02101,"1828,67544-0725-30 ",.02)
 ;;67544-0725-30
 ;;9002226.02101,"1828,67544-0725-53 ",.01)
 ;;67544-0725-53
 ;;9002226.02101,"1828,67544-0725-53 ",.02)
 ;;67544-0725-53
 ;;9002226.02101,"1828,67544-0734-15 ",.01)
 ;;67544-0734-15
 ;;9002226.02101,"1828,67544-0734-15 ",.02)
 ;;67544-0734-15
 ;;9002226.02101,"1828,67544-0734-30 ",.01)
 ;;67544-0734-30
 ;;9002226.02101,"1828,67544-0734-30 ",.02)
 ;;67544-0734-30
 ;;9002226.02101,"1828,67544-0734-45 ",.01)
 ;;67544-0734-45
 ;;9002226.02101,"1828,67544-0734-45 ",.02)
 ;;67544-0734-45
 ;;9002226.02101,"1828,67544-0734-53 ",.01)
 ;;67544-0734-53
 ;;9002226.02101,"1828,67544-0734-53 ",.02)
 ;;67544-0734-53
 ;;9002226.02101,"1828,67544-0734-60 ",.01)
 ;;67544-0734-60
 ;;9002226.02101,"1828,67544-0734-60 ",.02)
 ;;67544-0734-60
 ;;9002226.02101,"1828,67544-0734-70 ",.01)
 ;;67544-0734-70
 ;;9002226.02101,"1828,67544-0734-70 ",.02)
 ;;67544-0734-70
 ;;9002226.02101,"1828,67544-0734-80 ",.01)
 ;;67544-0734-80
 ;;9002226.02101,"1828,67544-0734-80 ",.02)
 ;;67544-0734-80
 ;;9002226.02101,"1828,67544-0752-30 ",.01)
 ;;67544-0752-30
 ;;9002226.02101,"1828,67544-0752-30 ",.02)
 ;;67544-0752-30
 ;;9002226.02101,"1828,67544-0753-30 ",.01)
 ;;67544-0753-30
 ;;9002226.02101,"1828,67544-0753-30 ",.02)
 ;;67544-0753-30
 ;;9002226.02101,"1828,67544-0753-60 ",.01)
 ;;67544-0753-60
 ;;9002226.02101,"1828,67544-0753-60 ",.02)
 ;;67544-0753-60
 ;;9002226.02101,"1828,67544-0762-30 ",.01)
 ;;67544-0762-30
 ;;9002226.02101,"1828,67544-0762-30 ",.02)
 ;;67544-0762-30
 ;;9002226.02101,"1828,67544-0762-53 ",.01)
 ;;67544-0762-53
 ;;9002226.02101,"1828,67544-0762-53 ",.02)
 ;;67544-0762-53
 ;;9002226.02101,"1828,67544-0762-60 ",.01)
 ;;67544-0762-60
 ;;9002226.02101,"1828,67544-0762-60 ",.02)
 ;;67544-0762-60
 ;;9002226.02101,"1828,67544-0785-30 ",.01)
 ;;67544-0785-30
 ;;9002226.02101,"1828,67544-0785-30 ",.02)
 ;;67544-0785-30
 ;;9002226.02101,"1828,67544-0813-53 ",.01)
 ;;67544-0813-53
 ;;9002226.02101,"1828,67544-0813-53 ",.02)
 ;;67544-0813-53
 ;;9002226.02101,"1828,67544-0870-10 ",.01)
 ;;67544-0870-10
 ;;9002226.02101,"1828,67544-0870-10 ",.02)
 ;;67544-0870-10
 ;;9002226.02101,"1828,67544-0870-15 ",.01)
 ;;67544-0870-15
 ;;9002226.02101,"1828,67544-0870-15 ",.02)
 ;;67544-0870-15
 ;;9002226.02101,"1828,67544-0870-20 ",.01)
 ;;67544-0870-20
 ;;9002226.02101,"1828,67544-0870-20 ",.02)
 ;;67544-0870-20
 ;;9002226.02101,"1828,67544-0870-30 ",.01)
 ;;67544-0870-30
 ;;9002226.02101,"1828,67544-0870-30 ",.02)
 ;;67544-0870-30
 ;;9002226.02101,"1828,67544-0870-45 ",.01)
 ;;67544-0870-45
 ;;9002226.02101,"1828,67544-0870-45 ",.02)
 ;;67544-0870-45
 ;;9002226.02101,"1828,67544-0870-53 ",.01)
 ;;67544-0870-53
 ;;9002226.02101,"1828,67544-0870-53 ",.02)
 ;;67544-0870-53
 ;;9002226.02101,"1828,67544-0870-60 ",.01)
 ;;67544-0870-60
 ;;9002226.02101,"1828,67544-0870-60 ",.02)
 ;;67544-0870-60
 ;;9002226.02101,"1828,67544-0870-70 ",.01)
 ;;67544-0870-70
 ;;9002226.02101,"1828,67544-0870-70 ",.02)
 ;;67544-0870-70
 ;;9002226.02101,"1828,67544-0870-75 ",.01)
 ;;67544-0870-75
 ;;9002226.02101,"1828,67544-0870-75 ",.02)
 ;;67544-0870-75
 ;;9002226.02101,"1828,67544-0870-80 ",.01)
 ;;67544-0870-80
 ;;9002226.02101,"1828,67544-0870-80 ",.02)
 ;;67544-0870-80
 ;;9002226.02101,"1828,67544-0870-92 ",.01)
 ;;67544-0870-92
 ;;9002226.02101,"1828,67544-0870-92 ",.02)
 ;;67544-0870-92
 ;;9002226.02101,"1828,67544-0879-10 ",.01)
 ;;67544-0879-10
 ;;9002226.02101,"1828,67544-0879-10 ",.02)
 ;;67544-0879-10
 ;;9002226.02101,"1828,67544-0879-15 ",.01)
 ;;67544-0879-15
 ;;9002226.02101,"1828,67544-0879-15 ",.02)
 ;;67544-0879-15
 ;;9002226.02101,"1828,67544-0879-20 ",.01)
 ;;67544-0879-20
 ;;9002226.02101,"1828,67544-0879-20 ",.02)
 ;;67544-0879-20
 ;;9002226.02101,"1828,67544-0879-30 ",.01)
 ;;67544-0879-30
 ;;9002226.02101,"1828,67544-0879-30 ",.02)
 ;;67544-0879-30
 ;;9002226.02101,"1828,67544-0879-45 ",.01)
 ;;67544-0879-45
 ;;9002226.02101,"1828,67544-0879-45 ",.02)
 ;;67544-0879-45
 ;;9002226.02101,"1828,67544-0879-53 ",.01)
 ;;67544-0879-53
 ;;9002226.02101,"1828,67544-0879-53 ",.02)
 ;;67544-0879-53
 ;;9002226.02101,"1828,67544-0879-55 ",.01)
 ;;67544-0879-55