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

ATXXB123.m

Go to the documentation of this file.
  1. ATXXB123 ;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,0WW041Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW043Z ",.01)
  1. ;;0WW043Z
  1. ;;9002226.02101,"1804,0WW043Z ",.02)
  1. ;;0WW043Z
  1. ;;9002226.02101,"1804,0WW043Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW047Z ",.01)
  1. ;;0WW047Z
  1. ;;9002226.02101,"1804,0WW047Z ",.02)
  1. ;;0WW047Z
  1. ;;9002226.02101,"1804,0WW047Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW04JZ ",.01)
  1. ;;0WW04JZ
  1. ;;9002226.02101,"1804,0WW04JZ ",.02)
  1. ;;0WW04JZ
  1. ;;9002226.02101,"1804,0WW04JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW04KZ ",.01)
  1. ;;0WW04KZ
  1. ;;9002226.02101,"1804,0WW04KZ ",.02)
  1. ;;0WW04KZ
  1. ;;9002226.02101,"1804,0WW04KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW04YZ ",.01)
  1. ;;0WW04YZ
  1. ;;9002226.02101,"1804,0WW04YZ ",.02)
  1. ;;0WW04YZ
  1. ;;9002226.02101,"1804,0WW04YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW0X0Z ",.01)
  1. ;;0WW0X0Z
  1. ;;9002226.02101,"1804,0WW0X0Z ",.02)
  1. ;;0WW0X0Z
  1. ;;9002226.02101,"1804,0WW0X0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW0X1Z ",.01)
  1. ;;0WW0X1Z
  1. ;;9002226.02101,"1804,0WW0X1Z ",.02)
  1. ;;0WW0X1Z
  1. ;;9002226.02101,"1804,0WW0X1Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW0X3Z ",.01)
  1. ;;0WW0X3Z
  1. ;;9002226.02101,"1804,0WW0X3Z ",.02)
  1. ;;0WW0X3Z
  1. ;;9002226.02101,"1804,0WW0X3Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW0X7Z ",.01)
  1. ;;0WW0X7Z
  1. ;;9002226.02101,"1804,0WW0X7Z ",.02)
  1. ;;0WW0X7Z
  1. ;;9002226.02101,"1804,0WW0X7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW0XJZ ",.01)
  1. ;;0WW0XJZ
  1. ;;9002226.02101,"1804,0WW0XJZ ",.02)
  1. ;;0WW0XJZ
  1. ;;9002226.02101,"1804,0WW0XJZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW0XKZ ",.01)
  1. ;;0WW0XKZ
  1. ;;9002226.02101,"1804,0WW0XKZ ",.02)
  1. ;;0WW0XKZ
  1. ;;9002226.02101,"1804,0WW0XKZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW0XYZ ",.01)
  1. ;;0WW0XYZ
  1. ;;9002226.02101,"1804,0WW0XYZ ",.02)
  1. ;;0WW0XYZ
  1. ;;9002226.02101,"1804,0WW0XYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW1X0Z ",.01)
  1. ;;0WW1X0Z
  1. ;;9002226.02101,"1804,0WW1X0Z ",.02)
  1. ;;0WW1X0Z
  1. ;;9002226.02101,"1804,0WW1X0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW1X1Z ",.01)
  1. ;;0WW1X1Z
  1. ;;9002226.02101,"1804,0WW1X1Z ",.02)
  1. ;;0WW1X1Z
  1. ;;9002226.02101,"1804,0WW1X1Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW1X3Z ",.01)
  1. ;;0WW1X3Z
  1. ;;9002226.02101,"1804,0WW1X3Z ",.02)
  1. ;;0WW1X3Z
  1. ;;9002226.02101,"1804,0WW1X3Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW1XJZ ",.01)
  1. ;;0WW1XJZ
  1. ;;9002226.02101,"1804,0WW1XJZ ",.02)
  1. ;;0WW1XJZ
  1. ;;9002226.02101,"1804,0WW1XJZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW1XYZ ",.01)
  1. ;;0WW1XYZ
  1. ;;9002226.02101,"1804,0WW1XYZ ",.02)
  1. ;;0WW1XYZ
  1. ;;9002226.02101,"1804,0WW1XYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW200Z ",.01)
  1. ;;0WW200Z
  1. ;;9002226.02101,"1804,0WW200Z ",.02)
  1. ;;0WW200Z
  1. ;;9002226.02101,"1804,0WW200Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW201Z ",.01)
  1. ;;0WW201Z
  1. ;;9002226.02101,"1804,0WW201Z ",.02)
  1. ;;0WW201Z
  1. ;;9002226.02101,"1804,0WW201Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW203Z ",.01)
  1. ;;0WW203Z
  1. ;;9002226.02101,"1804,0WW203Z ",.02)
  1. ;;0WW203Z
  1. ;;9002226.02101,"1804,0WW203Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW207Z ",.01)
  1. ;;0WW207Z
  1. ;;9002226.02101,"1804,0WW207Z ",.02)
  1. ;;0WW207Z
  1. ;;9002226.02101,"1804,0WW207Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW20JZ ",.01)
  1. ;;0WW20JZ
  1. ;;9002226.02101,"1804,0WW20JZ ",.02)
  1. ;;0WW20JZ
  1. ;;9002226.02101,"1804,0WW20JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW20KZ ",.01)
  1. ;;0WW20KZ
  1. ;;9002226.02101,"1804,0WW20KZ ",.02)
  1. ;;0WW20KZ
  1. ;;9002226.02101,"1804,0WW20KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW20YZ ",.01)
  1. ;;0WW20YZ
  1. ;;9002226.02101,"1804,0WW20YZ ",.02)
  1. ;;0WW20YZ
  1. ;;9002226.02101,"1804,0WW20YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW230Z ",.01)
  1. ;;0WW230Z
  1. ;;9002226.02101,"1804,0WW230Z ",.02)
  1. ;;0WW230Z
  1. ;;9002226.02101,"1804,0WW230Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW231Z ",.01)
  1. ;;0WW231Z
  1. ;;9002226.02101,"1804,0WW231Z ",.02)
  1. ;;0WW231Z
  1. ;;9002226.02101,"1804,0WW231Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW233Z ",.01)
  1. ;;0WW233Z
  1. ;;9002226.02101,"1804,0WW233Z ",.02)
  1. ;;0WW233Z
  1. ;;9002226.02101,"1804,0WW233Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW237Z ",.01)
  1. ;;0WW237Z
  1. ;;9002226.02101,"1804,0WW237Z ",.02)
  1. ;;0WW237Z
  1. ;;9002226.02101,"1804,0WW237Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW23JZ ",.01)
  1. ;;0WW23JZ
  1. ;;9002226.02101,"1804,0WW23JZ ",.02)
  1. ;;0WW23JZ
  1. ;;9002226.02101,"1804,0WW23JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW23KZ ",.01)
  1. ;;0WW23KZ
  1. ;;9002226.02101,"1804,0WW23KZ ",.02)
  1. ;;0WW23KZ
  1. ;;9002226.02101,"1804,0WW23KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW23YZ ",.01)
  1. ;;0WW23YZ
  1. ;;9002226.02101,"1804,0WW23YZ ",.02)
  1. ;;0WW23YZ
  1. ;;9002226.02101,"1804,0WW23YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW240Z ",.01)
  1. ;;0WW240Z
  1. ;;9002226.02101,"1804,0WW240Z ",.02)
  1. ;;0WW240Z
  1. ;;9002226.02101,"1804,0WW240Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW241Z ",.01)
  1. ;;0WW241Z
  1. ;;9002226.02101,"1804,0WW241Z ",.02)
  1. ;;0WW241Z
  1. ;;9002226.02101,"1804,0WW241Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW243Z ",.01)
  1. ;;0WW243Z
  1. ;;9002226.02101,"1804,0WW243Z ",.02)
  1. ;;0WW243Z
  1. ;;9002226.02101,"1804,0WW243Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW247Z ",.01)
  1. ;;0WW247Z
  1. ;;9002226.02101,"1804,0WW247Z ",.02)
  1. ;;0WW247Z
  1. ;;9002226.02101,"1804,0WW247Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW24JZ ",.01)
  1. ;;0WW24JZ
  1. ;;9002226.02101,"1804,0WW24JZ ",.02)
  1. ;;0WW24JZ
  1. ;;9002226.02101,"1804,0WW24JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW24KZ ",.01)
  1. ;;0WW24KZ
  1. ;;9002226.02101,"1804,0WW24KZ ",.02)
  1. ;;0WW24KZ
  1. ;;9002226.02101,"1804,0WW24KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW24YZ ",.01)
  1. ;;0WW24YZ
  1. ;;9002226.02101,"1804,0WW24YZ ",.02)
  1. ;;0WW24YZ
  1. ;;9002226.02101,"1804,0WW24YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW2X0Z ",.01)
  1. ;;0WW2X0Z
  1. ;;9002226.02101,"1804,0WW2X0Z ",.02)
  1. ;;0WW2X0Z
  1. ;;9002226.02101,"1804,0WW2X0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW2X1Z ",.01)
  1. ;;0WW2X1Z
  1. ;;9002226.02101,"1804,0WW2X1Z ",.02)
  1. ;;0WW2X1Z
  1. ;;9002226.02101,"1804,0WW2X1Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW2X3Z ",.01)
  1. ;;0WW2X3Z
  1. ;;9002226.02101,"1804,0WW2X3Z ",.02)
  1. ;;0WW2X3Z
  1. ;;9002226.02101,"1804,0WW2X3Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW2X7Z ",.01)
  1. ;;0WW2X7Z
  1. ;;9002226.02101,"1804,0WW2X7Z ",.02)
  1. ;;0WW2X7Z
  1. ;;9002226.02101,"1804,0WW2X7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW2XJZ ",.01)
  1. ;;0WW2XJZ
  1. ;;9002226.02101,"1804,0WW2XJZ ",.02)
  1. ;;0WW2XJZ
  1. ;;9002226.02101,"1804,0WW2XJZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW2XKZ ",.01)
  1. ;;0WW2XKZ
  1. ;;9002226.02101,"1804,0WW2XKZ ",.02)
  1. ;;0WW2XKZ
  1. ;;9002226.02101,"1804,0WW2XKZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW2XYZ ",.01)
  1. ;;0WW2XYZ
  1. ;;9002226.02101,"1804,0WW2XYZ ",.02)
  1. ;;0WW2XYZ
  1. ;;9002226.02101,"1804,0WW2XYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW400Z ",.01)
  1. ;;0WW400Z
  1. ;;9002226.02101,"1804,0WW400Z ",.02)
  1. ;;0WW400Z
  1. ;;9002226.02101,"1804,0WW400Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW401Z ",.01)
  1. ;;0WW401Z
  1. ;;9002226.02101,"1804,0WW401Z ",.02)
  1. ;;0WW401Z
  1. ;;9002226.02101,"1804,0WW401Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW403Z ",.01)
  1. ;;0WW403Z
  1. ;;9002226.02101,"1804,0WW403Z ",.02)
  1. ;;0WW403Z
  1. ;;9002226.02101,"1804,0WW403Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW407Z ",.01)
  1. ;;0WW407Z
  1. ;;9002226.02101,"1804,0WW407Z ",.02)
  1. ;;0WW407Z
  1. ;;9002226.02101,"1804,0WW407Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW40JZ ",.01)
  1. ;;0WW40JZ
  1. ;;9002226.02101,"1804,0WW40JZ ",.02)
  1. ;;0WW40JZ
  1. ;;9002226.02101,"1804,0WW40JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW40KZ ",.01)
  1. ;;0WW40KZ
  1. ;;9002226.02101,"1804,0WW40KZ ",.02)
  1. ;;0WW40KZ
  1. ;;9002226.02101,"1804,0WW40KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW40YZ ",.01)
  1. ;;0WW40YZ
  1. ;;9002226.02101,"1804,0WW40YZ ",.02)
  1. ;;0WW40YZ
  1. ;;9002226.02101,"1804,0WW40YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW430Z ",.01)
  1. ;;0WW430Z
  1. ;;9002226.02101,"1804,0WW430Z ",.02)
  1. ;;0WW430Z
  1. ;;9002226.02101,"1804,0WW430Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW431Z ",.01)
  1. ;;0WW431Z
  1. ;;9002226.02101,"1804,0WW431Z ",.02)
  1. ;;0WW431Z
  1. ;;9002226.02101,"1804,0WW431Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW433Z ",.01)
  1. ;;0WW433Z
  1. ;;9002226.02101,"1804,0WW433Z ",.02)
  1. ;;0WW433Z
  1. ;;9002226.02101,"1804,0WW433Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW437Z ",.01)
  1. ;;0WW437Z
  1. ;;9002226.02101,"1804,0WW437Z ",.02)
  1. ;;0WW437Z
  1. ;;9002226.02101,"1804,0WW437Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW43JZ ",.01)
  1. ;;0WW43JZ
  1. ;;9002226.02101,"1804,0WW43JZ ",.02)
  1. ;;0WW43JZ
  1. ;;9002226.02101,"1804,0WW43JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW43KZ ",.01)
  1. ;;0WW43KZ
  1. ;;9002226.02101,"1804,0WW43KZ ",.02)
  1. ;;0WW43KZ
  1. ;;9002226.02101,"1804,0WW43KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW43YZ ",.01)
  1. ;;0WW43YZ
  1. ;;9002226.02101,"1804,0WW43YZ ",.02)
  1. ;;0WW43YZ
  1. ;;9002226.02101,"1804,0WW43YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW440Z ",.01)
  1. ;;0WW440Z
  1. ;;9002226.02101,"1804,0WW440Z ",.02)
  1. ;;0WW440Z
  1. ;;9002226.02101,"1804,0WW440Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW441Z ",.01)
  1. ;;0WW441Z
  1. ;;9002226.02101,"1804,0WW441Z ",.02)
  1. ;;0WW441Z
  1. ;;9002226.02101,"1804,0WW441Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW443Z ",.01)
  1. ;;0WW443Z
  1. ;;9002226.02101,"1804,0WW443Z ",.02)
  1. ;;0WW443Z
  1. ;;9002226.02101,"1804,0WW443Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW447Z ",.01)
  1. ;;0WW447Z
  1. ;;9002226.02101,"1804,0WW447Z ",.02)
  1. ;;0WW447Z
  1. ;;9002226.02101,"1804,0WW447Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW44JZ ",.01)
  1. ;;0WW44JZ
  1. ;;9002226.02101,"1804,0WW44JZ ",.02)
  1. ;;0WW44JZ
  1. ;;9002226.02101,"1804,0WW44JZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW44KZ ",.01)
  1. ;;0WW44KZ
  1. ;;9002226.02101,"1804,0WW44KZ ",.02)
  1. ;;0WW44KZ
  1. ;;9002226.02101,"1804,0WW44KZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW44YZ ",.01)
  1. ;;0WW44YZ
  1. ;;9002226.02101,"1804,0WW44YZ ",.02)
  1. ;;0WW44YZ
  1. ;;9002226.02101,"1804,0WW44YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW4X0Z ",.01)
  1. ;;0WW4X0Z
  1. ;;9002226.02101,"1804,0WW4X0Z ",.02)
  1. ;;0WW4X0Z
  1. ;;9002226.02101,"1804,0WW4X0Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW4X1Z ",.01)
  1. ;;0WW4X1Z
  1. ;;9002226.02101,"1804,0WW4X1Z ",.02)
  1. ;;0WW4X1Z
  1. ;;9002226.02101,"1804,0WW4X1Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW4X3Z ",.01)
  1. ;;0WW4X3Z
  1. ;;9002226.02101,"1804,0WW4X3Z ",.02)
  1. ;;0WW4X3Z
  1. ;;9002226.02101,"1804,0WW4X3Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW4X7Z ",.01)
  1. ;;0WW4X7Z
  1. ;;9002226.02101,"1804,0WW4X7Z ",.02)
  1. ;;0WW4X7Z
  1. ;;9002226.02101,"1804,0WW4X7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW4XJZ ",.01)
  1. ;;0WW4XJZ
  1. ;;9002226.02101,"1804,0WW4XJZ ",.02)
  1. ;;0WW4XJZ
  1. ;;9002226.02101,"1804,0WW4XJZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW4XKZ ",.01)
  1. ;;0WW4XKZ
  1. ;;9002226.02101,"1804,0WW4XKZ ",.02)
  1. ;;0WW4XKZ
  1. ;;9002226.02101,"1804,0WW4XKZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW4XYZ ",.01)
  1. ;;0WW4XYZ
  1. ;;9002226.02101,"1804,0WW4XYZ ",.02)
  1. ;;0WW4XYZ
  1. ;;9002226.02101,"1804,0WW4XYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW500Z ",.01)
  1. ;;0WW500Z
  1. ;;9002226.02101,"1804,0WW500Z ",.02)
  1. ;;0WW500Z
  1. ;;9002226.02101,"1804,0WW500Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW501Z ",.01)
  1. ;;0WW501Z
  1. ;;9002226.02101,"1804,0WW501Z ",.02)
  1. ;;0WW501Z
  1. ;;9002226.02101,"1804,0WW501Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW503Z ",.01)
  1. ;;0WW503Z
  1. ;;9002226.02101,"1804,0WW503Z ",.02)
  1. ;;0WW503Z
  1. ;;9002226.02101,"1804,0WW503Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW507Z ",.01)
  1. ;;0WW507Z
  1. ;;9002226.02101,"1804,0WW507Z ",.02)
  1. ;;0WW507Z
  1. ;;9002226.02101,"1804,0WW507Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,0WW50JZ ",.01)
  1. ;;0WW50JZ
  1. ;;9002226.02101,"1804,0WW50JZ ",.02)
  1. ;;0WW50JZ
  1. ;;9002226.02101,"1804,0WW50JZ ",.03)
  1. ;;31