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

ATXFCK22.m

Go to the documentation of this file.
  1. ATXFCK22 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON DEC 19, 2017;
  1. ;;5.1;TAXONOMY;**25**;FEB 04, 1997;Build 47
  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. ;;9002226.02101,"2237,O41.1423 ",.02)
  1. ;;O41.1423
  1. ;;9002226.02101,"2237,O41.1423 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1424 ",.01)
  1. ;;O41.1424
  1. ;;9002226.02101,"2237,O41.1424 ",.02)
  1. ;;O41.1424
  1. ;;9002226.02101,"2237,O41.1424 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1425 ",.01)
  1. ;;O41.1425
  1. ;;9002226.02101,"2237,O41.1425 ",.02)
  1. ;;O41.1425
  1. ;;9002226.02101,"2237,O41.1425 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1429 ",.01)
  1. ;;O41.1429
  1. ;;9002226.02101,"2237,O41.1429 ",.02)
  1. ;;O41.1429
  1. ;;9002226.02101,"2237,O41.1429 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1430 ",.01)
  1. ;;O41.1430
  1. ;;9002226.02101,"2237,O41.1430 ",.02)
  1. ;;O41.1430
  1. ;;9002226.02101,"2237,O41.1430 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1431 ",.01)
  1. ;;O41.1431
  1. ;;9002226.02101,"2237,O41.1431 ",.02)
  1. ;;O41.1431
  1. ;;9002226.02101,"2237,O41.1431 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1432 ",.01)
  1. ;;O41.1432
  1. ;;9002226.02101,"2237,O41.1432 ",.02)
  1. ;;O41.1432
  1. ;;9002226.02101,"2237,O41.1432 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1433 ",.01)
  1. ;;O41.1433
  1. ;;9002226.02101,"2237,O41.1433 ",.02)
  1. ;;O41.1433
  1. ;;9002226.02101,"2237,O41.1433 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1434 ",.01)
  1. ;;O41.1434
  1. ;;9002226.02101,"2237,O41.1434 ",.02)
  1. ;;O41.1434
  1. ;;9002226.02101,"2237,O41.1434 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1435 ",.01)
  1. ;;O41.1435
  1. ;;9002226.02101,"2237,O41.1435 ",.02)
  1. ;;O41.1435
  1. ;;9002226.02101,"2237,O41.1435 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1439 ",.01)
  1. ;;O41.1439
  1. ;;9002226.02101,"2237,O41.1439 ",.02)
  1. ;;O41.1439
  1. ;;9002226.02101,"2237,O41.1439 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1490 ",.01)
  1. ;;O41.1490
  1. ;;9002226.02101,"2237,O41.1490 ",.02)
  1. ;;O41.1490
  1. ;;9002226.02101,"2237,O41.1490 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1491 ",.01)
  1. ;;O41.1491
  1. ;;9002226.02101,"2237,O41.1491 ",.02)
  1. ;;O41.1491
  1. ;;9002226.02101,"2237,O41.1491 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1492 ",.01)
  1. ;;O41.1492
  1. ;;9002226.02101,"2237,O41.1492 ",.02)
  1. ;;O41.1492
  1. ;;9002226.02101,"2237,O41.1492 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1493 ",.01)
  1. ;;O41.1493
  1. ;;9002226.02101,"2237,O41.1493 ",.02)
  1. ;;O41.1493
  1. ;;9002226.02101,"2237,O41.1493 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1494 ",.01)
  1. ;;O41.1494
  1. ;;9002226.02101,"2237,O41.1494 ",.02)
  1. ;;O41.1494
  1. ;;9002226.02101,"2237,O41.1494 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1495 ",.01)
  1. ;;O41.1495
  1. ;;9002226.02101,"2237,O41.1495 ",.02)
  1. ;;O41.1495
  1. ;;9002226.02101,"2237,O41.1495 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.1499 ",.01)
  1. ;;O41.1499
  1. ;;9002226.02101,"2237,O41.1499 ",.02)
  1. ;;O41.1499
  1. ;;9002226.02101,"2237,O41.1499 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X10 ",.01)
  1. ;;O41.8X10
  1. ;;9002226.02101,"2237,O41.8X10 ",.02)
  1. ;;O41.8X10
  1. ;;9002226.02101,"2237,O41.8X10 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X11 ",.01)
  1. ;;O41.8X11
  1. ;;9002226.02101,"2237,O41.8X11 ",.02)
  1. ;;O41.8X11
  1. ;;9002226.02101,"2237,O41.8X11 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X12 ",.01)
  1. ;;O41.8X12
  1. ;;9002226.02101,"2237,O41.8X12 ",.02)
  1. ;;O41.8X12
  1. ;;9002226.02101,"2237,O41.8X12 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X13 ",.01)
  1. ;;O41.8X13
  1. ;;9002226.02101,"2237,O41.8X13 ",.02)
  1. ;;O41.8X13
  1. ;;9002226.02101,"2237,O41.8X13 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X14 ",.01)
  1. ;;O41.8X14
  1. ;;9002226.02101,"2237,O41.8X14 ",.02)
  1. ;;O41.8X14
  1. ;;9002226.02101,"2237,O41.8X14 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X15 ",.01)
  1. ;;O41.8X15
  1. ;;9002226.02101,"2237,O41.8X15 ",.02)
  1. ;;O41.8X15
  1. ;;9002226.02101,"2237,O41.8X15 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X19 ",.01)
  1. ;;O41.8X19
  1. ;;9002226.02101,"2237,O41.8X19 ",.02)
  1. ;;O41.8X19
  1. ;;9002226.02101,"2237,O41.8X19 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X20 ",.01)
  1. ;;O41.8X20
  1. ;;9002226.02101,"2237,O41.8X20 ",.02)
  1. ;;O41.8X20
  1. ;;9002226.02101,"2237,O41.8X20 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X21 ",.01)
  1. ;;O41.8X21
  1. ;;9002226.02101,"2237,O41.8X21 ",.02)
  1. ;;O41.8X21
  1. ;;9002226.02101,"2237,O41.8X21 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X22 ",.01)
  1. ;;O41.8X22
  1. ;;9002226.02101,"2237,O41.8X22 ",.02)
  1. ;;O41.8X22
  1. ;;9002226.02101,"2237,O41.8X22 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X23 ",.01)
  1. ;;O41.8X23
  1. ;;9002226.02101,"2237,O41.8X23 ",.02)
  1. ;;O41.8X23
  1. ;;9002226.02101,"2237,O41.8X23 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X24 ",.01)
  1. ;;O41.8X24
  1. ;;9002226.02101,"2237,O41.8X24 ",.02)
  1. ;;O41.8X24
  1. ;;9002226.02101,"2237,O41.8X24 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X25 ",.01)
  1. ;;O41.8X25
  1. ;;9002226.02101,"2237,O41.8X25 ",.02)
  1. ;;O41.8X25
  1. ;;9002226.02101,"2237,O41.8X25 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X29 ",.01)
  1. ;;O41.8X29
  1. ;;9002226.02101,"2237,O41.8X29 ",.02)
  1. ;;O41.8X29
  1. ;;9002226.02101,"2237,O41.8X29 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X30 ",.01)
  1. ;;O41.8X30
  1. ;;9002226.02101,"2237,O41.8X30 ",.02)
  1. ;;O41.8X30
  1. ;;9002226.02101,"2237,O41.8X30 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X31 ",.01)
  1. ;;O41.8X31
  1. ;;9002226.02101,"2237,O41.8X31 ",.02)
  1. ;;O41.8X31
  1. ;;9002226.02101,"2237,O41.8X31 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X32 ",.01)
  1. ;;O41.8X32
  1. ;;9002226.02101,"2237,O41.8X32 ",.02)
  1. ;;O41.8X32
  1. ;;9002226.02101,"2237,O41.8X32 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X33 ",.01)
  1. ;;O41.8X33
  1. ;;9002226.02101,"2237,O41.8X33 ",.02)
  1. ;;O41.8X33
  1. ;;9002226.02101,"2237,O41.8X33 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X34 ",.01)
  1. ;;O41.8X34
  1. ;;9002226.02101,"2237,O41.8X34 ",.02)
  1. ;;O41.8X34
  1. ;;9002226.02101,"2237,O41.8X34 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X35 ",.01)
  1. ;;O41.8X35
  1. ;;9002226.02101,"2237,O41.8X35 ",.02)
  1. ;;O41.8X35
  1. ;;9002226.02101,"2237,O41.8X35 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X39 ",.01)
  1. ;;O41.8X39
  1. ;;9002226.02101,"2237,O41.8X39 ",.02)
  1. ;;O41.8X39
  1. ;;9002226.02101,"2237,O41.8X39 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X90 ",.01)
  1. ;;O41.8X90
  1. ;;9002226.02101,"2237,O41.8X90 ",.02)
  1. ;;O41.8X90
  1. ;;9002226.02101,"2237,O41.8X90 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X91 ",.01)
  1. ;;O41.8X91
  1. ;;9002226.02101,"2237,O41.8X91 ",.02)
  1. ;;O41.8X91
  1. ;;9002226.02101,"2237,O41.8X91 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X92 ",.01)
  1. ;;O41.8X92
  1. ;;9002226.02101,"2237,O41.8X92 ",.02)
  1. ;;O41.8X92
  1. ;;9002226.02101,"2237,O41.8X92 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X93 ",.01)
  1. ;;O41.8X93
  1. ;;9002226.02101,"2237,O41.8X93 ",.02)
  1. ;;O41.8X93
  1. ;;9002226.02101,"2237,O41.8X93 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X94 ",.01)
  1. ;;O41.8X94
  1. ;;9002226.02101,"2237,O41.8X94 ",.02)
  1. ;;O41.8X94
  1. ;;9002226.02101,"2237,O41.8X94 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X95 ",.01)
  1. ;;O41.8X95
  1. ;;9002226.02101,"2237,O41.8X95 ",.02)
  1. ;;O41.8X95
  1. ;;9002226.02101,"2237,O41.8X95 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.8X99 ",.01)
  1. ;;O41.8X99
  1. ;;9002226.02101,"2237,O41.8X99 ",.02)
  1. ;;O41.8X99
  1. ;;9002226.02101,"2237,O41.8X99 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.90X0 ",.01)
  1. ;;O41.90X0
  1. ;;9002226.02101,"2237,O41.90X0 ",.02)
  1. ;;O41.90X0
  1. ;;9002226.02101,"2237,O41.90X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.90X1 ",.01)
  1. ;;O41.90X1
  1. ;;9002226.02101,"2237,O41.90X1 ",.02)
  1. ;;O41.90X1
  1. ;;9002226.02101,"2237,O41.90X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.90X2 ",.01)
  1. ;;O41.90X2
  1. ;;9002226.02101,"2237,O41.90X2 ",.02)
  1. ;;O41.90X2
  1. ;;9002226.02101,"2237,O41.90X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.90X3 ",.01)
  1. ;;O41.90X3
  1. ;;9002226.02101,"2237,O41.90X3 ",.02)
  1. ;;O41.90X3
  1. ;;9002226.02101,"2237,O41.90X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.90X4 ",.01)
  1. ;;O41.90X4
  1. ;;9002226.02101,"2237,O41.90X4 ",.02)
  1. ;;O41.90X4
  1. ;;9002226.02101,"2237,O41.90X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.90X5 ",.01)
  1. ;;O41.90X5
  1. ;;9002226.02101,"2237,O41.90X5 ",.02)
  1. ;;O41.90X5
  1. ;;9002226.02101,"2237,O41.90X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.90X9 ",.01)
  1. ;;O41.90X9
  1. ;;9002226.02101,"2237,O41.90X9 ",.02)
  1. ;;O41.90X9
  1. ;;9002226.02101,"2237,O41.90X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.91X0 ",.01)
  1. ;;O41.91X0
  1. ;;9002226.02101,"2237,O41.91X0 ",.02)
  1. ;;O41.91X0
  1. ;;9002226.02101,"2237,O41.91X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.91X1 ",.01)
  1. ;;O41.91X1
  1. ;;9002226.02101,"2237,O41.91X1 ",.02)
  1. ;;O41.91X1
  1. ;;9002226.02101,"2237,O41.91X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.91X2 ",.01)
  1. ;;O41.91X2
  1. ;;9002226.02101,"2237,O41.91X2 ",.02)
  1. ;;O41.91X2
  1. ;;9002226.02101,"2237,O41.91X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.91X3 ",.01)
  1. ;;O41.91X3
  1. ;;9002226.02101,"2237,O41.91X3 ",.02)
  1. ;;O41.91X3
  1. ;;9002226.02101,"2237,O41.91X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.91X4 ",.01)
  1. ;;O41.91X4
  1. ;;9002226.02101,"2237,O41.91X4 ",.02)
  1. ;;O41.91X4
  1. ;;9002226.02101,"2237,O41.91X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.91X5 ",.01)
  1. ;;O41.91X5
  1. ;;9002226.02101,"2237,O41.91X5 ",.02)
  1. ;;O41.91X5
  1. ;;9002226.02101,"2237,O41.91X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.91X9 ",.01)
  1. ;;O41.91X9
  1. ;;9002226.02101,"2237,O41.91X9 ",.02)
  1. ;;O41.91X9
  1. ;;9002226.02101,"2237,O41.91X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.92X0 ",.01)
  1. ;;O41.92X0
  1. ;;9002226.02101,"2237,O41.92X0 ",.02)
  1. ;;O41.92X0
  1. ;;9002226.02101,"2237,O41.92X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.92X1 ",.01)
  1. ;;O41.92X1
  1. ;;9002226.02101,"2237,O41.92X1 ",.02)
  1. ;;O41.92X1
  1. ;;9002226.02101,"2237,O41.92X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.92X2 ",.01)
  1. ;;O41.92X2
  1. ;;9002226.02101,"2237,O41.92X2 ",.02)
  1. ;;O41.92X2
  1. ;;9002226.02101,"2237,O41.92X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.92X3 ",.01)
  1. ;;O41.92X3
  1. ;;9002226.02101,"2237,O41.92X3 ",.02)
  1. ;;O41.92X3
  1. ;;9002226.02101,"2237,O41.92X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.92X4 ",.01)
  1. ;;O41.92X4
  1. ;;9002226.02101,"2237,O41.92X4 ",.02)
  1. ;;O41.92X4
  1. ;;9002226.02101,"2237,O41.92X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.92X5 ",.01)
  1. ;;O41.92X5
  1. ;;9002226.02101,"2237,O41.92X5 ",.02)
  1. ;;O41.92X5
  1. ;;9002226.02101,"2237,O41.92X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.92X9 ",.01)
  1. ;;O41.92X9
  1. ;;9002226.02101,"2237,O41.92X9 ",.02)
  1. ;;O41.92X9
  1. ;;9002226.02101,"2237,O41.92X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.93X0 ",.01)
  1. ;;O41.93X0
  1. ;;9002226.02101,"2237,O41.93X0 ",.02)
  1. ;;O41.93X0
  1. ;;9002226.02101,"2237,O41.93X0 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.93X1 ",.01)
  1. ;;O41.93X1
  1. ;;9002226.02101,"2237,O41.93X1 ",.02)
  1. ;;O41.93X1
  1. ;;9002226.02101,"2237,O41.93X1 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.93X2 ",.01)
  1. ;;O41.93X2
  1. ;;9002226.02101,"2237,O41.93X2 ",.02)
  1. ;;O41.93X2
  1. ;;9002226.02101,"2237,O41.93X2 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.93X3 ",.01)
  1. ;;O41.93X3
  1. ;;9002226.02101,"2237,O41.93X3 ",.02)
  1. ;;O41.93X3
  1. ;;9002226.02101,"2237,O41.93X3 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.93X4 ",.01)
  1. ;;O41.93X4
  1. ;;9002226.02101,"2237,O41.93X4 ",.02)
  1. ;;O41.93X4
  1. ;;9002226.02101,"2237,O41.93X4 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.93X5 ",.01)
  1. ;;O41.93X5
  1. ;;9002226.02101,"2237,O41.93X5 ",.02)
  1. ;;O41.93X5
  1. ;;9002226.02101,"2237,O41.93X5 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O41.93X9 ",.01)
  1. ;;O41.93X9
  1. ;;9002226.02101,"2237,O41.93X9 ",.02)
  1. ;;O41.93X9
  1. ;;9002226.02101,"2237,O41.93X9 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O42.00 ",.01)
  1. ;;O42.00
  1. ;;9002226.02101,"2237,O42.00 ",.02)
  1. ;;O42.00
  1. ;;9002226.02101,"2237,O42.00 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O42.011 ",.01)
  1. ;;O42.011
  1. ;;9002226.02101,"2237,O42.011 ",.02)
  1. ;;O42.011
  1. ;;9002226.02101,"2237,O42.011 ",.03)
  1. ;;30
  1. ;;9002226.02101,"2237,O42.012 ",.01)
  1. ;;O42.012