function show_results_stats($id_proc = 0)
{
global $msg, $dbh, $form_type, $categ, $numero_page, $limite_page, $sub, $charset;
global $dest, $pmb_set_time_limit, $force_exec, $erreur_explain_rqt, $nombre_lignes_total;
@set_time_limit($pmb_set_time_limit);
//Récupération des variables postées, on en aura besoin pour les liens
$page = $_SERVER[SCRIPT_NAME];
$requete = "SELECT idproc, name, requete, comment, num_vue FROM statopac_request where idproc='" . $id_proc . "' ";
$res = mysql_query($requete, $dbh);
$row = mysql_fetch_row($res);
//Requete et calcul du nombre de pages à afficher selon la taille de la base 'pret'
//********************************************************************************/
// récupérer ici la procédure à lancer
$sql = $row[2];
$sql = str_replace("VUE()", "statopac_vue_{$row['4']}", $sql);
if (preg_match_all("|!!(.*)!!|U", $sql, $query_parameters) && $form_type == "") {
$hp = new parameters($id_proc, "statopac_request");
$hp->gen_form("edit.php?categ=stat_opac&sub=&action=execute&id_proc=" . $id_proc . "&force_exec=" . $force_exec);
} else {
$param_hidden = "";
if ($force_exec) {
$param_hidden .= "<input type='hidden' name='force_exec' value='" . $force_exec . "' />";
//On a forcé la requete
}
if (preg_match_all("|!!(.*)!!|U", $sql, $query_parameters)) {
$hp = new parameters($id_proc, "statopac_request");
$hp->get_final_query();
$sql = $hp->final_query;
$param_hidden .= $hp->get_hidden_values();
//Je mets les paramêtres en champ caché en cas de forçage
$param_hidden .= "<input type='hidden' name='form_type' value='gen_form' />";
//Je mets le marqueur des paramêtres en champ caché en cas de forçage
}
$sql = str_replace("VUE()", "statopac_vue_{$row['4']}", $sql);
if ($dest != "TABLEAU" && $dest != "TABLEAUHTML" && $dest != "TABLEAUCSV") {
print "<form class=\"form-edit\" id=\"formulaire\" name=\"formulaire\" action='./edit.php?categ=stat_opac&sub=&action=execute&id_proc=" . $id_proc . "&force_exec=" . $force_exec . "' method=\"post\">";
print "<input type='button' class='bouton' value='" . htmlentities($msg[654], ENT_QUOTES, $charset) . "' onClick='this.form.action=\"./edit.php?categ=stat_opac\";this.form.submit();' />";
if (!explain_requete($sql) && SESSrights & EDIT_FORCING_AUTH && !$force_exec) {
print $param_hidden;
print "<input type='button' id='procs_button_exec' class='bouton' value='" . htmlentities($msg["procs_force_exec"], ENT_QUOTES, $charset) . "' onClick='this.form.action=\"./edit.php?categ=stat_opac&sub=&action=execute&id_proc=" . $id_proc . "&force_exec=1\";this.form.submit();' />";
} else {
print "<input type='submit' id='procs_button_exec' class='bouton' value='" . htmlentities($msg[708], ENT_QUOTES, $charset) . "'/>";
}
print "<br />";
print "</form>";
// la procédure n'a pas de parm ou les paramètres ont été reçus
if (!explain_requete($sql) && !(SESSrights & EDIT_FORCING_AUTH && $force_exec)) {
die("<br /><br />" . $sql . "<br /><br />" . htmlentities($msg["proc_param_explain_failed"], ENT_QUOTES, $charset) . "<br /><br />" . $erreur_explain_rqt);
}
}
$req_nombre_lignes = "";
if (!$nombre_lignes_total) {
$req_nombre_lignes = mysql_query($sql);
if (!$req_nombre_lignes) {
die($sql . "<br /><br />" . mysql_error());
}
$nombre_lignes_total = mysql_num_rows($req_nombre_lignes);
}
$param_hidden .= "<input type='hidden' name='nombre_lignes_total' value='" . $nombre_lignes_total . "' />";
//Je garde le nombre de ligne total pour le pas refaire la requête à la page suivante
//Si aucune limite_page n'a été passée, valeur par défaut : 10
if (!$limite_page) {
$limite_page = 10;
}
$nbpages = $nombre_lignes_total / $limite_page;
// on arondi le nombre de page pour ne pas avoir de virgules, ici au chiffre supérieur
$nbpages_arrondi = ceil($nbpages);
// on enlève 1 au nombre de pages, car la 1ere page affichée ne fait pas partie des pages suivantes
$nbpages_arrondi = $nbpages_arrondi - 1;
if (!$numero_page) {
$numero_page = 0;
}
$limite_mysql = $limite_page * $numero_page;
//REINITIALISATION DE LA REQUETE SQL
switch ($dest) {
case "TABLEAU":
case "TABLEAUHTML":
case "TABLEAUCSV":
if (!$req_nombre_lignes) {
$res = @mysql_query($sql, $dbh) or die($sql . "<br /><br />" . mysql_error());
} else {
$res = $req_nombre_lignes;
}
break;
default:
echo "<h1>" . htmlentities($msg["opac_admin_menu"], ENT_QUOTES, $charset) . " : " . htmlentities($msg["stat_opac_menu"], ENT_QUOTES, $charset) . "</h1>";
echo "<h1>" . htmlentities($row[1], ENT_QUOTES, $charset) . "</h1><h2>" . htmlentities($row[3], ENT_QUOTES, $charset) . "</h2>";
$sql = $sql . " LIMIT " . $limite_mysql . ", " . $limite_page;
// on execute la requete avec les bonnes limites
$res = @mysql_query($sql, $dbh) or die($sql . "<br /><br />" . mysql_error());
echo "<p>";
break;
}
$nbr_lignes = @mysql_num_rows($res);
$nbr_champs = @mysql_num_fields($res);
if ($nbr_lignes) {
switch ($dest) {
case "TABLEAU":
$fichier_temp_nom = tempnam(sys_get_temp_dir(), $fichier_temp_nom);
$workbook = new writeexcel_workbook($fichier_temp_nom);
$worksheet =& $workbook->addworksheet();
$worksheet->write(0, 0, $row[1]);
$worksheet->write(0, 1, $row[3]);
for ($i = 0; $i < $nbr_champs; $i++) {
// entête de colonnes
$fieldname = mysql_field_name($res, $i);
$worksheet->write(2, $i, ${fieldname});
}
for ($i = 0; $i < $nbr_lignes; $i++) {
$row = mysql_fetch_row($res);
$j = 0;
foreach ($row as $dummykey => $col) {
if (is_numeric($col) && preg_match("/^0/", $col)) {
$col = "'" . $col;
}
if (trim($col) == '') {
$col = " ";
}
$worksheet->write($i + 3, $j, $col);
$j++;
}
}
$workbook->close();
$fh = fopen($fichier_temp_nom, "rb");
fpassthru($fh);
unlink($fichier_temp_nom);
break;
case "TABLEAUHTML":
echo "<h1>{$row['1']}</h1><h2>{$row['3']}</h2>{$sql}<br/>";
echo "<table>";
for ($i = 0; $i < $nbr_champs; $i++) {
$fieldname = mysql_field_name($res, $i);
print "<th align='left'>{$fieldname}</th>";
}
for ($i = 0; $i < $nbr_lignes; $i++) {
$row = mysql_fetch_row($res);
echo "<tr>";
foreach ($row as $dummykey => $col) {
/*if (is_numeric($col)){
$col = "'".$col ;
}*/
if (trim($col) == '') {
$col = " ";
}
print '<td>' . $col . '</td>';
}
echo "</tr>";
}
echo "</table>";
break;
case "TABLEAUCSV":
for ($i = 0; $i < $nbr_champs; $i++) {
$fieldname = mysql_field_name($res, $i);
print "{$fieldname}\t";
}
for ($i = 0; $i < $nbr_lignes; $i++) {
$row = mysql_fetch_row($res);
echo "\n";
foreach ($row as $dummykey => $col) {
/* if (is_numeric($col)) {
$col = "\"'".(string)$col."\"" ;
} */
print "{$col}\t";
}
}
break;
default:
echo "<table>";
for ($i = 0; $i < $nbr_champs; $i++) {
$fieldname = mysql_field_name($res, $i);
print "<th align='left'>{$fieldname}</th>";
}
$odd_even = 0;
for ($i = 0; $i < $nbr_lignes; $i++) {
$row = mysql_fetch_row($res);
if ($odd_even == 0) {
echo "\t<tr class='odd'>";
$odd_even = 1;
} elseif ($odd_even == 1) {
echo "\t<tr class='even'>";
$odd_even = 0;
}
foreach ($row as $dummykey => $col) {
if (trim($col) == '') {
$col = " ";
}
print '<td>' . $col . '</td>';
}
echo "</tr>";
}
echo "</table><hr>";
echo "<p align=left size='-3' class='pn-normal'>\n\t\t\t\t\t<form name='navbar' class='form-edit' action='{$page}' method='post'>";
echo "\n\t\t\t\t\t<input type='hidden' name='numero_page' value='{$numero_page}' />\n\t\t\t\t\t<input type='hidden' name='id_proc' value='{$id_proc}' />\n\t\t\t\t\t<input type='hidden' name='categ' value='{$categ}' />\n\t\t\t\t\t<input type='hidden' name='sub' value='{$sub}' />";
print $param_hidden;
// LIENS PAGE SUIVANTE et PAGE PRECEDENTE
// si le nombre de page n'est pas 0 et si la variable numero_page n'est pas définie
// dans cette condition, la variable numero_page est incrémenté et est inférieure à $nombre
// constitution des liens
$suivante = $numero_page + 1;
$precedente = $numero_page - 1;
// affichage du lien précédent si nécéssaire
if ($precedente >= 0) {
$nav_bar .= "<img src='./images/left.gif' border='0' title='{$msg['48']}' alt='[{$msg['48']}]' hspace='3' align='bottom' onClick=\"document.navbar.dest.value='';document.navbar.numero_page.value='{$precedente}'; document.navbar.limite_page.value='{$limite_page}'; document.navbar.submit(); \"/>";
}
for ($i = 0; $i <= $nbpages_arrondi; $i++) {
if ($i == $numero_page) {
$nav_bar .= "<strong>" . ($i + 1) . "/" . ($nbpages_arrondi + 1) . "</strong>";
}
}
if ($suivante <= $nbpages_arrondi) {
$nav_bar .= "<img src='./images/right.gif' border='0' title='{$msg['49']}' alt='[{$msg['49']}]' hspace='3' align='bottom' onClick=\"document.navbar.dest.value='';document.navbar.numero_page.value='{$suivante}'; document.navbar.limite_page.value='{$limite_page}'; document.navbar.submit(); \" />";
}
echo $nav_bar;
echo "\n\t\t\t\t\t<input type='hidden' name='dest' value='' />\n\t\t\t\t\t{$msg['edit_cbgen_mep_afficher']} <input type='text' name='limite_page' value='{$limite_page}' class='saisie-5em' /> {$msg['1905']}\n\t\t\t\t\t<input type='submit' class='bouton' value='" . $msg['actualiser'] . "' onclick=\"this.form.dest.value='';document.navbar.numero_page.value=0;\" /><font size='4'> </font>\n\t\t\t\t\t<input type='image' src='./images/tableur.gif' border='0' onClick=\"this.form.dest.value='TABLEAU';\" alt='Export tableau EXCEL' title='Export tableau EXCEL' /><font size='4'> </font>\n\t\t\t\t\t<input type='image' src='./images/tableur_html.gif' border='0' onClick=\"this.form.dest.value='TABLEAUHTML';\" alt='Export tableau HTML' title='Export tableau HTML' />\n\t\t\t\t\t</form></p>";
break;
}
} else {
echo $msg["etatperso_aucuneligne"];
}
mysql_free_result($res);
}
}
//$proc_notice_tpl=$row[4];
$proc_notice_tpl_field = $row[5];
if (preg_match_all("|!!(.*)!!|U", $sql, $query_parameters) && $form_type == "") {
$hp = new parameters($id_proc, "procs");
$hp->gen_form("edit.php?categ=procs&sub=&action=execute&id_proc=" . $id_proc . "&force_exec=" . $force_exec);
} else {
$param_hidden = "";
if ($force_exec) {
$param_hidden .= "<input type='hidden' name='force_exec' value='" . $force_exec . "' />";
//On a forcé la requete
}
if (preg_match_all("|!!(.*)!!|U", $sql, $query_parameters)) {
$hp = new parameters($id_proc, "procs");
$hp->get_final_query();
$sql = $hp->final_query;
$param_hidden .= $hp->get_hidden_values();
//Je mets les paramêtres en champ caché en cas de forçage
$param_hidden .= "<input type='hidden' name='form_type' value='gen_form' />";
//Je mets le marqueur des paramêtres en champ caché en cas de forçage
}
if ($dest != "TABLEAU" && $dest != "TABLEAUHTML" && $dest != "TABLEAUCSV") {
print "<form class=\"form-edit\" id=\"formulaire\" name=\"formulaire\" action='./edit.php?categ=procs&sub=&action=execute&id_proc=" . $id_proc . "&force_exec=" . $force_exec . "' method=\"post\">";
print "<input type='button' class='bouton' value='" . htmlentities($msg[654], ENT_QUOTES, $charset) . "' onClick='this.form.action=\"./edit.php?categ=procs\";this.form.submit();'/>";
if (!explain_requete($sql) && SESSrights & EDIT_FORCING_AUTH && !$force_exec) {
print $param_hidden;
print "<input type='button' id='procs_button_exec' class='bouton' value='" . htmlentities($msg["procs_force_exec"], ENT_QUOTES, $charset) . "' onClick='this.form.action=\"./edit.php?categ=procs&sub=&action=execute&id_proc=" . $id_proc . "&force_exec=1\";this.form.submit();' />";
} else {
print "<input type='submit' id='procs_button_exec' class='bouton' value='" . htmlentities($msg[708], ENT_QUOTES, $charset) . "'/>";
}
print "<br>";
print "</form>";
print $buf_contenu;
return;
}
$the_procedure = $procedure["procedure"];
}
if (!$the_procedure) {
echo htmlentities($msg["remote_procedures_error_client"], ENT_QUOTES, $charset);
break;
}
$sql = "CREATE TEMPORARY TABLE remote_proc LIKE procs";
mysql_query($sql, $dbh) or die(mysql_error());
$sql = "INSERT INTO remote_proc (idproc, name, requete, comment, autorisations, parameters, num_classement) VALUES (0, '" . mysql_escape_string($the_procedure->name) . "', '" . mysql_escape_string($the_procedure->sql) . "', '" . mysql_escape_string($the_procedure->comment) . "', '', '" . mysql_escape_string($the_procedure->params) . "', 0)";
mysql_query($sql, $dbh) or die(mysql_error());
$idproc = mysql_insert_id($dbh);
$hp = new parameters($idproc, "remote_proc");
$param_proc_hidden = "";
if (preg_match_all("|!!(.*)!!|U", $hp->proc->requete, $query_parameters)) {
$hp->get_final_query();
$the_procedure->sql = $hp->final_query;
$param_proc_hidden = $hp->get_hidden_values();
//Je mets les paramêtres en champ caché en cas de forçage
//$param_proc_hidden.="<input type='hidden' name='id_query' value='".$id_query."' />";
}
$execute_external = true;
$execute_external_procedure = $the_procedure;
include "./admin/proc/execute.inc.php";
break;
default:
show_procs($dbh);
break;
}
