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

BGP82H29.m

Go to the documentation of this file.
BGP82H29 ; 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,"1218,67544-0387-30 ",.02)
 ;;67544-0387-30
 ;;9002226.02101,"1218,67544-0387-60 ",.01)
 ;;67544-0387-60
 ;;9002226.02101,"1218,67544-0387-60 ",.02)
 ;;67544-0387-60
 ;;9002226.02101,"1218,67544-0387-80 ",.01)
 ;;67544-0387-80
 ;;9002226.02101,"1218,67544-0387-80 ",.02)
 ;;67544-0387-80
 ;;9002226.02101,"1218,67544-0491-31 ",.01)
 ;;67544-0491-31
 ;;9002226.02101,"1218,67544-0491-31 ",.02)
 ;;67544-0491-31
 ;;9002226.02101,"1218,67544-0491-45 ",.01)
 ;;67544-0491-45
 ;;9002226.02101,"1218,67544-0491-45 ",.02)
 ;;67544-0491-45
 ;;9002226.02101,"1218,67544-0491-60 ",.01)
 ;;67544-0491-60
 ;;9002226.02101,"1218,67544-0491-60 ",.02)
 ;;67544-0491-60
 ;;9002226.02101,"1218,67544-0491-80 ",.01)
 ;;67544-0491-80
 ;;9002226.02101,"1218,67544-0491-80 ",.02)
 ;;67544-0491-80
 ;;9002226.02101,"1218,67544-0491-82 ",.01)
 ;;67544-0491-82
 ;;9002226.02101,"1218,67544-0491-82 ",.02)
 ;;67544-0491-82
 ;;9002226.02101,"1218,67544-0491-99 ",.01)
 ;;67544-0491-99
 ;;9002226.02101,"1218,67544-0491-99 ",.02)
 ;;67544-0491-99
 ;;9002226.02101,"1218,67544-0555-45 ",.01)
 ;;67544-0555-45
 ;;9002226.02101,"1218,67544-0555-45 ",.02)
 ;;67544-0555-45
 ;;9002226.02101,"1218,67544-0555-51 ",.01)
 ;;67544-0555-51
 ;;9002226.02101,"1218,67544-0555-51 ",.02)
 ;;67544-0555-51
 ;;9002226.02101,"1218,67544-0555-60 ",.01)
 ;;67544-0555-60
 ;;9002226.02101,"1218,67544-0555-60 ",.02)
 ;;67544-0555-60
 ;;9002226.02101,"1218,67544-0567-30 ",.01)
 ;;67544-0567-30
 ;;9002226.02101,"1218,67544-0567-30 ",.02)
 ;;67544-0567-30
 ;;9002226.02101,"1218,67544-0567-53 ",.01)
 ;;67544-0567-53
 ;;9002226.02101,"1218,67544-0567-53 ",.02)
 ;;67544-0567-53
 ;;9002226.02101,"1218,67544-0567-60 ",.01)
 ;;67544-0567-60
 ;;9002226.02101,"1218,67544-0567-60 ",.02)
 ;;67544-0567-60
 ;;9002226.02101,"1218,67544-0567-70 ",.01)
 ;;67544-0567-70
 ;;9002226.02101,"1218,67544-0567-70 ",.02)
 ;;67544-0567-70
 ;;9002226.02101,"1218,67544-0567-80 ",.01)
 ;;67544-0567-80
 ;;9002226.02101,"1218,67544-0567-80 ",.02)
 ;;67544-0567-80
 ;;9002226.02101,"1218,67544-0567-92 ",.01)
 ;;67544-0567-92
 ;;9002226.02101,"1218,67544-0567-92 ",.02)
 ;;67544-0567-92
 ;;9002226.02101,"1218,67544-0567-98 ",.01)
 ;;67544-0567-98
 ;;9002226.02101,"1218,67544-0567-98 ",.02)
 ;;67544-0567-98
 ;;9002226.02101,"1218,67544-0573-51 ",.01)
 ;;67544-0573-51
 ;;9002226.02101,"1218,67544-0573-51 ",.02)
 ;;67544-0573-51
 ;;9002226.02101,"1218,67544-0573-82 ",.01)
 ;;67544-0573-82
 ;;9002226.02101,"1218,67544-0573-82 ",.02)
 ;;67544-0573-82
 ;;9002226.02101,"1218,67544-0573-99 ",.01)
 ;;67544-0573-99
 ;;9002226.02101,"1218,67544-0573-99 ",.02)
 ;;67544-0573-99
 ;;9002226.02101,"1218,67544-0627-53 ",.01)
 ;;67544-0627-53
 ;;9002226.02101,"1218,67544-0627-53 ",.02)
 ;;67544-0627-53
 ;;9002226.02101,"1218,67544-0627-60 ",.01)
 ;;67544-0627-60
 ;;9002226.02101,"1218,67544-0627-60 ",.02)
 ;;67544-0627-60
 ;;9002226.02101,"1218,67544-0627-80 ",.01)
 ;;67544-0627-80
 ;;9002226.02101,"1218,67544-0627-80 ",.02)
 ;;67544-0627-80
 ;;9002226.02101,"1218,67544-0911-30 ",.01)
 ;;67544-0911-30
 ;;9002226.02101,"1218,67544-0911-30 ",.02)
 ;;67544-0911-30
 ;;9002226.02101,"1218,67544-0911-45 ",.01)
 ;;67544-0911-45
 ;;9002226.02101,"1218,67544-0911-45 ",.02)
 ;;67544-0911-45
 ;;9002226.02101,"1218,67544-0911-53 ",.01)
 ;;67544-0911-53
 ;;9002226.02101,"1218,67544-0911-53 ",.02)
 ;;67544-0911-53
 ;;9002226.02101,"1218,67544-0911-60 ",.01)
 ;;67544-0911-60
 ;;9002226.02101,"1218,67544-0911-60 ",.02)
 ;;67544-0911-60
 ;;9002226.02101,"1218,67544-0911-70 ",.01)
 ;;67544-0911-70
 ;;9002226.02101,"1218,67544-0911-70 ",.02)
 ;;67544-0911-70
 ;;9002226.02101,"1218,67544-0911-73 ",.01)
 ;;67544-0911-73
 ;;9002226.02101,"1218,67544-0911-73 ",.02)
 ;;67544-0911-73
 ;;9002226.02101,"1218,67544-0911-80 ",.01)
 ;;67544-0911-80
 ;;9002226.02101,"1218,67544-0911-80 ",.02)
 ;;67544-0911-80
 ;;9002226.02101,"1218,67544-0911-92 ",.01)
 ;;67544-0911-92
 ;;9002226.02101,"1218,67544-0911-92 ",.02)
 ;;67544-0911-92
 ;;9002226.02101,"1218,67544-0911-94 ",.01)
 ;;67544-0911-94
 ;;9002226.02101,"1218,67544-0911-94 ",.02)
 ;;67544-0911-94
 ;;9002226.02101,"1218,67544-0911-98 ",.01)
 ;;67544-0911-98
 ;;9002226.02101,"1218,67544-0911-98 ",.02)
 ;;67544-0911-98
 ;;9002226.02101,"1218,67544-0929-32 ",.01)
 ;;67544-0929-32
 ;;9002226.02101,"1218,67544-0929-32 ",.02)
 ;;67544-0929-32
 ;;9002226.02101,"1218,67544-0929-60 ",.01)
 ;;67544-0929-60
 ;;9002226.02101,"1218,67544-0929-60 ",.02)
 ;;67544-0929-60
 ;;9002226.02101,"1218,67857-0700-01 ",.01)
 ;;67857-0700-01
 ;;9002226.02101,"1218,67857-0700-01 ",.02)
 ;;67857-0700-01
 ;;9002226.02101,"1218,67857-0701-01 ",.01)
 ;;67857-0701-01
 ;;9002226.02101,"1218,67857-0701-01 ",.02)
 ;;67857-0701-01
 ;;9002226.02101,"1218,68001-0119-00 ",.01)
 ;;68001-0119-00
 ;;9002226.02101,"1218,68001-0119-00 ",.02)
 ;;68001-0119-00
 ;;9002226.02101,"1218,68001-0119-03 ",.01)
 ;;68001-0119-03
 ;;9002226.02101,"1218,68001-0119-03 ",.02)
 ;;68001-0119-03
 ;;9002226.02101,"1218,68001-0120-00 ",.01)
 ;;68001-0120-00
 ;;9002226.02101,"1218,68001-0120-00 ",.02)
 ;;68001-0120-00
 ;;9002226.02101,"1218,68001-0120-03 ",.01)
 ;;68001-0120-03
 ;;9002226.02101,"1218,68001-0120-03 ",.02)
 ;;68001-0120-03
 ;;9002226.02101,"1218,68001-0121-00 ",.01)
 ;;68001-0121-00
 ;;9002226.02101,"1218,68001-0121-00 ",.02)
 ;;68001-0121-00
 ;;9002226.02101,"1218,68001-0121-03 ",.01)
 ;;68001-0121-03
 ;;9002226.02101,"1218,68001-0121-03 ",.02)
 ;;68001-0121-03
 ;;9002226.02101,"1218,68001-0122-00 ",.01)
 ;;68001-0122-00
 ;;9002226.02101,"1218,68001-0122-00 ",.02)
 ;;68001-0122-00
 ;;9002226.02101,"1218,68001-0122-03 ",.01)
 ;;68001-0122-03
 ;;9002226.02101,"1218,68001-0122-03 ",.02)
 ;;68001-0122-03
 ;;9002226.02101,"1218,68001-0151-00 ",.01)
 ;;68001-0151-00
 ;;9002226.02101,"1218,68001-0151-00 ",.02)
 ;;68001-0151-00
 ;;9002226.02101,"1218,68001-0151-03 ",.01)
 ;;68001-0151-03
 ;;9002226.02101,"1218,68001-0151-03 ",.02)
 ;;68001-0151-03
 ;;9002226.02101,"1218,68001-0152-00 ",.01)
 ;;68001-0152-00
 ;;9002226.02101,"1218,68001-0152-00 ",.02)
 ;;68001-0152-00
 ;;9002226.02101,"1218,68001-0152-03 ",.01)
 ;;68001-0152-03
 ;;9002226.02101,"1218,68001-0152-03 ",.02)
 ;;68001-0152-03
 ;;9002226.02101,"1218,68001-0153-00 ",.01)
 ;;68001-0153-00
 ;;9002226.02101,"1218,68001-0153-00 ",.02)
 ;;68001-0153-00
 ;;9002226.02101,"1218,68001-0153-03 ",.01)
 ;;68001-0153-03
 ;;9002226.02101,"1218,68001-0153-03 ",.02)
 ;;68001-0153-03
 ;;9002226.02101,"1218,68001-0154-00 ",.01)
 ;;68001-0154-00
 ;;9002226.02101,"1218,68001-0154-00 ",.02)
 ;;68001-0154-00
 ;;9002226.02101,"1218,68001-0154-03 ",.01)
 ;;68001-0154-03
 ;;9002226.02101,"1218,68001-0154-03 ",.02)
 ;;68001-0154-03
 ;;9002226.02101,"1218,68001-0204-00 ",.01)
 ;;68001-0204-00
 ;;9002226.02101,"1218,68001-0204-00 ",.02)
 ;;68001-0204-00
 ;;9002226.02101,"1218,68001-0204-03 ",.01)
 ;;68001-0204-03
 ;;9002226.02101,"1218,68001-0204-03 ",.02)
 ;;68001-0204-03
 ;;9002226.02101,"1218,68001-0205-00 ",.01)
 ;;68001-0205-00
 ;;9002226.02101,"1218,68001-0205-00 ",.02)
 ;;68001-0205-00
 ;;9002226.02101,"1218,68001-0205-03 ",.01)
 ;;68001-0205-03
 ;;9002226.02101,"1218,68001-0205-03 ",.02)
 ;;68001-0205-03
 ;;9002226.02101,"1218,68001-0206-00 ",.01)
 ;;68001-0206-00
 ;;9002226.02101,"1218,68001-0206-00 ",.02)
 ;;68001-0206-00
 ;;9002226.02101,"1218,68001-0206-03 ",.01)
 ;;68001-0206-03
 ;;9002226.02101,"1218,68001-0206-03 ",.02)
 ;;68001-0206-03
 ;;9002226.02101,"1218,68001-0219-00 ",.01)
 ;;68001-0219-00
 ;;9002226.02101,"1218,68001-0219-00 ",.02)
 ;;68001-0219-00
 ;;9002226.02101,"1218,68001-0220-00 ",.01)
 ;;68001-0220-00
 ;;9002226.02101,"1218,68001-0220-00 ",.02)
 ;;68001-0220-00
 ;;9002226.02101,"1218,68001-0220-08 ",.01)
 ;;68001-0220-08
 ;;9002226.02101,"1218,68001-0220-08 ",.02)
 ;;68001-0220-08
 ;;9002226.02101,"1218,68001-0221-00 ",.01)
 ;;68001-0221-00
 ;;9002226.02101,"1218,68001-0221-00 ",.02)
 ;;68001-0221-00
 ;;9002226.02101,"1218,68001-0317-00 ",.01)
 ;;68001-0317-00
 ;;9002226.02101,"1218,68001-0317-00 ",.02)
 ;;68001-0317-00
 ;;9002226.02101,"1218,68001-0318-00 ",.01)
 ;;68001-0318-00
 ;;9002226.02101,"1218,68001-0318-00 ",.02)
 ;;68001-0318-00
 ;;9002226.02101,"1218,68001-0319-00 ",.01)
 ;;68001-0319-00
 ;;9002226.02101,"1218,68001-0319-00 ",.02)
 ;;68001-0319-00
 ;;9002226.02101,"1218,68071-0288-30 ",.01)
 ;;68071-0288-30
 ;;9002226.02101,"1218,68071-0288-30 ",.02)
 ;;68071-0288-30
 ;;9002226.02101,"1218,68071-0841-30 ",.01)
 ;;68071-0841-30
 ;;9002226.02101,"1218,68071-0841-30 ",.02)
 ;;68071-0841-30
 ;;9002226.02101,"1218,68071-0856-30 ",.01)
 ;;68071-0856-30
 ;;9002226.02101,"1218,68071-0856-30 ",.02)
 ;;68071-0856-30
 ;;9002226.02101,"1218,68084-0261-01 ",.01)
 ;;68084-0261-01
 ;;9002226.02101,"1218,68084-0261-01 ",.02)
 ;;68084-0261-01
 ;;9002226.02101,"1218,68084-0261-11 ",.01)
 ;;68084-0261-11
 ;;9002226.02101,"1218,68084-0261-11 ",.02)
 ;;68084-0261-11
 ;;9002226.02101,"1218,68084-0262-01 ",.01)
 ;;68084-0262-01
 ;;9002226.02101,"1218,68084-0262-01 ",.02)
 ;;68084-0262-01
 ;;9002226.02101,"1218,68084-0262-11 ",.01)
 ;;68084-0262-11
 ;;9002226.02101,"1218,68084-0262-11 ",.02)
 ;;68084-0262-11
 ;;9002226.02101,"1218,68084-0263-01 ",.01)
 ;;68084-0263-01
 ;;9002226.02101,"1218,68084-0263-01 ",.02)
 ;;68084-0263-01
 ;;9002226.02101,"1218,68084-0263-11 ",.01)
 ;;68084-0263-11
 ;;9002226.02101,"1218,68084-0263-11 ",.02)
 ;;68084-0263-11
 ;;9002226.02101,"1218,68084-0264-01 ",.01)
 ;;68084-0264-01
 ;;9002226.02101,"1218,68084-0264-01 ",.02)
 ;;68084-0264-01
 ;;9002226.02101,"1218,68084-0264-11 ",.01)
 ;;68084-0264-11
 ;;9002226.02101,"1218,68084-0264-11 ",.02)
 ;;68084-0264-11
 ;;9002226.02101,"1218,68084-0456-01 ",.01)
 ;;68084-0456-01
 ;;9002226.02101,"1218,68084-0456-01 ",.02)
 ;;68084-0456-01
 ;;9002226.02101,"1218,68084-0456-11 ",.01)
 ;;68084-0456-11
 ;;9002226.02101,"1218,68084-0456-11 ",.02)
 ;;68084-0456-11
 ;;9002226.02101,"1218,68084-0457-01 ",.01)
 ;;68084-0457-01
 ;;9002226.02101,"1218,68084-0457-01 ",.02)
 ;;68084-0457-01
 ;;9002226.02101,"1218,68084-0457-11 ",.01)
 ;;68084-0457-11
 ;;9002226.02101,"1218,68084-0457-11 ",.02)
 ;;68084-0457-11
 ;;9002226.02101,"1218,68084-0487-11 ",.01)
 ;;68084-0487-11
 ;;9002226.02101,"1218,68084-0487-11 ",.02)
 ;;68084-0487-11
 ;;9002226.02101,"1218,68084-0487-21 ",.01)
 ;;68084-0487-21
 ;;9002226.02101,"1218,68084-0487-21 ",.02)
 ;;68084-0487-21
 ;;9002226.02101,"1218,68084-0503-01 ",.01)
 ;;68084-0503-01
 ;;9002226.02101,"1218,68084-0503-01 ",.02)
 ;;68084-0503-01
 ;;9002226.02101,"1218,68084-0503-11 ",.01)
 ;;68084-0503-11
 ;;9002226.02101,"1218,68084-0503-11 ",.02)
 ;;68084-0503-11
 ;;9002226.02101,"1218,68084-0504-01 ",.01)
 ;;68084-0504-01
 ;;9002226.02101,"1218,68084-0504-01 ",.02)
 ;;68084-0504-01
 ;;9002226.02101,"1218,68084-0504-11 ",.01)
 ;;68084-0504-11
 ;;9002226.02101,"1218,68084-0504-11 ",.02)
 ;;68084-0504-11
 ;;9002226.02101,"1218,68084-0659-01 ",.01)
 ;;68084-0659-01
 ;;9002226.02101,"1218,68084-0659-01 ",.02)
 ;;68084-0659-01
 ;;9002226.02101,"1218,68084-0659-11 ",.01)
 ;;68084-0659-11
 ;;9002226.02101,"1218,68084-0659-11 ",.02)
 ;;68084-0659-11
 ;;9002226.02101,"1218,68084-0666-01 ",.01)
 ;;68084-0666-01
 ;;9002226.02101,"1218,68084-0666-01 ",.02)
 ;;68084-0666-01
 ;;9002226.02101,"1218,68084-0666-11 ",.01)
 ;;68084-0666-11
 ;;9002226.02101,"1218,68084-0666-11 ",.02)
 ;;68084-0666-11
 ;;9002226.02101,"1218,68084-0673-01 ",.01)
 ;;68084-0673-01
 ;;9002226.02101,"1218,68084-0673-01 ",.02)
 ;;68084-0673-01
 ;;9002226.02101,"1218,68084-0673-11 ",.01)
 ;;68084-0673-11
 ;;9002226.02101,"1218,68084-0673-11 ",.02)
 ;;68084-0673-11