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

BGP04P5.m

Go to the documentation of this file.
  1. BGP04P5 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON MAY 23, 2010;
  1. ;;10.0;IHS CLINICAL REPORTING;;JUN 18, 2010
  1. ;
  1. START ;
  1. K:'$G(ATXPGMC) ^TMP("ATX",$J)
  1. S ATXPGMC=$G(ATXPGMC)+1
  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
  1. Q
  1. ;
  1. TMP ;;TAXONOMY (WITH BULLETIN)
  1. ;;
  1. ;;141
  1. ;;
  1. ;;135
  1. ;;
  1. ;;136
  1. ;;
  1. ;;137
  1. ;;
  1. ;;138
  1. ;;
  1. ;;139
  1. ;;
  1. ;;140
  1. ;;
  1. ;;3535
  1. ;;
  1. ;;3533
  1. ;;
  1. ;;3534
  1. ;;
  1. ;;3538
  1. ;;
  1. ;;3536
  1. ;;
  1. ;;3537
  1. ;;
  1. ;;14
  1. ;;
  1. ;;13
  1. ;;
  1. ;;177
  1. ;;
  1. ;;176
  1. ;;
  1. ;;179
  1. ;;
  1. ;;178
  1. ;;
  1. ;;2058
  1. ;;
  1. ;;2056
  1. ;;
  1. ;;2057
  1. ;;
  1. ;;2053
  1. ;;
  1. ;;2052
  1. ;;
  1. ;;2055
  1. ;;
  1. ;;2054
  1. ;;
  1. ;;2740
  1. ;;
  1. ;;2739
  1. ;;
  1. ;;1459
  1. ;;
  1. ;;1457
  1. ;;
  1. ;;1458
  1. ;;
  1. ;;586
  1. ;;
  1. ;;2452
  1. ;;
  1. ;;2454
  1. ;;
  1. ;;2455
  1. ;;
  1. ;;2456
  1. ;;
  1. ;;2458
  1. ;;
  1. ;;2460
  1. ;;
  1. ;;2459
  1. ;;
  1. ;;1653
  1. ;;
  1. ;;1654
  1. ;;
  1. ;;1655
  1. ;;
  1. ;;1656
  1. ;;
  1. ;;1657
  1. ;;
  1. ;;1658
  1. ;;
  1. ;;2453
  1. ;;
  1. ;;658
  1. ;;
  1. ;;1691
  1. ;;
  1. ;;1689
  1. ;;
  1. ;;1690
  1. ;;
  1. ;;3454
  1. ;;
  1. ;;3455
  1. ;;
  1. ;;303
  1. ;;
  1. ;;1226
  1. ;;
  1. ;;1225
  1. ;;
  1. ;;2021
  1. ;;
  1. ;;2022
  1. ;;
  1. ;;2023
  1. ;;
  1. ;;2024
  1. ;;
  1. ;;2025
  1. ;;
  1. ;;2026
  1. ;;
  1. ;;2027
  1. ;;
  1. ;;2028
  1. ;;
  1. ;;2029
  1. ;;
  1. ;;2030
  1. ;;
  1. ;;2031
  1. ;;
  1. ;;2032
  1. ;;
  1. ;;2034
  1. ;;
  1. ;;2035
  1. ;;
  1. ;;2036
  1. ;;
  1. ;;2037
  1. ;;
  1. ;;2038
  1. ;;
  1. ;;2039
  1. ;;
  1. ;;2040
  1. ;;
  1. ;;2041
  1. ;;
  1. ;;2033
  1. ;;
  1. ;;3539
  1. ;;
  1. ;;3540
  1. ;;
  1. ;;3541
  1. ;;
  1. ;;3542
  1. ;;
  1. ;;3543
  1. ;;
  1. ;;3544
  1. ;;
  1. ;;3545
  1. ;;
  1. ;;3546
  1. ;;
  1. ;;3328
  1. ;;
  1. ;;3329
  1. ;;
  1. ;;3330
  1. ;;
  1. ;;185
  1. ;;
  1. ;;186
  1. ;;
  1. ;;482
  1. ;;
  1. ;;483
  1. ;;
  1. ;;484
  1. ;;
  1. ;;485
  1. ;;
  1. ;;727
  1. ;;
  1. ;;728
  1. ;;
  1. ;;729
  1. ;;
  1. ;;731
  1. ;;
  1. ;;732
  1. ;;
  1. ;;733
  1. ;;
  1. ;;2397
  1. ;;
  1. ;;2398
  1. ;;
  1. ;;2744
  1. ;;
  1. ;;2745
  1. ;;
  1. ;;2746
  1. ;;
  1. ;;2747
  1. ;;
  1. ;;2748
  1. ;;
  1. ;;2749
  1. ;;
  1. ;;2750
  1. ;;
  1. ;;2751
  1. ;;
  1. ;;2752
  1. ;;
  1. ;;2753
  1. ;;
  1. ;;2754
  1. ;;
  1. ;;2755
  1. ;;
  1. ;;2756
  1. ;;
  1. ;;2757
  1. ;;
  1. ;;2758
  1. ;;
  1. ;;2759
  1. ;;
  1. ;;2760
  1. ;;
  1. ;;2761
  1. ;;
  1. ;;3082
  1. ;;
  1. ;;3083
  1. ;;
  1. ;;3084
  1. ;;
  1. ;;3085
  1. ;;
  1. ;;1463
  1. ;;
  1. ;;1464
  1. ;;
  1. ;;1465
  1. ;;
  1. ;;1466
  1. ;;
  1. ;;1467
  1. ;;
  1. ;;1468
  1. ;;
  1. ;;1249
  1. ;;
  1. ;;1250
  1. ;;
  1. ;;1251
  1. ;;
  1. ;;1252
  1. ;;
  1. ;;1006
  1. ;;
  1. ;;1007
  1. ;;
  1. ;;1008
  1. ;;
  1. ;;1009
  1. ;;
  1. ;;900
  1. ;;
  1. ;;901
  1. ;;
  1. ;;1005
  1. ;;
  1. ;;182
  1. ;;
  1. ;;183
  1. ;;
  1. ;;184
  1. ;;
  1. ;;3274
  1. ;;
  1. ;;3275
  1. ;;
  1. ;;3276
  1. ;;
  1. ;;3277
  1. ;;
  1. ;;869
  1. ;;
  1. ;;1165
  1. ;;
  1. ;;1166
  1. ;;
  1. ;;1167
  1. ;;
  1. ;;1607
  1. ;;
  1. ;;486
  1. ;;
  1. ;;1168
  1. ;;
  1. ;;1169
  1. ;;
  1. ;;730
  1. ;;
  1. ;;2291
  1. ;;
  1. ;;2292
  1. ;;
  1. ;;2293
  1. ;;
  1. ;;2294
  1. ;;
  1. ;;2295
  1. ;;
  1. ;;2296
  1. ;;
  1. ;;2297
  1. ;;
  1. ;;2298
  1. ;;
  1. ;;164
  1. ;;
  1. ;;165
  1. ;;
  1. ;;1153
  1. ;;
  1. ;;2278
  1. ;;
  1. ;;2279
  1. ;;
  1. ;;2280
  1. ;;
  1. ;;2281
  1. ;;
  1. ;;863
  1. ;;
  1. ;;864
  1. ;;
  1. ;;166
  1. ;;
  1. ;;167
  1. ;;
  1. ;;2282
  1. ;;
  1. ;;2283
  1. ;;
  1. ;;2284
  1. ;;
  1. ;;2285
  1. ;;
  1. ;;2286
  1. ;;
  1. ;;2287
  1. ;;
  1. ;;2288
  1. ;;
  1. ;;2289
  1. ;;
  1. ;;2290
  1. ;;
  1. ;;2392
  1. ;;
  1. ;;2393
  1. ;;
  1. ;;1424
  1. ;;
  1. ;;1425
  1. ;;
  1. ;;1426
  1. ;;
  1. ;;1427
  1. ;;
  1. ;;716
  1. ;;
  1. ;;982
  1. ;;
  1. ;;983
  1. ;;
  1. ;;3325
  1. ;;
  1. ;;3521
  1. ;;
  1. ;;3522
  1. ;;
  1. ;;3523
  1. ;;
  1. ;;453
  1. ;;
  1. ;;454
  1. ;;
  1. ;;2677
  1. ;;
  1. ;;2678
  1. ;;
  1. ;;2679
  1. ;;
  1. ;;2681
  1. ;;
  1. ;;2682
  1. ;;
  1. ;;2680
  1. ;;
  1. ;;2683
  1. ;;
  1. ;;2684
  1. ;;
  1. ;;2672
  1. ;;
  1. ;;2673
  1. ;;
  1. ;;2674
  1. ;;
  1. ;;2675
  1. ;;
  1. ;;2676
  1. ;;
  1. ;;3051
  1. ;;
  1. ;;3052
  1. ;;
  1. ;;3053
  1. ;;
  1. ;;3054
  1. ;;
  1. ;;3049
  1. ;;
  1. ;;3050
  1. ;;
  1. ;;450
  1. ;;
  1. ;;451
  1. ;;
  1. ;;452
  1. ;;
  1. ;;2541
  1. ;;
  1. ;;2542
  1. ;;
  1. ;;2545
  1. ;;
  1. ;;2546
  1. ;;
  1. ;;2547
  1. ;;
  1. ;;2549
  1. ;;
  1. ;;2551
  1. ;;
  1. ;;2552
  1. ;;
  1. ;;3513
  1. ;;
  1. ;;3514
  1. ;;
  1. ;;3515
  1. ;;
  1. ;;3520
  1. ;;
  1. ;;3516
  1. ;;
  1. ;;3517
  1. ;;
  1. ;;3518
  1. ;;
  1. ;;3519
  1. ;;
  1. ;;8
  1. ;;
  1. ;;9
  1. ;;
  1. ;;154
  1. ;;
  1. ;;155
  1. ;;
  1. ;;156
  1. ;;
  1. ;;157
  1. ;;
  1. ;;158
  1. ;;
  1. ;;159
  1. ;;
  1. ;;160
  1. ;;
  1. ;;161
  1. ;;
  1. ;;447
  1. ;;
  1. ;;448
  1. ;;
  1. ;;449
  1. ;;
  1. ;;1549
  1. ;;
  1. ;;2253
  1. ;;
  1. ;;2254
  1. ;;
  1. ;;2255
  1. ;;
  1. ;;2256
  1. ;;
  1. ;;2257
  1. ;;
  1. ;;2258
  1. ;;
  1. ;;2265
  1. ;;
  1. ;;2259
  1. ;;
  1. ;;2260
  1. ;;
  1. ;;2261
  1. ;;
  1. ;;2262
  1. ;;
  1. ;;2263
  1. ;;
  1. ;;2264
  1. ;;
  1. ;;2267
  1. ;;
  1. ;;2268
  1. ;;
  1. ;;2269
  1. ;;
  1. ;;2270
  1. ;;
  1. ;;2271
  1. ;;
  1. ;;2272
  1. ;;
  1. ;;2273
  1. ;;
  1. ;;2274
  1. ;;
  1. ;;2275
  1. ;;
  1. ;;2277
  1. ;;
  1. ;;710
  1. ;;
  1. ;;711
  1. ;;
  1. ;;712
  1. ;;
  1. ;;713
  1. ;;
  1. ;;714
  1. ;;
  1. ;;715
  1. ;;
  1. ;;2389
  1. ;;
  1. ;;2390
  1. ;;
  1. ;;2391
  1. ;;
  1. ;;861
  1. ;;
  1. ;;862
  1. ;;
  1. ;;1148
  1. ;;
  1. ;;1145
  1. ;;
  1. ;;1146
  1. ;;
  1. ;;1147
  1. ;;
  1. ;;1149
  1. ;;
  1. ;;1150
  1. ;;
  1. ;;1151
  1. ;;
  1. ;;1152
  1. ;;
  1. ;;2655
  1. ;;
  1. ;;2656
  1. ;;
  1. ;;2657
  1. ;;
  1. ;;2658
  1. ;;
  1. ;;2659
  1. ;;
  1. ;;2660
  1. ;;
  1. ;;2661
  1. ;;
  1. ;;2662
  1. ;;
  1. ;;2663
  1. ;;
  1. ;;2664
  1. ;;
  1. ;;2665
  1. ;;
  1. ;;2666
  1. ;;
  1. ;;2667
  1. ;;
  1. ;;2668
  1. ;;
  1. ;;2669
  1. ;;
  1. ;;2670
  1. ;;
  1. ;;2671
  1. ;;
  1. ;;3044
  1. ;;
  1. ;;3045
  1. ;;
  1. ;;3046
  1. ;;
  1. ;;3047
  1. ;;
  1. ;;3048
  1. ;;
  1. ;;3264
  1. ;;
  1. ;;3265
  1. ;;
  1. ;;1418
  1. ;;
  1. ;;1419
  1. ;;
  1. ;;1420
  1. ;;
  1. ;;1421
  1. ;;
  1. ;;1422
  1. ;;
  1. ;;1423
  1. ;;
  1. ;;980
  1. ;;
  1. ;;981
  1. ;;
  1. ;;3407
  1. ;;
  1. ;;1416
  1. ;;
  1. ;;1417
  1. ;;
  1. ;;3373
  1. ;;
  1. ;;3374
  1. ;;
  1. ;;3375
  1. ;;
  1. ;;1301
  1. ;;
  1. ;;1304
  1. ;;
  1. ;;1302
  1. ;;
  1. ;;163
  1. ;;
  1. ;;3376
  1. ;;
  1. ;;3408
  1. ;;
  1. ;;1303
  1. ;;
  1. ;;2276
  1. ;;
  1. ;;2266
  1. ;;
  1. ;;479
  1. ;;
  1. ;;480
  1. ;;
  1. ;;481
  1. ;;
  1. ;;3272
  1. ;;
  1. ;;3273
  1. ;;
  1. ;;2051
  1. ;;
  1. ;;2048
  1. ;;
  1. ;;2049
  1. ;;
  1. ;;2050
  1. ;;
  1. ;;180
  1. ;;
  1. ;;181
  1. ;;
  1. ;;1163
  1. ;;
  1. ;;1164
  1. ;;
  1. ;;15
  1. ;;
  1. ;;868
  1. ;;
  1. ;;1460
  1. ;;
  1. ;;1461
  1. ;;
  1. ;;1462
  1. ;;
  1. ;;2741
  1. ;;
  1. ;;2742
  1. ;;
  1. ;;2743