<-------------->
<loop range^=0,15 db=bgbran bbranche==$subbranche & btyp~=$subtyp sort^=btyp,bbranche2 code=perl>
             </loop>

             <perl>
             my $newrange=$_range+$_range_length;
             my $oldrange=$_range-$_range_length;
             $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;
             out "<tr><td colspan=6>";
             out "&nbsp;&nbsp;&nbsp;&nbsp;<a href=\"$_link&range=$oldrange,$_range_length$append\"><img
             src=\"http://www.bestguide.de/gfc/pflinks.gif\" border=0 alt=\"zur&uuml;ck\"></a>"
             if $oldrange>=0;
             out "&nbsp;&nbsp;&nbsp;&nbsp;<a href=\"$_link&range=$newrange,$_range_length$append\"><img
             src=\"http://www.bestguide.de/gfc/pfrechts.gif\" border=0 alt=\"weiter\"></a>"
             if $newrange<$_amount_query;

             if ($_amount != 0)
             {
             $bis = $_range+$_range_length;
             $von = $_range+1;
             out "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Eintr&auml;ge $von bis ";
             if ($bis < $_amount_query)
             {
             out "$bis von $_amount_query";
             }else{
             out "$_amount_query von $_amount_query";
             }
             }
             out "</td></tr><tr><td> </td></tr>";
             </perl>

             <tr>
             <th class=th1>&nbsp;T</th>
             <th class=th1>&nbsp;Branche</th>
             <th class=th1>&nbsp;Branche 2</th>
             <th class=th1>&nbsp;x</th>
             </tr>
             <loop range^=0,15 db=bgbran bbranche==$subbranche & btyp~=$subtyp sort^=btyp,bbranche2 code=perl>

             out "<tr bgcolor=".($_loop %2?"a0a0a0":"e0e0e0") ."></td><td class=b8>&nbsp;$btyp</td><td class=b8>&nbsp;$bbranche</td><td class=b8>&nbsp;$bbranche2</td><td><a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/gpark/bg/bgbrandt&cmd=all&Id==$_id>&nbsp;?</a></td></tr>";
             </loop>