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

BGP31T11.m

Go to the documentation of this file.
BGP31T11 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON AUG 29, 2012;
 ;;13.0;IHS CLINICAL REPORTING;;NOV 20, 2012;Build 81
 ;
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,"1737,58016-0247-12 ",.02)
 ;;58016-0247-12
 ;;9002226.02101,"1737,58016-0247-15 ",.01)
 ;;58016-0247-15
 ;;9002226.02101,"1737,58016-0247-15 ",.02)
 ;;58016-0247-15
 ;;9002226.02101,"1737,58016-0247-20 ",.01)
 ;;58016-0247-20
 ;;9002226.02101,"1737,58016-0247-20 ",.02)
 ;;58016-0247-20
 ;;9002226.02101,"1737,58016-0247-21 ",.01)
 ;;58016-0247-21
 ;;9002226.02101,"1737,58016-0247-21 ",.02)
 ;;58016-0247-21
 ;;9002226.02101,"1737,58016-0247-30 ",.01)
 ;;58016-0247-30
 ;;9002226.02101,"1737,58016-0247-30 ",.02)
 ;;58016-0247-30
 ;;9002226.02101,"1737,58016-0247-40 ",.01)
 ;;58016-0247-40
 ;;9002226.02101,"1737,58016-0247-40 ",.02)
 ;;58016-0247-40
 ;;9002226.02101,"1737,58016-0247-60 ",.01)
 ;;58016-0247-60
 ;;9002226.02101,"1737,58016-0247-60 ",.02)
 ;;58016-0247-60
 ;;9002226.02101,"1737,58016-0247-73 ",.01)
 ;;58016-0247-73
 ;;9002226.02101,"1737,58016-0247-73 ",.02)
 ;;58016-0247-73
 ;;9002226.02101,"1737,58016-0247-89 ",.01)
 ;;58016-0247-89
 ;;9002226.02101,"1737,58016-0247-89 ",.02)
 ;;58016-0247-89
 ;;9002226.02101,"1737,58016-0247-90 ",.01)
 ;;58016-0247-90
 ;;9002226.02101,"1737,58016-0247-90 ",.02)
 ;;58016-0247-90
 ;;9002226.02101,"1737,58016-0392-00 ",.01)
 ;;58016-0392-00
 ;;9002226.02101,"1737,58016-0392-00 ",.02)
 ;;58016-0392-00
 ;;9002226.02101,"1737,58016-0392-10 ",.01)
 ;;58016-0392-10
 ;;9002226.02101,"1737,58016-0392-10 ",.02)
 ;;58016-0392-10
 ;;9002226.02101,"1737,58016-0392-12 ",.01)
 ;;58016-0392-12
 ;;9002226.02101,"1737,58016-0392-12 ",.02)
 ;;58016-0392-12
 ;;9002226.02101,"1737,58016-0392-20 ",.01)
 ;;58016-0392-20
 ;;9002226.02101,"1737,58016-0392-20 ",.02)
 ;;58016-0392-20
 ;;9002226.02101,"1737,58016-0392-30 ",.01)
 ;;58016-0392-30
 ;;9002226.02101,"1737,58016-0392-30 ",.02)
 ;;58016-0392-30
 ;;9002226.02101,"1737,58016-0392-40 ",.01)
 ;;58016-0392-40
 ;;9002226.02101,"1737,58016-0392-40 ",.02)
 ;;58016-0392-40
 ;;9002226.02101,"1737,58016-0392-60 ",.01)
 ;;58016-0392-60
 ;;9002226.02101,"1737,58016-0392-60 ",.02)
 ;;58016-0392-60
 ;;9002226.02101,"1737,58016-0461-00 ",.01)
 ;;58016-0461-00
 ;;9002226.02101,"1737,58016-0461-00 ",.02)
 ;;58016-0461-00
 ;;9002226.02101,"1737,58016-0461-20 ",.01)
 ;;58016-0461-20
 ;;9002226.02101,"1737,58016-0461-20 ",.02)
 ;;58016-0461-20
 ;;9002226.02101,"1737,58016-0461-30 ",.01)
 ;;58016-0461-30
 ;;9002226.02101,"1737,58016-0461-30 ",.02)
 ;;58016-0461-30
 ;;9002226.02101,"1737,58016-0461-60 ",.01)
 ;;58016-0461-60
 ;;9002226.02101,"1737,58016-0461-60 ",.02)
 ;;58016-0461-60
 ;;9002226.02101,"1737,58016-0461-90 ",.01)
 ;;58016-0461-90
 ;;9002226.02101,"1737,58016-0461-90 ",.02)
 ;;58016-0461-90
 ;;9002226.02101,"1737,58016-9413-01 ",.01)
 ;;58016-9413-01
 ;;9002226.02101,"1737,58016-9413-01 ",.02)
 ;;58016-9413-01
 ;;9002226.02101,"1737,58177-0301-04 ",.01)
 ;;58177-0301-04
 ;;9002226.02101,"1737,58177-0301-04 ",.02)
 ;;58177-0301-04
 ;;9002226.02101,"1737,58864-0296-30 ",.01)
 ;;58864-0296-30
 ;;9002226.02101,"1737,58864-0296-30 ",.02)
 ;;58864-0296-30
 ;;9002226.02101,"1737,58864-0296-42 ",.01)
 ;;58864-0296-42
 ;;9002226.02101,"1737,58864-0296-42 ",.02)
 ;;58864-0296-42
 ;;9002226.02101,"1737,58864-0296-90 ",.01)
 ;;58864-0296-90
 ;;9002226.02101,"1737,58864-0296-90 ",.02)
 ;;58864-0296-90
 ;;9002226.02101,"1737,60346-0446-08 ",.01)
 ;;60346-0446-08
 ;;9002226.02101,"1737,60346-0446-08 ",.02)
 ;;60346-0446-08
 ;;9002226.02101,"1737,60346-0446-10 ",.01)
 ;;60346-0446-10
 ;;9002226.02101,"1737,60346-0446-10 ",.02)
 ;;60346-0446-10
 ;;9002226.02101,"1737,60346-0446-12 ",.01)
 ;;60346-0446-12
 ;;9002226.02101,"1737,60346-0446-12 ",.02)
 ;;60346-0446-12
 ;;9002226.02101,"1737,60346-0446-15 ",.01)
 ;;60346-0446-15
 ;;9002226.02101,"1737,60346-0446-15 ",.02)
 ;;60346-0446-15
 ;;9002226.02101,"1737,60346-0446-20 ",.01)
 ;;60346-0446-20
 ;;9002226.02101,"1737,60346-0446-20 ",.02)
 ;;60346-0446-20
 ;;9002226.02101,"1737,60346-0446-25 ",.01)
 ;;60346-0446-25
 ;;9002226.02101,"1737,60346-0446-25 ",.02)
 ;;60346-0446-25
 ;;9002226.02101,"1737,60346-0446-30 ",.01)
 ;;60346-0446-30
 ;;9002226.02101,"1737,60346-0446-30 ",.02)
 ;;60346-0446-30
 ;;9002226.02101,"1737,60346-0446-40 ",.01)
 ;;60346-0446-40
 ;;9002226.02101,"1737,60346-0446-40 ",.02)
 ;;60346-0446-40
 ;;9002226.02101,"1737,60346-0660-12 ",.01)
 ;;60346-0660-12
 ;;9002226.02101,"1737,60346-0660-12 ",.02)
 ;;60346-0660-12
 ;;9002226.02101,"1737,60346-0660-24 ",.01)
 ;;60346-0660-24
 ;;9002226.02101,"1737,60346-0660-24 ",.02)
 ;;60346-0660-24
 ;;9002226.02101,"1737,60346-0660-40 ",.01)
 ;;60346-0660-40
 ;;9002226.02101,"1737,60346-0660-40 ",.02)
 ;;60346-0660-40
 ;;9002226.02101,"1737,60346-0684-08 ",.01)
 ;;60346-0684-08
 ;;9002226.02101,"1737,60346-0684-08 ",.02)
 ;;60346-0684-08
 ;;9002226.02101,"1737,60346-0684-12 ",.01)
 ;;60346-0684-12
 ;;9002226.02101,"1737,60346-0684-12 ",.02)
 ;;60346-0684-12
 ;;9002226.02101,"1737,60346-0684-15 ",.01)
 ;;60346-0684-15
 ;;9002226.02101,"1737,60346-0684-15 ",.02)
 ;;60346-0684-15
 ;;9002226.02101,"1737,60346-0684-20 ",.01)
 ;;60346-0684-20
 ;;9002226.02101,"1737,60346-0684-20 ",.02)
 ;;60346-0684-20
 ;;9002226.02101,"1737,60346-0684-25 ",.01)
 ;;60346-0684-25
 ;;9002226.02101,"1737,60346-0684-25 ",.02)
 ;;60346-0684-25
 ;;9002226.02101,"1737,60346-0684-30 ",.01)
 ;;60346-0684-30
 ;;9002226.02101,"1737,60346-0684-30 ",.02)
 ;;60346-0684-30
 ;;9002226.02101,"1737,60346-0684-62 ",.01)
 ;;60346-0684-62
 ;;9002226.02101,"1737,60346-0684-62 ",.02)
 ;;60346-0684-62
 ;;9002226.02101,"1737,60346-0684-90 ",.01)
 ;;60346-0684-90
 ;;9002226.02101,"1737,60346-0684-90 ",.02)
 ;;60346-0684-90
 ;;9002226.02101,"1737,60346-0684-94 ",.01)
 ;;60346-0684-94
 ;;9002226.02101,"1737,60346-0684-94 ",.02)
 ;;60346-0684-94
 ;;9002226.02101,"1737,60346-0687-10 ",.01)
 ;;60346-0687-10
 ;;9002226.02101,"1737,60346-0687-10 ",.02)
 ;;60346-0687-10
 ;;9002226.02101,"1737,60346-0687-14 ",.01)
 ;;60346-0687-14
 ;;9002226.02101,"1737,60346-0687-14 ",.02)
 ;;60346-0687-14
 ;;9002226.02101,"1737,60346-0687-20 ",.01)
 ;;60346-0687-20
 ;;9002226.02101,"1737,60346-0687-20 ",.02)
 ;;60346-0687-20
 ;;9002226.02101,"1737,60346-0687-30 ",.01)
 ;;60346-0687-30
 ;;9002226.02101,"1737,60346-0687-30 ",.02)
 ;;60346-0687-30
 ;;9002226.02101,"1737,60346-0733-15 ",.01)
 ;;60346-0733-15
 ;;9002226.02101,"1737,60346-0733-15 ",.02)
 ;;60346-0733-15
 ;;9002226.02101,"1737,60346-0733-20 ",.01)
 ;;60346-0733-20
 ;;9002226.02101,"1737,60346-0733-20 ",.02)
 ;;60346-0733-20
 ;;9002226.02101,"1737,60346-0733-25 ",.01)
 ;;60346-0733-25
 ;;9002226.02101,"1737,60346-0733-25 ",.02)
 ;;60346-0733-25
 ;;9002226.02101,"1737,60346-0733-30 ",.01)
 ;;60346-0733-30
 ;;9002226.02101,"1737,60346-0733-30 ",.02)
 ;;60346-0733-30
 ;;9002226.02101,"1737,60346-0733-90 ",.01)
 ;;60346-0733-90
 ;;9002226.02101,"1737,60346-0733-90 ",.02)
 ;;60346-0733-90
 ;;9002226.02101,"1737,60346-0985-15 ",.01)
 ;;60346-0985-15
 ;;9002226.02101,"1737,60346-0985-15 ",.02)
 ;;60346-0985-15
 ;;9002226.02101,"1737,60346-0985-30 ",.01)
 ;;60346-0985-30
 ;;9002226.02101,"1737,60346-0985-30 ",.02)
 ;;60346-0985-30
 ;;9002226.02101,"1737,60429-0098-21 ",.01)
 ;;60429-0098-21
 ;;9002226.02101,"1737,60429-0098-21 ",.02)
 ;;60429-0098-21
 ;;9002226.02101,"1737,60429-0570-01 ",.01)
 ;;60429-0570-01
 ;;9002226.02101,"1737,60429-0570-01 ",.02)
 ;;60429-0570-01
 ;;9002226.02101,"1737,60505-0705-00 ",.01)
 ;;60505-0705-00
 ;;9002226.02101,"1737,60505-0705-00 ",.02)
 ;;60505-0705-00
 ;;9002226.02101,"1737,60505-0706-00 ",.01)
 ;;60505-0706-00
 ;;9002226.02101,"1737,60505-0706-00 ",.02)
 ;;60505-0706-00
 ;;9002226.02101,"1737,60505-0706-01 ",.01)
 ;;60505-0706-01
 ;;9002226.02101,"1737,60505-0706-01 ",.02)
 ;;60505-0706-01
 ;;9002226.02101,"1737,60505-0710-01 ",.01)
 ;;60505-0710-01
 ;;9002226.02101,"1737,60505-0710-01 ",.02)
 ;;60505-0710-01
 ;;9002226.02101,"1737,60505-0725-01 ",.01)
 ;;60505-0725-01
 ;;9002226.02101,"1737,60505-0725-01 ",.02)
 ;;60505-0725-01
 ;;9002226.02101,"1737,60505-0726-01 ",.01)
 ;;60505-0726-01
 ;;9002226.02101,"1737,60505-0726-01 ",.02)
 ;;60505-0726-01
 ;;9002226.02101,"1737,60505-0726-02 ",.01)
 ;;60505-0726-02
 ;;9002226.02101,"1737,60505-0726-02 ",.02)
 ;;60505-0726-02
 ;;9002226.02101,"1737,60760-0314-20 ",.01)
 ;;60760-0314-20
 ;;9002226.02101,"1737,60760-0314-20 ",.02)
 ;;60760-0314-20
 ;;9002226.02101,"1737,60760-0402-30 ",.01)
 ;;60760-0402-30
 ;;9002226.02101,"1737,60760-0402-30 ",.02)
 ;;60760-0402-30
 ;;9002226.02101,"1737,60760-0607-14 ",.01)
 ;;60760-0607-14
 ;;9002226.02101,"1737,60760-0607-14 ",.02)
 ;;60760-0607-14
 ;;9002226.02101,"1737,61703-0236-75 ",.01)
 ;;61703-0236-75
 ;;9002226.02101,"1737,61703-0236-75 ",.02)
 ;;61703-0236-75
 ;;9002226.02101,"1737,61703-0236-85 ",.01)
 ;;61703-0236-85
 ;;9002226.02101,"1737,61703-0236-85 ",.02)
 ;;61703-0236-85
 ;;9002226.02101,"1737,62584-0312-60 ",.01)
 ;;62584-0312-60
 ;;9002226.02101,"1737,62584-0312-60 ",.02)
 ;;62584-0312-60
 ;;9002226.02101,"1737,63304-0506-01 ",.01)
 ;;63304-0506-01
 ;;9002226.02101,"1737,63304-0506-01 ",.02)
 ;;63304-0506-01
 ;;9002226.02101,"1737,63323-0161-01 ",.01)
 ;;63323-0161-01
 ;;9002226.02101,"1737,63323-0161-01 ",.02)
 ;;63323-0161-01
 ;;9002226.02101,"1737,63323-0162-01 ",.01)
 ;;63323-0162-01
 ;;9002226.02101,"1737,63323-0162-01 ",.02)
 ;;63323-0162-01
 ;;9002226.02101,"1737,63323-0162-02 ",.01)
 ;;63323-0162-02
 ;;9002226.02101,"1737,63323-0162-02 ",.02)
 ;;63323-0162-02
 ;;9002226.02101,"1737,63323-0659-03 ",.01)
 ;;63323-0659-03
 ;;9002226.02101,"1737,63323-0659-03 ",.02)
 ;;63323-0659-03
 ;;9002226.02101,"1737,63629-1418-01 ",.01)
 ;;63629-1418-01
 ;;9002226.02101,"1737,63629-1418-01 ",.02)
 ;;63629-1418-01
 ;;9002226.02101,"1737,63629-1418-02 ",.01)
 ;;63629-1418-02
 ;;9002226.02101,"1737,63629-1418-02 ",.02)
 ;;63629-1418-02
 ;;9002226.02101,"1737,63629-1418-03 ",.01)
 ;;63629-1418-03
 ;;9002226.02101,"1737,63629-1418-03 ",.02)
 ;;63629-1418-03
 ;;9002226.02101,"1737,63629-1418-04 ",.01)
 ;;63629-1418-04
 ;;9002226.02101,"1737,63629-1418-04 ",.02)
 ;;63629-1418-04
 ;;9002226.02101,"1737,63629-1418-05 ",.01)
 ;;63629-1418-05
 ;;9002226.02101,"1737,63629-1418-05 ",.02)
 ;;63629-1418-05
 ;;9002226.02101,"1737,63629-1418-06 ",.01)
 ;;63629-1418-06
 ;;9002226.02101,"1737,63629-1418-06 ",.02)
 ;;63629-1418-06
 ;;9002226.02101,"1737,63629-1780-01 ",.01)
 ;;63629-1780-01
 ;;9002226.02101,"1737,63629-1780-01 ",.02)
 ;;63629-1780-01
 ;;9002226.02101,"1737,63629-1780-02 ",.01)
 ;;63629-1780-02
 ;;9002226.02101,"1737,63629-1780-02 ",.02)
 ;;63629-1780-02
 ;;9002226.02101,"1737,63629-1780-03 ",.01)
 ;;63629-1780-03
 ;;9002226.02101,"1737,63629-1780-03 ",.02)
 ;;63629-1780-03
 ;;9002226.02101,"1737,63629-2974-01 ",.01)
 ;;63629-2974-01
 ;;9002226.02101,"1737,63629-2974-01 ",.02)
 ;;63629-2974-01
 ;;9002226.02101,"1737,63629-2974-02 ",.01)
 ;;63629-2974-02
 ;;9002226.02101,"1737,63629-2974-02 ",.02)
 ;;63629-2974-02
 ;;9002226.02101,"1737,63629-2974-03 ",.01)
 ;;63629-2974-03
 ;;9002226.02101,"1737,63629-2974-03 ",.02)
 ;;63629-2974-03
 ;;9002226.02101,"1737,63629-2974-04 ",.01)
 ;;63629-2974-04
 ;;9002226.02101,"1737,63629-2974-04 ",.02)
 ;;63629-2974-04
 ;;9002226.02101,"1737,63629-2974-05 ",.01)
 ;;63629-2974-05
 ;;9002226.02101,"1737,63629-2974-05 ",.02)
 ;;63629-2974-05
 ;;9002226.02101,"1737,63629-2974-06 ",.01)
 ;;63629-2974-06
 ;;9002226.02101,"1737,63629-2974-06 ",.02)
 ;;63629-2974-06
 ;;9002226.02101,"1737,63629-2974-07 ",.01)
 ;;63629-2974-07
 ;;9002226.02101,"1737,63629-2974-07 ",.02)
 ;;63629-2974-07
 ;;9002226.02101,"1737,63629-3201-01 ",.01)
 ;;63629-3201-01
 ;;9002226.02101,"1737,63629-3201-01 ",.02)
 ;;63629-3201-01
 ;;9002226.02101,"1737,63629-3201-02 ",.01)
 ;;63629-3201-02
 ;;9002226.02101,"1737,63629-3201-02 ",.02)
 ;;63629-3201-02
 ;;9002226.02101,"1737,63629-3201-03 ",.01)
 ;;63629-3201-03
 ;;9002226.02101,"1737,63629-3201-03 ",.02)
 ;;63629-3201-03
 ;;9002226.02101,"1737,63629-3206-01 ",.01)
 ;;63629-3206-01
 ;;9002226.02101,"1737,63629-3206-01 ",.02)
 ;;63629-3206-01
 ;;9002226.02101,"1737,63629-3206-02 ",.01)
 ;;63629-3206-02
 ;;9002226.02101,"1737,63629-3206-02 ",.02)
 ;;63629-3206-02
 ;;9002226.02101,"1737,63629-3206-03 ",.01)
 ;;63629-3206-03
 ;;9002226.02101,"1737,63629-3206-03 ",.02)
 ;;63629-3206-03
 ;;9002226.02101,"1737,63629-4549-01 ",.01)
 ;;63629-4549-01
 ;;9002226.02101,"1737,63629-4549-01 ",.02)
 ;;63629-4549-01
 ;;9002226.02101,"1737,63739-0472-05 ",.01)
 ;;63739-0472-05
 ;;9002226.02101,"1737,63739-0472-05 ",.02)
 ;;63739-0472-05
 ;;9002226.02101,"1737,63739-0472-21 ",.01)
 ;;63739-0472-21
 ;;9002226.02101,"1737,63739-0472-21 ",.02)
 ;;63739-0472-21
 ;;9002226.02101,"1737,63874-0220-01 ",.01)
 ;;63874-0220-01
 ;;9002226.02101,"1737,63874-0220-01 ",.02)
 ;;63874-0220-01
 ;;9002226.02101,"1737,63874-0220-03 ",.01)
 ;;63874-0220-03
 ;;9002226.02101,"1737,63874-0220-03 ",.02)
 ;;63874-0220-03
 ;;9002226.02101,"1737,63874-0220-04 ",.01)
 ;;63874-0220-04
 ;;9002226.02101,"1737,63874-0220-04 ",.02)
 ;;63874-0220-04
 ;;9002226.02101,"1737,63874-0220-10 ",.01)
 ;;63874-0220-10
 ;;9002226.02101,"1737,63874-0220-10 ",.02)
 ;;63874-0220-10
 ;;9002226.02101,"1737,63874-0220-12 ",.01)
 ;;63874-0220-12
 ;;9002226.02101,"1737,63874-0220-12 ",.02)
 ;;63874-0220-12
 ;;9002226.02101,"1737,63874-0220-15 ",.01)
 ;;63874-0220-15
 ;;9002226.02101,"1737,63874-0220-15 ",.02)
 ;;63874-0220-15
 ;;9002226.02101,"1737,63874-0220-20 ",.01)
 ;;63874-0220-20
 ;;9002226.02101,"1737,63874-0220-20 ",.02)
 ;;63874-0220-20