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

ATXO1J6.m

Go to the documentation of this file.
  1. ATXO1J6 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON OCT 28, 2013;
  1. ;;5.1;TAXONOMY;**11**;FEB 04, 1997;Build 48
  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,"366,0QSJ4DZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSJ4ZZ ",.01)
  1. ;;0QSJ4ZZ
  1. ;;9002226.02101,"366,0QSJ4ZZ ",.02)
  1. ;;0QSJ4ZZ
  1. ;;9002226.02101,"366,0QSJ4ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSJXZZ ",.01)
  1. ;;0QSJXZZ
  1. ;;9002226.02101,"366,0QSJXZZ ",.02)
  1. ;;0QSJXZZ
  1. ;;9002226.02101,"366,0QSJXZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK04Z ",.01)
  1. ;;0QSK04Z
  1. ;;9002226.02101,"366,0QSK04Z ",.02)
  1. ;;0QSK04Z
  1. ;;9002226.02101,"366,0QSK04Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK05Z ",.01)
  1. ;;0QSK05Z
  1. ;;9002226.02101,"366,0QSK05Z ",.02)
  1. ;;0QSK05Z
  1. ;;9002226.02101,"366,0QSK05Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK06Z ",.01)
  1. ;;0QSK06Z
  1. ;;9002226.02101,"366,0QSK06Z ",.02)
  1. ;;0QSK06Z
  1. ;;9002226.02101,"366,0QSK06Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK0BZ ",.01)
  1. ;;0QSK0BZ
  1. ;;9002226.02101,"366,0QSK0BZ ",.02)
  1. ;;0QSK0BZ
  1. ;;9002226.02101,"366,0QSK0BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK0CZ ",.01)
  1. ;;0QSK0CZ
  1. ;;9002226.02101,"366,0QSK0CZ ",.02)
  1. ;;0QSK0CZ
  1. ;;9002226.02101,"366,0QSK0CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK0DZ ",.01)
  1. ;;0QSK0DZ
  1. ;;9002226.02101,"366,0QSK0DZ ",.02)
  1. ;;0QSK0DZ
  1. ;;9002226.02101,"366,0QSK0DZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK0ZZ ",.01)
  1. ;;0QSK0ZZ
  1. ;;9002226.02101,"366,0QSK0ZZ ",.02)
  1. ;;0QSK0ZZ
  1. ;;9002226.02101,"366,0QSK0ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK34Z ",.01)
  1. ;;0QSK34Z
  1. ;;9002226.02101,"366,0QSK34Z ",.02)
  1. ;;0QSK34Z
  1. ;;9002226.02101,"366,0QSK34Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK35Z ",.01)
  1. ;;0QSK35Z
  1. ;;9002226.02101,"366,0QSK35Z ",.02)
  1. ;;0QSK35Z
  1. ;;9002226.02101,"366,0QSK35Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK36Z ",.01)
  1. ;;0QSK36Z
  1. ;;9002226.02101,"366,0QSK36Z ",.02)
  1. ;;0QSK36Z
  1. ;;9002226.02101,"366,0QSK36Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK3BZ ",.01)
  1. ;;0QSK3BZ
  1. ;;9002226.02101,"366,0QSK3BZ ",.02)
  1. ;;0QSK3BZ
  1. ;;9002226.02101,"366,0QSK3BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK3CZ ",.01)
  1. ;;0QSK3CZ
  1. ;;9002226.02101,"366,0QSK3CZ ",.02)
  1. ;;0QSK3CZ
  1. ;;9002226.02101,"366,0QSK3CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK3DZ ",.01)
  1. ;;0QSK3DZ
  1. ;;9002226.02101,"366,0QSK3DZ ",.02)
  1. ;;0QSK3DZ
  1. ;;9002226.02101,"366,0QSK3DZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK3ZZ ",.01)
  1. ;;0QSK3ZZ
  1. ;;9002226.02101,"366,0QSK3ZZ ",.02)
  1. ;;0QSK3ZZ
  1. ;;9002226.02101,"366,0QSK3ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK44Z ",.01)
  1. ;;0QSK44Z
  1. ;;9002226.02101,"366,0QSK44Z ",.02)
  1. ;;0QSK44Z
  1. ;;9002226.02101,"366,0QSK44Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK45Z ",.01)
  1. ;;0QSK45Z
  1. ;;9002226.02101,"366,0QSK45Z ",.02)
  1. ;;0QSK45Z
  1. ;;9002226.02101,"366,0QSK45Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK46Z ",.01)
  1. ;;0QSK46Z
  1. ;;9002226.02101,"366,0QSK46Z ",.02)
  1. ;;0QSK46Z
  1. ;;9002226.02101,"366,0QSK46Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK4BZ ",.01)
  1. ;;0QSK4BZ
  1. ;;9002226.02101,"366,0QSK4BZ ",.02)
  1. ;;0QSK4BZ
  1. ;;9002226.02101,"366,0QSK4BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK4CZ ",.01)
  1. ;;0QSK4CZ
  1. ;;9002226.02101,"366,0QSK4CZ ",.02)
  1. ;;0QSK4CZ
  1. ;;9002226.02101,"366,0QSK4CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK4DZ ",.01)
  1. ;;0QSK4DZ
  1. ;;9002226.02101,"366,0QSK4DZ ",.02)
  1. ;;0QSK4DZ
  1. ;;9002226.02101,"366,0QSK4DZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSK4ZZ ",.01)
  1. ;;0QSK4ZZ
  1. ;;9002226.02101,"366,0QSK4ZZ ",.02)
  1. ;;0QSK4ZZ
  1. ;;9002226.02101,"366,0QSK4ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QSKXZZ ",.01)
  1. ;;0QSKXZZ
  1. ;;9002226.02101,"366,0QSKXZZ ",.02)
  1. ;;0QSKXZZ
  1. ;;9002226.02101,"366,0QSKXZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU037Z ",.01)
  1. ;;0QU037Z
  1. ;;9002226.02101,"366,0QU037Z ",.02)
  1. ;;0QU037Z
  1. ;;9002226.02101,"366,0QU037Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU03JZ ",.01)
  1. ;;0QU03JZ
  1. ;;9002226.02101,"366,0QU03JZ ",.02)
  1. ;;0QU03JZ
  1. ;;9002226.02101,"366,0QU03JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU047Z ",.01)
  1. ;;0QU047Z
  1. ;;9002226.02101,"366,0QU047Z ",.02)
  1. ;;0QU047Z
  1. ;;9002226.02101,"366,0QU047Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU04JZ ",.01)
  1. ;;0QU04JZ
  1. ;;9002226.02101,"366,0QU04JZ ",.02)
  1. ;;0QU04JZ
  1. ;;9002226.02101,"366,0QU04JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU137Z ",.01)
  1. ;;0QU137Z
  1. ;;9002226.02101,"366,0QU137Z ",.02)
  1. ;;0QU137Z
  1. ;;9002226.02101,"366,0QU137Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU13JZ ",.01)
  1. ;;0QU13JZ
  1. ;;9002226.02101,"366,0QU13JZ ",.02)
  1. ;;0QU13JZ
  1. ;;9002226.02101,"366,0QU13JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU147Z ",.01)
  1. ;;0QU147Z
  1. ;;9002226.02101,"366,0QU147Z ",.02)
  1. ;;0QU147Z
  1. ;;9002226.02101,"366,0QU147Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,0QU14JZ ",.01)
  1. ;;0QU14JZ
  1. ;;9002226.02101,"366,0QU14JZ ",.02)
  1. ;;0QU14JZ
  1. ;;9002226.02101,"366,0QU14JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"366,79.01 ",.01)
  1. ;;79.01
  1. ;;9002226.02101,"366,79.01 ",.02)
  1. ;;79.03
  1. ;;9002226.02101,"366,79.01 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.05 ",.01)
  1. ;;79.05
  1. ;;9002226.02101,"366,79.05 ",.02)
  1. ;;79.07
  1. ;;9002226.02101,"366,79.05 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.11 ",.01)
  1. ;;79.11
  1. ;;9002226.02101,"366,79.11 ",.02)
  1. ;;79.13
  1. ;;9002226.02101,"366,79.11 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.15 ",.01)
  1. ;;79.15
  1. ;;9002226.02101,"366,79.15 ",.02)
  1. ;;79.17
  1. ;;9002226.02101,"366,79.15 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.21 ",.01)
  1. ;;79.21
  1. ;;9002226.02101,"366,79.21 ",.02)
  1. ;;79.23
  1. ;;9002226.02101,"366,79.21 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.25 ",.01)
  1. ;;79.25
  1. ;;9002226.02101,"366,79.25 ",.02)
  1. ;;79.27
  1. ;;9002226.02101,"366,79.25 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.31 ",.01)
  1. ;;79.31
  1. ;;9002226.02101,"366,79.31 ",.02)
  1. ;;79.33
  1. ;;9002226.02101,"366,79.31 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.35 ",.01)
  1. ;;79.35
  1. ;;9002226.02101,"366,79.35 ",.02)
  1. ;;79.37
  1. ;;9002226.02101,"366,79.35 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.61 ",.01)
  1. ;;79.61
  1. ;;9002226.02101,"366,79.61 ",.02)
  1. ;;79.63
  1. ;;9002226.02101,"366,79.61 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,79.65 ",.01)
  1. ;;79.65
  1. ;;9002226.02101,"366,79.65 ",.02)
  1. ;;79.67
  1. ;;9002226.02101,"366,79.65 ",.03)
  1. ;;2
  1. ;;9002226.02101,"366,81.65 ",.01)
  1. ;;81.65
  1. ;;9002226.02101,"366,81.65 ",.02)
  1. ;;81.66
  1. ;;9002226.02101,"366,81.65 ",.03)
  1. ;;2
  1. ;;9002226.04101,"366,1",.01)
  1. ;;BGP