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

BGP8ZP26.m

Go to the documentation of this file.
BGP8ZP26 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON JAN 22, 2018;
 ;;18.0;IHS CLINICAL REPORTING;**1**;NOV 21, 2017;Build 62
 ;
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,"1795,63629-4929-04 ",.01)
 ;;63629-4929-04
 ;;9002226.02101,"1795,63629-4929-04 ",.02)
 ;;63629-4929-04
 ;;9002226.02101,"1795,63629-4929-05 ",.01)
 ;;63629-4929-05
 ;;9002226.02101,"1795,63629-4929-05 ",.02)
 ;;63629-4929-05
 ;;9002226.02101,"1795,63629-5415-01 ",.01)
 ;;63629-5415-01
 ;;9002226.02101,"1795,63629-5415-01 ",.02)
 ;;63629-5415-01
 ;;9002226.02101,"1795,63629-5415-02 ",.01)
 ;;63629-5415-02
 ;;9002226.02101,"1795,63629-5415-02 ",.02)
 ;;63629-5415-02
 ;;9002226.02101,"1795,63629-5415-03 ",.01)
 ;;63629-5415-03
 ;;9002226.02101,"1795,63629-5415-03 ",.02)
 ;;63629-5415-03
 ;;9002226.02101,"1795,63629-5415-04 ",.01)
 ;;63629-5415-04
 ;;9002226.02101,"1795,63629-5415-04 ",.02)
 ;;63629-5415-04
 ;;9002226.02101,"1795,63629-5415-05 ",.01)
 ;;63629-5415-05
 ;;9002226.02101,"1795,63629-5415-05 ",.02)
 ;;63629-5415-05
 ;;9002226.02101,"1795,63717-0870-01 ",.01)
 ;;63717-0870-01
 ;;9002226.02101,"1795,63717-0870-01 ",.02)
 ;;63717-0870-01
 ;;9002226.02101,"1795,63717-0871-16 ",.01)
 ;;63717-0871-16
 ;;9002226.02101,"1795,63717-0871-16 ",.02)
 ;;63717-0871-16
 ;;9002226.02101,"1795,63717-0876-16 ",.01)
 ;;63717-0876-16
 ;;9002226.02101,"1795,63717-0876-16 ",.02)
 ;;63717-0876-16
 ;;9002226.02101,"1795,63717-0877-16 ",.01)
 ;;63717-0877-16
 ;;9002226.02101,"1795,63717-0877-16 ",.02)
 ;;63717-0877-16
 ;;9002226.02101,"1795,63739-0213-10 ",.01)
 ;;63739-0213-10
 ;;9002226.02101,"1795,63739-0213-10 ",.02)
 ;;63739-0213-10
 ;;9002226.02101,"1795,63739-0389-10 ",.01)
 ;;63739-0389-10
 ;;9002226.02101,"1795,63739-0389-10 ",.02)
 ;;63739-0389-10
 ;;9002226.02101,"1795,63739-0483-10 ",.01)
 ;;63739-0483-10
 ;;9002226.02101,"1795,63739-0483-10 ",.02)
 ;;63739-0483-10
 ;;9002226.02101,"1795,63739-0486-10 ",.01)
 ;;63739-0486-10
 ;;9002226.02101,"1795,63739-0486-10 ",.02)
 ;;63739-0486-10
 ;;9002226.02101,"1795,63874-0014-01 ",.01)
 ;;63874-0014-01
 ;;9002226.02101,"1795,63874-0014-01 ",.02)
 ;;63874-0014-01
 ;;9002226.02101,"1795,63874-0014-02 ",.01)
 ;;63874-0014-02
 ;;9002226.02101,"1795,63874-0014-02 ",.02)
 ;;63874-0014-02
 ;;9002226.02101,"1795,63874-0014-04 ",.01)
 ;;63874-0014-04
 ;;9002226.02101,"1795,63874-0014-04 ",.02)
 ;;63874-0014-04
 ;;9002226.02101,"1795,63874-0014-08 ",.01)
 ;;63874-0014-08
 ;;9002226.02101,"1795,63874-0014-08 ",.02)
 ;;63874-0014-08
 ;;9002226.02101,"1795,63874-0014-10 ",.01)
 ;;63874-0014-10
 ;;9002226.02101,"1795,63874-0014-10 ",.02)
 ;;63874-0014-10
 ;;9002226.02101,"1795,63874-0014-12 ",.01)
 ;;63874-0014-12
 ;;9002226.02101,"1795,63874-0014-12 ",.02)
 ;;63874-0014-12
 ;;9002226.02101,"1795,63874-0014-15 ",.01)
 ;;63874-0014-15
 ;;9002226.02101,"1795,63874-0014-15 ",.02)
 ;;63874-0014-15
 ;;9002226.02101,"1795,63874-0014-20 ",.01)
 ;;63874-0014-20
 ;;9002226.02101,"1795,63874-0014-20 ",.02)
 ;;63874-0014-20
 ;;9002226.02101,"1795,63874-0014-24 ",.01)
 ;;63874-0014-24
 ;;9002226.02101,"1795,63874-0014-24 ",.02)
 ;;63874-0014-24
 ;;9002226.02101,"1795,63874-0014-25 ",.01)
 ;;63874-0014-25
 ;;9002226.02101,"1795,63874-0014-25 ",.02)
 ;;63874-0014-25
 ;;9002226.02101,"1795,63874-0014-30 ",.01)
 ;;63874-0014-30
 ;;9002226.02101,"1795,63874-0014-30 ",.02)
 ;;63874-0014-30
 ;;9002226.02101,"1795,63874-0014-60 ",.01)
 ;;63874-0014-60
 ;;9002226.02101,"1795,63874-0014-60 ",.02)
 ;;63874-0014-60
 ;;9002226.02101,"1795,63874-0014-72 ",.01)
 ;;63874-0014-72
 ;;9002226.02101,"1795,63874-0014-72 ",.02)
 ;;63874-0014-72
 ;;9002226.02101,"1795,63874-0014-74 ",.01)
 ;;63874-0014-74
 ;;9002226.02101,"1795,63874-0014-74 ",.02)
 ;;63874-0014-74
 ;;9002226.02101,"1795,63874-0014-77 ",.01)
 ;;63874-0014-77
 ;;9002226.02101,"1795,63874-0014-77 ",.02)
 ;;63874-0014-77
 ;;9002226.02101,"1795,63874-0014-90 ",.01)
 ;;63874-0014-90
 ;;9002226.02101,"1795,63874-0014-90 ",.02)
 ;;63874-0014-90
 ;;9002226.02101,"1795,63874-0204-12 ",.01)
 ;;63874-0204-12
 ;;9002226.02101,"1795,63874-0204-12 ",.02)
 ;;63874-0204-12
 ;;9002226.02101,"1795,63874-0204-18 ",.01)
 ;;63874-0204-18
 ;;9002226.02101,"1795,63874-0204-18 ",.02)
 ;;63874-0204-18
 ;;9002226.02101,"1795,63874-0204-24 ",.01)
 ;;63874-0204-24
 ;;9002226.02101,"1795,63874-0204-24 ",.02)
 ;;63874-0204-24
 ;;9002226.02101,"1795,63874-0204-38 ",.01)
 ;;63874-0204-38
 ;;9002226.02101,"1795,63874-0204-38 ",.02)
 ;;63874-0204-38
 ;;9002226.02101,"1795,63874-0204-48 ",.01)
 ;;63874-0204-48
 ;;9002226.02101,"1795,63874-0204-48 ",.02)
 ;;63874-0204-48
 ;;9002226.02101,"1795,63874-0209-12 ",.01)
 ;;63874-0209-12
 ;;9002226.02101,"1795,63874-0209-12 ",.02)
 ;;63874-0209-12
 ;;9002226.02101,"1795,63874-0209-18 ",.01)
 ;;63874-0209-18
 ;;9002226.02101,"1795,63874-0209-18 ",.02)
 ;;63874-0209-18
 ;;9002226.02101,"1795,63874-0209-24 ",.01)
 ;;63874-0209-24
 ;;9002226.02101,"1795,63874-0209-24 ",.02)
 ;;63874-0209-24
 ;;9002226.02101,"1795,63874-0261-01 ",.01)
 ;;63874-0261-01
 ;;9002226.02101,"1795,63874-0261-01 ",.02)
 ;;63874-0261-01
 ;;9002226.02101,"1795,63874-0261-10 ",.01)
 ;;63874-0261-10
 ;;9002226.02101,"1795,63874-0261-10 ",.02)
 ;;63874-0261-10
 ;;9002226.02101,"1795,63874-0261-12 ",.01)
 ;;63874-0261-12
 ;;9002226.02101,"1795,63874-0261-12 ",.02)
 ;;63874-0261-12
 ;;9002226.02101,"1795,63874-0261-14 ",.01)
 ;;63874-0261-14
 ;;9002226.02101,"1795,63874-0261-14 ",.02)
 ;;63874-0261-14
 ;;9002226.02101,"1795,63874-0261-15 ",.01)
 ;;63874-0261-15
 ;;9002226.02101,"1795,63874-0261-15 ",.02)
 ;;63874-0261-15
 ;;9002226.02101,"1795,63874-0261-20 ",.01)
 ;;63874-0261-20
 ;;9002226.02101,"1795,63874-0261-20 ",.02)
 ;;63874-0261-20
 ;;9002226.02101,"1795,63874-0261-21 ",.01)
 ;;63874-0261-21
 ;;9002226.02101,"1795,63874-0261-21 ",.02)
 ;;63874-0261-21
 ;;9002226.02101,"1795,63874-0261-24 ",.01)
 ;;63874-0261-24
 ;;9002226.02101,"1795,63874-0261-24 ",.02)
 ;;63874-0261-24
 ;;9002226.02101,"1795,63874-0261-28 ",.01)
 ;;63874-0261-28
 ;;9002226.02101,"1795,63874-0261-28 ",.02)
 ;;63874-0261-28
 ;;9002226.02101,"1795,63874-0261-30 ",.01)
 ;;63874-0261-30
 ;;9002226.02101,"1795,63874-0261-30 ",.02)
 ;;63874-0261-30
 ;;9002226.02101,"1795,63874-0261-40 ",.01)
 ;;63874-0261-40
 ;;9002226.02101,"1795,63874-0261-40 ",.02)
 ;;63874-0261-40
 ;;9002226.02101,"1795,63874-0261-60 ",.01)
 ;;63874-0261-60
 ;;9002226.02101,"1795,63874-0261-60 ",.02)
 ;;63874-0261-60
 ;;9002226.02101,"1795,63874-0277-12 ",.01)
 ;;63874-0277-12
 ;;9002226.02101,"1795,63874-0277-12 ",.02)
 ;;63874-0277-12
 ;;9002226.02101,"1795,63874-0277-60 ",.01)
 ;;63874-0277-60
 ;;9002226.02101,"1795,63874-0277-60 ",.02)
 ;;63874-0277-60
 ;;9002226.02101,"1795,63874-0304-01 ",.01)
 ;;63874-0304-01
 ;;9002226.02101,"1795,63874-0304-01 ",.02)
 ;;63874-0304-01
 ;;9002226.02101,"1795,63874-0304-02 ",.01)
 ;;63874-0304-02
 ;;9002226.02101,"1795,63874-0304-02 ",.02)
 ;;63874-0304-02
 ;;9002226.02101,"1795,63874-0304-09 ",.01)
 ;;63874-0304-09
 ;;9002226.02101,"1795,63874-0304-09 ",.02)
 ;;63874-0304-09
 ;;9002226.02101,"1795,63874-0304-10 ",.01)
 ;;63874-0304-10
 ;;9002226.02101,"1795,63874-0304-10 ",.02)
 ;;63874-0304-10
 ;;9002226.02101,"1795,63874-0304-12 ",.01)
 ;;63874-0304-12
 ;;9002226.02101,"1795,63874-0304-12 ",.02)
 ;;63874-0304-12
 ;;9002226.02101,"1795,63874-0304-14 ",.01)
 ;;63874-0304-14
 ;;9002226.02101,"1795,63874-0304-14 ",.02)
 ;;63874-0304-14
 ;;9002226.02101,"1795,63874-0304-15 ",.01)
 ;;63874-0304-15
 ;;9002226.02101,"1795,63874-0304-15 ",.02)
 ;;63874-0304-15
 ;;9002226.02101,"1795,63874-0304-20 ",.01)
 ;;63874-0304-20
 ;;9002226.02101,"1795,63874-0304-20 ",.02)
 ;;63874-0304-20
 ;;9002226.02101,"1795,63874-0304-25 ",.01)
 ;;63874-0304-25
 ;;9002226.02101,"1795,63874-0304-25 ",.02)
 ;;63874-0304-25
 ;;9002226.02101,"1795,63874-0304-28 ",.01)
 ;;63874-0304-28
 ;;9002226.02101,"1795,63874-0304-28 ",.02)
 ;;63874-0304-28
 ;;9002226.02101,"1795,63874-0304-30 ",.01)
 ;;63874-0304-30
 ;;9002226.02101,"1795,63874-0304-30 ",.02)
 ;;63874-0304-30
 ;;9002226.02101,"1795,63874-0304-40 ",.01)
 ;;63874-0304-40
 ;;9002226.02101,"1795,63874-0304-40 ",.02)
 ;;63874-0304-40
 ;;9002226.02101,"1795,63874-0304-45 ",.01)
 ;;63874-0304-45
 ;;9002226.02101,"1795,63874-0304-45 ",.02)
 ;;63874-0304-45
 ;;9002226.02101,"1795,63874-0304-60 ",.01)
 ;;63874-0304-60
 ;;9002226.02101,"1795,63874-0304-60 ",.02)
 ;;63874-0304-60
 ;;9002226.02101,"1795,63874-0304-90 ",.01)
 ;;63874-0304-90
 ;;9002226.02101,"1795,63874-0304-90 ",.02)
 ;;63874-0304-90
 ;;9002226.02101,"1795,63874-0356-02 ",.01)
 ;;63874-0356-02
 ;;9002226.02101,"1795,63874-0356-02 ",.02)
 ;;63874-0356-02
 ;;9002226.02101,"1795,63874-0370-01 ",.01)
 ;;63874-0370-01
 ;;9002226.02101,"1795,63874-0370-01 ",.02)
 ;;63874-0370-01
 ;;9002226.02101,"1795,63874-0370-08 ",.01)
 ;;63874-0370-08
 ;;9002226.02101,"1795,63874-0370-08 ",.02)
 ;;63874-0370-08
 ;;9002226.02101,"1795,63874-0370-10 ",.01)
 ;;63874-0370-10
 ;;9002226.02101,"1795,63874-0370-10 ",.02)
 ;;63874-0370-10
 ;;9002226.02101,"1795,63874-0370-12 ",.01)
 ;;63874-0370-12
 ;;9002226.02101,"1795,63874-0370-12 ",.02)
 ;;63874-0370-12
 ;;9002226.02101,"1795,63874-0370-15 ",.01)
 ;;63874-0370-15
 ;;9002226.02101,"1795,63874-0370-15 ",.02)
 ;;63874-0370-15
 ;;9002226.02101,"1795,63874-0370-20 ",.01)
 ;;63874-0370-20
 ;;9002226.02101,"1795,63874-0370-20 ",.02)
 ;;63874-0370-20
 ;;9002226.02101,"1795,63874-0370-24 ",.01)
 ;;63874-0370-24
 ;;9002226.02101,"1795,63874-0370-24 ",.02)
 ;;63874-0370-24
 ;;9002226.02101,"1795,63874-0370-30 ",.01)
 ;;63874-0370-30
 ;;9002226.02101,"1795,63874-0370-30 ",.02)
 ;;63874-0370-30
 ;;9002226.02101,"1795,63874-0370-40 ",.01)
 ;;63874-0370-40
 ;;9002226.02101,"1795,63874-0370-40 ",.02)
 ;;63874-0370-40
 ;;9002226.02101,"1795,63874-0370-60 ",.01)
 ;;63874-0370-60
 ;;9002226.02101,"1795,63874-0370-60 ",.02)
 ;;63874-0370-60
 ;;9002226.02101,"1795,63874-0442-01 ",.01)
 ;;63874-0442-01
 ;;9002226.02101,"1795,63874-0442-01 ",.02)
 ;;63874-0442-01
 ;;9002226.02101,"1795,63874-0442-04 ",.01)
 ;;63874-0442-04
 ;;9002226.02101,"1795,63874-0442-04 ",.02)
 ;;63874-0442-04
 ;;9002226.02101,"1795,63874-0442-05 ",.01)
 ;;63874-0442-05
 ;;9002226.02101,"1795,63874-0442-05 ",.02)
 ;;63874-0442-05
 ;;9002226.02101,"1795,63874-0442-09 ",.01)
 ;;63874-0442-09
 ;;9002226.02101,"1795,63874-0442-09 ",.02)
 ;;63874-0442-09
 ;;9002226.02101,"1795,63874-0442-10 ",.01)
 ;;63874-0442-10
 ;;9002226.02101,"1795,63874-0442-10 ",.02)
 ;;63874-0442-10
 ;;9002226.02101,"1795,63874-0442-14 ",.01)
 ;;63874-0442-14
 ;;9002226.02101,"1795,63874-0442-14 ",.02)
 ;;63874-0442-14
 ;;9002226.02101,"1795,63874-0442-15 ",.01)
 ;;63874-0442-15
 ;;9002226.02101,"1795,63874-0442-15 ",.02)
 ;;63874-0442-15
 ;;9002226.02101,"1795,63874-0442-20 ",.01)
 ;;63874-0442-20
 ;;9002226.02101,"1795,63874-0442-20 ",.02)
 ;;63874-0442-20
 ;;9002226.02101,"1795,63874-0442-25 ",.01)
 ;;63874-0442-25
 ;;9002226.02101,"1795,63874-0442-25 ",.02)
 ;;63874-0442-25
 ;;9002226.02101,"1795,63874-0442-28 ",.01)
 ;;63874-0442-28
 ;;9002226.02101,"1795,63874-0442-28 ",.02)
 ;;63874-0442-28
 ;;9002226.02101,"1795,63874-0442-30 ",.01)
 ;;63874-0442-30
 ;;9002226.02101,"1795,63874-0442-30 ",.02)
 ;;63874-0442-30
 ;;9002226.02101,"1795,63874-0442-40 ",.01)
 ;;63874-0442-40
 ;;9002226.02101,"1795,63874-0442-40 ",.02)
 ;;63874-0442-40
 ;;9002226.02101,"1795,63874-0442-45 ",.01)
 ;;63874-0442-45
 ;;9002226.02101,"1795,63874-0442-45 ",.02)
 ;;63874-0442-45
 ;;9002226.02101,"1795,63874-0442-60 ",.01)
 ;;63874-0442-60
 ;;9002226.02101,"1795,63874-0442-60 ",.02)
 ;;63874-0442-60
 ;;9002226.02101,"1795,63874-0442-90 ",.01)
 ;;63874-0442-90
 ;;9002226.02101,"1795,63874-0442-90 ",.02)
 ;;63874-0442-90
 ;;9002226.02101,"1795,63874-0565-01 ",.01)
 ;;63874-0565-01