function forigu_demando()
{
eoecho("<h2>Forigo de entajpanto</h2>\n");
$entajpanto = new Entajpanto($_REQUEST['forigu']);
$linio = $entajpanto->datoj;
echo "<table>\n";
eoecho("<tr><th>ID</th><td>{$linio['ID']}</td></tr>\n");
eoecho("<tr><th>Salutnomo</th><td>{$linio['nomo']}</td></tr>\n");
eoecho("<tr><th>Retadreso</th><td>{$linio['retposxtadreso']}</td>\n");
eoecho("<tr><th>Partoprenanto-ID</th><td>{$linio['partoprenanto_id']}</td>\n");
eoecho("<tr><th>Sendantonomo</th><td>{$linio['sendanto_nomo']}</td>\n");
foreach ($GLOBALS['rajtolisto'] as $ero) {
eoecho("<tr><th>" . $ero['alias'] . "</th><td>" . ($linio[$ero['rajto']] == 'J' ? "[X]" : "[_]") . "</td>\n");
}
eoecho("</table>\n");
eoecho("<p>C^u vi vere volas forigi tiun c^i entajpanton?");
ligu_butone("entajpantoj.php?forigu=" . $linio['ID'], "Jes", array("vere" => "jes"));
ligu("entajpantoj.php?redaktu=" . $linio['ID'], "Ne, reen al redaktado");
ligu("entajpantoj.php", "Ne, reen al la listo");
HtmlFino();
}
echo "<pre>" . kreu_unuan_konfirmilan_tekston($_SESSION['partoprenanto'], $_SESSION['partopreno'], $partopreno_renkontigxo, 'utf-8') . "</pre>\n<p>";
if (rajtas("retumi")) {
ligu_butone("partrezultoj.php?partoprenidento=" . $partopreno->datoj['ID'], "sendi la unuan konfirmilon", array('faru' => 'sendu_unuan_konfirmilon'));
} else {
eoecho("Vi ne havas la rajton por elsendi" . " la mesag^on.");
}
echo "</p>\n";
}
if ('informmesagxo' == $_REQUEST['faru']) {
eoecho("<hr /><h3>La informmesag^o</h3>");
require_once $prafix . '/tradukendaj_iloj/iloj_konfirmilo.php';
echo "<pre>";
echo kreu_informmesagxan_tekston($_SESSION['partoprenanto'], $_SESSION['partopreno'], $partopreno_renkontigxo, 'x-metodo');
echo "</pre><p>";
if (rajtas("retumi")) {
ligu_butone("partrezultoj.php?partoprenidento=" . $partopreno->datoj['ID'], "sendi la informmesag^on", array('faru' => 'sendu_informmesagxon'));
} else {
eoecho("Vi ne havas la rajton por elsendi" . " la mesag^on.");
}
echo "</p>\n";
}
if ($_REQUEST['faru'] == 'sendu_unuan_konfirmilon') {
kontrolu_rajton('retumi');
require_once $prafix . '/iloj/retmesagxiloj.php';
require_once $prafix . '/tradukendaj_iloj/iloj_konfirmilo.php';
require_once $prafix . '/iloj/diversaj_retmesagxoj.php';
$teksto = kreu_kaj_sendu_unuan_konfirmilon($_SESSION["partoprenanto"], $_SESSION["partopreno"], $partopreno_renkontigxo, $_SESSION['kkren']['entajpantonomo']);
echo "<p>Ni sendis la jenan unuan konfirmilon:</p><pre>";
echo eotransformado($teksto, 'utf-8');
echo "</pre>";
}
$rez = sql_faru($sql);
$num = mysql_num_rows($rez);
if ($num > 0) {
eoecho("<p>Estas ankorau^ " . $num . " partoprenantoj el tiu lando. Bonvolu unue forigu ilin au^ s^ang^u ilian landanecon, se vi vere volas forigi la supre menciitan landon.</p>");
eoecho("<table>");
while ($linio = mysql_fetch_assoc($rez)) {
echo "<tr><td><a href='partrezultoj.php?partoprenantoidento=" . $linio['ID'] . "'>--></a></td><td>";
eoecho($linio['personanomo'] . "</td><td>" . $linio['nomo'] . "</td></tr>\n");
}
eoecho("</table>");
echo "<p>";
ligu("landoj.php?redaktu={$forigu}", "Reen");
echo "</p>";
} else {
eoecho("<p>C^u vi vere volas forigi tiun c^i landon?");
ligu_butone("landoj.php", "Jes", array('vere' => 'jes', 'forigu' => $_REQUEST['forigu']));
ligu("landoj.php?redaktu={$forigu}", "Ne");
}
HtmlFino();
return;
}
}
if ($sendu) {
// echo "<pre>";
// var_export($_POST);
// echo "</pre>";
$sxangxlisto = array();
foreach (array("nomo", "kodo") as $tipo) {
if ($_POST[$tipo]) {
$sxangxlisto[$tipo] = $_POST[$tipo];
}
echo ".</p>\n";
HtmlFino();
exit;
}
akceptado_kapo("fino");
akceptada_instrukcio("Prenu bros^uron de la stoko");
akceptada_instrukcio("Notu la nomon kaj c^ambronumeron sur la dorsa flanko.");
akceptada_instrukcio("Donu al {$ri} la bros^uron.");
// TODO: adaptu, kiam estos pluraj domotipoj
// TODO: cxu ni disdonas gxin en tiu tablo, aux cxu la homoj prenos mem?
if ($partopreno->datoj['domotipo'] == 'J') {
akceptada_instrukcio("Donu al {$ri} pakaj^on da littolaj^o.");
}
akceptada_instrukcio("Premu la suban butonon.");
akceptado_kesto_fino();
eoecho("<h3>Por la bros^uro</h3>\n");
// TODO: adaptu, kiam estos pluraj domotipoj
if ($partopreno->datoj['domotipo'] == 'J') {
$sql = datumbazdemando(array('l.nokto_de', 'cx.nomo'), array('litonoktoj' => 'l', 'cxambroj' => 'cx'), array('cx.ID = l.cxambro', "l.partopreno = '" . $partopreno->datoj['ID'] . "'"), "", array('order' => 'l.nokto_de ASC'));
$rez = sql_faru($sql);
$linio = mysql_fetch_assoc($rez);
$numero = $linio['nomo'];
} else {
$numero = 'M';
}
eoecho("<table><tr>\n<th>Nomo</th><td>" . $partoprenanto->tuta_nomo() . "</td></tr>\n<tr><th>C^ambronumero</th><td>" . $numero . "</td></tr>\n</table>\n");
eoecho("<h3>Oficiala akceptado</h3>\n");
echo "<p>";
ligu_butone("akceptado-fino.php", "Akceptu {$ri}n", "akceptu");
echo "</p>";
HtmlFino();
/**
* Montras tabelon de ĉiuj konservitaj serĉoj, kun po
* diversaj ago-eblecoj.
*/
function sercxoElektilo()
{
$sql = datumbazdemando(array("s.ID" => "ID", "s.nomo" => "sercxnomo", "e.nomo" => "entajpanto"), array("sercxoj" => "s", "entajpantoj" => "e"), "s.entajpanto = e.ID", "", array("order" => "sercxnomo ASC"));
$rez = sql_faru($sql);
if ($num = mysql_num_rows($rez)) {
eoecho(" <h3>Antau^aj serc^oj</h3>\n");
echo " <table>\n";
eoecho("<tr><th>serc^nomo</th><th>kreinto</th><th>s^arg^u</th>" . "<th>tuj serc^u</th><th>administri</th></tr>\n");
$sercxtipoj = array('HtmlTabelo' => "tabelo", 'HtmlCSV' => "CSV (k)", 'Utf8CSV' => "CSV (s^)");
while ($linio = mysql_fetch_assoc($rez)) {
eoecho(" <tr>\n");
eoecho(" <td>" . $linio['sercxnomo'] . "</td>\n");
eoecho(" <td>" . $linio['entajpanto'] . "</td>\n");
echo " <td>";
ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'], "s^arg^u");
echo "</td>\n";
echo " <td>";
foreach ($sercxtipoj as $tipo => $teksto) {
ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'] . "&sendu=sercxu&tipo=" . $tipo, $teksto);
}
echo "</td>\n";
echo " <td>";
if ($linio['entajpanto'] == $_SESSION['kkren']['entajpantonomo'] or rajtas('teknikumi')) {
ligu("sercxoj.php?sendu=redaktu&id=" . $linio['ID'], "redaktu informojn");
ligu_butone("sercxoj.php?id=" . $linio['ID'], "forigu", 'forigu');
}
echo "</td>\n";
echo " </tr>\n";
}
echo " </table>\n";
} else {
eoecho("<p>Ne ekzistas antau^aj serc^oj.</p>");
}
}
