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

BGP82Z65.m

Go to the documentation of this file.
BGP82Z65 ; 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,"619,63629-1494-08 ",.02)
 ;;63629-1494-08
 ;;9002226.02101,"619,63629-1494-09 ",.01)
 ;;63629-1494-09
 ;;9002226.02101,"619,63629-1494-09 ",.02)
 ;;63629-1494-09
 ;;9002226.02101,"619,63629-1494-10 ",.01)
 ;;63629-1494-10
 ;;9002226.02101,"619,63629-1494-10 ",.02)
 ;;63629-1494-10
 ;;9002226.02101,"619,63629-1607-01 ",.01)
 ;;63629-1607-01
 ;;9002226.02101,"619,63629-1607-01 ",.02)
 ;;63629-1607-01
 ;;9002226.02101,"619,63629-1607-02 ",.01)
 ;;63629-1607-02
 ;;9002226.02101,"619,63629-1607-02 ",.02)
 ;;63629-1607-02
 ;;9002226.02101,"619,63629-1607-03 ",.01)
 ;;63629-1607-03
 ;;9002226.02101,"619,63629-1607-03 ",.02)
 ;;63629-1607-03
 ;;9002226.02101,"619,63629-2868-00 ",.01)
 ;;63629-2868-00
 ;;9002226.02101,"619,63629-2868-00 ",.02)
 ;;63629-2868-00
 ;;9002226.02101,"619,63629-2868-01 ",.01)
 ;;63629-2868-01
 ;;9002226.02101,"619,63629-2868-01 ",.02)
 ;;63629-2868-01
 ;;9002226.02101,"619,63629-2868-02 ",.01)
 ;;63629-2868-02
 ;;9002226.02101,"619,63629-2868-02 ",.02)
 ;;63629-2868-02
 ;;9002226.02101,"619,63629-2868-03 ",.01)
 ;;63629-2868-03
 ;;9002226.02101,"619,63629-2868-03 ",.02)
 ;;63629-2868-03
 ;;9002226.02101,"619,63629-2868-04 ",.01)
 ;;63629-2868-04
 ;;9002226.02101,"619,63629-2868-04 ",.02)
 ;;63629-2868-04
 ;;9002226.02101,"619,63629-2868-05 ",.01)
 ;;63629-2868-05
 ;;9002226.02101,"619,63629-2868-05 ",.02)
 ;;63629-2868-05
 ;;9002226.02101,"619,63629-2868-06 ",.01)
 ;;63629-2868-06
 ;;9002226.02101,"619,63629-2868-06 ",.02)
 ;;63629-2868-06
 ;;9002226.02101,"619,63629-2868-07 ",.01)
 ;;63629-2868-07
 ;;9002226.02101,"619,63629-2868-07 ",.02)
 ;;63629-2868-07
 ;;9002226.02101,"619,63629-2868-08 ",.01)
 ;;63629-2868-08
 ;;9002226.02101,"619,63629-2868-08 ",.02)
 ;;63629-2868-08
 ;;9002226.02101,"619,63629-2868-09 ",.01)
 ;;63629-2868-09
 ;;9002226.02101,"619,63629-2868-09 ",.02)
 ;;63629-2868-09
 ;;9002226.02101,"619,63629-2945-01 ",.01)
 ;;63629-2945-01
 ;;9002226.02101,"619,63629-2945-01 ",.02)
 ;;63629-2945-01
 ;;9002226.02101,"619,63629-2946-00 ",.01)
 ;;63629-2946-00
 ;;9002226.02101,"619,63629-2946-00 ",.02)
 ;;63629-2946-00
 ;;9002226.02101,"619,63629-2946-01 ",.01)
 ;;63629-2946-01
 ;;9002226.02101,"619,63629-2946-01 ",.02)
 ;;63629-2946-01
 ;;9002226.02101,"619,63629-2946-02 ",.01)
 ;;63629-2946-02
 ;;9002226.02101,"619,63629-2946-02 ",.02)
 ;;63629-2946-02
 ;;9002226.02101,"619,63629-2946-03 ",.01)
 ;;63629-2946-03
 ;;9002226.02101,"619,63629-2946-03 ",.02)
 ;;63629-2946-03
 ;;9002226.02101,"619,63629-2946-04 ",.01)
 ;;63629-2946-04
 ;;9002226.02101,"619,63629-2946-04 ",.02)
 ;;63629-2946-04
 ;;9002226.02101,"619,63629-2946-05 ",.01)
 ;;63629-2946-05
 ;;9002226.02101,"619,63629-2946-05 ",.02)
 ;;63629-2946-05
 ;;9002226.02101,"619,63629-2946-06 ",.01)
 ;;63629-2946-06
 ;;9002226.02101,"619,63629-2946-06 ",.02)
 ;;63629-2946-06
 ;;9002226.02101,"619,63629-2946-07 ",.01)
 ;;63629-2946-07
 ;;9002226.02101,"619,63629-2946-07 ",.02)
 ;;63629-2946-07
 ;;9002226.02101,"619,63629-2946-08 ",.01)
 ;;63629-2946-08
 ;;9002226.02101,"619,63629-2946-08 ",.02)
 ;;63629-2946-08
 ;;9002226.02101,"619,63629-2946-09 ",.01)
 ;;63629-2946-09
 ;;9002226.02101,"619,63629-2946-09 ",.02)
 ;;63629-2946-09
 ;;9002226.02101,"619,63629-2946-10 ",.01)
 ;;63629-2946-10
 ;;9002226.02101,"619,63629-2946-10 ",.02)
 ;;63629-2946-10
 ;;9002226.02101,"619,63629-2947-00 ",.01)
 ;;63629-2947-00
 ;;9002226.02101,"619,63629-2947-00 ",.02)
 ;;63629-2947-00
 ;;9002226.02101,"619,63629-2947-01 ",.01)
 ;;63629-2947-01
 ;;9002226.02101,"619,63629-2947-01 ",.02)
 ;;63629-2947-01
 ;;9002226.02101,"619,63629-2947-02 ",.01)
 ;;63629-2947-02
 ;;9002226.02101,"619,63629-2947-02 ",.02)
 ;;63629-2947-02
 ;;9002226.02101,"619,63629-2947-03 ",.01)
 ;;63629-2947-03
 ;;9002226.02101,"619,63629-2947-03 ",.02)
 ;;63629-2947-03
 ;;9002226.02101,"619,63629-2947-04 ",.01)
 ;;63629-2947-04
 ;;9002226.02101,"619,63629-2947-04 ",.02)
 ;;63629-2947-04
 ;;9002226.02101,"619,63629-2947-05 ",.01)
 ;;63629-2947-05
 ;;9002226.02101,"619,63629-2947-05 ",.02)
 ;;63629-2947-05
 ;;9002226.02101,"619,63629-2947-06 ",.01)
 ;;63629-2947-06
 ;;9002226.02101,"619,63629-2947-06 ",.02)
 ;;63629-2947-06
 ;;9002226.02101,"619,63629-2947-07 ",.01)
 ;;63629-2947-07
 ;;9002226.02101,"619,63629-2947-07 ",.02)
 ;;63629-2947-07
 ;;9002226.02101,"619,63629-2947-08 ",.01)
 ;;63629-2947-08
 ;;9002226.02101,"619,63629-2947-08 ",.02)
 ;;63629-2947-08
 ;;9002226.02101,"619,63629-2947-09 ",.01)
 ;;63629-2947-09
 ;;9002226.02101,"619,63629-2947-09 ",.02)
 ;;63629-2947-09
 ;;9002226.02101,"619,63629-2947-10 ",.01)
 ;;63629-2947-10
 ;;9002226.02101,"619,63629-2947-10 ",.02)
 ;;63629-2947-10
 ;;9002226.02101,"619,63629-2952-01 ",.01)
 ;;63629-2952-01
 ;;9002226.02101,"619,63629-2952-01 ",.02)
 ;;63629-2952-01
 ;;9002226.02101,"619,63629-2952-02 ",.01)
 ;;63629-2952-02
 ;;9002226.02101,"619,63629-2952-02 ",.02)
 ;;63629-2952-02
 ;;9002226.02101,"619,63629-2952-03 ",.01)
 ;;63629-2952-03
 ;;9002226.02101,"619,63629-2952-03 ",.02)
 ;;63629-2952-03
 ;;9002226.02101,"619,63629-2958-01 ",.01)
 ;;63629-2958-01
 ;;9002226.02101,"619,63629-2958-01 ",.02)
 ;;63629-2958-01
 ;;9002226.02101,"619,63629-2958-02 ",.01)
 ;;63629-2958-02
 ;;9002226.02101,"619,63629-2958-02 ",.02)
 ;;63629-2958-02
 ;;9002226.02101,"619,63629-2958-03 ",.01)
 ;;63629-2958-03
 ;;9002226.02101,"619,63629-2958-03 ",.02)
 ;;63629-2958-03
 ;;9002226.02101,"619,63629-2958-04 ",.01)
 ;;63629-2958-04
 ;;9002226.02101,"619,63629-2958-04 ",.02)
 ;;63629-2958-04
 ;;9002226.02101,"619,63629-2958-05 ",.01)
 ;;63629-2958-05
 ;;9002226.02101,"619,63629-2958-05 ",.02)
 ;;63629-2958-05
 ;;9002226.02101,"619,63629-2958-06 ",.01)
 ;;63629-2958-06
 ;;9002226.02101,"619,63629-2958-06 ",.02)
 ;;63629-2958-06
 ;;9002226.02101,"619,63629-2959-01 ",.01)
 ;;63629-2959-01
 ;;9002226.02101,"619,63629-2959-01 ",.02)
 ;;63629-2959-01
 ;;9002226.02101,"619,63629-2962-01 ",.01)
 ;;63629-2962-01
 ;;9002226.02101,"619,63629-2962-01 ",.02)
 ;;63629-2962-01
 ;;9002226.02101,"619,63629-2962-02 ",.01)
 ;;63629-2962-02
 ;;9002226.02101,"619,63629-2962-02 ",.02)
 ;;63629-2962-02
 ;;9002226.02101,"619,63629-3031-01 ",.01)
 ;;63629-3031-01
 ;;9002226.02101,"619,63629-3031-01 ",.02)
 ;;63629-3031-01
 ;;9002226.02101,"619,63629-3031-02 ",.01)
 ;;63629-3031-02
 ;;9002226.02101,"619,63629-3031-02 ",.02)
 ;;63629-3031-02
 ;;9002226.02101,"619,63629-3031-03 ",.01)
 ;;63629-3031-03
 ;;9002226.02101,"619,63629-3031-03 ",.02)
 ;;63629-3031-03
 ;;9002226.02101,"619,63629-3031-04 ",.01)
 ;;63629-3031-04
 ;;9002226.02101,"619,63629-3031-04 ",.02)
 ;;63629-3031-04
 ;;9002226.02101,"619,63629-3031-05 ",.01)
 ;;63629-3031-05
 ;;9002226.02101,"619,63629-3031-05 ",.02)
 ;;63629-3031-05
 ;;9002226.02101,"619,63629-3066-01 ",.01)
 ;;63629-3066-01
 ;;9002226.02101,"619,63629-3066-01 ",.02)
 ;;63629-3066-01
 ;;9002226.02101,"619,63629-3066-02 ",.01)
 ;;63629-3066-02
 ;;9002226.02101,"619,63629-3066-02 ",.02)
 ;;63629-3066-02
 ;;9002226.02101,"619,63629-3066-03 ",.01)
 ;;63629-3066-03
 ;;9002226.02101,"619,63629-3066-03 ",.02)
 ;;63629-3066-03
 ;;9002226.02101,"619,63629-3066-04 ",.01)
 ;;63629-3066-04
 ;;9002226.02101,"619,63629-3066-04 ",.02)
 ;;63629-3066-04
 ;;9002226.02101,"619,63629-3066-05 ",.01)
 ;;63629-3066-05
 ;;9002226.02101,"619,63629-3066-05 ",.02)
 ;;63629-3066-05
 ;;9002226.02101,"619,63629-3066-06 ",.01)
 ;;63629-3066-06
 ;;9002226.02101,"619,63629-3066-06 ",.02)
 ;;63629-3066-06
 ;;9002226.02101,"619,63629-3066-07 ",.01)
 ;;63629-3066-07
 ;;9002226.02101,"619,63629-3066-07 ",.02)
 ;;63629-3066-07
 ;;9002226.02101,"619,63629-3066-08 ",.01)
 ;;63629-3066-08
 ;;9002226.02101,"619,63629-3066-08 ",.02)
 ;;63629-3066-08
 ;;9002226.02101,"619,63629-3066-09 ",.01)
 ;;63629-3066-09
 ;;9002226.02101,"619,63629-3066-09 ",.02)
 ;;63629-3066-09
 ;;9002226.02101,"619,63629-3066-10 ",.01)
 ;;63629-3066-10
 ;;9002226.02101,"619,63629-3066-10 ",.02)
 ;;63629-3066-10
 ;;9002226.02101,"619,63629-3152-01 ",.01)
 ;;63629-3152-01
 ;;9002226.02101,"619,63629-3152-01 ",.02)
 ;;63629-3152-01
 ;;9002226.02101,"619,63629-3152-02 ",.01)
 ;;63629-3152-02
 ;;9002226.02101,"619,63629-3152-02 ",.02)
 ;;63629-3152-02
 ;;9002226.02101,"619,63629-3184-01 ",.01)
 ;;63629-3184-01
 ;;9002226.02101,"619,63629-3184-01 ",.02)
 ;;63629-3184-01
 ;;9002226.02101,"619,63629-3184-02 ",.01)
 ;;63629-3184-02
 ;;9002226.02101,"619,63629-3184-02 ",.02)
 ;;63629-3184-02
 ;;9002226.02101,"619,63629-3184-03 ",.01)
 ;;63629-3184-03
 ;;9002226.02101,"619,63629-3184-03 ",.02)
 ;;63629-3184-03
 ;;9002226.02101,"619,63629-3184-04 ",.01)
 ;;63629-3184-04
 ;;9002226.02101,"619,63629-3184-04 ",.02)
 ;;63629-3184-04
 ;;9002226.02101,"619,63629-3184-05 ",.01)
 ;;63629-3184-05
 ;;9002226.02101,"619,63629-3184-05 ",.02)
 ;;63629-3184-05
 ;;9002226.02101,"619,63629-3184-06 ",.01)
 ;;63629-3184-06
 ;;9002226.02101,"619,63629-3184-06 ",.02)
 ;;63629-3184-06
 ;;9002226.02101,"619,63629-3184-07 ",.01)
 ;;63629-3184-07
 ;;9002226.02101,"619,63629-3184-07 ",.02)
 ;;63629-3184-07
 ;;9002226.02101,"619,63629-3206-01 ",.01)
 ;;63629-3206-01
 ;;9002226.02101,"619,63629-3206-01 ",.02)
 ;;63629-3206-01
 ;;9002226.02101,"619,63629-3206-02 ",.01)
 ;;63629-3206-02
 ;;9002226.02101,"619,63629-3206-02 ",.02)
 ;;63629-3206-02
 ;;9002226.02101,"619,63629-3206-03 ",.01)
 ;;63629-3206-03
 ;;9002226.02101,"619,63629-3206-03 ",.02)
 ;;63629-3206-03
 ;;9002226.02101,"619,63629-3342-01 ",.01)
 ;;63629-3342-01
 ;;9002226.02101,"619,63629-3342-01 ",.02)
 ;;63629-3342-01
 ;;9002226.02101,"619,63629-3342-02 ",.01)
 ;;63629-3342-02
 ;;9002226.02101,"619,63629-3342-02 ",.02)
 ;;63629-3342-02
 ;;9002226.02101,"619,63629-3342-03 ",.01)
 ;;63629-3342-03
 ;;9002226.02101,"619,63629-3342-03 ",.02)
 ;;63629-3342-03
 ;;9002226.02101,"619,63629-3342-04 ",.01)
 ;;63629-3342-04
 ;;9002226.02101,"619,63629-3342-04 ",.02)
 ;;63629-3342-04
 ;;9002226.02101,"619,63629-3342-05 ",.01)
 ;;63629-3342-05
 ;;9002226.02101,"619,63629-3342-05 ",.02)
 ;;63629-3342-05
 ;;9002226.02101,"619,63629-3342-06 ",.01)
 ;;63629-3342-06
 ;;9002226.02101,"619,63629-3342-06 ",.02)
 ;;63629-3342-06
 ;;9002226.02101,"619,63629-3342-07 ",.01)
 ;;63629-3342-07
 ;;9002226.02101,"619,63629-3342-07 ",.02)
 ;;63629-3342-07
 ;;9002226.02101,"619,63629-3342-08 ",.01)
 ;;63629-3342-08
 ;;9002226.02101,"619,63629-3342-08 ",.02)
 ;;63629-3342-08
 ;;9002226.02101,"619,63629-3342-09 ",.01)
 ;;63629-3342-09
 ;;9002226.02101,"619,63629-3342-09 ",.02)
 ;;63629-3342-09
 ;;9002226.02101,"619,63629-3406-01 ",.01)
 ;;63629-3406-01
 ;;9002226.02101,"619,63629-3406-01 ",.02)
 ;;63629-3406-01
 ;;9002226.02101,"619,63629-3406-02 ",.01)
 ;;63629-3406-02
 ;;9002226.02101,"619,63629-3406-02 ",.02)
 ;;63629-3406-02
 ;;9002226.02101,"619,63629-3406-03 ",.01)
 ;;63629-3406-03
 ;;9002226.02101,"619,63629-3406-03 ",.02)
 ;;63629-3406-03
 ;;9002226.02101,"619,63629-3406-04 ",.01)
 ;;63629-3406-04
 ;;9002226.02101,"619,63629-3406-04 ",.02)
 ;;63629-3406-04
 ;;9002226.02101,"619,63629-3406-05 ",.01)
 ;;63629-3406-05
 ;;9002226.02101,"619,63629-3406-05 ",.02)
 ;;63629-3406-05
 ;;9002226.02101,"619,63629-3406-06 ",.01)
 ;;63629-3406-06
 ;;9002226.02101,"619,63629-3406-06 ",.02)
 ;;63629-3406-06
 ;;9002226.02101,"619,63629-3406-07 ",.01)
 ;;63629-3406-07
 ;;9002226.02101,"619,63629-3406-07 ",.02)
 ;;63629-3406-07
 ;;9002226.02101,"619,63629-3406-08 ",.01)
 ;;63629-3406-08
 ;;9002226.02101,"619,63629-3406-08 ",.02)
 ;;63629-3406-08
 ;;9002226.02101,"619,63629-3763-01 ",.01)
 ;;63629-3763-01
 ;;9002226.02101,"619,63629-3763-01 ",.02)
 ;;63629-3763-01
 ;;9002226.02101,"619,63629-3763-02 ",.01)
 ;;63629-3763-02