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

ATXXB119.m

Go to the documentation of this file.
  1. ATXXB119 ;IHS/CMI/LAB-CREATED BY ^ATXSTX ON APR 29, 2014;
  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,"1804,0WP2XJZ ",.02)
  1. ;;0WP2XJZ
  1. ;;9002226.02101,"1804,0WP2XJZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP2XKZ ",.01)
  1. ;;0WP2XKZ
  1. ;;9002226.02101,"1804,0WP2XKZ ",.02)
  1. ;;0WP2XKZ
  1. ;;9002226.02101,"1804,0WP2XKZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP2XYZ ",.01)
  1. ;;0WP2XYZ
  1. ;;9002226.02101,"1804,0WP2XYZ ",.02)
  1. ;;0WP2XYZ
  1. ;;9002226.02101,"1804,0WP2XYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP400Z ",.01)
  1. ;;0WP400Z
  1. ;;9002226.02101,"1804,0WP400Z ",.02)
  1. ;;0WP400Z
  1. ;;9002226.02101,"1804,0WP400Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP401Z ",.01)
  1. ;;0WP401Z
  1. ;;9002226.02101,"1804,0WP401Z ",.02)
  1. ;;0WP401Z
  1. ;;9002226.02101,"1804,0WP401Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP403Z ",.01)
  1. ;;0WP403Z
  1. ;;9002226.02101,"1804,0WP403Z ",.02)
  1. ;;0WP403Z
  1. ;;9002226.02101,"1804,0WP403Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP407Z ",.01)
  1. ;;0WP407Z
  1. ;;9002226.02101,"1804,0WP407Z ",.02)
  1. ;;0WP407Z
  1. ;;9002226.02101,"1804,0WP407Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP40JZ ",.01)
  1. ;;0WP40JZ
  1. ;;9002226.02101,"1804,0WP40JZ ",.02)
  1. ;;0WP40JZ
  1. ;;9002226.02101,"1804,0WP40JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP40KZ ",.01)
  1. ;;0WP40KZ
  1. ;;9002226.02101,"1804,0WP40KZ ",.02)
  1. ;;0WP40KZ
  1. ;;9002226.02101,"1804,0WP40KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP40YZ ",.01)
  1. ;;0WP40YZ
  1. ;;9002226.02101,"1804,0WP40YZ ",.02)
  1. ;;0WP40YZ
  1. ;;9002226.02101,"1804,0WP40YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP430Z ",.01)
  1. ;;0WP430Z
  1. ;;9002226.02101,"1804,0WP430Z ",.02)
  1. ;;0WP430Z
  1. ;;9002226.02101,"1804,0WP430Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP431Z ",.01)
  1. ;;0WP431Z
  1. ;;9002226.02101,"1804,0WP431Z ",.02)
  1. ;;0WP431Z
  1. ;;9002226.02101,"1804,0WP431Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP433Z ",.01)
  1. ;;0WP433Z
  1. ;;9002226.02101,"1804,0WP433Z ",.02)
  1. ;;0WP433Z
  1. ;;9002226.02101,"1804,0WP433Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP437Z ",.01)
  1. ;;0WP437Z
  1. ;;9002226.02101,"1804,0WP437Z ",.02)
  1. ;;0WP437Z
  1. ;;9002226.02101,"1804,0WP437Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP43JZ ",.01)
  1. ;;0WP43JZ
  1. ;;9002226.02101,"1804,0WP43JZ ",.02)
  1. ;;0WP43JZ
  1. ;;9002226.02101,"1804,0WP43JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP43KZ ",.01)
  1. ;;0WP43KZ
  1. ;;9002226.02101,"1804,0WP43KZ ",.02)
  1. ;;0WP43KZ
  1. ;;9002226.02101,"1804,0WP43KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP43YZ ",.01)
  1. ;;0WP43YZ
  1. ;;9002226.02101,"1804,0WP43YZ ",.02)
  1. ;;0WP43YZ
  1. ;;9002226.02101,"1804,0WP43YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP440Z ",.01)
  1. ;;0WP440Z
  1. ;;9002226.02101,"1804,0WP440Z ",.02)
  1. ;;0WP440Z
  1. ;;9002226.02101,"1804,0WP440Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP441Z ",.01)
  1. ;;0WP441Z
  1. ;;9002226.02101,"1804,0WP441Z ",.02)
  1. ;;0WP441Z
  1. ;;9002226.02101,"1804,0WP441Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP443Z ",.01)
  1. ;;0WP443Z
  1. ;;9002226.02101,"1804,0WP443Z ",.02)
  1. ;;0WP443Z
  1. ;;9002226.02101,"1804,0WP443Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP447Z ",.01)
  1. ;;0WP447Z
  1. ;;9002226.02101,"1804,0WP447Z ",.02)
  1. ;;0WP447Z
  1. ;;9002226.02101,"1804,0WP447Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP44JZ ",.01)
  1. ;;0WP44JZ
  1. ;;9002226.02101,"1804,0WP44JZ ",.02)
  1. ;;0WP44JZ
  1. ;;9002226.02101,"1804,0WP44JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP44KZ ",.01)
  1. ;;0WP44KZ
  1. ;;9002226.02101,"1804,0WP44KZ ",.02)
  1. ;;0WP44KZ
  1. ;;9002226.02101,"1804,0WP44KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP44YZ ",.01)
  1. ;;0WP44YZ
  1. ;;9002226.02101,"1804,0WP44YZ ",.02)
  1. ;;0WP44YZ
  1. ;;9002226.02101,"1804,0WP44YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP4X0Z ",.01)
  1. ;;0WP4X0Z
  1. ;;9002226.02101,"1804,0WP4X0Z ",.02)
  1. ;;0WP4X0Z
  1. ;;9002226.02101,"1804,0WP4X0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP4X1Z ",.01)
  1. ;;0WP4X1Z
  1. ;;9002226.02101,"1804,0WP4X1Z ",.02)
  1. ;;0WP4X1Z
  1. ;;9002226.02101,"1804,0WP4X1Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP4X3Z ",.01)
  1. ;;0WP4X3Z
  1. ;;9002226.02101,"1804,0WP4X3Z ",.02)
  1. ;;0WP4X3Z
  1. ;;9002226.02101,"1804,0WP4X3Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP4X7Z ",.01)
  1. ;;0WP4X7Z
  1. ;;9002226.02101,"1804,0WP4X7Z ",.02)
  1. ;;0WP4X7Z
  1. ;;9002226.02101,"1804,0WP4X7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP4XJZ ",.01)
  1. ;;0WP4XJZ
  1. ;;9002226.02101,"1804,0WP4XJZ ",.02)
  1. ;;0WP4XJZ
  1. ;;9002226.02101,"1804,0WP4XJZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP4XKZ ",.01)
  1. ;;0WP4XKZ
  1. ;;9002226.02101,"1804,0WP4XKZ ",.02)
  1. ;;0WP4XKZ
  1. ;;9002226.02101,"1804,0WP4XKZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP4XYZ ",.01)
  1. ;;0WP4XYZ
  1. ;;9002226.02101,"1804,0WP4XYZ ",.02)
  1. ;;0WP4XYZ
  1. ;;9002226.02101,"1804,0WP4XYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP500Z ",.01)
  1. ;;0WP500Z
  1. ;;9002226.02101,"1804,0WP500Z ",.02)
  1. ;;0WP500Z
  1. ;;9002226.02101,"1804,0WP500Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP501Z ",.01)
  1. ;;0WP501Z
  1. ;;9002226.02101,"1804,0WP501Z ",.02)
  1. ;;0WP501Z
  1. ;;9002226.02101,"1804,0WP501Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP503Z ",.01)
  1. ;;0WP503Z
  1. ;;9002226.02101,"1804,0WP503Z ",.02)
  1. ;;0WP503Z
  1. ;;9002226.02101,"1804,0WP503Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP507Z ",.01)
  1. ;;0WP507Z
  1. ;;9002226.02101,"1804,0WP507Z ",.02)
  1. ;;0WP507Z
  1. ;;9002226.02101,"1804,0WP507Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP50JZ ",.01)
  1. ;;0WP50JZ
  1. ;;9002226.02101,"1804,0WP50JZ ",.02)
  1. ;;0WP50JZ
  1. ;;9002226.02101,"1804,0WP50JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP50KZ ",.01)
  1. ;;0WP50KZ
  1. ;;9002226.02101,"1804,0WP50KZ ",.02)
  1. ;;0WP50KZ
  1. ;;9002226.02101,"1804,0WP50KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP50YZ ",.01)
  1. ;;0WP50YZ
  1. ;;9002226.02101,"1804,0WP50YZ ",.02)
  1. ;;0WP50YZ
  1. ;;9002226.02101,"1804,0WP50YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP530Z ",.01)
  1. ;;0WP530Z
  1. ;;9002226.02101,"1804,0WP530Z ",.02)
  1. ;;0WP530Z
  1. ;;9002226.02101,"1804,0WP530Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP531Z ",.01)
  1. ;;0WP531Z
  1. ;;9002226.02101,"1804,0WP531Z ",.02)
  1. ;;0WP531Z
  1. ;;9002226.02101,"1804,0WP531Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP533Z ",.01)
  1. ;;0WP533Z
  1. ;;9002226.02101,"1804,0WP533Z ",.02)
  1. ;;0WP533Z
  1. ;;9002226.02101,"1804,0WP533Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP537Z ",.01)
  1. ;;0WP537Z
  1. ;;9002226.02101,"1804,0WP537Z ",.02)
  1. ;;0WP537Z
  1. ;;9002226.02101,"1804,0WP537Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP53JZ ",.01)
  1. ;;0WP53JZ
  1. ;;9002226.02101,"1804,0WP53JZ ",.02)
  1. ;;0WP53JZ
  1. ;;9002226.02101,"1804,0WP53JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP53KZ ",.01)
  1. ;;0WP53KZ
  1. ;;9002226.02101,"1804,0WP53KZ ",.02)
  1. ;;0WP53KZ
  1. ;;9002226.02101,"1804,0WP53KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP53YZ ",.01)
  1. ;;0WP53YZ
  1. ;;9002226.02101,"1804,0WP53YZ ",.02)
  1. ;;0WP53YZ
  1. ;;9002226.02101,"1804,0WP53YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP540Z ",.01)
  1. ;;0WP540Z
  1. ;;9002226.02101,"1804,0WP540Z ",.02)
  1. ;;0WP540Z
  1. ;;9002226.02101,"1804,0WP540Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP541Z ",.01)
  1. ;;0WP541Z
  1. ;;9002226.02101,"1804,0WP541Z ",.02)
  1. ;;0WP541Z
  1. ;;9002226.02101,"1804,0WP541Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP543Z ",.01)
  1. ;;0WP543Z
  1. ;;9002226.02101,"1804,0WP543Z ",.02)
  1. ;;0WP543Z
  1. ;;9002226.02101,"1804,0WP543Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP547Z ",.01)
  1. ;;0WP547Z
  1. ;;9002226.02101,"1804,0WP547Z ",.02)
  1. ;;0WP547Z
  1. ;;9002226.02101,"1804,0WP547Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP54JZ ",.01)
  1. ;;0WP54JZ
  1. ;;9002226.02101,"1804,0WP54JZ ",.02)
  1. ;;0WP54JZ
  1. ;;9002226.02101,"1804,0WP54JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP54KZ ",.01)
  1. ;;0WP54KZ
  1. ;;9002226.02101,"1804,0WP54KZ ",.02)
  1. ;;0WP54KZ
  1. ;;9002226.02101,"1804,0WP54KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP54YZ ",.01)
  1. ;;0WP54YZ
  1. ;;9002226.02101,"1804,0WP54YZ ",.02)
  1. ;;0WP54YZ
  1. ;;9002226.02101,"1804,0WP54YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP5X0Z ",.01)
  1. ;;0WP5X0Z
  1. ;;9002226.02101,"1804,0WP5X0Z ",.02)
  1. ;;0WP5X0Z
  1. ;;9002226.02101,"1804,0WP5X0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP5X1Z ",.01)
  1. ;;0WP5X1Z
  1. ;;9002226.02101,"1804,0WP5X1Z ",.02)
  1. ;;0WP5X1Z
  1. ;;9002226.02101,"1804,0WP5X1Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP5X3Z ",.01)
  1. ;;0WP5X3Z
  1. ;;9002226.02101,"1804,0WP5X3Z ",.02)
  1. ;;0WP5X3Z
  1. ;;9002226.02101,"1804,0WP5X3Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP5X7Z ",.01)
  1. ;;0WP5X7Z
  1. ;;9002226.02101,"1804,0WP5X7Z ",.02)
  1. ;;0WP5X7Z
  1. ;;9002226.02101,"1804,0WP5X7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP5XJZ ",.01)
  1. ;;0WP5XJZ
  1. ;;9002226.02101,"1804,0WP5XJZ ",.02)
  1. ;;0WP5XJZ
  1. ;;9002226.02101,"1804,0WP5XJZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP5XKZ ",.01)
  1. ;;0WP5XKZ
  1. ;;9002226.02101,"1804,0WP5XKZ ",.02)
  1. ;;0WP5XKZ
  1. ;;9002226.02101,"1804,0WP5XKZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP5XYZ ",.01)
  1. ;;0WP5XYZ
  1. ;;9002226.02101,"1804,0WP5XYZ ",.02)
  1. ;;0WP5XYZ
  1. ;;9002226.02101,"1804,0WP5XYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP600Z ",.01)
  1. ;;0WP600Z
  1. ;;9002226.02101,"1804,0WP600Z ",.02)
  1. ;;0WP600Z
  1. ;;9002226.02101,"1804,0WP600Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP601Z ",.01)
  1. ;;0WP601Z
  1. ;;9002226.02101,"1804,0WP601Z ",.02)
  1. ;;0WP601Z
  1. ;;9002226.02101,"1804,0WP601Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP603Z ",.01)
  1. ;;0WP603Z
  1. ;;9002226.02101,"1804,0WP603Z ",.02)
  1. ;;0WP603Z
  1. ;;9002226.02101,"1804,0WP603Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP607Z ",.01)
  1. ;;0WP607Z
  1. ;;9002226.02101,"1804,0WP607Z ",.02)
  1. ;;0WP607Z
  1. ;;9002226.02101,"1804,0WP607Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP60JZ ",.01)
  1. ;;0WP60JZ
  1. ;;9002226.02101,"1804,0WP60JZ ",.02)
  1. ;;0WP60JZ
  1. ;;9002226.02101,"1804,0WP60JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP60KZ ",.01)
  1. ;;0WP60KZ
  1. ;;9002226.02101,"1804,0WP60KZ ",.02)
  1. ;;0WP60KZ
  1. ;;9002226.02101,"1804,0WP60KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP60YZ ",.01)
  1. ;;0WP60YZ
  1. ;;9002226.02101,"1804,0WP60YZ ",.02)
  1. ;;0WP60YZ
  1. ;;9002226.02101,"1804,0WP60YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP630Z ",.01)
  1. ;;0WP630Z
  1. ;;9002226.02101,"1804,0WP630Z ",.02)
  1. ;;0WP630Z
  1. ;;9002226.02101,"1804,0WP630Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP631Z ",.01)
  1. ;;0WP631Z
  1. ;;9002226.02101,"1804,0WP631Z ",.02)
  1. ;;0WP631Z
  1. ;;9002226.02101,"1804,0WP631Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP633Z ",.01)
  1. ;;0WP633Z
  1. ;;9002226.02101,"1804,0WP633Z ",.02)
  1. ;;0WP633Z
  1. ;;9002226.02101,"1804,0WP633Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP637Z ",.01)
  1. ;;0WP637Z
  1. ;;9002226.02101,"1804,0WP637Z ",.02)
  1. ;;0WP637Z
  1. ;;9002226.02101,"1804,0WP637Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP63JZ ",.01)
  1. ;;0WP63JZ
  1. ;;9002226.02101,"1804,0WP63JZ ",.02)
  1. ;;0WP63JZ
  1. ;;9002226.02101,"1804,0WP63JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP63KZ ",.01)
  1. ;;0WP63KZ
  1. ;;9002226.02101,"1804,0WP63KZ ",.02)
  1. ;;0WP63KZ
  1. ;;9002226.02101,"1804,0WP63KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP63YZ ",.01)
  1. ;;0WP63YZ
  1. ;;9002226.02101,"1804,0WP63YZ ",.02)
  1. ;;0WP63YZ
  1. ;;9002226.02101,"1804,0WP63YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP640Z ",.01)
  1. ;;0WP640Z
  1. ;;9002226.02101,"1804,0WP640Z ",.02)
  1. ;;0WP640Z
  1. ;;9002226.02101,"1804,0WP640Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP641Z ",.01)
  1. ;;0WP641Z
  1. ;;9002226.02101,"1804,0WP641Z ",.02)
  1. ;;0WP641Z
  1. ;;9002226.02101,"1804,0WP641Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP643Z ",.01)
  1. ;;0WP643Z
  1. ;;9002226.02101,"1804,0WP643Z ",.02)
  1. ;;0WP643Z
  1. ;;9002226.02101,"1804,0WP643Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP647Z ",.01)
  1. ;;0WP647Z
  1. ;;9002226.02101,"1804,0WP647Z ",.02)
  1. ;;0WP647Z
  1. ;;9002226.02101,"1804,0WP647Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP64JZ ",.01)
  1. ;;0WP64JZ
  1. ;;9002226.02101,"1804,0WP64JZ ",.02)
  1. ;;0WP64JZ
  1. ;;9002226.02101,"1804,0WP64JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WP64KZ ",.01)
  1. ;;0WP64KZ
  1. ;;9002226.02101,"1804,0WP64KZ ",.02)
  1. ;;0WP64KZ