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

BGP83A43.m

Go to the documentation of this file.
BGP83A43 ; 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-0368-20 ",.02)
 ;;67544-0368-20
 ;;9002226.02101,"1828,67544-0368-30 ",.01)
 ;;67544-0368-30
 ;;9002226.02101,"1828,67544-0368-30 ",.02)
 ;;67544-0368-30
 ;;9002226.02101,"1828,67544-0368-40 ",.01)
 ;;67544-0368-40
 ;;9002226.02101,"1828,67544-0368-40 ",.02)
 ;;67544-0368-40
 ;;9002226.02101,"1828,67544-0368-45 ",.01)
 ;;67544-0368-45
 ;;9002226.02101,"1828,67544-0368-45 ",.02)
 ;;67544-0368-45
 ;;9002226.02101,"1828,67544-0368-53 ",.01)
 ;;67544-0368-53
 ;;9002226.02101,"1828,67544-0368-53 ",.02)
 ;;67544-0368-53
 ;;9002226.02101,"1828,67544-0368-55 ",.01)
 ;;67544-0368-55
 ;;9002226.02101,"1828,67544-0368-55 ",.02)
 ;;67544-0368-55
 ;;9002226.02101,"1828,67544-0368-60 ",.01)
 ;;67544-0368-60
 ;;9002226.02101,"1828,67544-0368-60 ",.02)
 ;;67544-0368-60
 ;;9002226.02101,"1828,67544-0368-70 ",.01)
 ;;67544-0368-70
 ;;9002226.02101,"1828,67544-0368-70 ",.02)
 ;;67544-0368-70
 ;;9002226.02101,"1828,67544-0368-75 ",.01)
 ;;67544-0368-75
 ;;9002226.02101,"1828,67544-0368-75 ",.02)
 ;;67544-0368-75
 ;;9002226.02101,"1828,67544-0368-80 ",.01)
 ;;67544-0368-80
 ;;9002226.02101,"1828,67544-0368-80 ",.02)
 ;;67544-0368-80
 ;;9002226.02101,"1828,67544-0368-90 ",.01)
 ;;67544-0368-90
 ;;9002226.02101,"1828,67544-0368-90 ",.02)
 ;;67544-0368-90
 ;;9002226.02101,"1828,67544-0373-10 ",.01)
 ;;67544-0373-10
 ;;9002226.02101,"1828,67544-0373-10 ",.02)
 ;;67544-0373-10
 ;;9002226.02101,"1828,67544-0373-15 ",.01)
 ;;67544-0373-15
 ;;9002226.02101,"1828,67544-0373-15 ",.02)
 ;;67544-0373-15
 ;;9002226.02101,"1828,67544-0373-20 ",.01)
 ;;67544-0373-20
 ;;9002226.02101,"1828,67544-0373-20 ",.02)
 ;;67544-0373-20
 ;;9002226.02101,"1828,67544-0373-28 ",.01)
 ;;67544-0373-28
 ;;9002226.02101,"1828,67544-0373-28 ",.02)
 ;;67544-0373-28
 ;;9002226.02101,"1828,67544-0373-30 ",.01)
 ;;67544-0373-30
 ;;9002226.02101,"1828,67544-0373-30 ",.02)
 ;;67544-0373-30
 ;;9002226.02101,"1828,67544-0373-53 ",.01)
 ;;67544-0373-53
 ;;9002226.02101,"1828,67544-0373-53 ",.02)
 ;;67544-0373-53
 ;;9002226.02101,"1828,67544-0373-59 ",.01)
 ;;67544-0373-59
 ;;9002226.02101,"1828,67544-0373-59 ",.02)
 ;;67544-0373-59
 ;;9002226.02101,"1828,67544-0373-60 ",.01)
 ;;67544-0373-60
 ;;9002226.02101,"1828,67544-0373-60 ",.02)
 ;;67544-0373-60
 ;;9002226.02101,"1828,67544-0391-01 ",.01)
 ;;67544-0391-01
 ;;9002226.02101,"1828,67544-0391-01 ",.02)
 ;;67544-0391-01
 ;;9002226.02101,"1828,67544-0391-10 ",.01)
 ;;67544-0391-10
 ;;9002226.02101,"1828,67544-0391-10 ",.02)
 ;;67544-0391-10
 ;;9002226.02101,"1828,67544-0391-26 ",.01)
 ;;67544-0391-26
 ;;9002226.02101,"1828,67544-0391-26 ",.02)
 ;;67544-0391-26
 ;;9002226.02101,"1828,67544-0395-30 ",.01)
 ;;67544-0395-30
 ;;9002226.02101,"1828,67544-0395-30 ",.02)
 ;;67544-0395-30
 ;;9002226.02101,"1828,67544-0395-53 ",.01)
 ;;67544-0395-53
 ;;9002226.02101,"1828,67544-0395-53 ",.02)
 ;;67544-0395-53
 ;;9002226.02101,"1828,67544-0395-60 ",.01)
 ;;67544-0395-60
 ;;9002226.02101,"1828,67544-0395-60 ",.02)
 ;;67544-0395-60
 ;;9002226.02101,"1828,67544-0395-70 ",.01)
 ;;67544-0395-70
 ;;9002226.02101,"1828,67544-0395-70 ",.02)
 ;;67544-0395-70
 ;;9002226.02101,"1828,67544-0412-15 ",.01)
 ;;67544-0412-15
 ;;9002226.02101,"1828,67544-0412-15 ",.02)
 ;;67544-0412-15
 ;;9002226.02101,"1828,67544-0412-30 ",.01)
 ;;67544-0412-30
 ;;9002226.02101,"1828,67544-0412-30 ",.02)
 ;;67544-0412-30
 ;;9002226.02101,"1828,67544-0412-45 ",.01)
 ;;67544-0412-45
 ;;9002226.02101,"1828,67544-0412-45 ",.02)
 ;;67544-0412-45
 ;;9002226.02101,"1828,67544-0412-53 ",.01)
 ;;67544-0412-53
 ;;9002226.02101,"1828,67544-0412-53 ",.02)
 ;;67544-0412-53
 ;;9002226.02101,"1828,67544-0412-60 ",.01)
 ;;67544-0412-60
 ;;9002226.02101,"1828,67544-0412-60 ",.02)
 ;;67544-0412-60
 ;;9002226.02101,"1828,67544-0412-70 ",.01)
 ;;67544-0412-70
 ;;9002226.02101,"1828,67544-0412-70 ",.02)
 ;;67544-0412-70
 ;;9002226.02101,"1828,67544-0412-80 ",.01)
 ;;67544-0412-80
 ;;9002226.02101,"1828,67544-0412-80 ",.02)
 ;;67544-0412-80
 ;;9002226.02101,"1828,67544-0414-15 ",.01)
 ;;67544-0414-15
 ;;9002226.02101,"1828,67544-0414-15 ",.02)
 ;;67544-0414-15
 ;;9002226.02101,"1828,67544-0414-30 ",.01)
 ;;67544-0414-30
 ;;9002226.02101,"1828,67544-0414-30 ",.02)
 ;;67544-0414-30
 ;;9002226.02101,"1828,67544-0414-45 ",.01)
 ;;67544-0414-45
 ;;9002226.02101,"1828,67544-0414-45 ",.02)
 ;;67544-0414-45
 ;;9002226.02101,"1828,67544-0414-53 ",.01)
 ;;67544-0414-53
 ;;9002226.02101,"1828,67544-0414-53 ",.02)
 ;;67544-0414-53
 ;;9002226.02101,"1828,67544-0414-60 ",.01)
 ;;67544-0414-60
 ;;9002226.02101,"1828,67544-0414-60 ",.02)
 ;;67544-0414-60
 ;;9002226.02101,"1828,67544-0414-70 ",.01)
 ;;67544-0414-70
 ;;9002226.02101,"1828,67544-0414-70 ",.02)
 ;;67544-0414-70
 ;;9002226.02101,"1828,67544-0414-80 ",.01)
 ;;67544-0414-80
 ;;9002226.02101,"1828,67544-0414-80 ",.02)
 ;;67544-0414-80
 ;;9002226.02101,"1828,67544-0415-15 ",.01)
 ;;67544-0415-15
 ;;9002226.02101,"1828,67544-0415-15 ",.02)
 ;;67544-0415-15
 ;;9002226.02101,"1828,67544-0415-20 ",.01)
 ;;67544-0415-20
 ;;9002226.02101,"1828,67544-0415-20 ",.02)
 ;;67544-0415-20
 ;;9002226.02101,"1828,67544-0415-30 ",.01)
 ;;67544-0415-30
 ;;9002226.02101,"1828,67544-0415-30 ",.02)
 ;;67544-0415-30
 ;;9002226.02101,"1828,67544-0415-45 ",.01)
 ;;67544-0415-45
 ;;9002226.02101,"1828,67544-0415-45 ",.02)
 ;;67544-0415-45
 ;;9002226.02101,"1828,67544-0415-53 ",.01)
 ;;67544-0415-53
 ;;9002226.02101,"1828,67544-0415-53 ",.02)
 ;;67544-0415-53
 ;;9002226.02101,"1828,67544-0415-60 ",.01)
 ;;67544-0415-60
 ;;9002226.02101,"1828,67544-0415-60 ",.02)
 ;;67544-0415-60
 ;;9002226.02101,"1828,67544-0415-70 ",.01)
 ;;67544-0415-70
 ;;9002226.02101,"1828,67544-0415-70 ",.02)
 ;;67544-0415-70
 ;;9002226.02101,"1828,67544-0415-75 ",.01)
 ;;67544-0415-75
 ;;9002226.02101,"1828,67544-0415-75 ",.02)
 ;;67544-0415-75
 ;;9002226.02101,"1828,67544-0415-80 ",.01)
 ;;67544-0415-80
 ;;9002226.02101,"1828,67544-0415-80 ",.02)
 ;;67544-0415-80
 ;;9002226.02101,"1828,67544-0415-92 ",.01)
 ;;67544-0415-92
 ;;9002226.02101,"1828,67544-0415-92 ",.02)
 ;;67544-0415-92
 ;;9002226.02101,"1828,67544-0419-15 ",.01)
 ;;67544-0419-15
 ;;9002226.02101,"1828,67544-0419-15 ",.02)
 ;;67544-0419-15
 ;;9002226.02101,"1828,67544-0419-20 ",.01)
 ;;67544-0419-20
 ;;9002226.02101,"1828,67544-0419-20 ",.02)
 ;;67544-0419-20
 ;;9002226.02101,"1828,67544-0419-30 ",.01)
 ;;67544-0419-30
 ;;9002226.02101,"1828,67544-0419-30 ",.02)
 ;;67544-0419-30
 ;;9002226.02101,"1828,67544-0419-45 ",.01)
 ;;67544-0419-45
 ;;9002226.02101,"1828,67544-0419-45 ",.02)
 ;;67544-0419-45
 ;;9002226.02101,"1828,67544-0419-53 ",.01)
 ;;67544-0419-53
 ;;9002226.02101,"1828,67544-0419-53 ",.02)
 ;;67544-0419-53
 ;;9002226.02101,"1828,67544-0419-60 ",.01)
 ;;67544-0419-60
 ;;9002226.02101,"1828,67544-0419-60 ",.02)
 ;;67544-0419-60
 ;;9002226.02101,"1828,67544-0419-70 ",.01)
 ;;67544-0419-70
 ;;9002226.02101,"1828,67544-0419-70 ",.02)
 ;;67544-0419-70
 ;;9002226.02101,"1828,67544-0419-75 ",.01)
 ;;67544-0419-75
 ;;9002226.02101,"1828,67544-0419-75 ",.02)
 ;;67544-0419-75
 ;;9002226.02101,"1828,67544-0419-80 ",.01)
 ;;67544-0419-80
 ;;9002226.02101,"1828,67544-0419-80 ",.02)
 ;;67544-0419-80
 ;;9002226.02101,"1828,67544-0420-15 ",.01)
 ;;67544-0420-15
 ;;9002226.02101,"1828,67544-0420-15 ",.02)
 ;;67544-0420-15
 ;;9002226.02101,"1828,67544-0420-30 ",.01)
 ;;67544-0420-30
 ;;9002226.02101,"1828,67544-0420-30 ",.02)
 ;;67544-0420-30
 ;;9002226.02101,"1828,67544-0420-45 ",.01)
 ;;67544-0420-45
 ;;9002226.02101,"1828,67544-0420-45 ",.02)
 ;;67544-0420-45
 ;;9002226.02101,"1828,67544-0420-53 ",.01)
 ;;67544-0420-53
 ;;9002226.02101,"1828,67544-0420-53 ",.02)
 ;;67544-0420-53
 ;;9002226.02101,"1828,67544-0420-55 ",.01)
 ;;67544-0420-55
 ;;9002226.02101,"1828,67544-0420-55 ",.02)
 ;;67544-0420-55
 ;;9002226.02101,"1828,67544-0420-60 ",.01)
 ;;67544-0420-60
 ;;9002226.02101,"1828,67544-0420-60 ",.02)
 ;;67544-0420-60
 ;;9002226.02101,"1828,67544-0420-70 ",.01)
 ;;67544-0420-70
 ;;9002226.02101,"1828,67544-0420-70 ",.02)
 ;;67544-0420-70
 ;;9002226.02101,"1828,67544-0420-75 ",.01)
 ;;67544-0420-75
 ;;9002226.02101,"1828,67544-0420-75 ",.02)
 ;;67544-0420-75
 ;;9002226.02101,"1828,67544-0420-80 ",.01)
 ;;67544-0420-80
 ;;9002226.02101,"1828,67544-0420-80 ",.02)
 ;;67544-0420-80
 ;;9002226.02101,"1828,67544-0420-90 ",.01)
 ;;67544-0420-90
 ;;9002226.02101,"1828,67544-0420-90 ",.02)
 ;;67544-0420-90
 ;;9002226.02101,"1828,67544-0487-15 ",.01)
 ;;67544-0487-15
 ;;9002226.02101,"1828,67544-0487-15 ",.02)
 ;;67544-0487-15
 ;;9002226.02101,"1828,67544-0487-30 ",.01)
 ;;67544-0487-30
 ;;9002226.02101,"1828,67544-0487-30 ",.02)
 ;;67544-0487-30
 ;;9002226.02101,"1828,67544-0487-53 ",.01)
 ;;67544-0487-53
 ;;9002226.02101,"1828,67544-0487-53 ",.02)
 ;;67544-0487-53
 ;;9002226.02101,"1828,67544-0487-75 ",.01)
 ;;67544-0487-75
 ;;9002226.02101,"1828,67544-0487-75 ",.02)
 ;;67544-0487-75
 ;;9002226.02101,"1828,67544-0496-30 ",.01)
 ;;67544-0496-30
 ;;9002226.02101,"1828,67544-0496-30 ",.02)
 ;;67544-0496-30
 ;;9002226.02101,"1828,67544-0496-32 ",.01)
 ;;67544-0496-32
 ;;9002226.02101,"1828,67544-0496-32 ",.02)
 ;;67544-0496-32
 ;;9002226.02101,"1828,67544-0496-53 ",.01)
 ;;67544-0496-53
 ;;9002226.02101,"1828,67544-0496-53 ",.02)
 ;;67544-0496-53
 ;;9002226.02101,"1828,67544-0496-60 ",.01)
 ;;67544-0496-60
 ;;9002226.02101,"1828,67544-0496-60 ",.02)
 ;;67544-0496-60
 ;;9002226.02101,"1828,67544-0496-70 ",.01)
 ;;67544-0496-70
 ;;9002226.02101,"1828,67544-0496-70 ",.02)
 ;;67544-0496-70
 ;;9002226.02101,"1828,67544-0529-15 ",.01)
 ;;67544-0529-15
 ;;9002226.02101,"1828,67544-0529-15 ",.02)
 ;;67544-0529-15
 ;;9002226.02101,"1828,67544-0529-30 ",.01)
 ;;67544-0529-30
 ;;9002226.02101,"1828,67544-0529-30 ",.02)
 ;;67544-0529-30
 ;;9002226.02101,"1828,67544-0529-45 ",.01)
 ;;67544-0529-45
 ;;9002226.02101,"1828,67544-0529-45 ",.02)
 ;;67544-0529-45
 ;;9002226.02101,"1828,67544-0529-53 ",.01)
 ;;67544-0529-53
 ;;9002226.02101,"1828,67544-0529-53 ",.02)
 ;;67544-0529-53
 ;;9002226.02101,"1828,67544-0529-60 ",.01)
 ;;67544-0529-60
 ;;9002226.02101,"1828,67544-0529-60 ",.02)
 ;;67544-0529-60
 ;;9002226.02101,"1828,67544-0529-70 ",.01)
 ;;67544-0529-70
 ;;9002226.02101,"1828,67544-0529-70 ",.02)
 ;;67544-0529-70
 ;;9002226.02101,"1828,67544-0529-75 ",.01)
 ;;67544-0529-75
 ;;9002226.02101,"1828,67544-0529-75 ",.02)
 ;;67544-0529-75
 ;;9002226.02101,"1828,67544-0529-80 ",.01)
 ;;67544-0529-80
 ;;9002226.02101,"1828,67544-0529-80 ",.02)
 ;;67544-0529-80
 ;;9002226.02101,"1828,67544-0579-30 ",.01)
 ;;67544-0579-30
 ;;9002226.02101,"1828,67544-0579-30 ",.02)
 ;;67544-0579-30
 ;;9002226.02101,"1828,67544-0579-53 ",.01)
 ;;67544-0579-53
 ;;9002226.02101,"1828,67544-0579-53 ",.02)
 ;;67544-0579-53
 ;;9002226.02101,"1828,67544-0579-60 ",.01)
 ;;67544-0579-60
 ;;9002226.02101,"1828,67544-0579-60 ",.02)
 ;;67544-0579-60
 ;;9002226.02101,"1828,67544-0629-15 ",.01)
 ;;67544-0629-15
 ;;9002226.02101,"1828,67544-0629-15 ",.02)
 ;;67544-0629-15
 ;;9002226.02101,"1828,67544-0629-20 ",.01)
 ;;67544-0629-20
 ;;9002226.02101,"1828,67544-0629-20 ",.02)
 ;;67544-0629-20
 ;;9002226.02101,"1828,67544-0629-30 ",.01)
 ;;67544-0629-30
 ;;9002226.02101,"1828,67544-0629-30 ",.02)
 ;;67544-0629-30
 ;;9002226.02101,"1828,67544-0629-45 ",.01)
 ;;67544-0629-45
 ;;9002226.02101,"1828,67544-0629-45 ",.02)
 ;;67544-0629-45
 ;;9002226.02101,"1828,67544-0629-53 ",.01)
 ;;67544-0629-53
 ;;9002226.02101,"1828,67544-0629-53 ",.02)
 ;;67544-0629-53
 ;;9002226.02101,"1828,67544-0629-55 ",.01)
 ;;67544-0629-55
 ;;9002226.02101,"1828,67544-0629-55 ",.02)
 ;;67544-0629-55