PHP butono函数代码示例

/**
 * @param Mangxtempo $mangxtempo
 */
function montru_mangxredaktilon($mangxtempo)
{
    echo "<form action='mangxredakto.php' method='POST'>\n<table>";
    $linio = $mangxtempo->datoj;
    if (!$linio['renkontigxoID']) {
        $linio['renkontigxoID'] = $_SESSION['renkontigxo']->datoj['ID'];
    }
    tabela_kasxilo("ID", 'ID', $linio['ID']);
    tabela_kasxilo("renkontig^o-ID", 'renkontigxoID', $linio['renkontigxoID']);
    // TODO: pli bona dato-entajpilo (ekzemple simile al komenco-/findatoj)
    tabelentajpejo("Dato", 'dato', $linio['dato'], 20);
    //    echo( "<!-- mangxotipoj: " . var_export($GLOBALS['mangxotipoj'], true) . "-->");
    if ($linio['mangxotipo']) {
        $tipoj = $GLOBALS['mangxotipoj'];
    } else {
        $tipoj = array_merge(array('-' => ""), $GLOBALS['mangxotipoj']);
    }
    //    echo( "<!-- tipoj: " . var_export($tipoj, true) . "-->");
    tabela_elektilo("mang^otipo", 'mangxotipo', $tipoj, $linio['mangxotipo']);
    //    tabelentajpejo("Prezo", 'prezo', $linio['prezo'], 10);
    tabelentajpejo("Komento", 'komento', $linio['komento'], 20);
    echo "</table>\n<p>\n";
    if ($linio['ID']) {
        butono("sxangxu", "S^ang^u");
        butono("kreu", "Kreu novan");
    } else {
        butono("kreu", "Kreu");
    }
    ligu("mangxredakto.php", "Reen al la listo");
    // butono + reen
    echo "</p>\n</form>\n";
}

/**
 * Montras por unu deziro A->B la detalojn
 * de A kaj B, kaj la statuson.
 */
function montru_kunlogxdezirdetalojn($deziro)
{
    $dezirant_eno = new Partopreno($deziro->datoj['partoprenoID']);
    $deziranto = new Partoprenanto($dezirant_eno->datoj['partoprenantoID']);
    $dezirat_eno = new Partopreno($deziro->datoj['kunKiuID']);
    $dezirato = new Partoprenanto($dezirat_eno->datoj['partoprenantoID']);
    eoecho("<h2>Kunlog^deziraj detaloj</h2>");
    eoecho("<table>\n" . "<tr><th /><th>deziranto</th><th>dezirato</th></tr>\n");
    kampoj("ID", array(donu_ligon("partrezultoj.php?partoprenidento=" . $dezirant_eno->datoj['ID'], $dezirant_eno->datoj['ID']), donu_ligon("partrezultoj.php?partoprenidento=" . $dezirat_eno->datoj['ID'], $dezirat_eno->datoj['ID'])));
    kampoj("nomo", array($deziranto->tuta_nomo(), $dezirato->tuta_nomo()));
    kampoj("domotipo", array($dezirant_eno->domotipo(), $dezirat_eno->domotipo()));
    kampoj("ag^o", array($dezirant_eno->datoj['agxo'], $dezirat_eno->datoj['agxo']));
    // testas, cxu seksoj kaj deziritaj cxambrotipoj harmonias.
    if ($deziranto->sekso != $dezirato->sekso and $dezirant_eno->datoj['cxambrotipo'] == 'u' and $dezirat_eno->datoj['cxambrotipo'] == 'u') {
        kampoj("sekso", array($deziranto->sekso => "averto", $dezirato->sekso => "averto"));
        kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo() => "averto", $dezirat_eno->cxambrotipo() => "averto"));
    } else {
        if ($deziranto->sekso != $dezirato->sekso and $dezirant_eno->datoj['cxambrotipo'] == 'u') {
            kampoj("sekso", array($deziranto->sekso, $dezirato->sekso => "averto"));
            kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo() => "averto", $dezirat_eno->cxambrotipo()));
        } else {
            if ($deziranto->sekso != $dezirato->sekso and $dezirat_eno->datoj['cxambrotipo'] == 'u') {
                kampoj("sekso", array($deziranto->sekso => "averto", $dezirato->sekso));
                kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo(), $dezirat_eno->cxambrotipo() => "averto"));
            } else {
                kampoj("sekso", array($deziranto->sekso, $dezirato->sekso));
                kampoj("c^ambrotipo:", array($dezirant_eno->cxambrotipo(), $dezirat_eno->cxambrotipo()));
            }
        }
    }
    // se unu volas dulitan cxambron, tiam la alia ankaux volu.
    if ($dezirant_eno->datoj['dulita'] != $dezirat_eno->datoj['dulita']) {
        kampoj("dulita", array(jes_ne($dezirant_eno->datoj['dulita']) => "averto", jes_ne($dezirat_eno->datoj['dulita']) => "averto"));
    } else {
        kampoj("dulita c^.?", array(jes_ne($dezirant_eno->datoj['dulita']), jes_ne($dezirat_eno->datoj['dulita'])));
    }
    eoecho("</table>\n");
    $sql = datumbazdemando(array("ID"), "kunlogxdeziroj", array("partoprenoID = '" . $deziro->datoj['kunKiuID'] . "'", "kunKiuID = '" . $deziro->datoj['partoprenoID'] . "'"));
    $rez = sql_faru($sql);
    if ($linio = mysql_fetch_assoc($rez)) {
        $alia_deziro = new Kunlogxdeziro($linio['ID']);
        eoecho("<p>Estas ankau^ ");
        ligu("kunlogxado.php?kunlogxID=" . $linio['ID'], "kunlog^deziro en la inversa direkto");
        eoecho(", kies stato nun estas <em>" . $alia_deziro->stato() . "</em>");
    } else {
        eoecho("<p>Sed " . $dezirato->tuta_nomo() . " ne indikis, ke " . $dezirato->personapronomo . " volas log^i kun " . $deziranto->tuta_nomo() . ".</p>\n");
    }
    eoecho("<p>Aktuala stato de la kunlog^deziro: <em>" . $deziro->stato() . "</em>.</p>\n");
    echo "<form action='kunlogxado.php' method='POST'>\n";
    tenukasxe("kunlogxID", $deziro->datoj['ID']);
    butono("forvisxhu", "Forvis^u", "ago");
    butono("ne_eblas", "Ne eblas", "ago");
    butono("eblas", "Eblas", "ago");
    echo "</form>\n";
    eoecho("<p>C^iuj kunlog^deziroj de " . $deziranto->tuta_nomo() . ":</p>");
    montru_kunlogxdezirojn($dezirant_eno);
}

function montru_kondicxoredaktilon($kondicxo)
{
    eoecho("<h2>" . ($kondicxo->datoj['ID'] ? "S^ang^o" : "Kreo") . " de kondic^o</h2>\n");
    echo "<form action='kondicxo.php' method='POST'>\n";
    echo "<table>\n";
    tabela_kasxilo("ID", 'ID', $kondicxo->datoj['ID']);
    tabelentajpejo("Nomo", 'nomo', $kondicxo->datoj['nomo'], 30);
    $panto = $kondicxo->datoj['entajpanto'];
    tabela_kasxilo("Entajpanto", "entajpanto", $panto, $panto ? eltrovu_entajpanton($panto) : "-");
    granda_tabelentajpejo("Priskribo", "priskribo", $kondicxo->datoj['priskribo'], 60, 4);
    granda_tabelentajpejo("Kondic^okodo", "kondicxoteksto", $kondicxo->datoj['kondicxoteksto'], 60, 4);
    granda_tabelentajpejo("J^avaskripta formo", "jxavaskripta_formo", $kondicxo->datoj['jxavaskripta_formo'], 60, 4);
    echo "</table>\n<p>";
    if ($kondicxo->datoj['ID']) {
        butono('sxangxu', "S^ang^u");
    } else {
        butono('kreu', "Kreu");
    }
    echo "</form>\n";
}

/**
 * @param asciistring $ordigo la nomo de la kampo, laux kiu estu
 *                   ordigita la listo.
 */
function kreu_la_longan_liston($ordigo)
{
    eoecho("<h2>Listo de partoprenantoj kaj eblaj membroj</h2>\n");
    echo "<form action='tejomembroj.php' method='POST'>\n";
    tenukasxe("ordigo", $ordigo);
    echo "<table id='tejomembreco'>\n";
    echo "<tr><th>";
    metu_ordigoligon("p-enoID", 'ID', $ordigo);
    echo "</th><th>";
    metu_ordigoligon("UEA-kodo", 'ueakodo', $ordigo);
    echo "</th><th>";
    metu_ordigoligon("persona nomo", 'personanomo', $ordigo);
    echo "</th><th>";
    metu_ordigoligon("familia nomo", 'nomo', $ordigo);
    echo "</th><th>";
    metu_ordigoligon("urbo", 'urbo', $ordigo);
    echo "</th><th>";
    metu_ordigoligon("lando", 'landonomo', $ordigo);
    echo "</th><th>";
    metu_ordigoligon("membro lau^dire", 'tejo_membro_laudire', $ordigo);
    if ($GLOBALS['rajtas_sxangxi']) {
        echo "</th><th colspan='4'>";
    } else {
        echo "</th><th>";
    }
    metu_ordigoligon("membro lau^ kontrolo", 'tejo_membro_kontrolita', $ordigo);
    echo "</th></tr>";
    $sql = datumbazdemando(array('pa.nomo', 'pa.personanomo', 'pa.sekso', 'pa.ueakodo', 'pa.urbo', 'pn.ID', 'pn.tejo_membro_laudire', 'pn.tejo_membro_kontrolita', 'pn.partoprenantoID', 'l.nomo' => "landonomo"), array('landoj' => 'l', 'partoprenoj' => 'pn', 'partoprenantoj' => 'pa'), array('l.ID = pa.lando', 'pa.ID = pn.partoprenantoID', "pn.alvenstato != 'm'"), "", array("order" => $ordigo));
    $rez = sql_faru($sql);
    while ($linio = mysql_fetch_assoc($rez)) {
        echo "<!-- linio: {$linio['ID']} -->";
        metu_tejomembro_tabellinion($linio);
    }
    echo "</table>\n<p>";
    if ($GLOBALS['rajtas_sxangxi']) {
        butono("sxangxu", "S^ang^u");
    }
    echo "</p>\n</form>\n";
}

function redaktilo_por_kurzo($kurzo)
{
    if ($kurzo->datoj['ID']) {
        eoecho("<h2>Redakto de kurzo</h2>");
    } else {
        eoecho("<h2>Nova kurzo</h2>");
    }
    echo "<form action='kurzoj.php' method='POST'>\n";
    echo "<table>\n";
    tabela_kasxilo("ID", 'ID', $kurzo->datoj['ID']);
    tabela_elektolisto_el_konfiguroj("valuto", 'valuto', 'valuto', $kurzo->datoj['valuto'], $ppRenk);
    tabelentajpejo("dato", 'dato', $kurzo->datoj['dato'], 10);
    tabelentajpejo("kurzo", 'kurzo', $kurzo->datoj['kurzo'], 10);
    echo "</table>\n";
    echo "<p>\n";
    if ($kurzo->datoj['ID']) {
        butono('sxangxu', "S^ang^u!");
    } else {
        butono('kreu', "Enmetu!");
    }
    ligu("kurzoj.php", "Reen");
    echo "</p>\n";
    echo "</form>";
}

function montru_reguloformularon($regulo)
{
    if ($regulo->datoj['ID']) {
        eoecho("<h1>Redakto de " . $regulo->regulovorto . " <em>" . $regulo->datoj['nomo'] . "</em></h1>");
    } else {
        eoecho("<h1>Kreado de nova " . $regulo->regulovorto . "</h1>");
    }
    echo "<form action='regulo.php?tipo=" . $regulo->tipo . "' method='POST'>\n";
    echo "<table>\n";
    tabela_kasxilo("ID", "ID", $regulo->datoj['ID']);
    tabelentajpejo("nomo", "nomo", $regulo->datoj['nomo'], 20);
    tabelentajpejo("Mallongigo", "mallongigo", $regulo->datoj['mallongigo'], 10);
    granda_tabelentajpejo("Priskribo", "priskribo", $regulo->datoj['priskribo'], 40, 4);
    tabela_kondicxoelektilo("Elektu c^i tie la g^ustan kondic^on por tiu " . "krompagotipo. (Se vi bezonas aliajn, aldonu per " . donu_ligon("kondicxo.php", "la kondic^oredaktilo") . ".)", $regulo->datoj['kondicxo']);
    tabela_elektilo("uzebla", "uzebla", array('j' => 'jes', 'n' => 'ne'), $regulo->datoj['uzebla'], "C^u montri en la g^enerala listo?");
    tabela_elektilo("lau^nokte", 'lauxnokte', array('j' => 'lau^ nokto', 'n' => 'nur unufoje'), $regulo->datoj['lauxnokte'], "C^u lau^nokta krompago, c^u unufoja?");
    echo "</table>\n<p>";
    if ($regulo->datoj['ID']) {
        butono('sxangxu', "S^ang^u");
    } else {
        butono('kreu', "Kreu");
    }
    echo "</p>\n</form>";
}

<h2>Uzanto</h2>
<p>Kreas unuan uzanton. (Pliajn poste eblas krei ene de la
			programo per "grava administrado".)</p>
<table>
<?php 
tabelentajpejo("uzantnomo", "nomo", "", 20, "Salutnomo de la uzanto");
tabelentajpejo("pasvorto", "kodvorto", "", 20, "Pasvorto por ensaluti", "", "", "j");
?>
</table>
<p>Tiujn informojn bone memoru, vi bezonas ilin por ensaluti.</p>
<p><? butono("uzanto", "Kreu"); ?></p>
</form>


<form id="renkontigxo" method="POST" action="uzanto_renkontigxo.php">
<h2>Renkontiĝo</h2>
  <p>Kreas renkontiĝon. (Detaloj pri la renkontiĝo eblas meti poste ene de
			 la programo.)</p>
<table>
<?php 
tabelentajpejo("nomo", "nomo", "", 20, "Nomo de la renkontiĝo");
tabelentajpejo("mallongigo", "mallongigo", "", 8, "mallongigo de la renkontiĝo (maks. ~ 8 signoj)");
?>
</table>
<p><? butono("renkontigxo", "Kreu"); ?></p>
</form>

<p><?php 
ligu("./#instalilo", "Reen al la instalilo-superrigardo");
echo "</p>";
HtmlFino();

granda_tabelentajpejo("priskribo", "priskribo", $katsistemo->datoj['priskribo'], 40, 5);
echo "</table>\n";
echo "<p>";
if (!$_REQUEST['id']) {
    butono("kreu", "Kreu");
    echo "</p>\n</form>\n";
    HtmlFino();
    exit;
}
butono("sxangxu", "S^ang^u");
butono("kopiu", "Kopiu");
eoecho("(tiam donu novan nomon!)");
echo "</p>\n</form>\n";
echo "<hr />\n";
eoecho("<h2>" . donu_eokatnomon($tipo) . "j en <em>" . $katsistemo->datoj['nomo'] . "</em></h2>\n");
echo "<form action='kategorisistemo.php?tipo=" . $tipo . "&amp;id=" . $_REQUEST['id'] . "' method='POST'>\n";
$katsistemo->listu_kategoriojn('redaktebla');
echo "<p>";
butono("katSxangxu", "S^ang^u kategoriojn");
echo "</p>\n</form>\n";
echo "<hr />\n";
eoecho("<h2> Nova " . donu_eokatnomon($tipo) . " en <em>" . $katsistemo->datoj['nomo'] . "</em></h2>\n");
echo "<form action='kategorisistemo.php?tipo=" . $tipo . "&amp;id=" . $_REQUEST['id'] . "' method='POST'>\n";
echo "<table>\n";
$katsistemo->kreu_kategorikreilon();
echo "</table>\n<p>";
butono("katNova", "Nova kategorio");
echo "</p>\n</form>\n";
echo "<hr />\n<p>";
ligu("kategorisistemoj.php", "Reen al la listo");
HtmlFino();

// // var_export($valoroj);
// echo "-->\n";
if ($_POST['sendu'] == 'konservu') {
    konservuSercxon($_POST['nomo'], $_POST['priskribo'], base64_decode($_POST['sercxo']), $_POST['ID']);
}
if ($_POST['sendu'] == 'sxangxu') {
    sxangxu_datumbazon("sercxoj", array("nomo" => $_REQUEST['nomo'], "priskribo" => $_REQUEST['priskribo']), array("ID" => $_REQUEST['ID']));
}
if ($_REQUEST['sendu'] == 'redaktu') {
    eoecho("<h3>Redaktu serc^on #" . $_REQUEST['id'] . "</h3>");
    echo "<form action='sercxoj.php' method='post'>\n<p>";
    $sql = datumbazdemando(array("s.ID" => "ID", "s.nomo" => "nomo", "s.priskribo" => "priskribo"), array("sercxoj" => "s"), array("s.ID = '" . $_REQUEST['id'] . "'"));
    $linio = mysql_fetch_assoc(sql_faru($sql));
    eoecho("Bonvolu entajpi nomon kaj priskribon por via serc^o." . " Eblas uzi la &#99;^-kodigon por la esperantaj supersignoj" . " (&#69;^ por E^).</p>\n");
    echo "<table>";
    tabela_kasxilo('ID', 'ID', $linio['ID']);
    tabelentajpejo("Nomo:", 'nomo', $linio['nomo']);
    granda_tabelentajpejo("Priskribo:", 'priskribo', $linio['priskribo'], '60', '6');
    echo "</table><p>";
    butono("sxangxu", "S^ang^u");
    ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'], "Ne s^ang^u, montru serc^on");
    ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'] . "&sendu=sercxu", "Ne s^ang^u, tuj serc^u");
    ligu("partsercxo.php", "Reen al <em>serc^i partoprenantojn</em>");
    ligu("sercxoj.php", "Reen al la listo");
    echo "</p>\n</form>";
    HtmlFino();
    return;
}
sercxoElektilo();
ligu("gxenerala_sercxo.php", "Nova Serc^o");
HtmlFino();

sercxtabellinio("ID", 'litonoktoj', 'ID', $valoroj, "litonoktoid");
sercxtabellinio("Lito-numero", 'litonoktoj', 'litonumero', $valoroj);
sercxtabellinio("Nokto de", 'litonoktoj', 'nokto_de', $valoroj);
sercxtabellinio("Nokto g^is", 'litonoktoj', 'nokto_gxis', $valoroj);
sercxelektolinio("Rezervtipo", 'litonoktoj', 'rezervtipo', $valoroj, array('d' => 'disdonitaj', 'r' => 'rezervitaj'));
// ---------------------------
sercxtabelkapo("C^ambroj", "cxambroj", $valoroj);
sercxtabellinio("ID", 'cxambroj', 'ID', $valoroj, "cxambroid", "cambro-detaloj.php?cxambronumero=XXXXX", "c^ambro-ID");
sercxtabellinio("Nomo", 'cxambroj', 'nomo', $valoroj, "cxambronomo");
sercxtabellinio("Etag^o", 'cxambroj', 'etagxo', $valoroj);
sercxtabellinio("Lito-nombro", 'cxambroj', 'litonombro', $valoroj);
sercxelektolinio("Tipo", 'cxambroj', 'tipo', $valoroj, array('' => 'ne elektis', 'g' => 'gea', 'i' => 'ina', 'v' => 'vira'), "cxambrotipo");
sercxelektolinio("Dulita", 'cxambroj', 'dulita', $valoroj, array('J' => 'Jes', 'N' => 'Ne', 'U' => 'unulita'));
sercxtabellinio("Rimarkoj", 'cxambroj', 'rimarkoj', $valoroj, "cxambrorimarkoj");
eoecho("</table>\n");
eoecho("<p>Tipo de rezulto: ");
entajpbutono('', 'tipo', $_REQUEST['tipo'], 'HtmlTabelo', 'HtmlTabelo', "en tabelo | ", 'kutima');
entajpbutono('', 'tipo', $_REQUEST['tipo'], 'HTMLcsvDiv', 'HTMLcsvDiv', 'CSV por kopii | ');
/*entajpbutono('', 'tipo', $_REQUEST['tipo'], 'Latin1CSV', 'Latin1CSV',
	 'CSV por els^uti (Latin-1) | '); */
entajpbutono('', 'tipo', $_REQUEST['tipo'], 'UTF8csv', 'UTF8csv', 'CSV por els^uti (UTF-8)');
// TODO: cxu nur montri por teknikistoj?
entajpbutono('', 'tipo', $_REQUEST['tipo'], 'puraCSV', 'puraCSV', 'CSV por els^uti (interna formato)');
echo "</p>";
echo "<p>";
butono('sercxu', "Serc^u");
butono('dauxrigu', "Konservu");
entajpejo("Titolo: ", 'sercxo_titolo', $valoroj['sercxo_titolo'], 20);
echo "</p>";
echo "</form>\n";
HtmlFino();

} else {
    eoecho("<h1>Kreado de nova malalig^kondic^otipo</h1>");
}
echo "<form action='malaligxkondicxotipo.php' method='POST'>\n";
echo "<table>\n";
tabela_kasxilo("ID", "ID", $malaligxkondicxotipo->datoj['ID']);
tabelentajpejo("nomo", "nomo", $malaligxkondicxotipo->datoj['nomo'], 20);
/*tabelentajpejo("nomo_lokalingve", "nomo_lokalingve",
 $malaligxkondicxotipo->datoj['nomo_lokalingve'], 20); */
tabelentajpejo("mallongigo", "mallongigo", $malaligxkondicxotipo->datoj['mallongigo'], 10);
granda_tabelentajpejo("priskribo", "priskribo", $malaligxkondicxotipo->datoj['priskribo'], 40, 4);
tabela_ma_kondicxoelektilo("<span style='display:inline-block; vertical-align:text-top; max-width:70ex;'> Elektu c^i tie la g^ustan funkcion por la" . " kotizokalkulado por tiu" . " malalig^kondic^otipo. (Se vi bezonas alian" . " funkcion, necesas programi kaj aldoni g^in en" . " <code>konfiguroj/ma-kondicxoj.php</code>.)</span>", $malaligxkondicxotipo->datoj['funkcio']);
tabelentajpejo("parametro", "parametro", (string) $malaligxkondicxotipo->datoj['parametro'], 10, "Kelkaj funkcioj bezonas specialan parametron. Se vi" . " ne scias, lasu malplena.");
tabela_elektilo("uzebla", "uzebla", array('j' => 'jes', 'n' => 'ne'), $malaligxkondicxotipo->datoj['uzebla'], "C^u montri en la g^enerala listo?");
/*tabela_elektilo("lau^nokte", 'lauxnokte', array('j' => 'lau^ nokto',
                                  'n' => 'nur unufoje'),
  $malaligxkondicxotipo->datoj['lauxnokte'],
  "C^u lau^nokta krompago, c^u unufoja?");*/
echo "</table>\n<p>";
if ($_REQUEST['id']) {
    butono('sxangxu', "S^ang^u");
} else {
    butono('kreu', "Kreu");
}
echo "</p>\n</form>";
echo "<hr/>\n<p>";
ligu("kotizosistemoj.php", "C^iuj kotizosistemoj");
ligu("kategorisistemoj.php#kromtipoj", "C^iuj kategoriosistemoj");
ligu("kotizoj.php", "c^io rilate al kotizoj");
echo "</p>";
HtmlFino();

    echo "</p>\n</form>\n";
} else {
    butono("sxangxu", "S^ang^u");
    butono("kopiu", "Kopiu");
    eoecho("(tiam donu novan nomon!)");
    echo "</p>\n</form>\n";
    echo "<hr/>\n";
    eoecho("<h2>Kondic^oj por la unuopaj malalig^periodoj</h2>");
    echo "<form action='malaligxkondicxsistemo.php' method='POST'>\n";
    tenukasxe("ID", $kondicxsistemo->datoj['ID']);
    $sql = datumbazdemando(array("ID", "nomo", "limdato"), "aligxkategorioj", array("sistemoID = '" . $kondicxsistemo->datoj['aligxkategorisistemo'] . "'"), "", array("order" => "limdato DESC"));
    $rez = sql_faru($sql);
    echo "<table>\n";
    eoecho("<tr><th>ID</th><th>nomo</th><th>limdato</th>" . "<th>kondic^o</th></tr>\n");
    while ($linio = mysql_fetch_assoc($rez)) {
        $sql = datumbazdemando("kondicxtipo", "malaligxkondicxoj", array("sistemo = '" . $kondicxsistemo->datoj['ID'] . "'", "aligxkategorio = '" . $linio['ID'] . "'"));
        $lin2 = mysql_fetch_assoc(sql_faru($sql));
        eoecho("<tr><td>" . $linio['ID'] . "</td><td>" . $linio['nomo'] . "</td><td>" . $linio['limdato'] . "</td><td>");
        elektilo_simpla_db("kondicxtipo[{$linio['ID']}]", "malaligxkondicxotipoj", "nomo", "ID", $lin2['kondicxtipo'], "uzebla = 'j'");
        echo "</td></tr>\n";
    }
    echo "</table>\n<p>";
    butono("sxangxuKond", "S^ang^u kondic^ojn");
    echo "</p></form>";
}
echo "<hr/>\n<p>";
ligu("kotizosistemoj.php", "C^iuj kotizosistemoj");
ligu("kategorisistemoj.php#malaligxsistemoj", "C^iuj kategoriosistemoj");
ligu("kotizoj.php", "c^io rilate al kotizoj");
echo "</p>";
HtmlFino();

echo "<table>";
$sql = datumbazdemando(array('nokto_de', 'nokto_gxis', 'rezervtipo', 'cx.nomo' => 'cxambronomo'), array('litonoktoj', 'cxambroj' => 'cx'), array("cxambro = cx.id"), array('partopreno'), array('order' => 'nokto_de, nokto_gxis'));
$rez = sql_faru($sql);
$mialisto = array();
while ($linio = mysql_fetch_assoc($rez)) {
    $mialisto[] = formatu_litonokton($linio);
}
tabela_kasxilo("Unua partopreno:", 'ppID', $_SESSION['partopreno']->datoj['ID'], donu_ligon("partrezultoj.php?partoprenidento=" . $_SESSION['partopreno']->datoj['ID'], "#" . $_SESSION['partopreno']->datoj['ID']) . " (" . $_SESSION['partoprenanto']->tuta_nomo() . ", " . implode(", ", $mialisto) . ") ");
$cxam_sql = datumbazdemando(array("pn.ID" => 'partoprenoID', "p.nomo", "personanomo", "nokto_de", "nokto_gxis", "rezervtipo", 'cx.nomo' => 'cxambronomo'), array("litonoktoj" => "l", "partoprenoj" => "pn", "partoprenantoj" => "p", 'cxambroj' => 'cx'), array("l.partopreno = pn.ID", "pn.partoprenantoID = p.ID", "l.cxambro = cx.ID"), "renkontigxoID", array("order" => "personanomo, nomo"));
$rez = sql_faru($cxam_sql);
$templisto = array();
while ($linio = mysql_fetch_assoc($rez)) {
    // ni devas uzi iun prefikson por la sxlosiloj
    // por ke tabela_elektilo ne pensu, ke ili estas
    // nur simplaj array-indeksoj (= forjxetendaj).
    $sx = '#' . $linio['partoprenoID'];
    if (isset($templisto[$sx])) {
        $templisto[$sx]['cxambroj'][] = formatu_litonokton($linio);
    } else {
        $templisto[$sx] = array('bazaj' => $sx . " &ndash; " . $linio['personanomo'] . " " . $linio['nomo'], 'cxambroj' => array(formatu_litonokton($linio)));
    }
}
$listo = array();
foreach ($templisto as $sx => $val) {
    $listo[$sx] = $val['bazaj'] . " (" . implode(", ", $val['cxambroj']) . ")";
}
tabela_elektilo("Dua partopreno:", 'al', $listo, "", "", min(10, count($listo)));
echo "</table>\n<p>";
butono("sxangxu", "Inters^ang^u!");
echo "</p>\n</form>";
HtmlFino();

/**
 * butono kun sia propra POST-formulareto, por uzo anstataŭ
 * simpla ligo por fari iun agon.
 *
 * <strong>Ne uzu ene de aliaj formularoj!</strong>
 *
 * @param urlstring $kien - kiun paĝon voki
 * @param eostring $titolo - teksto sur la butono
 *
 * @param array|string $valoroj  Se estas string, kion sendi (teksto)
 *                                  (defaŭlto: 'ne_gravas')
 *            Se estas array(), gxi enhavu nomojn kaj valorojn sendendajn per
 *            la formularo (inkluzive la butono).
 * @param string $nomo  nomo de la butono   (defaŭlto: 'sendu')
 *            En la array-kazo, $nomo kaj $valoroj[$nomo] estas uzataj
 *            por la butono, se $valoroj[nomo] ekzistas, alikaze la
 *            unua paro en $valoroj.
 *
 * @see butono()
 * @see send_butono()
 * @see ligu()
 * @uses tenukasxe()
 * @uses butono()
 */
function ligu_butone($kien, $titolo, $valoroj = 'ne_gravas', $nomo = 'sendu')
{
    echo "<form action='" . htmlspecialchars($kien, ENT_QUOTES) . "' method='post' class='formulareto'>";
    if (is_array($valoroj)) {
        if (!isset($valoroj[$nomo])) {
            reset($valoroj);
            $nomo = key($valoroj);
        }
        $butono_valoro = $valoroj[$nomo];
        unset($valoroj[$nomo]);
        // la restantaj ni metas kaŝite
        foreach ($valoroj as $ilo => $val) {
            tenukasxe($ilo, $val);
        }
        butono($butono_valoro, $titolo, $nomo);
    } else {
        butono($valoroj, $titolo, $nomo);
    }
    echo "</form>";
}

unset($_SESSION["partopreno"]);
if (!rajtas("vidi")) {
    ne_rajtas();
}
HtmlKapo();
eoecho("<h2>Diversaj serc^oj</h2>\n");
if ($_POST['sendu'] == 'dauxrigu') {
    $valoroj = kopiuSercxon();
    $kodita = base64_encode(kodiguSercxon($valoroj));
    eoecho("<h3>Konservu serc^on</h3>");
    echo "<form action='sercxoj.php' method='post'>\n<p>";
    eoecho("Bonvolu entajpi nomon kaj priskribon por via serc^o." . " Eblas uzi la &#99;^-kodigon por la esperantaj supersignoj" . " (&#69;^ por E^).</p>\n<p>\n");
    echo "<input type='hidden' name='sercxo' value='{$kodita}'>\n";
    echo "Nomo: <input name='nomo' type='text' /> <br/>\n";
    echo "Priskribo: <textarea name='priskribo' rows='5' cols='50'></textarea>\n";
    butono("konservu", "Konservu");
    echo "</p>\n</form>";
    HtmlFino();
    return;
}
if ($_REQUEST['sendu'] == 'forigu') {
    foriguSercxon($id);
}
// echo "<!-- POST: \n";
// var_export($_POST);
// // echo "\n valoroj: \n";
// // var_export($valoroj);
// echo "-->\n";
if ($_POST['sendu'] == 'konservu') {
    konservuSercxon($_POST['nomo'], $_POST['priskribo'], base64_decode($_POST['sercxo']), $_POST['ID']);
}