get "Id==*";
  while(get_next)
  #----------- gesucht wird in dem Feld [Name] ----------------------------------
  {if ((index($Name,$Such1)>= 0 or ($Name =~ /$mSuch1/gim) ))
   {$i++;
    #----------- als Link wird das Feld [Name] ausgegeben ----------------------
    $Daten[$i]="$i. $_id <a href='http://baseportal.de/cgi-bin/baseportal.pl?
Such1=$Such1&view=on&htx=$htx&Id==$_id'>$Name</a> $Jahr<br>";
   }
  }
  if ($view ne "on")
  {
   out "<p>Suche in allen Datensätzen nach <b>$Such1</b> ";
   out "erzielte <b>$i</b> Treffer";
   $treffer = $i > 0 ? "</b>:" : "</b>.";
   out "<b>$treffer</b><br>";
   out "@Daten</p>";
  }
 }