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

BGP71P10.m

Go to the documentation of this file.
BGP71P10 ; 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,"1801,54868-0041-00 ",.02)
 ;;54868-0041-00
 ;;9002226.02101,"1801,54868-0084-01 ",.01)
 ;;54868-0084-01
 ;;9002226.02101,"1801,54868-0084-01 ",.02)
 ;;54868-0084-01
 ;;9002226.02101,"1801,54868-0365-00 ",.01)
 ;;54868-0365-00
 ;;9002226.02101,"1801,54868-0365-00 ",.02)
 ;;54868-0365-00
 ;;9002226.02101,"1801,54868-0365-02 ",.01)
 ;;54868-0365-02
 ;;9002226.02101,"1801,54868-0365-02 ",.02)
 ;;54868-0365-02
 ;;9002226.02101,"1801,54868-0365-03 ",.01)
 ;;54868-0365-03
 ;;9002226.02101,"1801,54868-0365-03 ",.02)
 ;;54868-0365-03
 ;;9002226.02101,"1801,54868-0451-00 ",.01)
 ;;54868-0451-00
 ;;9002226.02101,"1801,54868-0451-00 ",.02)
 ;;54868-0451-00
 ;;9002226.02101,"1801,54868-0451-01 ",.01)
 ;;54868-0451-01
 ;;9002226.02101,"1801,54868-0451-01 ",.02)
 ;;54868-0451-01
 ;;9002226.02101,"1801,54868-0451-02 ",.01)
 ;;54868-0451-02
 ;;9002226.02101,"1801,54868-0451-02 ",.02)
 ;;54868-0451-02
 ;;9002226.02101,"1801,54868-0451-03 ",.01)
 ;;54868-0451-03
 ;;9002226.02101,"1801,54868-0451-03 ",.02)
 ;;54868-0451-03
 ;;9002226.02101,"1801,54868-0451-05 ",.01)
 ;;54868-0451-05
 ;;9002226.02101,"1801,54868-0451-05 ",.02)
 ;;54868-0451-05
 ;;9002226.02101,"1801,54868-0451-06 ",.01)
 ;;54868-0451-06
 ;;9002226.02101,"1801,54868-0451-06 ",.02)
 ;;54868-0451-06
 ;;9002226.02101,"1801,54868-0451-07 ",.01)
 ;;54868-0451-07
 ;;9002226.02101,"1801,54868-0451-07 ",.02)
 ;;54868-0451-07
 ;;9002226.02101,"1801,54868-0453-00 ",.01)
 ;;54868-0453-00
 ;;9002226.02101,"1801,54868-0453-00 ",.02)
 ;;54868-0453-00
 ;;9002226.02101,"1801,54868-0453-02 ",.01)
 ;;54868-0453-02
 ;;9002226.02101,"1801,54868-0453-02 ",.02)
 ;;54868-0453-02
 ;;9002226.02101,"1801,54868-0453-04 ",.01)
 ;;54868-0453-04
 ;;9002226.02101,"1801,54868-0453-04 ",.02)
 ;;54868-0453-04
 ;;9002226.02101,"1801,54868-0453-05 ",.01)
 ;;54868-0453-05
 ;;9002226.02101,"1801,54868-0453-05 ",.02)
 ;;54868-0453-05
 ;;9002226.02101,"1801,54868-0453-06 ",.01)
 ;;54868-0453-06
 ;;9002226.02101,"1801,54868-0453-06 ",.02)
 ;;54868-0453-06
 ;;9002226.02101,"1801,54868-0494-01 ",.01)
 ;;54868-0494-01
 ;;9002226.02101,"1801,54868-0494-01 ",.02)
 ;;54868-0494-01
 ;;9002226.02101,"1801,54868-0794-01 ",.01)
 ;;54868-0794-01
 ;;9002226.02101,"1801,54868-0794-01 ",.02)
 ;;54868-0794-01
 ;;9002226.02101,"1801,54868-0877-01 ",.01)
 ;;54868-0877-01
 ;;9002226.02101,"1801,54868-0877-01 ",.02)
 ;;54868-0877-01
 ;;9002226.02101,"1801,54868-1432-00 ",.01)
 ;;54868-1432-00
 ;;9002226.02101,"1801,54868-1432-00 ",.02)
 ;;54868-1432-00
 ;;9002226.02101,"1801,54868-1432-01 ",.01)
 ;;54868-1432-01
 ;;9002226.02101,"1801,54868-1432-01 ",.02)
 ;;54868-1432-01
 ;;9002226.02101,"1801,54868-1629-00 ",.01)
 ;;54868-1629-00
 ;;9002226.02101,"1801,54868-1629-00 ",.02)
 ;;54868-1629-00
 ;;9002226.02101,"1801,54868-1629-01 ",.01)
 ;;54868-1629-01
 ;;9002226.02101,"1801,54868-1629-01 ",.02)
 ;;54868-1629-01
 ;;9002226.02101,"1801,54868-1629-02 ",.01)
 ;;54868-1629-02
 ;;9002226.02101,"1801,54868-1629-02 ",.02)
 ;;54868-1629-02
 ;;9002226.02101,"1801,54868-1629-03 ",.01)
 ;;54868-1629-03
 ;;9002226.02101,"1801,54868-1629-03 ",.02)
 ;;54868-1629-03
 ;;9002226.02101,"1801,54868-2702-00 ",.01)
 ;;54868-2702-00
 ;;9002226.02101,"1801,54868-2702-00 ",.02)
 ;;54868-2702-00
 ;;9002226.02101,"1801,54868-2702-01 ",.01)
 ;;54868-2702-01
 ;;9002226.02101,"1801,54868-2702-01 ",.02)
 ;;54868-2702-01
 ;;9002226.02101,"1801,54868-2702-02 ",.01)
 ;;54868-2702-02
 ;;9002226.02101,"1801,54868-2702-02 ",.02)
 ;;54868-2702-02
 ;;9002226.02101,"1801,54868-2702-03 ",.01)
 ;;54868-2702-03
 ;;9002226.02101,"1801,54868-2702-03 ",.02)
 ;;54868-2702-03
 ;;9002226.02101,"1801,54868-2702-04 ",.01)
 ;;54868-2702-04
 ;;9002226.02101,"1801,54868-2702-04 ",.02)
 ;;54868-2702-04
 ;;9002226.02101,"1801,54868-3017-00 ",.01)
 ;;54868-3017-00
 ;;9002226.02101,"1801,54868-3017-00 ",.02)
 ;;54868-3017-00
 ;;9002226.02101,"1801,54868-3114-00 ",.01)
 ;;54868-3114-00
 ;;9002226.02101,"1801,54868-3114-00 ",.02)
 ;;54868-3114-00
 ;;9002226.02101,"1801,54868-3114-01 ",.01)
 ;;54868-3114-01
 ;;9002226.02101,"1801,54868-3114-01 ",.02)
 ;;54868-3114-01
 ;;9002226.02101,"1801,54868-3265-00 ",.01)
 ;;54868-3265-00
 ;;9002226.02101,"1801,54868-3265-00 ",.02)
 ;;54868-3265-00
 ;;9002226.02101,"1801,54868-3265-01 ",.01)
 ;;54868-3265-01
 ;;9002226.02101,"1801,54868-3265-01 ",.02)
 ;;54868-3265-01
 ;;9002226.02101,"1801,54868-3265-03 ",.01)
 ;;54868-3265-03
 ;;9002226.02101,"1801,54868-3265-03 ",.02)
 ;;54868-3265-03
 ;;9002226.02101,"1801,54868-3265-04 ",.01)
 ;;54868-3265-04
 ;;9002226.02101,"1801,54868-3265-04 ",.02)
 ;;54868-3265-04
 ;;9002226.02101,"1801,54868-3265-05 ",.01)
 ;;54868-3265-05
 ;;9002226.02101,"1801,54868-3265-05 ",.02)
 ;;54868-3265-05
 ;;9002226.02101,"1801,54868-3265-06 ",.01)
 ;;54868-3265-06
 ;;9002226.02101,"1801,54868-3265-06 ",.02)
 ;;54868-3265-06
 ;;9002226.02101,"1801,54868-3266-01 ",.01)
 ;;54868-3266-01
 ;;9002226.02101,"1801,54868-3266-01 ",.02)
 ;;54868-3266-01
 ;;9002226.02101,"1801,54868-3266-02 ",.01)
 ;;54868-3266-02
 ;;9002226.02101,"1801,54868-3266-02 ",.02)
 ;;54868-3266-02
 ;;9002226.02101,"1801,54868-3266-03 ",.01)
 ;;54868-3266-03
 ;;9002226.02101,"1801,54868-3266-03 ",.02)
 ;;54868-3266-03
 ;;9002226.02101,"1801,54868-3266-04 ",.01)
 ;;54868-3266-04
 ;;9002226.02101,"1801,54868-3266-04 ",.02)
 ;;54868-3266-04
 ;;9002226.02101,"1801,54868-3426-00 ",.01)
 ;;54868-3426-00
 ;;9002226.02101,"1801,54868-3426-00 ",.02)
 ;;54868-3426-00
 ;;9002226.02101,"1801,54868-3426-01 ",.01)
 ;;54868-3426-01
 ;;9002226.02101,"1801,54868-3426-01 ",.02)
 ;;54868-3426-01
 ;;9002226.02101,"1801,54868-3711-00 ",.01)
 ;;54868-3711-00
 ;;9002226.02101,"1801,54868-3711-00 ",.02)
 ;;54868-3711-00
 ;;9002226.02101,"1801,54868-3711-01 ",.01)
 ;;54868-3711-01
 ;;9002226.02101,"1801,54868-3711-01 ",.02)
 ;;54868-3711-01
 ;;9002226.02101,"1801,54868-3799-00 ",.01)
 ;;54868-3799-00
 ;;9002226.02101,"1801,54868-3799-00 ",.02)
 ;;54868-3799-00
 ;;9002226.02101,"1801,54868-3800-00 ",.01)
 ;;54868-3800-00
 ;;9002226.02101,"1801,54868-3800-00 ",.02)
 ;;54868-3800-00
 ;;9002226.02101,"1801,54868-4030-00 ",.01)
 ;;54868-4030-00
 ;;9002226.02101,"1801,54868-4030-00 ",.02)
 ;;54868-4030-00
 ;;9002226.02101,"1801,54868-4030-01 ",.01)
 ;;54868-4030-01
 ;;9002226.02101,"1801,54868-4030-01 ",.02)
 ;;54868-4030-01
 ;;9002226.02101,"1801,54868-4030-02 ",.01)
 ;;54868-4030-02
 ;;9002226.02101,"1801,54868-4030-02 ",.02)
 ;;54868-4030-02
 ;;9002226.02101,"1801,54868-4031-00 ",.01)
 ;;54868-4031-00
 ;;9002226.02101,"1801,54868-4031-00 ",.02)
 ;;54868-4031-00
 ;;9002226.02101,"1801,54868-4031-01 ",.01)
 ;;54868-4031-01
 ;;9002226.02101,"1801,54868-4031-01 ",.02)
 ;;54868-4031-01
 ;;9002226.02101,"1801,54868-4031-02 ",.01)
 ;;54868-4031-02
 ;;9002226.02101,"1801,54868-4031-02 ",.02)
 ;;54868-4031-02
 ;;9002226.02101,"1801,54868-4031-03 ",.01)
 ;;54868-4031-03
 ;;9002226.02101,"1801,54868-4031-03 ",.02)
 ;;54868-4031-03
 ;;9002226.02101,"1801,54868-4089-00 ",.01)
 ;;54868-4089-00
 ;;9002226.02101,"1801,54868-4089-00 ",.02)
 ;;54868-4089-00
 ;;9002226.02101,"1801,54868-4091-00 ",.01)
 ;;54868-4091-00
 ;;9002226.02101,"1801,54868-4091-00 ",.02)
 ;;54868-4091-00
 ;;9002226.02101,"1801,54868-4091-01 ",.01)
 ;;54868-4091-01
 ;;9002226.02101,"1801,54868-4091-01 ",.02)
 ;;54868-4091-01
 ;;9002226.02101,"1801,54868-4091-02 ",.01)
 ;;54868-4091-02
 ;;9002226.02101,"1801,54868-4091-02 ",.02)
 ;;54868-4091-02
 ;;9002226.02101,"1801,54868-4091-03 ",.01)
 ;;54868-4091-03
 ;;9002226.02101,"1801,54868-4091-03 ",.02)
 ;;54868-4091-03
 ;;9002226.02101,"1801,54868-4149-00 ",.01)
 ;;54868-4149-00
 ;;9002226.02101,"1801,54868-4149-00 ",.02)
 ;;54868-4149-00
 ;;9002226.02101,"1801,54868-4149-01 ",.01)
 ;;54868-4149-01
 ;;9002226.02101,"1801,54868-4149-01 ",.02)
 ;;54868-4149-01
 ;;9002226.02101,"1801,54868-4242-00 ",.01)
 ;;54868-4242-00
 ;;9002226.02101,"1801,54868-4242-00 ",.02)
 ;;54868-4242-00
 ;;9002226.02101,"1801,54868-4243-00 ",.01)
 ;;54868-4243-00
 ;;9002226.02101,"1801,54868-4243-00 ",.02)
 ;;54868-4243-00
 ;;9002226.02101,"1801,54868-4244-00 ",.01)
 ;;54868-4244-00
 ;;9002226.02101,"1801,54868-4244-00 ",.02)
 ;;54868-4244-00
 ;;9002226.02101,"1801,54868-4269-00 ",.01)
 ;;54868-4269-00
 ;;9002226.02101,"1801,54868-4269-00 ",.02)
 ;;54868-4269-00
 ;;9002226.02101,"1801,54868-4370-00 ",.01)
 ;;54868-4370-00
 ;;9002226.02101,"1801,54868-4370-00 ",.02)
 ;;54868-4370-00
 ;;9002226.02101,"1801,54868-4370-01 ",.01)
 ;;54868-4370-01
 ;;9002226.02101,"1801,54868-4370-01 ",.02)
 ;;54868-4370-01
 ;;9002226.02101,"1801,54868-4370-02 ",.01)
 ;;54868-4370-02
 ;;9002226.02101,"1801,54868-4370-02 ",.02)
 ;;54868-4370-02
 ;;9002226.02101,"1801,54868-4529-00 ",.01)
 ;;54868-4529-00
 ;;9002226.02101,"1801,54868-4529-00 ",.02)
 ;;54868-4529-00
 ;;9002226.02101,"1801,54868-4529-01 ",.01)
 ;;54868-4529-01
 ;;9002226.02101,"1801,54868-4529-01 ",.02)
 ;;54868-4529-01
 ;;9002226.02101,"1801,54868-4529-02 ",.01)
 ;;54868-4529-02
 ;;9002226.02101,"1801,54868-4529-02 ",.02)
 ;;54868-4529-02
 ;;9002226.02101,"1801,54868-4529-03 ",.01)
 ;;54868-4529-03
 ;;9002226.02101,"1801,54868-4529-03 ",.02)
 ;;54868-4529-03
 ;;9002226.02101,"1801,54868-4609-00 ",.01)
 ;;54868-4609-00
 ;;9002226.02101,"1801,54868-4609-00 ",.02)
 ;;54868-4609-00
 ;;9002226.02101,"1801,54868-4609-01 ",.01)
 ;;54868-4609-01
 ;;9002226.02101,"1801,54868-4609-01 ",.02)
 ;;54868-4609-01
 ;;9002226.02101,"1801,54868-4677-00 ",.01)
 ;;54868-4677-00
 ;;9002226.02101,"1801,54868-4677-00 ",.02)
 ;;54868-4677-00
 ;;9002226.02101,"1801,54868-4679-00 ",.01)
 ;;54868-4679-00
 ;;9002226.02101,"1801,54868-4679-00 ",.02)
 ;;54868-4679-00
 ;;9002226.02101,"1801,54868-4761-01 ",.01)
 ;;54868-4761-01
 ;;9002226.02101,"1801,54868-4761-01 ",.02)
 ;;54868-4761-01
 ;;9002226.02101,"1801,54868-4761-02 ",.01)
 ;;54868-4761-02
 ;;9002226.02101,"1801,54868-4761-02 ",.02)
 ;;54868-4761-02
 ;;9002226.02101,"1801,54868-4811-00 ",.01)
 ;;54868-4811-00
 ;;9002226.02101,"1801,54868-4811-00 ",.02)
 ;;54868-4811-00
 ;;9002226.02101,"1801,54868-4813-00 ",.01)
 ;;54868-4813-00
 ;;9002226.02101,"1801,54868-4813-00 ",.02)
 ;;54868-4813-00
 ;;9002226.02101,"1801,54868-4831-00 ",.01)
 ;;54868-4831-00
 ;;9002226.02101,"1801,54868-4831-00 ",.02)
 ;;54868-4831-00
 ;;9002226.02101,"1801,54868-4842-00 ",.01)
 ;;54868-4842-00
 ;;9002226.02101,"1801,54868-4842-00 ",.02)
 ;;54868-4842-00
 ;;9002226.02101,"1801,54868-4842-01 ",.01)
 ;;54868-4842-01
 ;;9002226.02101,"1801,54868-4842-01 ",.02)
 ;;54868-4842-01
 ;;9002226.02101,"1801,54868-4842-02 ",.01)
 ;;54868-4842-02
 ;;9002226.02101,"1801,54868-4842-02 ",.02)
 ;;54868-4842-02
 ;;9002226.02101,"1801,54868-4865-00 ",.01)
 ;;54868-4865-00
 ;;9002226.02101,"1801,54868-4865-00 ",.02)
 ;;54868-4865-00
 ;;9002226.02101,"1801,54868-4865-01 ",.01)
 ;;54868-4865-01
 ;;9002226.02101,"1801,54868-4865-01 ",.02)
 ;;54868-4865-01
 ;;9002226.02101,"1801,54868-4865-02 ",.01)
 ;;54868-4865-02
 ;;9002226.02101,"1801,54868-4865-02 ",.02)
 ;;54868-4865-02
 ;;9002226.02101,"1801,54868-4865-03 ",.01)
 ;;54868-4865-03
 ;;9002226.02101,"1801,54868-4865-03 ",.02)
 ;;54868-4865-03
 ;;9002226.02101,"1801,54868-4865-04 ",.01)
 ;;54868-4865-04
 ;;9002226.02101,"1801,54868-4865-04 ",.02)
 ;;54868-4865-04
 ;;9002226.02101,"1801,54868-4866-00 ",.01)
 ;;54868-4866-00
 ;;9002226.02101,"1801,54868-4866-00 ",.02)
 ;;54868-4866-00
 ;;9002226.02101,"1801,54868-4879-00 ",.01)
 ;;54868-4879-00
 ;;9002226.02101,"1801,54868-4879-00 ",.02)
 ;;54868-4879-00
 ;;9002226.02101,"1801,54868-4879-01 ",.01)
 ;;54868-4879-01
 ;;9002226.02101,"1801,54868-4879-01 ",.02)
 ;;54868-4879-01