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

BGP72B17.m

Go to the documentation of this file.
BGP72B17 ; 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,"1224,54458-0916-10 ",.01)
 ;;54458-0916-10
 ;;9002226.02101,"1224,54458-0916-10 ",.02)
 ;;54458-0916-10
 ;;9002226.02101,"1224,54458-0925-10 ",.01)
 ;;54458-0925-10
 ;;9002226.02101,"1224,54458-0925-10 ",.02)
 ;;54458-0925-10
 ;;9002226.02101,"1224,54458-0926-10 ",.01)
 ;;54458-0926-10
 ;;9002226.02101,"1224,54458-0926-10 ",.02)
 ;;54458-0926-10
 ;;9002226.02101,"1224,54458-0927-10 ",.01)
 ;;54458-0927-10
 ;;9002226.02101,"1224,54458-0927-10 ",.02)
 ;;54458-0927-10
 ;;9002226.02101,"1224,54458-0927-12 ",.01)
 ;;54458-0927-12
 ;;9002226.02101,"1224,54458-0927-12 ",.02)
 ;;54458-0927-12
 ;;9002226.02101,"1224,54458-0932-10 ",.01)
 ;;54458-0932-10
 ;;9002226.02101,"1224,54458-0932-10 ",.02)
 ;;54458-0932-10
 ;;9002226.02101,"1224,54458-0933-10 ",.01)
 ;;54458-0933-10
 ;;9002226.02101,"1224,54458-0933-10 ",.02)
 ;;54458-0933-10
 ;;9002226.02101,"1224,54458-0934-10 ",.01)
 ;;54458-0934-10
 ;;9002226.02101,"1224,54458-0934-10 ",.02)
 ;;54458-0934-10
 ;;9002226.02101,"1224,54458-0936-10 ",.01)
 ;;54458-0936-10
 ;;9002226.02101,"1224,54458-0936-10 ",.02)
 ;;54458-0936-10
 ;;9002226.02101,"1224,54458-0937-10 ",.01)
 ;;54458-0937-10
 ;;9002226.02101,"1224,54458-0937-10 ",.02)
 ;;54458-0937-10
 ;;9002226.02101,"1224,54458-0938-10 ",.01)
 ;;54458-0938-10
 ;;9002226.02101,"1224,54458-0938-10 ",.02)
 ;;54458-0938-10
 ;;9002226.02101,"1224,54569-3821-00 ",.01)
 ;;54569-3821-00
 ;;9002226.02101,"1224,54569-3821-00 ",.02)
 ;;54569-3821-00
 ;;9002226.02101,"1224,54569-4466-00 ",.01)
 ;;54569-4466-00
 ;;9002226.02101,"1224,54569-4466-00 ",.02)
 ;;54569-4466-00
 ;;9002226.02101,"1224,54569-4466-01 ",.01)
 ;;54569-4466-01
 ;;9002226.02101,"1224,54569-4466-01 ",.02)
 ;;54569-4466-01
 ;;9002226.02101,"1224,54569-4466-02 ",.01)
 ;;54569-4466-02
 ;;9002226.02101,"1224,54569-4466-02 ",.02)
 ;;54569-4466-02
 ;;9002226.02101,"1224,54569-4467-00 ",.01)
 ;;54569-4467-00
 ;;9002226.02101,"1224,54569-4467-00 ",.02)
 ;;54569-4467-00
 ;;9002226.02101,"1224,54569-4467-01 ",.01)
 ;;54569-4467-01
 ;;9002226.02101,"1224,54569-4467-01 ",.02)
 ;;54569-4467-01
 ;;9002226.02101,"1224,54569-4587-00 ",.01)
 ;;54569-4587-00
 ;;9002226.02101,"1224,54569-4587-00 ",.02)
 ;;54569-4587-00
 ;;9002226.02101,"1224,54569-4587-01 ",.01)
 ;;54569-4587-01
 ;;9002226.02101,"1224,54569-4587-01 ",.02)
 ;;54569-4587-01
 ;;9002226.02101,"1224,54569-5345-00 ",.01)
 ;;54569-5345-00
 ;;9002226.02101,"1224,54569-5345-00 ",.02)
 ;;54569-5345-00
 ;;9002226.02101,"1224,54569-5345-01 ",.01)
 ;;54569-5345-01
 ;;9002226.02101,"1224,54569-5345-01 ",.02)
 ;;54569-5345-01
 ;;9002226.02101,"1224,54569-5346-00 ",.01)
 ;;54569-5346-00
 ;;9002226.02101,"1224,54569-5346-00 ",.02)
 ;;54569-5346-00
 ;;9002226.02101,"1224,54569-5346-02 ",.01)
 ;;54569-5346-02
 ;;9002226.02101,"1224,54569-5346-02 ",.02)
 ;;54569-5346-02
 ;;9002226.02101,"1224,54569-5347-00 ",.01)
 ;;54569-5347-00
 ;;9002226.02101,"1224,54569-5347-00 ",.02)
 ;;54569-5347-00
 ;;9002226.02101,"1224,54569-5347-02 ",.01)
 ;;54569-5347-02
 ;;9002226.02101,"1224,54569-5347-02 ",.02)
 ;;54569-5347-02
 ;;9002226.02101,"1224,54569-5382-00 ",.01)
 ;;54569-5382-00
 ;;9002226.02101,"1224,54569-5382-00 ",.02)
 ;;54569-5382-00
 ;;9002226.02101,"1224,54569-5600-00 ",.01)
 ;;54569-5600-00
 ;;9002226.02101,"1224,54569-5600-00 ",.02)
 ;;54569-5600-00
 ;;9002226.02101,"1224,54569-5600-01 ",.01)
 ;;54569-5600-01
 ;;9002226.02101,"1224,54569-5600-01 ",.02)
 ;;54569-5600-01
 ;;9002226.02101,"1224,54569-5648-00 ",.01)
 ;;54569-5648-00
 ;;9002226.02101,"1224,54569-5648-00 ",.02)
 ;;54569-5648-00
 ;;9002226.02101,"1224,54569-5672-00 ",.01)
 ;;54569-5672-00
 ;;9002226.02101,"1224,54569-5672-00 ",.02)
 ;;54569-5672-00
 ;;9002226.02101,"1224,54569-5672-02 ",.01)
 ;;54569-5672-02
 ;;9002226.02101,"1224,54569-5672-02 ",.02)
 ;;54569-5672-02
 ;;9002226.02101,"1224,54569-5704-00 ",.01)
 ;;54569-5704-00
 ;;9002226.02101,"1224,54569-5704-00 ",.02)
 ;;54569-5704-00
 ;;9002226.02101,"1224,54569-5746-00 ",.01)
 ;;54569-5746-00
 ;;9002226.02101,"1224,54569-5746-00 ",.02)
 ;;54569-5746-00
 ;;9002226.02101,"1224,54569-5766-00 ",.01)
 ;;54569-5766-00
 ;;9002226.02101,"1224,54569-5766-00 ",.02)
 ;;54569-5766-00
 ;;9002226.02101,"1224,54569-5793-00 ",.01)
 ;;54569-5793-00
 ;;9002226.02101,"1224,54569-5793-00 ",.02)
 ;;54569-5793-00
 ;;9002226.02101,"1224,54569-5793-01 ",.01)
 ;;54569-5793-01
 ;;9002226.02101,"1224,54569-5793-01 ",.02)
 ;;54569-5793-01
 ;;9002226.02101,"1224,54569-5794-00 ",.01)
 ;;54569-5794-00
 ;;9002226.02101,"1224,54569-5794-00 ",.02)
 ;;54569-5794-00
 ;;9002226.02101,"1224,54569-5794-01 ",.01)
 ;;54569-5794-01
 ;;9002226.02101,"1224,54569-5794-01 ",.02)
 ;;54569-5794-01
 ;;9002226.02101,"1224,54569-5833-01 ",.01)
 ;;54569-5833-01
 ;;9002226.02101,"1224,54569-5833-01 ",.02)
 ;;54569-5833-01
 ;;9002226.02101,"1224,54569-5833-02 ",.01)
 ;;54569-5833-02
 ;;9002226.02101,"1224,54569-5833-02 ",.02)
 ;;54569-5833-02
 ;;9002226.02101,"1224,54569-5833-03 ",.01)
 ;;54569-5833-03
 ;;9002226.02101,"1224,54569-5833-03 ",.02)
 ;;54569-5833-03
 ;;9002226.02101,"1224,54569-5834-01 ",.01)
 ;;54569-5834-01
 ;;9002226.02101,"1224,54569-5834-01 ",.02)
 ;;54569-5834-01
 ;;9002226.02101,"1224,54569-5834-02 ",.01)
 ;;54569-5834-02
 ;;9002226.02101,"1224,54569-5834-02 ",.02)
 ;;54569-5834-02
 ;;9002226.02101,"1224,54569-5834-03 ",.01)
 ;;54569-5834-03
 ;;9002226.02101,"1224,54569-5834-03 ",.02)
 ;;54569-5834-03
 ;;9002226.02101,"1224,54569-5834-04 ",.01)
 ;;54569-5834-04
 ;;9002226.02101,"1224,54569-5834-04 ",.02)
 ;;54569-5834-04
 ;;9002226.02101,"1224,54569-5881-00 ",.01)
 ;;54569-5881-00
 ;;9002226.02101,"1224,54569-5881-00 ",.02)
 ;;54569-5881-00
 ;;9002226.02101,"1224,54569-5951-00 ",.01)
 ;;54569-5951-00
 ;;9002226.02101,"1224,54569-5951-00 ",.02)
 ;;54569-5951-00
 ;;9002226.02101,"1224,54569-6054-01 ",.01)
 ;;54569-6054-01
 ;;9002226.02101,"1224,54569-6054-01 ",.02)
 ;;54569-6054-01
 ;;9002226.02101,"1224,54569-6099-00 ",.01)
 ;;54569-6099-00
 ;;9002226.02101,"1224,54569-6099-00 ",.02)
 ;;54569-6099-00
 ;;9002226.02101,"1224,54569-6113-00 ",.01)
 ;;54569-6113-00
 ;;9002226.02101,"1224,54569-6113-00 ",.02)
 ;;54569-6113-00
 ;;9002226.02101,"1224,54569-6113-01 ",.01)
 ;;54569-6113-01
 ;;9002226.02101,"1224,54569-6113-01 ",.02)
 ;;54569-6113-01
 ;;9002226.02101,"1224,54569-6282-00 ",.01)
 ;;54569-6282-00
 ;;9002226.02101,"1224,54569-6282-00 ",.02)
 ;;54569-6282-00
 ;;9002226.02101,"1224,54569-6282-01 ",.01)
 ;;54569-6282-01
 ;;9002226.02101,"1224,54569-6282-01 ",.02)
 ;;54569-6282-01
 ;;9002226.02101,"1224,54569-6283-00 ",.01)
 ;;54569-6283-00
 ;;9002226.02101,"1224,54569-6283-00 ",.02)
 ;;54569-6283-00
 ;;9002226.02101,"1224,54569-6283-01 ",.01)
 ;;54569-6283-01
 ;;9002226.02101,"1224,54569-6283-01 ",.02)
 ;;54569-6283-01
 ;;9002226.02101,"1224,54569-6284-00 ",.01)
 ;;54569-6284-00
 ;;9002226.02101,"1224,54569-6284-00 ",.02)
 ;;54569-6284-00
 ;;9002226.02101,"1224,54569-6284-01 ",.01)
 ;;54569-6284-01
 ;;9002226.02101,"1224,54569-6284-01 ",.02)
 ;;54569-6284-01
 ;;9002226.02101,"1224,54569-6285-00 ",.01)
 ;;54569-6285-00
 ;;9002226.02101,"1224,54569-6285-00 ",.02)
 ;;54569-6285-00
 ;;9002226.02101,"1224,54569-6285-01 ",.01)
 ;;54569-6285-01
 ;;9002226.02101,"1224,54569-6285-01 ",.02)
 ;;54569-6285-01
 ;;9002226.02101,"1224,54569-6302-00 ",.01)
 ;;54569-6302-00
 ;;9002226.02101,"1224,54569-6302-00 ",.02)
 ;;54569-6302-00
 ;;9002226.02101,"1224,54569-6302-01 ",.01)
 ;;54569-6302-01
 ;;9002226.02101,"1224,54569-6302-01 ",.02)
 ;;54569-6302-01
 ;;9002226.02101,"1224,54569-6428-00 ",.01)
 ;;54569-6428-00
 ;;9002226.02101,"1224,54569-6428-00 ",.02)
 ;;54569-6428-00
 ;;9002226.02101,"1224,54569-6428-01 ",.01)
 ;;54569-6428-01
 ;;9002226.02101,"1224,54569-6428-01 ",.02)
 ;;54569-6428-01
 ;;9002226.02101,"1224,54569-6450-00 ",.01)
 ;;54569-6450-00
 ;;9002226.02101,"1224,54569-6450-00 ",.02)
 ;;54569-6450-00
 ;;9002226.02101,"1224,54569-6510-00 ",.01)
 ;;54569-6510-00
 ;;9002226.02101,"1224,54569-6510-00 ",.02)
 ;;54569-6510-00
 ;;9002226.02101,"1224,54569-8866-00 ",.01)
 ;;54569-8866-00
 ;;9002226.02101,"1224,54569-8866-00 ",.02)
 ;;54569-8866-00
 ;;9002226.02101,"1224,54868-1087-00 ",.01)
 ;;54868-1087-00
 ;;9002226.02101,"1224,54868-1087-00 ",.02)
 ;;54868-1087-00
 ;;9002226.02101,"1224,54868-1087-01 ",.01)
 ;;54868-1087-01
 ;;9002226.02101,"1224,54868-1087-01 ",.02)
 ;;54868-1087-01
 ;;9002226.02101,"1224,54868-1207-00 ",.01)
 ;;54868-1207-00
 ;;9002226.02101,"1224,54868-1207-00 ",.02)
 ;;54868-1207-00
 ;;9002226.02101,"1224,54868-1207-01 ",.01)
 ;;54868-1207-01
 ;;9002226.02101,"1224,54868-1207-01 ",.02)
 ;;54868-1207-01
 ;;9002226.02101,"1224,54868-1890-00 ",.01)
 ;;54868-1890-00
 ;;9002226.02101,"1224,54868-1890-00 ",.02)
 ;;54868-1890-00
 ;;9002226.02101,"1224,54868-1890-01 ",.01)
 ;;54868-1890-01
 ;;9002226.02101,"1224,54868-1890-01 ",.02)
 ;;54868-1890-01
 ;;9002226.02101,"1224,54868-2288-00 ",.01)
 ;;54868-2288-00
 ;;9002226.02101,"1224,54868-2288-00 ",.02)
 ;;54868-2288-00
 ;;9002226.02101,"1224,54868-2288-01 ",.01)
 ;;54868-2288-01
 ;;9002226.02101,"1224,54868-2288-01 ",.02)
 ;;54868-2288-01
 ;;9002226.02101,"1224,54868-2288-02 ",.01)
 ;;54868-2288-02
 ;;9002226.02101,"1224,54868-2288-02 ",.02)
 ;;54868-2288-02
 ;;9002226.02101,"1224,54868-2639-00 ",.01)
 ;;54868-2639-00
 ;;9002226.02101,"1224,54868-2639-00 ",.02)
 ;;54868-2639-00
 ;;9002226.02101,"1224,54868-2639-01 ",.01)
 ;;54868-2639-01
 ;;9002226.02101,"1224,54868-2639-01 ",.02)
 ;;54868-2639-01
 ;;9002226.02101,"1224,54868-3104-00 ",.01)
 ;;54868-3104-00
 ;;9002226.02101,"1224,54868-3104-00 ",.02)
 ;;54868-3104-00
 ;;9002226.02101,"1224,54868-3104-01 ",.01)
 ;;54868-3104-01
 ;;9002226.02101,"1224,54868-3104-01 ",.02)
 ;;54868-3104-01
 ;;9002226.02101,"1224,54868-3270-00 ",.01)
 ;;54868-3270-00
 ;;9002226.02101,"1224,54868-3270-00 ",.02)
 ;;54868-3270-00
 ;;9002226.02101,"1224,54868-3270-01 ",.01)
 ;;54868-3270-01
 ;;9002226.02101,"1224,54868-3270-01 ",.02)
 ;;54868-3270-01
 ;;9002226.02101,"1224,54868-3270-02 ",.01)
 ;;54868-3270-02
 ;;9002226.02101,"1224,54868-3270-02 ",.02)
 ;;54868-3270-02
 ;;9002226.02101,"1224,54868-3287-00 ",.01)
 ;;54868-3287-00
 ;;9002226.02101,"1224,54868-3287-00 ",.02)
 ;;54868-3287-00
 ;;9002226.02101,"1224,54868-3287-01 ",.01)
 ;;54868-3287-01
 ;;9002226.02101,"1224,54868-3287-01 ",.02)
 ;;54868-3287-01
 ;;9002226.02101,"1224,54868-3329-00 ",.01)
 ;;54868-3329-00
 ;;9002226.02101,"1224,54868-3329-00 ",.02)
 ;;54868-3329-00
 ;;9002226.02101,"1224,54868-3934-00 ",.01)
 ;;54868-3934-00
 ;;9002226.02101,"1224,54868-3934-00 ",.02)
 ;;54868-3934-00
 ;;9002226.02101,"1224,54868-3934-01 ",.01)
 ;;54868-3934-01
 ;;9002226.02101,"1224,54868-3934-01 ",.02)
 ;;54868-3934-01
 ;;9002226.02101,"1224,54868-3934-02 ",.01)
 ;;54868-3934-02
 ;;9002226.02101,"1224,54868-3934-02 ",.02)
 ;;54868-3934-02
 ;;9002226.02101,"1224,54868-3934-03 ",.01)
 ;;54868-3934-03
 ;;9002226.02101,"1224,54868-3934-03 ",.02)
 ;;54868-3934-03
 ;;9002226.02101,"1224,54868-3934-04 ",.01)
 ;;54868-3934-04
 ;;9002226.02101,"1224,54868-3934-04 ",.02)
 ;;54868-3934-04
 ;;9002226.02101,"1224,54868-3946-00 ",.01)
 ;;54868-3946-00
 ;;9002226.02101,"1224,54868-3946-00 ",.02)
 ;;54868-3946-00
 ;;9002226.02101,"1224,54868-3946-01 ",.01)
 ;;54868-3946-01
 ;;9002226.02101,"1224,54868-3946-01 ",.02)
 ;;54868-3946-01
 ;;9002226.02101,"1224,54868-3946-02 ",.01)
 ;;54868-3946-02
 ;;9002226.02101,"1224,54868-3946-02 ",.02)
 ;;54868-3946-02
 ;;9002226.02101,"1224,54868-3946-03 ",.01)
 ;;54868-3946-03
 ;;9002226.02101,"1224,54868-3946-03 ",.02)
 ;;54868-3946-03
 ;;9002226.02101,"1224,54868-3946-04 ",.01)
 ;;54868-3946-04