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

BGP82J11.m

Go to the documentation of this file.
BGP82J11 ; 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,"1220,00378-6167-93 ",.01)
 ;;00378-6167-93
 ;;9002226.02101,"1220,00378-6167-93 ",.02)
 ;;00378-6167-93
 ;;9002226.02101,"1220,00378-6168-05 ",.01)
 ;;00378-6168-05
 ;;9002226.02101,"1220,00378-6168-05 ",.02)
 ;;00378-6168-05
 ;;9002226.02101,"1220,00378-6168-77 ",.01)
 ;;00378-6168-77
 ;;9002226.02101,"1220,00378-6168-77 ",.02)
 ;;00378-6168-77
 ;;9002226.02101,"1220,00378-6168-93 ",.01)
 ;;00378-6168-93
 ;;9002226.02101,"1220,00378-6168-93 ",.02)
 ;;00378-6168-93
 ;;9002226.02101,"1220,00378-6169-05 ",.01)
 ;;00378-6169-05
 ;;9002226.02101,"1220,00378-6169-05 ",.02)
 ;;00378-6169-05
 ;;9002226.02101,"1220,00378-6169-77 ",.01)
 ;;00378-6169-77
 ;;9002226.02101,"1220,00378-6169-77 ",.02)
 ;;00378-6169-77
 ;;9002226.02101,"1220,00378-6169-93 ",.01)
 ;;00378-6169-93
 ;;9002226.02101,"1220,00378-6169-93 ",.02)
 ;;00378-6169-93
 ;;9002226.02101,"1220,00378-6170-05 ",.01)
 ;;00378-6170-05
 ;;9002226.02101,"1220,00378-6170-05 ",.02)
 ;;00378-6170-05
 ;;9002226.02101,"1220,00378-6170-77 ",.01)
 ;;00378-6170-77
 ;;9002226.02101,"1220,00378-6170-77 ",.02)
 ;;00378-6170-77
 ;;9002226.02101,"1220,00378-6170-93 ",.01)
 ;;00378-6170-93
 ;;9002226.02101,"1220,00378-6170-93 ",.02)
 ;;00378-6170-93
 ;;9002226.02101,"1220,00378-6171-77 ",.01)
 ;;00378-6171-77
 ;;9002226.02101,"1220,00378-6171-77 ",.02)
 ;;00378-6171-77
 ;;9002226.02101,"1220,00378-6171-93 ",.01)
 ;;00378-6171-93
 ;;9002226.02101,"1220,00378-6171-93 ",.02)
 ;;00378-6171-93
 ;;9002226.02101,"1220,00378-6201-01 ",.01)
 ;;00378-6201-01
 ;;9002226.02101,"1220,00378-6201-01 ",.02)
 ;;00378-6201-01
 ;;9002226.02101,"1220,00378-6202-01 ",.01)
 ;;00378-6202-01
 ;;9002226.02101,"1220,00378-6202-01 ",.02)
 ;;00378-6202-01
 ;;9002226.02101,"1220,00378-6202-05 ",.01)
 ;;00378-6202-05
 ;;9002226.02101,"1220,00378-6202-05 ",.02)
 ;;00378-6202-05
 ;;9002226.02101,"1220,00378-6203-01 ",.01)
 ;;00378-6203-01
 ;;9002226.02101,"1220,00378-6203-01 ",.02)
 ;;00378-6203-01
 ;;9002226.02101,"1220,00378-6203-05 ",.01)
 ;;00378-6203-05
 ;;9002226.02101,"1220,00378-6203-05 ",.02)
 ;;00378-6203-05
 ;;9002226.02101,"1220,00378-6320-01 ",.01)
 ;;00378-6320-01
 ;;9002226.02101,"1220,00378-6320-01 ",.02)
 ;;00378-6320-01
 ;;9002226.02101,"1220,00378-6320-93 ",.01)
 ;;00378-6320-93
 ;;9002226.02101,"1220,00378-6320-93 ",.02)
 ;;00378-6320-93
 ;;9002226.02101,"1220,00378-6380-01 ",.01)
 ;;00378-6380-01
 ;;9002226.02101,"1220,00378-6380-01 ",.02)
 ;;00378-6380-01
 ;;9002226.02101,"1220,00378-6380-93 ",.01)
 ;;00378-6380-93
 ;;9002226.02101,"1220,00378-6380-93 ",.02)
 ;;00378-6380-93
 ;;9002226.02101,"1220,00378-6440-01 ",.01)
 ;;00378-6440-01
 ;;9002226.02101,"1220,00378-6440-01 ",.02)
 ;;00378-6440-01
 ;;9002226.02101,"1220,00378-6440-93 ",.01)
 ;;00378-6440-93
 ;;9002226.02101,"1220,00378-6440-93 ",.02)
 ;;00378-6440-93
 ;;9002226.02101,"1220,00378-6895-01 ",.01)
 ;;00378-6895-01
 ;;9002226.02101,"1220,00378-6895-01 ",.02)
 ;;00378-6895-01
 ;;9002226.02101,"1220,00378-6896-01 ",.01)
 ;;00378-6896-01
 ;;9002226.02101,"1220,00378-6896-01 ",.02)
 ;;00378-6896-01
 ;;9002226.02101,"1220,00378-6896-05 ",.01)
 ;;00378-6896-05
 ;;9002226.02101,"1220,00378-6896-05 ",.02)
 ;;00378-6896-05
 ;;9002226.02101,"1220,00378-6897-01 ",.01)
 ;;00378-6897-01
 ;;9002226.02101,"1220,00378-6897-01 ",.02)
 ;;00378-6897-01
 ;;9002226.02101,"1220,00378-6897-05 ",.01)
 ;;00378-6897-05
 ;;9002226.02101,"1220,00378-6897-05 ",.02)
 ;;00378-6897-05
 ;;9002226.02101,"1220,00378-6898-01 ",.01)
 ;;00378-6898-01
 ;;9002226.02101,"1220,00378-6898-01 ",.02)
 ;;00378-6898-01
 ;;9002226.02101,"1220,00378-6898-05 ",.01)
 ;;00378-6898-05
 ;;9002226.02101,"1220,00378-6898-05 ",.02)
 ;;00378-6898-05
 ;;9002226.02101,"1220,00378-6899-01 ",.01)
 ;;00378-6899-01
 ;;9002226.02101,"1220,00378-6899-01 ",.02)
 ;;00378-6899-01
 ;;9002226.02101,"1220,00378-6900-01 ",.01)
 ;;00378-6900-01
 ;;9002226.02101,"1220,00378-6900-01 ",.02)
 ;;00378-6900-01
 ;;9002226.02101,"1220,00440-5096-00 ",.01)
 ;;00440-5096-00
 ;;9002226.02101,"1220,00440-5096-00 ",.02)
 ;;00440-5096-00
 ;;9002226.02101,"1220,00440-5096-05 ",.01)
 ;;00440-5096-05
 ;;9002226.02101,"1220,00440-5096-05 ",.02)
 ;;00440-5096-05
 ;;9002226.02101,"1220,00440-5096-30 ",.01)
 ;;00440-5096-30
 ;;9002226.02101,"1220,00440-5096-30 ",.02)
 ;;00440-5096-30
 ;;9002226.02101,"1220,00440-5096-60 ",.01)
 ;;00440-5096-60
 ;;9002226.02101,"1220,00440-5096-60 ",.02)
 ;;00440-5096-60
 ;;9002226.02101,"1220,00440-5096-81 ",.01)
 ;;00440-5096-81
 ;;9002226.02101,"1220,00440-5096-81 ",.02)
 ;;00440-5096-81
 ;;9002226.02101,"1220,00440-5096-85 ",.01)
 ;;00440-5096-85
 ;;9002226.02101,"1220,00440-5096-85 ",.02)
 ;;00440-5096-85
 ;;9002226.02101,"1220,00440-5096-90 ",.01)
 ;;00440-5096-90
 ;;9002226.02101,"1220,00440-5096-90 ",.02)
 ;;00440-5096-90
 ;;9002226.02101,"1220,00440-5097-00 ",.01)
 ;;00440-5097-00
 ;;9002226.02101,"1220,00440-5097-00 ",.02)
 ;;00440-5097-00
 ;;9002226.02101,"1220,00440-5097-05 ",.01)
 ;;00440-5097-05
 ;;9002226.02101,"1220,00440-5097-05 ",.02)
 ;;00440-5097-05
 ;;9002226.02101,"1220,00440-5097-30 ",.01)
 ;;00440-5097-30
 ;;9002226.02101,"1220,00440-5097-30 ",.02)
 ;;00440-5097-30
 ;;9002226.02101,"1220,00440-5097-60 ",.01)
 ;;00440-5097-60
 ;;9002226.02101,"1220,00440-5097-60 ",.02)
 ;;00440-5097-60
 ;;9002226.02101,"1220,00440-5097-81 ",.01)
 ;;00440-5097-81
 ;;9002226.02101,"1220,00440-5097-81 ",.02)
 ;;00440-5097-81
 ;;9002226.02101,"1220,00440-5097-85 ",.01)
 ;;00440-5097-85
 ;;9002226.02101,"1220,00440-5097-85 ",.02)
 ;;00440-5097-85
 ;;9002226.02101,"1220,00440-5097-90 ",.01)
 ;;00440-5097-90
 ;;9002226.02101,"1220,00440-5097-90 ",.02)
 ;;00440-5097-90
 ;;9002226.02101,"1220,00440-5098-00 ",.01)
 ;;00440-5098-00
 ;;9002226.02101,"1220,00440-5098-00 ",.02)
 ;;00440-5098-00
 ;;9002226.02101,"1220,00440-5098-05 ",.01)
 ;;00440-5098-05
 ;;9002226.02101,"1220,00440-5098-05 ",.02)
 ;;00440-5098-05
 ;;9002226.02101,"1220,00440-5098-30 ",.01)
 ;;00440-5098-30
 ;;9002226.02101,"1220,00440-5098-30 ",.02)
 ;;00440-5098-30
 ;;9002226.02101,"1220,00440-5098-60 ",.01)
 ;;00440-5098-60
 ;;9002226.02101,"1220,00440-5098-60 ",.02)
 ;;00440-5098-60
 ;;9002226.02101,"1220,00440-5098-81 ",.01)
 ;;00440-5098-81
 ;;9002226.02101,"1220,00440-5098-81 ",.02)
 ;;00440-5098-81
 ;;9002226.02101,"1220,00440-5098-85 ",.01)
 ;;00440-5098-85
 ;;9002226.02101,"1220,00440-5098-85 ",.02)
 ;;00440-5098-85
 ;;9002226.02101,"1220,00440-5098-90 ",.01)
 ;;00440-5098-90
 ;;9002226.02101,"1220,00440-5098-90 ",.02)
 ;;00440-5098-90
 ;;9002226.02101,"1220,00440-7096-30 ",.01)
 ;;00440-7096-30
 ;;9002226.02101,"1220,00440-7096-30 ",.02)
 ;;00440-7096-30
 ;;9002226.02101,"1220,00440-7096-81 ",.01)
 ;;00440-7096-81
 ;;9002226.02101,"1220,00440-7096-81 ",.02)
 ;;00440-7096-81
 ;;9002226.02101,"1220,00440-7096-85 ",.01)
 ;;00440-7096-85
 ;;9002226.02101,"1220,00440-7096-85 ",.02)
 ;;00440-7096-85
 ;;9002226.02101,"1220,00440-7096-90 ",.01)
 ;;00440-7096-90
 ;;9002226.02101,"1220,00440-7096-90 ",.02)
 ;;00440-7096-90
 ;;9002226.02101,"1220,00440-7097-30 ",.01)
 ;;00440-7097-30
 ;;9002226.02101,"1220,00440-7097-30 ",.02)
 ;;00440-7097-30
 ;;9002226.02101,"1220,00440-7097-81 ",.01)
 ;;00440-7097-81
 ;;9002226.02101,"1220,00440-7097-81 ",.02)
 ;;00440-7097-81
 ;;9002226.02101,"1220,00440-7097-85 ",.01)
 ;;00440-7097-85
 ;;9002226.02101,"1220,00440-7097-85 ",.02)
 ;;00440-7097-85
 ;;9002226.02101,"1220,00440-7097-90 ",.01)
 ;;00440-7097-90
 ;;9002226.02101,"1220,00440-7097-90 ",.02)
 ;;00440-7097-90
 ;;9002226.02101,"1220,00440-7098-30 ",.01)
 ;;00440-7098-30
 ;;9002226.02101,"1220,00440-7098-30 ",.02)
 ;;00440-7098-30
 ;;9002226.02101,"1220,00440-7098-81 ",.01)
 ;;00440-7098-81
 ;;9002226.02101,"1220,00440-7098-81 ",.02)
 ;;00440-7098-81
 ;;9002226.02101,"1220,00440-7098-85 ",.01)
 ;;00440-7098-85
 ;;9002226.02101,"1220,00440-7098-85 ",.02)
 ;;00440-7098-85
 ;;9002226.02101,"1220,00440-7098-90 ",.01)
 ;;00440-7098-90
 ;;9002226.02101,"1220,00440-7098-90 ",.02)
 ;;00440-7098-90
 ;;9002226.02101,"1220,00440-7140-30 ",.01)
 ;;00440-7140-30
 ;;9002226.02101,"1220,00440-7140-30 ",.02)
 ;;00440-7140-30
 ;;9002226.02101,"1220,00440-7140-81 ",.01)
 ;;00440-7140-81
 ;;9002226.02101,"1220,00440-7140-81 ",.02)
 ;;00440-7140-81
 ;;9002226.02101,"1220,00440-7140-85 ",.01)
 ;;00440-7140-85
 ;;9002226.02101,"1220,00440-7140-85 ",.02)
 ;;00440-7140-85
 ;;9002226.02101,"1220,00440-7140-90 ",.01)
 ;;00440-7140-90
 ;;9002226.02101,"1220,00440-7140-90 ",.02)
 ;;00440-7140-90
 ;;9002226.02101,"1220,00440-7141-30 ",.01)
 ;;00440-7141-30
 ;;9002226.02101,"1220,00440-7141-30 ",.02)
 ;;00440-7141-30
 ;;9002226.02101,"1220,00440-7141-81 ",.01)
 ;;00440-7141-81
 ;;9002226.02101,"1220,00440-7141-81 ",.02)
 ;;00440-7141-81
 ;;9002226.02101,"1220,00440-7141-85 ",.01)
 ;;00440-7141-85
 ;;9002226.02101,"1220,00440-7141-85 ",.02)
 ;;00440-7141-85
 ;;9002226.02101,"1220,00440-7141-90 ",.01)
 ;;00440-7141-90
 ;;9002226.02101,"1220,00440-7141-90 ",.02)
 ;;00440-7141-90
 ;;9002226.02101,"1220,00440-7142-30 ",.01)
 ;;00440-7142-30
 ;;9002226.02101,"1220,00440-7142-30 ",.02)
 ;;00440-7142-30
 ;;9002226.02101,"1220,00440-7142-81 ",.01)
 ;;00440-7142-81
 ;;9002226.02101,"1220,00440-7142-81 ",.02)
 ;;00440-7142-81
 ;;9002226.02101,"1220,00440-7142-85 ",.01)
 ;;00440-7142-85
 ;;9002226.02101,"1220,00440-7142-85 ",.02)
 ;;00440-7142-85
 ;;9002226.02101,"1220,00440-7142-90 ",.01)
 ;;00440-7142-90
 ;;9002226.02101,"1220,00440-7142-90 ",.02)
 ;;00440-7142-90
 ;;9002226.02101,"1220,00440-7143-30 ",.01)
 ;;00440-7143-30
 ;;9002226.02101,"1220,00440-7143-30 ",.02)
 ;;00440-7143-30
 ;;9002226.02101,"1220,00440-7143-81 ",.01)
 ;;00440-7143-81
 ;;9002226.02101,"1220,00440-7143-81 ",.02)
 ;;00440-7143-81
 ;;9002226.02101,"1220,00440-7143-85 ",.01)
 ;;00440-7143-85
 ;;9002226.02101,"1220,00440-7143-85 ",.02)
 ;;00440-7143-85
 ;;9002226.02101,"1220,00440-7143-90 ",.01)
 ;;00440-7143-90
 ;;9002226.02101,"1220,00440-7143-90 ",.02)
 ;;00440-7143-90
 ;;9002226.02101,"1220,00440-7160-90 ",.01)
 ;;00440-7160-90
 ;;9002226.02101,"1220,00440-7160-90 ",.02)
 ;;00440-7160-90
 ;;9002226.02101,"1220,00440-7400-90 ",.01)
 ;;00440-7400-90
 ;;9002226.02101,"1220,00440-7400-90 ",.02)
 ;;00440-7400-90
 ;;9002226.02101,"1220,00440-7401-90 ",.01)
 ;;00440-7401-90
 ;;9002226.02101,"1220,00440-7401-90 ",.02)
 ;;00440-7401-90
 ;;9002226.02101,"1220,00440-7402-90 ",.01)
 ;;00440-7402-90
 ;;9002226.02101,"1220,00440-7402-90 ",.02)
 ;;00440-7402-90
 ;;9002226.02101,"1220,00440-7410-90 ",.01)
 ;;00440-7410-90
 ;;9002226.02101,"1220,00440-7410-90 ",.02)
 ;;00440-7410-90
 ;;9002226.02101,"1220,00440-7410-94 ",.01)
 ;;00440-7410-94
 ;;9002226.02101,"1220,00440-7410-94 ",.02)
 ;;00440-7410-94
 ;;9002226.02101,"1220,00440-7411-90 ",.01)
 ;;00440-7411-90
 ;;9002226.02101,"1220,00440-7411-90 ",.02)
 ;;00440-7411-90
 ;;9002226.02101,"1220,00440-7411-91 ",.01)
 ;;00440-7411-91
 ;;9002226.02101,"1220,00440-7411-91 ",.02)
 ;;00440-7411-91
 ;;9002226.02101,"1220,00440-7411-94 ",.01)
 ;;00440-7411-94
 ;;9002226.02101,"1220,00440-7411-94 ",.02)
 ;;00440-7411-94
 ;;9002226.02101,"1220,00440-7412-90 ",.01)
 ;;00440-7412-90
 ;;9002226.02101,"1220,00440-7412-90 ",.02)
 ;;00440-7412-90
 ;;9002226.02101,"1220,00440-7412-94 ",.01)
 ;;00440-7412-94
 ;;9002226.02101,"1220,00440-7412-94 ",.02)
 ;;00440-7412-94
 ;;9002226.02101,"1220,00440-7413-90 ",.01)
 ;;00440-7413-90
 ;;9002226.02101,"1220,00440-7413-90 ",.02)
 ;;00440-7413-90
 ;;9002226.02101,"1220,00440-7522-90 ",.01)
 ;;00440-7522-90
 ;;9002226.02101,"1220,00440-7522-90 ",.02)
 ;;00440-7522-90
 ;;9002226.02101,"1220,00440-7523-90 ",.01)
 ;;00440-7523-90