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

ATXXB237.m

Go to the documentation of this file.
  1. ATXXB237 ;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,DT109BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT109CZ ",.01)
  1. ;;DT109CZ
  1. ;;9002226.02101,"1804,DT109CZ ",.02)
  1. ;;DT109CZ
  1. ;;9002226.02101,"1804,DT109CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT109YZ ",.01)
  1. ;;DT109YZ
  1. ;;9002226.02101,"1804,DT109YZ ",.02)
  1. ;;DT109YZ
  1. ;;9002226.02101,"1804,DT109YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT10B7Z ",.01)
  1. ;;DT10B7Z
  1. ;;9002226.02101,"1804,DT10B7Z ",.02)
  1. ;;DT10B7Z
  1. ;;9002226.02101,"1804,DT10B7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT10B8Z ",.01)
  1. ;;DT10B8Z
  1. ;;9002226.02101,"1804,DT10B8Z ",.02)
  1. ;;DT10B8Z
  1. ;;9002226.02101,"1804,DT10B8Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT10B9Z ",.01)
  1. ;;DT10B9Z
  1. ;;9002226.02101,"1804,DT10B9Z ",.02)
  1. ;;DT10B9Z
  1. ;;9002226.02101,"1804,DT10B9Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT10BBZ ",.01)
  1. ;;DT10BBZ
  1. ;;9002226.02101,"1804,DT10BBZ ",.02)
  1. ;;DT10BBZ
  1. ;;9002226.02101,"1804,DT10BBZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT10BCZ ",.01)
  1. ;;DT10BCZ
  1. ;;9002226.02101,"1804,DT10BCZ ",.02)
  1. ;;DT10BCZ
  1. ;;9002226.02101,"1804,DT10BCZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT10BYZ ",.01)
  1. ;;DT10BYZ
  1. ;;9002226.02101,"1804,DT10BYZ ",.02)
  1. ;;DT10BYZ
  1. ;;9002226.02101,"1804,DT10BYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1197Z ",.01)
  1. ;;DT1197Z
  1. ;;9002226.02101,"1804,DT1197Z ",.02)
  1. ;;DT1197Z
  1. ;;9002226.02101,"1804,DT1197Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1198Z ",.01)
  1. ;;DT1198Z
  1. ;;9002226.02101,"1804,DT1198Z ",.02)
  1. ;;DT1198Z
  1. ;;9002226.02101,"1804,DT1198Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1199Z ",.01)
  1. ;;DT1199Z
  1. ;;9002226.02101,"1804,DT1199Z ",.02)
  1. ;;DT1199Z
  1. ;;9002226.02101,"1804,DT1199Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT119BZ ",.01)
  1. ;;DT119BZ
  1. ;;9002226.02101,"1804,DT119BZ ",.02)
  1. ;;DT119BZ
  1. ;;9002226.02101,"1804,DT119BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT119CZ ",.01)
  1. ;;DT119CZ
  1. ;;9002226.02101,"1804,DT119CZ ",.02)
  1. ;;DT119CZ
  1. ;;9002226.02101,"1804,DT119CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT119YZ ",.01)
  1. ;;DT119YZ
  1. ;;9002226.02101,"1804,DT119YZ ",.02)
  1. ;;DT119YZ
  1. ;;9002226.02101,"1804,DT119YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT11B7Z ",.01)
  1. ;;DT11B7Z
  1. ;;9002226.02101,"1804,DT11B7Z ",.02)
  1. ;;DT11B7Z
  1. ;;9002226.02101,"1804,DT11B7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT11B8Z ",.01)
  1. ;;DT11B8Z
  1. ;;9002226.02101,"1804,DT11B8Z ",.02)
  1. ;;DT11B8Z
  1. ;;9002226.02101,"1804,DT11B8Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT11B9Z ",.01)
  1. ;;DT11B9Z
  1. ;;9002226.02101,"1804,DT11B9Z ",.02)
  1. ;;DT11B9Z
  1. ;;9002226.02101,"1804,DT11B9Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT11BBZ ",.01)
  1. ;;DT11BBZ
  1. ;;9002226.02101,"1804,DT11BBZ ",.02)
  1. ;;DT11BBZ
  1. ;;9002226.02101,"1804,DT11BBZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT11BCZ ",.01)
  1. ;;DT11BCZ
  1. ;;9002226.02101,"1804,DT11BCZ ",.02)
  1. ;;DT11BCZ
  1. ;;9002226.02101,"1804,DT11BCZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT11BYZ ",.01)
  1. ;;DT11BYZ
  1. ;;9002226.02101,"1804,DT11BYZ ",.02)
  1. ;;DT11BYZ
  1. ;;9002226.02101,"1804,DT11BYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1297Z ",.01)
  1. ;;DT1297Z
  1. ;;9002226.02101,"1804,DT1297Z ",.02)
  1. ;;DT1297Z
  1. ;;9002226.02101,"1804,DT1297Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1298Z ",.01)
  1. ;;DT1298Z
  1. ;;9002226.02101,"1804,DT1298Z ",.02)
  1. ;;DT1298Z
  1. ;;9002226.02101,"1804,DT1298Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1299Z ",.01)
  1. ;;DT1299Z
  1. ;;9002226.02101,"1804,DT1299Z ",.02)
  1. ;;DT1299Z
  1. ;;9002226.02101,"1804,DT1299Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT129BZ ",.01)
  1. ;;DT129BZ
  1. ;;9002226.02101,"1804,DT129BZ ",.02)
  1. ;;DT129BZ
  1. ;;9002226.02101,"1804,DT129BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT129CZ ",.01)
  1. ;;DT129CZ
  1. ;;9002226.02101,"1804,DT129CZ ",.02)
  1. ;;DT129CZ
  1. ;;9002226.02101,"1804,DT129CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT129YZ ",.01)
  1. ;;DT129YZ
  1. ;;9002226.02101,"1804,DT129YZ ",.02)
  1. ;;DT129YZ
  1. ;;9002226.02101,"1804,DT129YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT12B7Z ",.01)
  1. ;;DT12B7Z
  1. ;;9002226.02101,"1804,DT12B7Z ",.02)
  1. ;;DT12B7Z
  1. ;;9002226.02101,"1804,DT12B7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT12B8Z ",.01)
  1. ;;DT12B8Z
  1. ;;9002226.02101,"1804,DT12B8Z ",.02)
  1. ;;DT12B8Z
  1. ;;9002226.02101,"1804,DT12B8Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT12B9Z ",.01)
  1. ;;DT12B9Z
  1. ;;9002226.02101,"1804,DT12B9Z ",.02)
  1. ;;DT12B9Z
  1. ;;9002226.02101,"1804,DT12B9Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT12BBZ ",.01)
  1. ;;DT12BBZ
  1. ;;9002226.02101,"1804,DT12BBZ ",.02)
  1. ;;DT12BBZ
  1. ;;9002226.02101,"1804,DT12BBZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT12BCZ ",.01)
  1. ;;DT12BCZ
  1. ;;9002226.02101,"1804,DT12BCZ ",.02)
  1. ;;DT12BCZ
  1. ;;9002226.02101,"1804,DT12BCZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT12BYZ ",.01)
  1. ;;DT12BYZ
  1. ;;9002226.02101,"1804,DT12BYZ ",.02)
  1. ;;DT12BYZ
  1. ;;9002226.02101,"1804,DT12BYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1397Z ",.01)
  1. ;;DT1397Z
  1. ;;9002226.02101,"1804,DT1397Z ",.02)
  1. ;;DT1397Z
  1. ;;9002226.02101,"1804,DT1397Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1398Z ",.01)
  1. ;;DT1398Z
  1. ;;9002226.02101,"1804,DT1398Z ",.02)
  1. ;;DT1398Z
  1. ;;9002226.02101,"1804,DT1398Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT1399Z ",.01)
  1. ;;DT1399Z
  1. ;;9002226.02101,"1804,DT1399Z ",.02)
  1. ;;DT1399Z
  1. ;;9002226.02101,"1804,DT1399Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT139BZ ",.01)
  1. ;;DT139BZ
  1. ;;9002226.02101,"1804,DT139BZ ",.02)
  1. ;;DT139BZ
  1. ;;9002226.02101,"1804,DT139BZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT139CZ ",.01)
  1. ;;DT139CZ
  1. ;;9002226.02101,"1804,DT139CZ ",.02)
  1. ;;DT139CZ
  1. ;;9002226.02101,"1804,DT139CZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT139YZ ",.01)
  1. ;;DT139YZ
  1. ;;9002226.02101,"1804,DT139YZ ",.02)
  1. ;;DT139YZ
  1. ;;9002226.02101,"1804,DT139YZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT13B7Z ",.01)
  1. ;;DT13B7Z
  1. ;;9002226.02101,"1804,DT13B7Z ",.02)
  1. ;;DT13B7Z
  1. ;;9002226.02101,"1804,DT13B7Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT13B8Z ",.01)
  1. ;;DT13B8Z
  1. ;;9002226.02101,"1804,DT13B8Z ",.02)
  1. ;;DT13B8Z
  1. ;;9002226.02101,"1804,DT13B8Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT13B9Z ",.01)
  1. ;;DT13B9Z
  1. ;;9002226.02101,"1804,DT13B9Z ",.02)
  1. ;;DT13B9Z
  1. ;;9002226.02101,"1804,DT13B9Z ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT13BBZ ",.01)
  1. ;;DT13BBZ
  1. ;;9002226.02101,"1804,DT13BBZ ",.02)
  1. ;;DT13BBZ
  1. ;;9002226.02101,"1804,DT13BBZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT13BCZ ",.01)
  1. ;;DT13BCZ
  1. ;;9002226.02101,"1804,DT13BCZ ",.02)
  1. ;;DT13BCZ
  1. ;;9002226.02101,"1804,DT13BCZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT13BYZ ",.01)
  1. ;;DT13BYZ
  1. ;;9002226.02101,"1804,DT13BYZ ",.02)
  1. ;;DT13BYZ
  1. ;;9002226.02101,"1804,DT13BYZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT20DZZ ",.01)
  1. ;;DT20DZZ
  1. ;;9002226.02101,"1804,DT20DZZ ",.02)
  1. ;;DT20DZZ
  1. ;;9002226.02101,"1804,DT20DZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT20HZZ ",.01)
  1. ;;DT20HZZ
  1. ;;9002226.02101,"1804,DT20HZZ ",.02)
  1. ;;DT20HZZ
  1. ;;9002226.02101,"1804,DT20HZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT20JZZ ",.01)
  1. ;;DT20JZZ
  1. ;;9002226.02101,"1804,DT20JZZ ",.02)
  1. ;;DT20JZZ
  1. ;;9002226.02101,"1804,DT20JZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT21DZZ ",.01)
  1. ;;DT21DZZ
  1. ;;9002226.02101,"1804,DT21DZZ ",.02)
  1. ;;DT21DZZ
  1. ;;9002226.02101,"1804,DT21DZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT21HZZ ",.01)
  1. ;;DT21HZZ
  1. ;;9002226.02101,"1804,DT21HZZ ",.02)
  1. ;;DT21HZZ
  1. ;;9002226.02101,"1804,DT21HZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT21JZZ ",.01)
  1. ;;DT21JZZ
  1. ;;9002226.02101,"1804,DT21JZZ ",.02)
  1. ;;DT21JZZ
  1. ;;9002226.02101,"1804,DT21JZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT22DZZ ",.01)
  1. ;;DT22DZZ
  1. ;;9002226.02101,"1804,DT22DZZ ",.02)
  1. ;;DT22DZZ
  1. ;;9002226.02101,"1804,DT22DZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT22HZZ ",.01)
  1. ;;DT22HZZ
  1. ;;9002226.02101,"1804,DT22HZZ ",.02)
  1. ;;DT22HZZ
  1. ;;9002226.02101,"1804,DT22HZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT22JZZ ",.01)
  1. ;;DT22JZZ
  1. ;;9002226.02101,"1804,DT22JZZ ",.02)
  1. ;;DT22JZZ
  1. ;;9002226.02101,"1804,DT22JZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT23DZZ ",.01)
  1. ;;DT23DZZ
  1. ;;9002226.02101,"1804,DT23DZZ ",.02)
  1. ;;DT23DZZ
  1. ;;9002226.02101,"1804,DT23DZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT23HZZ ",.01)
  1. ;;DT23HZZ
  1. ;;9002226.02101,"1804,DT23HZZ ",.02)
  1. ;;DT23HZZ
  1. ;;9002226.02101,"1804,DT23HZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DT23JZZ ",.01)
  1. ;;DT23JZZ
  1. ;;9002226.02101,"1804,DT23JZZ ",.02)
  1. ;;DT23JZZ
  1. ;;9002226.02101,"1804,DT23JZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY07ZZ ",.01)
  1. ;;DTY07ZZ
  1. ;;9002226.02101,"1804,DTY07ZZ ",.02)
  1. ;;DTY07ZZ
  1. ;;9002226.02101,"1804,DTY07ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY08ZZ ",.01)
  1. ;;DTY08ZZ
  1. ;;9002226.02101,"1804,DTY08ZZ ",.02)
  1. ;;DTY08ZZ
  1. ;;9002226.02101,"1804,DTY08ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY0CZZ ",.01)
  1. ;;DTY0CZZ
  1. ;;9002226.02101,"1804,DTY0CZZ ",.02)
  1. ;;DTY0CZZ
  1. ;;9002226.02101,"1804,DTY0CZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY0FZZ ",.01)
  1. ;;DTY0FZZ
  1. ;;9002226.02101,"1804,DTY0FZZ ",.02)
  1. ;;DTY0FZZ
  1. ;;9002226.02101,"1804,DTY0FZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY17ZZ ",.01)
  1. ;;DTY17ZZ
  1. ;;9002226.02101,"1804,DTY17ZZ ",.02)
  1. ;;DTY17ZZ
  1. ;;9002226.02101,"1804,DTY17ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY18ZZ ",.01)
  1. ;;DTY18ZZ
  1. ;;9002226.02101,"1804,DTY18ZZ ",.02)
  1. ;;DTY18ZZ
  1. ;;9002226.02101,"1804,DTY18ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY1CZZ ",.01)
  1. ;;DTY1CZZ
  1. ;;9002226.02101,"1804,DTY1CZZ ",.02)
  1. ;;DTY1CZZ
  1. ;;9002226.02101,"1804,DTY1CZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY1FZZ ",.01)
  1. ;;DTY1FZZ
  1. ;;9002226.02101,"1804,DTY1FZZ ",.02)
  1. ;;DTY1FZZ
  1. ;;9002226.02101,"1804,DTY1FZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY27ZZ ",.01)
  1. ;;DTY27ZZ
  1. ;;9002226.02101,"1804,DTY27ZZ ",.02)
  1. ;;DTY27ZZ
  1. ;;9002226.02101,"1804,DTY27ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY28ZZ ",.01)
  1. ;;DTY28ZZ
  1. ;;9002226.02101,"1804,DTY28ZZ ",.02)
  1. ;;DTY28ZZ
  1. ;;9002226.02101,"1804,DTY28ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY2CZZ ",.01)
  1. ;;DTY2CZZ
  1. ;;9002226.02101,"1804,DTY2CZZ ",.02)
  1. ;;DTY2CZZ
  1. ;;9002226.02101,"1804,DTY2CZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY2FZZ ",.01)
  1. ;;DTY2FZZ
  1. ;;9002226.02101,"1804,DTY2FZZ ",.02)
  1. ;;DTY2FZZ
  1. ;;9002226.02101,"1804,DTY2FZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY37ZZ ",.01)
  1. ;;DTY37ZZ
  1. ;;9002226.02101,"1804,DTY37ZZ ",.02)
  1. ;;DTY37ZZ
  1. ;;9002226.02101,"1804,DTY37ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY38ZZ ",.01)
  1. ;;DTY38ZZ
  1. ;;9002226.02101,"1804,DTY38ZZ ",.02)
  1. ;;DTY38ZZ
  1. ;;9002226.02101,"1804,DTY38ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY3CZZ ",.01)
  1. ;;DTY3CZZ
  1. ;;9002226.02101,"1804,DTY3CZZ ",.02)
  1. ;;DTY3CZZ
  1. ;;9002226.02101,"1804,DTY3CZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DTY3FZZ ",.01)
  1. ;;DTY3FZZ
  1. ;;9002226.02101,"1804,DTY3FZZ ",.02)
  1. ;;DTY3FZZ
  1. ;;9002226.02101,"1804,DTY3FZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU000ZZ ",.01)
  1. ;;DU000ZZ
  1. ;;9002226.02101,"1804,DU000ZZ ",.02)
  1. ;;DU000ZZ
  1. ;;9002226.02101,"1804,DU000ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU001ZZ ",.01)
  1. ;;DU001ZZ
  1. ;;9002226.02101,"1804,DU001ZZ ",.02)
  1. ;;DU001ZZ
  1. ;;9002226.02101,"1804,DU001ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU002ZZ ",.01)
  1. ;;DU002ZZ
  1. ;;9002226.02101,"1804,DU002ZZ ",.02)
  1. ;;DU002ZZ
  1. ;;9002226.02101,"1804,DU002ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU003Z0 ",.01)
  1. ;;DU003Z0
  1. ;;9002226.02101,"1804,DU003Z0 ",.02)
  1. ;;DU003Z0
  1. ;;9002226.02101,"1804,DU003Z0 ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU003ZZ ",.01)
  1. ;;DU003ZZ
  1. ;;9002226.02101,"1804,DU003ZZ ",.02)
  1. ;;DU003ZZ
  1. ;;9002226.02101,"1804,DU003ZZ ",.03)
  1. ;;31
  1. ;;9002226.02101,"1804,DU004ZZ ",.01)
  1. ;;DU004ZZ
  1. ;;9002226.02101,"1804,DU004ZZ ",.02)
  1. ;;DU004ZZ
  1. ;;9002226.02101,"1804,DU004ZZ ",.03)
  1. ;;31