*   it under the terms of the GNU General Public License as published by  *
 *   the Free Software Foundation; either version 2 of the License, or     *
 *   (at your option) any later version.                                   *
 *                                                                         *
 ***************************************************************************/
include "prepend.inc.php";
$Server = getData("Server", "integer");
$User = getData("User");
$proc = new Procedure($Server);
$proc->getDatas($User);
$html = "<H1> Database " . $DB->Name($Server) . " - Procedure overview of User {$User}</H1>\n";
$html .= "<TABLE BORDER=0>\n<TR><TH>Name</TH><TH>Created</TH><TH>Last Modified</TH><TH>Status</TH></TR>\n";
$x = 0;
if (is_array($proc->datas[$User])) {
    foreach ($proc->datas[$User] as $procedure) {
        $html .= $x % 2 ? "<tr bgcolor=\"#EEEEEE\" valign=top>" : "<tr bgcolor=\"#CCCCCC\" valign=top>";
        $html .= "<td class=data><b>" . $procedure["OBJECT_NAME"] . "</b></td>";
        $html .= "<td>" . $procedure["CREATED"] . "</td>";
        $html .= "<td>" . $procedure["LASTMODIFIED"] . "</td>";
        $html .= "<td>" . $procedure["STATUS"] . "</td>";
        $html .= "</tr>";
        $x++;
    }
}
$html .= "</table>";
$page = new Page("Procedure Overview");
$page->setHead();
$page->setBody();
$page->setSQL();
$page->setBody($html);
$page->Display();