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

BGPM5ALV.m

Go to the documentation of this file.
BGPM5ALV ;IHS/MSC/MMT-CREATED BY ^ATXSTX ON JUL 15, 2011;
 ;;11.1;IHS CLINICAL REPORTING SYSTEM;**1**;JUN 27, 2011;Build 106
 ;
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,"900,54868189001 ",.01)
 ;;54868189001
 ;;9002226.02101,"900,54868189001 ",.02)
 ;;54868189001
 ;;9002226.02101,"900,54868196800 ",.01)
 ;;54868196800
 ;;9002226.02101,"900,54868196800 ",.02)
 ;;54868196800
 ;;9002226.02101,"900,54868216400 ",.01)
 ;;54868216400
 ;;9002226.02101,"900,54868216400 ",.02)
 ;;54868216400
 ;;9002226.02101,"900,54868216401 ",.01)
 ;;54868216401
 ;;9002226.02101,"900,54868216401 ",.02)
 ;;54868216401
 ;;9002226.02101,"900,54868219100 ",.01)
 ;;54868219100
 ;;9002226.02101,"900,54868219100 ",.02)
 ;;54868219100
 ;;9002226.02101,"900,54868235301 ",.01)
 ;;54868235301
 ;;9002226.02101,"900,54868235301 ",.02)
 ;;54868235301
 ;;9002226.02101,"900,54868235302 ",.01)
 ;;54868235302
 ;;9002226.02101,"900,54868235302 ",.02)
 ;;54868235302
 ;;9002226.02101,"900,54868235303 ",.01)
 ;;54868235303
 ;;9002226.02101,"900,54868235303 ",.02)
 ;;54868235303
 ;;9002226.02101,"900,54868235305 ",.01)
 ;;54868235305
 ;;9002226.02101,"900,54868235305 ",.02)
 ;;54868235305
 ;;9002226.02101,"900,54868235306 ",.01)
 ;;54868235306
 ;;9002226.02101,"900,54868235306 ",.02)
 ;;54868235306
 ;;9002226.02101,"900,54868263900 ",.01)
 ;;54868263900
 ;;9002226.02101,"900,54868263900 ",.02)
 ;;54868263900
 ;;9002226.02101,"900,54868263901 ",.01)
 ;;54868263901
 ;;9002226.02101,"900,54868263901 ",.02)
 ;;54868263901
 ;;9002226.02101,"900,54868264700 ",.01)
 ;;54868264700
 ;;9002226.02101,"900,54868264700 ",.02)
 ;;54868264700
 ;;9002226.02101,"900,54868310400 ",.01)
 ;;54868310400
 ;;9002226.02101,"900,54868310400 ",.02)
 ;;54868310400
 ;;9002226.02101,"900,54868310401 ",.01)
 ;;54868310401
 ;;9002226.02101,"900,54868310401 ",.02)
 ;;54868310401
 ;;9002226.02101,"900,54868328700 ",.01)
 ;;54868328700
 ;;9002226.02101,"900,54868328700 ",.02)
 ;;54868328700
 ;;9002226.02101,"900,54868328701 ",.01)
 ;;54868328701
 ;;9002226.02101,"900,54868328701 ",.02)
 ;;54868328701
 ;;9002226.02101,"900,54868332900 ",.01)
 ;;54868332900
 ;;9002226.02101,"900,54868332900 ",.02)
 ;;54868332900
 ;;9002226.02101,"900,54868393400 ",.01)
 ;;54868393400
 ;;9002226.02101,"900,54868393400 ",.02)
 ;;54868393400
 ;;9002226.02101,"900,54868393401 ",.01)
 ;;54868393401
 ;;9002226.02101,"900,54868393401 ",.02)
 ;;54868393401
 ;;9002226.02101,"900,54868393402 ",.01)
 ;;54868393402
 ;;9002226.02101,"900,54868393402 ",.02)
 ;;54868393402
 ;;9002226.02101,"900,54868393403 ",.01)
 ;;54868393403
 ;;9002226.02101,"900,54868393403 ",.02)
 ;;54868393403
 ;;9002226.02101,"900,54868393404 ",.01)
 ;;54868393404
 ;;9002226.02101,"900,54868393404 ",.02)
 ;;54868393404
 ;;9002226.02101,"900,54868394600 ",.01)
 ;;54868394600
 ;;9002226.02101,"900,54868394600 ",.02)
 ;;54868394600
 ;;9002226.02101,"900,54868394601 ",.01)
 ;;54868394601
 ;;9002226.02101,"900,54868394601 ",.02)
 ;;54868394601
 ;;9002226.02101,"900,54868394602 ",.01)
 ;;54868394602
 ;;9002226.02101,"900,54868394602 ",.02)
 ;;54868394602
 ;;9002226.02101,"900,54868394603 ",.01)
 ;;54868394603
 ;;9002226.02101,"900,54868394603 ",.02)
 ;;54868394603
 ;;9002226.02101,"900,54868394604 ",.01)
 ;;54868394604
 ;;9002226.02101,"900,54868394604 ",.02)
 ;;54868394604
 ;;9002226.02101,"900,54868415700 ",.01)
 ;;54868415700
 ;;9002226.02101,"900,54868415700 ",.02)
 ;;54868415700
 ;;9002226.02101,"900,54868415701 ",.01)
 ;;54868415701
 ;;9002226.02101,"900,54868415701 ",.02)
 ;;54868415701
 ;;9002226.02101,"900,54868415702 ",.01)
 ;;54868415702
 ;;9002226.02101,"900,54868415702 ",.02)
 ;;54868415702
 ;;9002226.02101,"900,54868418100 ",.01)
 ;;54868418100
 ;;9002226.02101,"900,54868418100 ",.02)
 ;;54868418100
 ;;9002226.02101,"900,54868418101 ",.01)
 ;;54868418101
 ;;9002226.02101,"900,54868418101 ",.02)
 ;;54868418101
 ;;9002226.02101,"900,54868422400 ",.01)
 ;;54868422400
 ;;9002226.02101,"900,54868422400 ",.02)
 ;;54868422400
 ;;9002226.02101,"900,54868422401 ",.01)
 ;;54868422401
 ;;9002226.02101,"900,54868422401 ",.02)
 ;;54868422401
 ;;9002226.02101,"900,54868422900 ",.01)
 ;;54868422900
 ;;9002226.02101,"900,54868422900 ",.02)
 ;;54868422900
 ;;9002226.02101,"900,54868422901 ",.01)
 ;;54868422901
 ;;9002226.02101,"900,54868422901 ",.02)
 ;;54868422901
 ;;9002226.02101,"900,54868422902 ",.01)
 ;;54868422902
 ;;9002226.02101,"900,54868422902 ",.02)
 ;;54868422902
 ;;9002226.02101,"900,54868422903 ",.01)
 ;;54868422903
 ;;9002226.02101,"900,54868422903 ",.02)
 ;;54868422903
 ;;9002226.02101,"900,54868447400 ",.01)
 ;;54868447400
 ;;9002226.02101,"900,54868447400 ",.02)
 ;;54868447400
 ;;9002226.02101,"900,54868447401 ",.01)
 ;;54868447401
 ;;9002226.02101,"900,54868447401 ",.02)
 ;;54868447401
 ;;9002226.02101,"900,54868447402 ",.01)
 ;;54868447402
 ;;9002226.02101,"900,54868447402 ",.02)
 ;;54868447402
 ;;9002226.02101,"900,54868447403 ",.01)
 ;;54868447403
 ;;9002226.02101,"900,54868447403 ",.02)
 ;;54868447403
 ;;9002226.02101,"900,54868458500 ",.01)
 ;;54868458500
 ;;9002226.02101,"900,54868458500 ",.02)
 ;;54868458500
 ;;9002226.02101,"900,54868458501 ",.01)
 ;;54868458501
 ;;9002226.02101,"900,54868458501 ",.02)
 ;;54868458501
 ;;9002226.02101,"900,54868458502 ",.01)
 ;;54868458502
 ;;9002226.02101,"900,54868458502 ",.02)
 ;;54868458502
 ;;9002226.02101,"900,54868458503 ",.01)
 ;;54868458503
 ;;9002226.02101,"900,54868458503 ",.02)
 ;;54868458503
 ;;9002226.02101,"900,54868459300 ",.01)
 ;;54868459300
 ;;9002226.02101,"900,54868459300 ",.02)
 ;;54868459300
 ;;9002226.02101,"900,54868459301 ",.01)
 ;;54868459301
 ;;9002226.02101,"900,54868459301 ",.02)
 ;;54868459301
 ;;9002226.02101,"900,54868459302 ",.01)
 ;;54868459302
 ;;9002226.02101,"900,54868459302 ",.02)
 ;;54868459302
 ;;9002226.02101,"900,54868459700 ",.01)
 ;;54868459700
 ;;9002226.02101,"900,54868459700 ",.02)
 ;;54868459700
 ;;9002226.02101,"900,54868460100 ",.01)
 ;;54868460100
 ;;9002226.02101,"900,54868460100 ",.02)
 ;;54868460100
 ;;9002226.02101,"900,54868471900 ",.01)
 ;;54868471900
 ;;9002226.02101,"900,54868471900 ",.02)
 ;;54868471900
 ;;9002226.02101,"900,54868471901 ",.01)
 ;;54868471901
 ;;9002226.02101,"900,54868471901 ",.02)
 ;;54868471901
 ;;9002226.02101,"900,54868477400 ",.01)
 ;;54868477400
 ;;9002226.02101,"900,54868477400 ",.02)
 ;;54868477400
 ;;9002226.02101,"900,54868477401 ",.01)
 ;;54868477401
 ;;9002226.02101,"900,54868477401 ",.02)
 ;;54868477401
 ;;9002226.02101,"900,54868477402 ",.01)
 ;;54868477402
 ;;9002226.02101,"900,54868477402 ",.02)
 ;;54868477402
 ;;9002226.02101,"900,54868477403 ",.01)
 ;;54868477403
 ;;9002226.02101,"900,54868477403 ",.02)
 ;;54868477403
 ;;9002226.02101,"900,54868480700 ",.01)
 ;;54868480700
 ;;9002226.02101,"900,54868480700 ",.02)
 ;;54868480700
 ;;9002226.02101,"900,54868480701 ",.01)
 ;;54868480701
 ;;9002226.02101,"900,54868480701 ",.02)
 ;;54868480701
 ;;9002226.02101,"900,54868480702 ",.01)
 ;;54868480702
 ;;9002226.02101,"900,54868480702 ",.02)
 ;;54868480702
 ;;9002226.02101,"900,54868481200 ",.01)
 ;;54868481200
 ;;9002226.02101,"900,54868481200 ",.02)
 ;;54868481200
 ;;9002226.02101,"900,54868481201 ",.01)
 ;;54868481201
 ;;9002226.02101,"900,54868481201 ",.02)
 ;;54868481201
 ;;9002226.02101,"900,54868493400 ",.01)
 ;;54868493400
 ;;9002226.02101,"900,54868493400 ",.02)
 ;;54868493400
 ;;9002226.02101,"900,54868493401 ",.01)
 ;;54868493401
 ;;9002226.02101,"900,54868493401 ",.02)
 ;;54868493401
 ;;9002226.02101,"900,54868493402 ",.01)
 ;;54868493402
 ;;9002226.02101,"900,54868493402 ",.02)
 ;;54868493402
 ;;9002226.02101,"900,54868496300 ",.01)
 ;;54868496300
 ;;9002226.02101,"900,54868496300 ",.02)
 ;;54868496300
 ;;9002226.02101,"900,54868496301 ",.01)
 ;;54868496301
 ;;9002226.02101,"900,54868496301 ",.02)
 ;;54868496301
 ;;9002226.02101,"900,54868496302 ",.01)
 ;;54868496302
 ;;9002226.02101,"900,54868496302 ",.02)
 ;;54868496302
 ;;9002226.02101,"900,54868496303 ",.01)
 ;;54868496303
 ;;9002226.02101,"900,54868496303 ",.02)
 ;;54868496303
 ;;9002226.02101,"900,54868499900 ",.01)
 ;;54868499900
 ;;9002226.02101,"900,54868499900 ",.02)
 ;;54868499900
 ;;9002226.02101,"900,54868499901 ",.01)
 ;;54868499901
 ;;9002226.02101,"900,54868499901 ",.02)
 ;;54868499901
 ;;9002226.02101,"900,54868508500 ",.01)
 ;;54868508500
 ;;9002226.02101,"900,54868508500 ",.02)
 ;;54868508500
 ;;9002226.02101,"900,54868508501 ",.01)
 ;;54868508501
 ;;9002226.02101,"900,54868508501 ",.02)
 ;;54868508501
 ;;9002226.02101,"900,54868508502 ",.01)
 ;;54868508502
 ;;9002226.02101,"900,54868508502 ",.02)
 ;;54868508502
 ;;9002226.02101,"900,54868508503 ",.01)
 ;;54868508503
 ;;9002226.02101,"900,54868508503 ",.02)
 ;;54868508503
 ;;9002226.02101,"900,54868508700 ",.01)
 ;;54868508700
 ;;9002226.02101,"900,54868508700 ",.02)
 ;;54868508700
 ;;9002226.02101,"900,54868517900 ",.01)
 ;;54868517900
 ;;9002226.02101,"900,54868517900 ",.02)
 ;;54868517900
 ;;9002226.02101,"900,54868518400 ",.01)
 ;;54868518400
 ;;9002226.02101,"900,54868518400 ",.02)
 ;;54868518400
 ;;9002226.02101,"900,54868518700 ",.01)
 ;;54868518700
 ;;9002226.02101,"900,54868518700 ",.02)
 ;;54868518700
 ;;9002226.02101,"900,54868518701 ",.01)
 ;;54868518701
 ;;9002226.02101,"900,54868518701 ",.02)
 ;;54868518701
 ;;9002226.02101,"900,54868518702 ",.01)
 ;;54868518702
 ;;9002226.02101,"900,54868518702 ",.02)
 ;;54868518702
 ;;9002226.02101,"900,54868518900 ",.01)
 ;;54868518900
 ;;9002226.02101,"900,54868518900 ",.02)
 ;;54868518900
 ;;9002226.02101,"900,54868518901 ",.01)
 ;;54868518901
 ;;9002226.02101,"900,54868518901 ",.02)
 ;;54868518901
 ;;9002226.02101,"900,54868520000 ",.01)
 ;;54868520000
 ;;9002226.02101,"900,54868520000 ",.02)
 ;;54868520000
 ;;9002226.02101,"900,54868520001 ",.01)
 ;;54868520001
 ;;9002226.02101,"900,54868520001 ",.02)
 ;;54868520001
 ;;9002226.02101,"900,54868520300 ",.01)
 ;;54868520300
 ;;9002226.02101,"900,54868520300 ",.02)
 ;;54868520300
 ;;9002226.02101,"900,54868520301 ",.01)
 ;;54868520301
 ;;9002226.02101,"900,54868520301 ",.02)
 ;;54868520301
 ;;9002226.02101,"900,54868520900 ",.01)
 ;;54868520900
 ;;9002226.02101,"900,54868520900 ",.02)
 ;;54868520900
 ;;9002226.02101,"900,54868520901 ",.01)
 ;;54868520901
 ;;9002226.02101,"900,54868520901 ",.02)
 ;;54868520901
 ;;9002226.02101,"900,54868522400 ",.01)
 ;;54868522400
 ;;9002226.02101,"900,54868522400 ",.02)
 ;;54868522400
 ;;9002226.02101,"900,54868522401 ",.01)
 ;;54868522401
 ;;9002226.02101,"900,54868522401 ",.02)
 ;;54868522401
 ;;9002226.02101,"900,54868525000 ",.01)
 ;;54868525000
 ;;9002226.02101,"900,54868525000 ",.02)
 ;;54868525000
 ;;9002226.02101,"900,54868525900 ",.01)
 ;;54868525900
 ;;9002226.02101,"900,54868525900 ",.02)
 ;;54868525900
 ;;9002226.02101,"900,54868525901 ",.01)
 ;;54868525901
 ;;9002226.02101,"900,54868525901 ",.02)
 ;;54868525901
 ;;9002226.02101,"900,54868534100 ",.01)
 ;;54868534100
 ;;9002226.02101,"900,54868534100 ",.02)
 ;;54868534100
 ;;9002226.02101,"900,54868534101 ",.01)
 ;;54868534101
 ;;9002226.02101,"900,54868534101 ",.02)
 ;;54868534101
 ;;9002226.02101,"900,54868535800 ",.01)
 ;;54868535800
 ;;9002226.02101,"900,54868535800 ",.02)
 ;;54868535800
 ;;9002226.02101,"900,54868542000 ",.01)
 ;;54868542000
 ;;9002226.02101,"900,54868542000 ",.02)
 ;;54868542000
 ;;9002226.02101,"900,54868549800 ",.01)
 ;;54868549800
 ;;9002226.02101,"900,54868549800 ",.02)
 ;;54868549800
 ;;9002226.02101,"900,54868551200 ",.01)
 ;;54868551200
 ;;9002226.02101,"900,54868551200 ",.02)
 ;;54868551200
 ;;9002226.02101,"900,54868551201 ",.01)
 ;;54868551201
 ;;9002226.02101,"900,54868551201 ",.02)
 ;;54868551201