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

ATXXA7.m

Go to the documentation of this file.
ATXXA7 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
 ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
 ;
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)
 ;;21,"S42.252B ")
 ;;2332
 ;;21,"S42.253A ")
 ;;2333
 ;;21,"S42.253B ")
 ;;2334
 ;;21,"S42.254A ")
 ;;2335
 ;;21,"S42.254B ")
 ;;2336
 ;;21,"S42.255A ")
 ;;2337
 ;;21,"S42.255B ")
 ;;2338
 ;;21,"S42.256A ")
 ;;2339
 ;;21,"S42.256B ")
 ;;2340
 ;;21,"S42.261A ")
 ;;2341
 ;;21,"S42.261B ")
 ;;2342
 ;;21,"S42.262A ")
 ;;2343
 ;;21,"S42.262B ")
 ;;2344
 ;;21,"S42.263A ")
 ;;2345
 ;;21,"S42.263B ")
 ;;2346
 ;;21,"S42.264A ")
 ;;2347
 ;;21,"S42.264B ")
 ;;2348
 ;;21,"S42.265A ")
 ;;2349
 ;;21,"S42.265B ")
 ;;2350
 ;;21,"S42.266A ")
 ;;2351
 ;;21,"S42.266B ")
 ;;2352
 ;;21,"S42.271A ")
 ;;2353
 ;;21,"S42.272A ")
 ;;2354
 ;;21,"S42.279A ")
 ;;2355
 ;;21,"S42.291A ")
 ;;2356
 ;;21,"S42.291B ")
 ;;2357
 ;;21,"S42.292A ")
 ;;2358
 ;;21,"S42.292B ")
 ;;2359
 ;;21,"S42.293A ")
 ;;2360
 ;;21,"S42.293B ")
 ;;2361
 ;;21,"S42.294A ")
 ;;2362
 ;;21,"S42.294B ")
 ;;2363
 ;;21,"S42.295A ")
 ;;2364
 ;;21,"S42.295B ")
 ;;2365
 ;;21,"S42.296A ")
 ;;2366
 ;;21,"S42.296B ")
 ;;2367
 ;;21,"S42.301A ")
 ;;2368
 ;;21,"S42.301B ")
 ;;2369
 ;;21,"S42.302A ")
 ;;2370
 ;;21,"S42.302B ")
 ;;2371
 ;;21,"S42.309A ")
 ;;2372
 ;;21,"S42.309B ")
 ;;2373
 ;;21,"S42.311A ")
 ;;2374
 ;;21,"S42.312A ")
 ;;2375
 ;;21,"S42.319A ")
 ;;2376
 ;;21,"S42.321A ")
 ;;2377
 ;;21,"S42.321B ")
 ;;2378
 ;;21,"S42.322A ")
 ;;2379
 ;;21,"S42.322B ")
 ;;2380
 ;;21,"S42.323A ")
 ;;2381
 ;;21,"S42.323B ")
 ;;2382
 ;;21,"S42.324A ")
 ;;2383
 ;;21,"S42.324B ")
 ;;2384
 ;;21,"S42.325A ")
 ;;2385
 ;;21,"S42.325B ")
 ;;2386
 ;;21,"S42.326A ")
 ;;2387
 ;;21,"S42.326B ")
 ;;2388
 ;;21,"S42.331A ")
 ;;2389
 ;;21,"S42.331B ")
 ;;2390
 ;;21,"S42.332A ")
 ;;2391
 ;;21,"S42.332B ")
 ;;2392
 ;;21,"S42.333A ")
 ;;2393
 ;;21,"S42.333B ")
 ;;2394
 ;;21,"S42.334A ")
 ;;2395
 ;;21,"S42.334B ")
 ;;2396
 ;;21,"S42.335A ")
 ;;2397
 ;;21,"S42.335B ")
 ;;2398
 ;;21,"S42.336A ")
 ;;2399
 ;;21,"S42.336B ")
 ;;2400
 ;;21,"S42.341A ")
 ;;2401
 ;;21,"S42.341B ")
 ;;2402
 ;;21,"S42.342A ")
 ;;2403
 ;;21,"S42.342B ")
 ;;2404
 ;;21,"S42.343A ")
 ;;2405
 ;;21,"S42.343B ")
 ;;2406
 ;;21,"S42.344A ")
 ;;2407
 ;;21,"S42.344B ")
 ;;2408
 ;;21,"S42.345A ")
 ;;2409
 ;;21,"S42.345B ")
 ;;2410
 ;;21,"S42.346A ")
 ;;2411
 ;;21,"S42.346B ")
 ;;2412
 ;;21,"S42.351A ")
 ;;2413
 ;;21,"S42.351B ")
 ;;2414
 ;;21,"S42.352A ")
 ;;2415
 ;;21,"S42.352B ")
 ;;2416
 ;;21,"S42.353A ")
 ;;2417
 ;;21,"S42.353B ")
 ;;2418
 ;;21,"S42.354A ")
 ;;2419
 ;;21,"S42.354B ")
 ;;2420
 ;;21,"S42.355A ")
 ;;2421
 ;;21,"S42.355B ")
 ;;2422
 ;;21,"S42.356A ")
 ;;2423
 ;;21,"S42.356B ")
 ;;2424
 ;;21,"S42.361A ")
 ;;2425
 ;;21,"S42.361B ")
 ;;2426
 ;;21,"S42.362A ")
 ;;2427
 ;;21,"S42.362B ")
 ;;2428
 ;;21,"S42.363A ")
 ;;2429
 ;;21,"S42.363B ")
 ;;2430
 ;;21,"S42.364A ")
 ;;2431
 ;;21,"S42.364B ")
 ;;2432
 ;;21,"S42.365A ")
 ;;2433
 ;;21,"S42.365B ")
 ;;2434
 ;;21,"S42.366A ")
 ;;2435
 ;;21,"S42.366B ")
 ;;2436
 ;;21,"S42.391A ")
 ;;2437
 ;;21,"S42.391B ")
 ;;2438
 ;;21,"S42.392A ")
 ;;2439
 ;;21,"S42.392B ")
 ;;2440
 ;;21,"S42.399A ")
 ;;2441
 ;;21,"S42.399B ")
 ;;2442
 ;;21,"S42.401A ")
 ;;2443
 ;;21,"S42.401B ")
 ;;2444
 ;;21,"S42.402A ")
 ;;2445
 ;;21,"S42.402B ")
 ;;2446
 ;;21,"S42.409A ")
 ;;2447
 ;;21,"S42.409B ")
 ;;2448
 ;;21,"S42.411A ")
 ;;2449
 ;;21,"S42.411B ")
 ;;2450
 ;;21,"S42.412A ")
 ;;2451
 ;;21,"S42.412B ")
 ;;2452
 ;;21,"S42.413A ")
 ;;2453
 ;;21,"S42.413B ")
 ;;2454
 ;;21,"S42.414A ")
 ;;2455
 ;;21,"S42.414B ")
 ;;2456
 ;;21,"S42.415A ")
 ;;2457
 ;;21,"S42.415B ")
 ;;2458
 ;;21,"S42.416A ")
 ;;2459
 ;;21,"S42.416B ")
 ;;2460
 ;;21,"S42.421A ")
 ;;2461
 ;;21,"S42.421B ")
 ;;2462
 ;;21,"S42.422A ")
 ;;2463
 ;;21,"S42.422B ")
 ;;2464
 ;;21,"S42.423A ")
 ;;2465
 ;;21,"S42.423B ")
 ;;2466
 ;;21,"S42.424A ")
 ;;2467
 ;;21,"S42.424B ")
 ;;2468
 ;;21,"S42.425A ")
 ;;2469
 ;;21,"S42.425B ")
 ;;2470
 ;;21,"S42.426A ")
 ;;2471
 ;;21,"S42.426B ")
 ;;2472
 ;;21,"S42.431A ")
 ;;2473
 ;;21,"S42.431B ")
 ;;2474
 ;;21,"S42.432A ")
 ;;2475
 ;;21,"S42.432B ")
 ;;2476
 ;;21,"S42.433A ")
 ;;2477
 ;;21,"S42.433B ")
 ;;2478
 ;;21,"S42.434A ")
 ;;2479
 ;;21,"S42.434B ")
 ;;2480
 ;;21,"S42.435A ")
 ;;2481
 ;;21,"S42.435B ")
 ;;2482
 ;;21,"S42.436A ")
 ;;2483
 ;;21,"S42.436B ")
 ;;2484
 ;;21,"S42.441A ")
 ;;2485
 ;;21,"S42.441B ")
 ;;2486
 ;;21,"S42.442A ")
 ;;2487
 ;;21,"S42.442B ")
 ;;2488
 ;;21,"S42.443A ")
 ;;2489
 ;;21,"S42.443B ")
 ;;2490
 ;;21,"S42.444A ")
 ;;2491
 ;;21,"S42.444B ")
 ;;2492
 ;;21,"S42.445A ")
 ;;2493
 ;;21,"S42.445B ")
 ;;2494
 ;;21,"S42.446A ")
 ;;2495
 ;;21,"S42.446B ")
 ;;2496
 ;;21,"S42.447A ")
 ;;2497
 ;;21,"S42.447B ")
 ;;2498
 ;;21,"S42.448A ")
 ;;2499
 ;;21,"S42.448B ")
 ;;2500
 ;;21,"S42.449A ")
 ;;2501
 ;;21,"S42.449B ")
 ;;2502
 ;;21,"S42.451A ")
 ;;2503
 ;;21,"S42.451B ")
 ;;2504
 ;;21,"S42.452A ")
 ;;2505
 ;;21,"S42.452B ")
 ;;2506
 ;;21,"S42.453A ")
 ;;2507
 ;;21,"S42.453B ")
 ;;2508
 ;;21,"S42.454A ")
 ;;2509
 ;;21,"S42.454B ")
 ;;2510
 ;;21,"S42.455A ")
 ;;2511
 ;;21,"S42.455B ")
 ;;2512
 ;;21,"S42.456A ")
 ;;2513
 ;;21,"S42.456B ")
 ;;2514
 ;;21,"S42.461A ")
 ;;2515
 ;;21,"S42.461B ")
 ;;2516
 ;;21,"S42.462A ")
 ;;2517
 ;;21,"S42.462B ")
 ;;2518
 ;;21,"S42.463A ")
 ;;2519
 ;;21,"S42.463B ")
 ;;2520
 ;;21,"S42.464A ")
 ;;2521
 ;;21,"S42.464B ")
 ;;2522
 ;;21,"S42.465A ")
 ;;2523
 ;;21,"S42.465B ")
 ;;2524
 ;;21,"S42.466A ")
 ;;2525
 ;;21,"S42.466B ")
 ;;2526
 ;;21,"S42.471A ")
 ;;2527
 ;;21,"S42.471B ")
 ;;2528
 ;;21,"S42.472A ")
 ;;2529
 ;;21,"S42.472B ")
 ;;2530
 ;;21,"S42.473A ")
 ;;2531
 ;;21,"S42.473B ")
 ;;2532
 ;;21,"S42.474A ")
 ;;2533
 ;;21,"S42.474B ")
 ;;2534
 ;;21,"S42.475A ")
 ;;2535
 ;;21,"S42.475B ")
 ;;2536
 ;;21,"S42.476A ")
 ;;2537
 ;;21,"S42.476B ")
 ;;2538
 ;;21,"S42.481A ")
 ;;2539
 ;;21,"S42.482A ")
 ;;2540
 ;;21,"S42.489A ")
 ;;2541
 ;;21,"S42.491A ")
 ;;2542
 ;;21,"S42.491B ")
 ;;2543
 ;;21,"S42.492A ")
 ;;2544
 ;;21,"S42.492B ")
 ;;2545
 ;;21,"S42.493A ")
 ;;2546
 ;;21,"S42.493B ")
 ;;2547
 ;;21,"S42.494A ")
 ;;2548
 ;;21,"S42.494B ")
 ;;2549
 ;;21,"S42.495A ")
 ;;2550
 ;;21,"S42.495B ")
 ;;2551
 ;;21,"S42.496A ")
 ;;2552
 ;;21,"S42.496B ")
 ;;2553
 ;;21,"S42.90XA ")
 ;;2554
 ;;21,"S42.90XB ")
 ;;2555
 ;;21,"S42.91XA ")
 ;;2556
 ;;21,"S42.91XB ")
 ;;2557
 ;;21,"S42.92XA ")
 ;;2558
 ;;21,"S42.92XB ")
 ;;2559
 ;;21,"S43.001A ")
 ;;2560
 ;;21,"S43.002A ")
 ;;2561
 ;;21,"S43.003A ")
 ;;2562
 ;;21,"S43.004A ")
 ;;2563
 ;;21,"S43.005A ")
 ;;2564
 ;;21,"S43.006A ")
 ;;2565
 ;;21,"S43.011A ")
 ;;2566
 ;;21,"S43.012A ")
 ;;2567
 ;;21,"S43.013A ")
 ;;2568
 ;;21,"S43.014A ")
 ;;2569
 ;;21,"S43.015A ")
 ;;2570
 ;;21,"S43.016A ")
 ;;2571
 ;;21,"S43.021A ")
 ;;2572
 ;;21,"S43.022A ")
 ;;2573
 ;;21,"S43.023A ")
 ;;2574
 ;;21,"S43.024A ")
 ;;2575
 ;;21,"S43.025A ")
 ;;2576
 ;;21,"S43.026A ")
 ;;2577
 ;;21,"S43.031A ")
 ;;2578
 ;;21,"S43.032A ")
 ;;2579
 ;;21,"S43.033A ")
 ;;2580
 ;;21,"S43.034A ")
 ;;2581
 ;;21,"S43.035A ")
 ;;2582
 ;;21,"S43.036A ")
 ;;2583
 ;;21,"S43.081A ")
 ;;2584
 ;;21,"S43.082A ")
 ;;2585
 ;;21,"S43.083A ")
 ;;2586
 ;;21,"S43.084A ")
 ;;2587
 ;;21,"S43.085A ")
 ;;2588
 ;;21,"S43.086A ")
 ;;2589
 ;;21,"S43.101A ")
 ;;2590
 ;;21,"S43.102A ")
 ;;2591
 ;;21,"S43.109A ")
 ;;2592
 ;;21,"S43.111A ")
 ;;2593
 ;;21,"S43.112A ")
 ;;2594
 ;;21,"S43.119A ")
 ;;2595
 ;;21,"S43.121A ")
 ;;2596
 ;;21,"S43.122A ")
 ;;2597
 ;;21,"S43.129A ")
 ;;2598
 ;;21,"S43.131A ")
 ;;2599
 ;;21,"S43.132A ")
 ;;2600
 ;;21,"S43.139A ")
 ;;2601
 ;;21,"S43.141A ")
 ;;2602
 ;;21,"S43.142A ")
 ;;2603
 ;;21,"S43.149A ")
 ;;2604
 ;;21,"S43.151A ")
 ;;2605
 ;;21,"S43.152A ")
 ;;2606
 ;;21,"S43.159A ")
 ;;2607
 ;;21,"S43.201A ")
 ;;2608
 ;;21,"S43.202A ")
 ;;2609
 ;;21,"S43.203A ")
 ;;2610
 ;;21,"S43.204A ")
 ;;2611
 ;;21,"S43.205A ")
 ;;2612
 ;;21,"S43.206A ")
 ;;2613
 ;;21,"S43.211A ")
 ;;2614
 ;;21,"S43.212A ")
 ;;2615
 ;;21,"S43.213A ")
 ;;2616
 ;;21,"S43.214A ")
 ;;2617
 ;;21,"S43.215A ")
 ;;2618
 ;;21,"S43.216A ")
 ;;2619
 ;;21,"S43.221A ")
 ;;2620
 ;;21,"S43.222A ")
 ;;2621
 ;;21,"S43.223A ")
 ;;2622
 ;;21,"S43.224A ")
 ;;2623
 ;;21,"S43.225A ")
 ;;2624
 ;;21,"S43.226A ")
 ;;2625
 ;;21,"S43.301A ")
 ;;2626
 ;;21,"S43.302A ")
 ;;2627
 ;;21,"S43.303A ")
 ;;2628
 ;;21,"S43.304A ")
 ;;2629
 ;;21,"S43.305A ")
 ;;2630
 ;;21,"S43.306A ")
 ;;2631
 ;;21,"S43.311A ")
 ;;2632
 ;;21,"S43.312A ")
 ;;2633
 ;;21,"S43.313A ")
 ;;2634
 ;;21,"S43.314A ")
 ;;2635
 ;;21,"S43.315A ")
 ;;2636
 ;;21,"S43.316A ")
 ;;2637
 ;;21,"S43.391A ")
 ;;2638
 ;;21,"S43.392A ")
 ;;2639
 ;;21,"S43.393A ")
 ;;2640
 ;;21,"S43.394A ")
 ;;2641
 ;;21,"S43.395A ")
 ;;2642
 ;;21,"S43.396A ")
 ;;2643
 ;;21,"S43.401A ")
 ;;2644
 ;;21,"S43.402A ")
 ;;2645
 ;;21,"S43.409A ")
 ;;2646
 ;;21,"S43.411A ")
 ;;2647
 ;;21,"S43.412A ")
 ;;2648
 ;;21,"S43.419A ")
 ;;2649
 ;;21,"S43.421A ")
 ;;2650
 ;;21,"S43.422A ")
 ;;2651
 ;;21,"S43.429A ")
 ;;2652
 ;;21,"S43.431A ")
 ;;2653
 ;;21,"S43.432A ")
 ;;2654
 ;;21,"S43.439A ")
 ;;2655
 ;;21,"S43.491A ")
 ;;2656
 ;;21,"S43.492A ")
 ;;2657
 ;;21,"S43.499A ")
 ;;2658
 ;;21,"S43.50XA ")
 ;;2659
 ;;21,"S43.51XA ")
 ;;2660
 ;;21,"S43.52XA ")
 ;;2661
 ;;21,"S43.60XA ")
 ;;2662
 ;;21,"S43.61XA ")
 ;;2663
 ;;21,"S43.62XA ")
 ;;2664
 ;;21,"S43.80XA ")
 ;;2665
 ;;21,"S43.81XA ")
 ;;2666
 ;;21,"S43.82XA ")
 ;;2667
 ;;21,"S43.90XA ")
 ;;2668
 ;;21,"S43.91XA ")
 ;;2669
 ;;21,"S43.92XA ")
 ;;2670
 ;;21,"S44.00XA ")
 ;;2671
 ;;21,"S44.01XA ")
 ;;2672
 ;;21,"S44.02XA ")
 ;;2673
 ;;21,"S44.10XA ")
 ;;2674
 ;;21,"S44.11XA ")
 ;;2675
 ;;21,"S44.12XA ")
 ;;2676
 ;;21,"S44.20XA ")
 ;;2677
 ;;21,"S44.21XA ")
 ;;2678
 ;;21,"S44.22XA ")
 ;;2679
 ;;21,"S44.30XA ")
 ;;2680
 ;;21,"S44.31XA ")
 ;;2681
 ;;21,"S44.32XA ")
 ;;2682
 ;;21,"S44.40XA ")
 ;;2683
 ;;21,"S44.41XA ")
 ;;2684
 ;;21,"S44.42XA ")
 ;;2685
 ;;21,"S44.50XA ")
 ;;2686
 ;;21,"S44.51XA ")
 ;;2687
 ;;21,"S44.52XA ")
 ;;2688
 ;;21,"S44.8X1A ")
 ;;2689
 ;;21,"S44.8X2A ")
 ;;2690
 ;;21,"S44.8X9A ")
 ;;2691
 ;;21,"S44.90XA ")
 ;;2692
 ;;21,"S44.91XA ")
 ;;2693
 ;;21,"S44.92XA ")
 ;;2694
 ;;21,"S45.001A ")
 ;;2695
 ;;21,"S45.002A ")
 ;;2696
 ;;21,"S45.009A ")
 ;;2697
 ;;21,"S45.011A ")
 ;;2698
 ;;21,"S45.012A ")
 ;;2699
 ;;21,"S45.019A ")
 ;;2700
 ;;21,"S45.091A ")
 ;;2701
 ;;21,"S45.092A ")
 ;;2702
 ;;21,"S45.099A ")
 ;;2703
 ;;21,"S45.101A ")
 ;;2704
 ;;21,"S45.102A ")
 ;;2705
 ;;21,"S45.109A ")
 ;;2706
 ;;21,"S45.111A ")
 ;;2707
 ;;21,"S45.112A ")
 ;;2708
 ;;21,"S45.119A ")
 ;;2709
 ;;21,"S45.191A ")
 ;;2710
 ;;21,"S45.192A ")
 ;;2711
 ;;21,"S45.199A ")
 ;;2712
 ;;21,"S45.201A ")
 ;;2713
 ;;21,"S45.202A ")
 ;;2714
 ;;21,"S45.209A ")
 ;;2715