/**
* Elektilo en tabellinio por krompago-/kromkosto/rabato-kondicxoj.
*
*<pre>
* .---------.------------------------.
* | Kondiĉo | [_______] postteksto |
* '---------'--| |-------------'
* | |
* | |
* '-------'
*</pre>
*
* En la listo aperas la kondiĉo-funkcioj uzeblaj por krompagoj, rabatoj,
* parttemp-kotizo-sistemoj, aŭ kromkostoj.
* La sendo-nomo estas "kondicxo".
*
* @param eostring $postteksto kio estas skribita apude.
* @param string $defauxlto kio estas antaŭelektita - unu
* el la identigiloj de la kondicxo-tabelo.
* @uses tabela_elektilo()
* @see tabela_ma_kondicxoelektilo()
*/
function tabela_kondicxoelektilo($postteksto = "", $defauxlto = null)
{
tabela_elektilo_db("Kondic^o", 'kondicxo', 'kondicxoj', 'nomo', 'ID', $defauxlto, '', $postteksto);
}
var_export($_SESSION);
echo "-->\n";
$renk = $_SESSION['renkontigxo']->datoj;
echo "<!-- \$_SESSION = ";
var_export($_SESSION);
echo "-->\n";
eoecho("<h2>Redaktilo por la aktuala renkontig^o</h2>\n");
eoecho("\n<form action='renkontigxo.php' method='post'>\n <h3>G^eneralaj Informoj</h2>\n <table>\n <tr><th>ID</th><td>{$renk['ID']}</td></tr>\n");
tabelentajpejo("Oficiala nomo", "nomo", $renk['nomo'], 50, "Ekzemplo: <em>49a Internacia Seminario</em>.");
tabelentajpejo("Mallongigo", "mallongigo", $renk['mallongigo'], 10, "La mallongigo estas uzata nur interne de la programo, ekzemple" . " en la maldekstra menuo. Ekzemplo estas <em>IS 2005</em>.");
tabelentajpejo("Temo", "temo", $renk['temo'], 50, "La oficiala temo de la renkontig^o. Ekzemple" . " <em>Religioj, kulturoj kaj vivfilosofioj en la 21a jarcento</em>");
tabelentajpejo("Loko", "loko", $renk['loko'], 50);
eoecho("\n </table>\n\n <h3>Kotizo-informoj</h3>\n <p>La informoj krom la elekto de la kotizosistemo ne plu estas uzataj. \n Rigardu la pag^on pri ");
ligu("kotizoj.php", "Kotizosistemoj");
eoecho(" por fari s^ang^ojn, kiuj efikas ion.</p>\n <table>\n");
tabela_elektilo_db("Kotizosistemo", 'kotizosistemo', "kotizosistemoj", "nomo", "ID", $renk['kotizosistemo'], "", "Kotizosistemo por uzi por tiu c^i renkontig^o.");
tabelentajpejo("De", "de", $renk['de'], 10, "Unua tago de la renkontig^o, en internacia formato" . " (ISO 8601). Ekzemplo: <em>2005-12-27</em>");
tabelentajpejo("G^is", "gxis", $renk['gxis'], 10, "Lasta tago de la renkontig^o, en internacia formato " . "(ISO 8601). Ekzemplo: <em>2006-01-03</em>");
tabelentajpejo("Unua kategorio", 'plej_frue', $renk['plej_frue'], 10, "Unua tago, kiu ne plu estas en la unua alig^kategorio. C^iuj alig^oj" . " antau^ tiu tago estas ankorau en la plej malmultkosta alig^kategorio." . " Ekzemplo: <em>2005-11-01</em>");
tabelentajpejo("Dua kategorio", 'meze', $renk['meze'], 10, "Unua tago, kiu ne plu estas en la dua alig^kategorio. C^iuj alig^oj" . " ekde tiu tago estas en la plej kosta alig^kategorio (C^e IS nun 20 E^" . " pli ol la antau^aj alig^oj. Ekzemplo: <em>2005-12-20</em>");
tabelentajpejo("Divido por parttempuloj", 'parttemppartoprendivido', $renk['parttemppartoprendivido'], 3, "Divisoro por kalkuli ka kotizon de parttempaj partoprenantoj." . " La kotizo estas" . " <var>tuttempa kotizo</var>*<var>partoprentagoj</var>/<var>divisoro</var>" . " do normale la divisoro estas iom malpli ol la nombro de tagoj entute." . " Ekzemplo: <em>6</em>");
tabelentajpejo("Juna", 'juna', $renk['juna'], 10, "Maksimuma ag^o por la unua ag^kategorio. Tiu valoro nun por IS ne estas " . "uzata, c^ar ni nun havas pli ol nur tri kategorioj. Ekzemplo: <em>20</em>.");
tabelentajpejo("Maljuna", 'maljuna', $renk['maljuna'], 10, "Maksimuma ag^o por la dua ag^kategorio. Tiu valoro nun por IS ne estas " . "uzata, c^ar ni nun havas pli ol nur tri kategorioj. Ekzemplo: <em>26</em>.");
eoecho("\n </table>\n\n <h3>Responduloj</h3>\n <p>\n Jen pluraj respondeculoj — kaj nomo kaj kontakta retadreso.\n Tiuj informoj estas uzataj por sendi diversajn au^tomatajn mesag^ojn\n al tiuj.\n </p>\n <table>\n");
tabelentajpejo("Admin-respondulo", "adminrespondeculo", $renk['adminrespondeculo'], 20, "");
tabelentajpejo("Admin-retadreso", "adminretadreso", $renk['adminretadreso'], 30);
tabelentajpejo("Sekurkopioj-retadreso", "sekurkopiojretadreso", $renk['sekurkopiojretadreso'], 30);
tabelentajpejo("Invitletero-respondulo", "invitleterorespondeculo", $renk['invitleterorespondeculo'], 20, "");
tabelentajpejo("Invitletero-retadreso", "invitleteroretadreso", $renk['invitleteroretadreso'], 30);
tabelentajpejo("Tema respondulo", 'temarespondulo', $renk['temarespondulo'], 20, "");
tabelentajpejo("Tema retadreso", "temaretadreso", $renk['temaretadreso'], 30);
eoecho($parta_kotizosumo);
}
eoecho("<h2>En unuopaj tabeloj</h2>\n");
echo "<div class='tabeloj-apudaj'>\n";
$kotizosistemo->metu_kotizotabelon('partoprenantonombra_cxelo', $cxiuj_datumoj, "Partoprenantonombroj");
$kotizosistemo->metu_kotizotabelon('simpla_kotizocxelo', $cxiuj_datumoj, "Kotizoj");
$kotizosistemo->metu_kotizotabelon('partkotiza_cxelo', $cxiuj_datumoj, "Sumoj de (eble parttempaj) kotizoj");
echo "</div>\n";
eoecho("<h2>Sumoj</h2>\n");
echo "<table>\n";
eoecho("<tr><th>Partoprenantonombro:</th><td>" . $ppnombro . "</td></tr>\n");
// eoecho("<tr><th>Sumo de bazaj kotizoj:</th><td>" . $baza_kotizosumo .
// "</td></tr>\n");
eoecho("<tr><th>Sumo de partaj kotizoj:</th><td>" . $parta_kotizosumo . "</td></tr>\n");
// TODO: kostoj
echo "</table>\n";
echo "<hr/>\n";
eoecho("<h2>Nova kalkulado</h2>");
}
echo "<form action='enspezokalkulado.php' method='POST'>\n";
eoecho("<p>Jen eblas elprovi kotizosistemojn, kalkulante la enspezojn" . " (kaj estonte ankau^ la elspezojn) por c^iu unuopa" . " kotizo-kategorio.</p>");
eoecho("<table>\n");
tabela_elektilo_db("Kotizosistemo", 'kotizosistemo', "kotizosistemoj");
tabela_elektilo_db("Kostosistemo", 'kostosistemo', "kostosistemoj");
tabela_elektilo_db("Renkontig^o", 'renkID', "renkontigxo");
eoecho("</table>");
echo "<p>";
butono("kalkulu", "Kalkulu");
echo "</p>";
echo "</form>";
HtmlFino();
var_export($_POST);
echo "</pre>";
}
if ($_REQUEST['id']) {
$kondicxsistemo = new Malaligxkondicxsistemo($_REQUEST['id']);
eoecho("<h1>Redaktado de malalig^kondic^sistemo " . $kondicxsistemo->datoj['nomo'] . "</h1>\n");
} else {
eoecho("<h1>Nova malalig^kondic^sistemo</h1>");
}
eoecho("<h2>Bazaj datumoj</h2>");
echo "<form action='malaligxkondicxsistemo.php' method='POST'>\n";
echo "<table>\n";
tabela_kasxilo("ID", "ID", $kondicxsistemo->datoj['ID']);
tabelentajpejo("nomo", 'nomo', $kondicxsistemo->datoj['nomo'], 20);
granda_tabelentajpejo("priskribo", "priskribo", $kondicxsistemo->datoj['priskribo'], 40, 5);
tabela_elektilo_db("alig^kategorisistemo", 'aligxkategorisistemo', 'aligxkategorisistemoj', 'nomo', 'ID', $kondicxsistemo->datoj['aligxkategorisistemo']);
echo "</table>\n";
echo "<p>";
if (!$_REQUEST['id']) {
butono("kreu", "Kreu");
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"));
/**
* montras redaktilon por la parttempajxoj.
*/
function redaktilo_por_parttempsistemoj($sistemo)
{
eoecho("<h2>Traktado de parttempuloj</h2>");
echo "<form action='kotizosistemo.php?id=" . $sistemo->datoj['ID'] . "' method='POST'>\n";
$sql = datumbazdemando('ID', 'parttempkotizosistemoj', array('baza_kotizosistemo' => $sistemo->datoj['ID']), "", array("order" => "por_noktoj ASC"));
$rez = sql_faru($sql);
echo "<table>\n";
eoecho("<tr><th>ID</th><th>noktoj</th><th>faktoro</th><th>kot.-sistemo</th><th>kondic^o</th></tr>\n");
while ($linio = mysql_fetch_assoc($rez)) {
$id = $linio['ID'];
$partsistemo = new Parttempkotizosistemo($id);
echo "<tr><td>" . $id . "</td><td>";
simpla_entajpejo("", 'parttempa[' . $id . '][por_noktoj]', $partsistemo->datoj['por_noktoj'], 4);
echo "</td><td>";
simpla_entajpejo("", 'parttempa[' . $id . '][faktoro]', $partsistemo->datoj['faktoro'], 4);
echo "</td><td>";
elektilo_simpla_db('parttempa[' . $id . '][sub_kotizosistemo]', 'kotizosistemoj', 'nomo', 'ID', $partsistemo->datoj['sub_kotizosistemo']);
echo "</td><td>";
simpla_kondicxoelektilo('parttempa[' . $id . '][kondicxo]', $partsistemo->datoj['kondicxo']);
echo "</td></tr>\n";
}
// while
echo "</table>";
butono("sxangxu_parttempsistemojn", "S^ang^u");
echo "</form>\n";
eoecho("<h3>Nova parttempsistemo</h3>");
echo "<form action='kotizosistemo.php?id=" . $sistemo->datoj['ID'] . "' method='POST'>\n";
echo "<table>";
tabela_kasxilo("en sistemo", 'baza_kotizosistemo', $sistemo->datoj['ID']);
tabelentajpejo("noktoj", 'por_noktoj', "", 4, "tiom da noktoj oni rajtas resti en tiu tarifo");
tabelentajpejo("faktoro", 'faktoro', "1", 6, "ni obligas la kotizojn de la elektita sistemo" . " per tiu faktoro.");
tabela_elektilo_db("uzata kotizosistemo", 'sub_kotizosistemo', 'kotizosistemoj', "nomo", "ID", "", "", "la kotizoj de tiu sistemo estos uzataj.");
tabela_kondicxoelektilo("Tiu kondic^o aldone devas esti plenumita", 7);
echo "</table>";
butono("nova_parttempsistemo", "Nova");
echo "</form>\n";
// TODO
echo "<hr/>\n";
// -----------------------------------------------------
}