get "up_nickname==$namerein sort=up_nickname,up_sort,up_progname", "../bg/bguspr";

             out "<tr><td colspan=3>&nbsp</td></tr>";
             while (get_next("../bg/bguspr"))
               {
                out "<tr>";
                out "<td width=30%>&nbsp;</td>\n";

                get "pr_progname==$up_progname sort=pr_sort,pr_progname", "../bg/bgprog";
                out "<td><img src=http://www.cs-city.de/bilder/pfeilrot.gif>&nbsp;&nbsp;<a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/gpark/$up_progname$pr_param&namerein=$u_nickname&sid=$u_sid>$pr_progbez&nbsp;&nbsp($up_auth)</a></td>\n";
                out "<td width=30%>&nbsp;</td>";
                out "</tr>\n";
               }

             out "<tr><td colspan=3>&nbsp</td></tr>";
             out "<tr><td width=30%>&nbsp;</td>\n";
             out "<td><img src=http://www.cs-city.de/bilder/pfeilrot.gif>&nbsp;&nbsp;<a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/gpark/bg/pbg001&cmd=logout>Logout!</a></td>\n";
             out "<td width=30%>&nbsp;</td></tr>";
             out "<tr><td colspan=3>&nbsp</td></tr>";

             out "<tr><td class=a7 align=center> ( user: $u_initialen ) </td>";
             out "<td class=a7 align=center>";
             out "<loop db=bgstat range=0,1>( $_amount_all Besucher )</loop>";   # Counter Nutzer-Statistik

             out "</td>";
             out "<td class=a7 align=center> ( last visit: ";
             out  datum($u_lastvisit, "kurz");
             out " )</td></tr>";
             out "</table>\n";