?>
<form name="notizen" method="post" action="notoj.php">
<table border="0" align="center">
<tr>
<td width="40%" valign="middle" class="text">
<div align="right">tipo: </div>
</td>
<td width="60%" valign="middle" class="text">
<?php
entajpbutono("", tipo, $_SESSION["notiz"]->datoj[tipo], "telefon", telefon, " telefone<BR>");
entajpbutono("", tipo, $_SESSION["notiz"]->datoj[tipo], "persone", persone, " persone<BR>");
entajpbutono("", tipo, $_SESSION["notiz"]->datoj[tipo], "letere", letere, " letere<BR>");
entajpbutono("", tipo, $_SESSION["notiz"]->datoj[tipo], "rete", rete, " rete<BR>", "kutima");
entajpbutono("", tipo, $_SESSION["notiz"]->datoj[tipo], "rimarko", rimarko, " alia rimarko<BR>");
?>
</td>
</tr>
<tr>
<td width="40%" valign="middle" class="text">
<div align="right">dato kaj tempo:</div>
</td>
<td width="60%" valign="middle" class="text">
<input type="text" name="dato" value="<?php
if ($_SESSION["notiz"]->datoj[dato] != "") {
print $_SESSION["notiz"]->datoj[dato];
} else {
echo date("Y-m-d H:i:s");
entajpbutono("<td>", 'germanakonfirmilo', $retakonfirmilo, '=', '=', 'jes');
entajpbutono("<td>", 'germanakonfirmilo', $retakonfirmilo, '<>', '<>', 'ne');
entajpbutono("<td>", 'germanakonfirmilo', $retakonfirmilo, 'a', 'ambaux', "egalas", "kutima");
}
echo "<tr><td><b>kontrolita:</b>";
entajpbutono("<td>", 'kontrolata', $kontrolata, '=', '=', 'jes');
entajpbutono("<td>", 'kontrolata', $kontrolata, '<>', '<>', 'ne');
entajpbutono("<td>", 'kontrolata', $kontrolata, 'a', 'ambaux', "egalas", "kutima");
echo "<tr><td><b>1akonfirmilo sendata:</b>";
entajpbutono("<td>", 'konf1a', $konf1a, '<>', '<>', 'jes');
entajpbutono("<td>", 'konf1a', $konf1a, '=', '=', 'ne');
entajpbutono("<td>", 'konf1a', $konf1a, 'a', 'ambaux', "egalas", "kutima");
echo "<tr><td><b>2akonfirmilo sendata:</b>";
entajpbutono("<td>", 'konf2a', $konf2a, '<>', '<>', 'jes');
entajpbutono("<td>", 'konf2a', $konf2a, '=', '=', 'ne');
entajpbutono("<td>", 'konf2a', $konf2a, 'a', 'ambaux', "egalas", "kutima");
echo "<tr><td><b>kontribuoj:</b>";
entajpbokso("<td>", 'tema', $tema, 'J', 'J', "teme");
entajpbokso("<td>", 'distra', $distra, 'J', 'J', "distre");
entajpbokso("<td>", 'vespera', $vespera, 'J', 'J', "vespere");
if (KAMPOELEKTO_IJK) {
entajpbokso("<td>", 'helpo', $helpo, 'J', 'J', "helpo");
entajpbokso("<td>", 'lingva_festivalo', $lingva_festivalo, 'J', 'J', "lingva festivalo");
} else {
entajpbokso("<td>", 'muzika', $muzika, 'J', 'J', "muzike");
}
echo "</table>";
eoecho("<BR><b>Montri kiel:</b><BR>");
?>
<input type="radio" name="csv" value="0" checked> tabulo<br>
<input type="radio" name="csv" value="1"> csv<br>
$ago = $partopreno->datoj['surloka_membrokotizo'];
}
eoecho("<li>Lau^ la aktuala enhavo de la datumbazo, {$ri} <em>" . $partopreno->membrokotizo() . "</em>.</li>");
eoecho("<li><h3>Kion ni faru?</h3>");
/* n */
entajpbutono("<p>", 'ago', 'n', $ago, 'n', "{$Ri} ne estas membro kaj ne devas esti. " . ($estas_eksterlandano ? "<strong>(Elektu tiun por eksterlandano!)</strong>" : "") . "</p>");
/* a */
entajpbutono("<p>", 'ago', 'a', $ago, 'a', "{$Ri} estas membro, kaj jam pagis kotizon por " . deviga_membreco_jaro . " (au^ ne devas pagi, au^ donis" . " enkasigrajtigon).</p>");
/* j */
entajpbutono("<p>", 'ago', 'j', $ago, 'j', "{$Ri} jam estas membro kaj nun pagas la kotizon de ");
simpla_entajpejo("", 'kotizo-j', $partopreno->datoj['membrokotizo'], "10", "", "", " E^ kun la renkontig^a kotizo.</p>");
/* i */
entajpbutono("<p>", 'ago', 'i', $ago, 'i', "{$Ri} ig^as nova membro kaj pagas la kotizon de ");
simpla_entajpejo("", 'kotizo-i', $partopreno->datoj['membrokotizo'], "10", "", "", " E^ kun la renkontig^a kotizo.</p>");
/* h */
entajpbutono("<p>", 'ago', 'h', $ago, 'h', "{$Ri} ig^is nova membro, sed ne devas pagi nun " . "(ekzemple pro enkasigrajtigo).");
/* k */
entajpbutono("<p>", 'ago', 'k', $ago, 'k', "{$Ri} devus ig^i (au^ resti) membro, sed" . " ne ne volas kaj preferas pagi");
simpla_entajpejo(" la krompagon de ", 'kotizo-k', $partopreno->datoj['membrokotizo'], "10", "", "", " E^ kun la renkontig^a kotizo.</p>");
/* ? */
entajpbutono("<p>", 'ago', '@@@', $ago, '?', "Res^altu la datumbazeron al <em>ne jam traktita</em>" . " – ni pripensos poste kaj tiam dau^rigos la" . " akceptadon.");
echo "</li></ul>\n<p>";
tenukasxe('partoprenidento', $partopreno->datoj['ID']);
send_butono("S^ang^u");
if (necesas_lokaasocio_traktado()) {
eoecho("Necesas s^ang^i la aktualan staton antau^" . " pluiri al la sekva pas^o. ");
} else {
ligu_sekvan();
}
echo "</p>\n</form>\n";
HtmlFino();
}
// if ($partoprenanto->datoj['naskigxdato'] < TEJO_AGXO_LIMDATO)
// {
// akceptada_instrukcio("Lau^ nia kalkulo, {$ri} estas " .
// "<strong>tro ag^a</strong> por ig^i " .
// "TEJO-membro.");
// }
ligu_sekvan("TEJO-kotizo klaras.");
akceptado_kesto_fino();
if (!necesas_tejo_traktado()) {
eoecho("<p>Lau^ la opinio de la programo ne necesas " . "TEJO-traktado por tiu ulo. Vi (kiel h**o) " . "kompreneble tamen rajtas fari tion.</p>");
}
eoecho("<p>Se {$ri} estos membro de TEJO por la jaro " . TEJO_MEMBRO_JARO . ", {$ri} ricevos rabaton" . " de " . TEJO_RABATO . " E^.\n</p>");
eoecho("<h3>Aktuala stato</h3>\n");
if ($partoprenanto->datoj['naskigxdato'] < TEJO_AGXO_LIMDATO) {
eoecho("<p>Lau^ nia kalkulo, {$ri} estas " . "<strong>tro ag^a</strong> por ig^i " . "TEJO-membro. Do ne eblas ricevi TEJO-rabaton.</p>\n");
}
eoecho("<p>Lau^ la datumbazo, " . $statoteksto . "</p>\n");
eoecho("<h3>Nova stato</h3>\n");
echo "<form action='akceptado-tejo.php' method='post' class='elekto-listo'>";
entajpbutono("<p>", 'ago', 'igxu', $stato, 'igxu', "{$Ri} ig^as TEJO-membro kaj pagos ");
simpla_entajpejo("la kotizon de ", 'kotizo', $partopreno->datoj['tejo_membro_kotizo'], "10", "", " E^ kun la renkontig^a kotizo.</p>");
entajpbutono("<p>", 'ago', 'jam', $stato, 'jam', "{$Ri} jam estas TEJO-membro por " . TEJO_MEMBRO_JARO . " kaj povis pruvi tion, do ricevos rabaton sen pagi" . " apartan TEJO-kotizon.</p>");
entajpbutono("<p>", 'ago', 'ne', $stato, 'ne', "{$Ri} nek estas TEJO-membro nek volas au^ povas ig^i, kaj rezignas" . " pri la TEJO-rabato.</p>");
entajpbutono("<p>", 'ago', 'pagas', $stato, 'pagas', "{$Ri} nek estas TEJO-membro nek volas au^ povas ig^i, kaj" . " rezignas pri la TEJO-rabato.<br/> {$Ri} ial tamen pagas ");
simpla_entajpejo("", 'krompago', $partopreno->datoj['tejo_membro_kotizo'], "10", "", " E^ kun la renkontig^a kotizo al TEJO/UEA," . " ekzemple por UEA-membreco (kvankam troag^a por TEJO)," . " membreco en kategorio MG au^ membrokotizo por alia " . " persono. Certigu, ke vi notos sur tau^ga papero (ekzemple" . " la alig^ilo), kiom {$ri} pagis por kio.</p>");
echo "<p>";
tenukasxe('partoprenidento', $partopreno->datoj['ID']);
send_butono("S^ang^u");
echo "</p></form>";
HtmlFino();
eoecho("<h1>Nova invitpeto</h1>");
}
echo "<form method='POST' action='invitpeto.php'>\n";
eoecho("<p>Ni redaktas invitpeton por la alig^o #" . $_SESSION['partopreno']->datoj['ID'] . " de " . $_SESSION['partoprenanto']->tuta_nomo() . " (#" . $_SESSION['partoprenanto']->datoj['ID'] . ") al la " . $partopreno_renkontigxo->datoj['mallongigo'] . ".</p>");
echo "<table>\n";
eoecho("<tr><th colspan='2'><h2>Informoj lau^ pasporto</h2></td></tr>");
tabelentajpejo("Pasportnumero", 'pasportnumero', $aktuala_invitpeto->datoj['pasportnumero'], 30);
tabelentajpejo("Familia nomo", 'pasporta_familia_nomo', $aktuala_invitpeto->datoj['pasporta_familia_nomo'], 30);
tabelentajpejo("Persona(j) nomo(j)", 'pasporta_persona_nomo', $aktuala_invitpeto->datoj['pasporta_persona_nomo'], 30);
granda_tabelentajpejo("Adreso", 'pasporta_adreso', $aktuala_invitpeto->datoj['pasporta_adreso'], 50, 5);
eoecho("<tr><th colspan='2'><h2>Kien sendi la invitilon?</h2></td></tr>");
tabelentajpejo("Faksnumero por sendi la invitilon", 'senda_faksnumero', $aktuala_invitpeto->datoj['senda_faksnumero'], 30);
granda_tabelentajpejo("Adreso", 'senda_adreso', $aktuala_invitpeto->datoj['senda_adreso'], 50, 5);
eoecho("<tr><th colspan='2'><h2>Internaj informoj</h2></td></tr>");
eoecho("<tr><th>Partopreno-ID</th><td>#" . $_SESSION['partopreno']->datoj['ID'] . "</td></tr>");
eoecho("<tr><th>C^u sendi invitleteron?</th><td>");
entajpbutono("Decidu poste", 'invitletero_sendenda', $aktuala_invitpeto->datoj['invitletero_sendenda'], '?', '?', "|", "kutima");
entajpbutono("Jes", 'invitletero_sendenda', $aktuala_invitpeto->datoj['invitletero_sendenda'], 'j', 'j', "|");
entajpbutono("Ne", 'invitletero_sendenda', $aktuala_invitpeto->datoj['invitletero_sendenda'], 'n', 'n', "");
eoecho("</td></tr>");
tabelentajpejo("Sendodato de Invitletero", 'invitletero_sendodato', $aktuala_invitpeto->datoj['invitletero_sendodato'], 11);
echo "</table>";
echo "<p>";
tenukasxe('ID', $_SESSION['partopreno']->datoj['ID']);
if ($aktuala_invitpeto) {
butono('Sxangxu', "S^ang^u");
} else {
butono("Kreu", "Kreu");
}
ligu("partrezultoj.php", "Ne s^ang^u kaj reiru");
echo "</form>";
// echo "<!-- limdatoj: " . var_export($limdatoj, true) . "-->";
elektilo_simpla('antauxpago_gxis', $limdatoj, $ld, "", 1, 1);
entajpbutono("<br/> ", 'pagmaniero_1', $_POST['pagmaniero_1'], 'peranto', 'peranto', CH("al-peranto"), "", $klaso);
if (is_array($GLOBALS['mankas']) and in_array('pagmaniero_2', $GLOBALS['mankas'])) {
simpla_entajpejo("", 'pagmaniero_2', "", "", "", "", "", "class='mankas'");
} else {
simpla_entajpejo("", 'pagmaniero_2');
}
entajpbutono("<br/> ", 'pagmaniero_1', $_POST['pagmaniero_1'], 'ueakonto', 'ueakonto', CH("al-uea-konto"), "", $klaso);
entajpbutono("<br/> ", 'pagmaniero_1', $_POST['pagmaniero_1'], 'organizajxo', 'organizajxo', CH("al-bankkonto-de"), "", $klaso);
/**
* TODO: kiuj landaj asocioj fakte estas perantoj?
* La sama listo trovigxas cxe 'kontrolu_elekton', eble
* trovu manieron havi gxin nur unufoje.
*/
$pagmaniertradukoj = array('cxej' => CH('konto-CxEJ'), 'gej' => CH('konto-GEJ'), 'pej' => CH('konto-PEJ'), 'hej' => CH('konto-HEJ'), 'iej' => CH('konto-IEJ'), 'jefo' => CH('konto-JEFO'));
elektilo_simpla('pagmaniero_3', $pagmaniertradukoj, "");
// entajpbutono("<br/> ", 'pagmaniero_1', $_POST['pagmaniero_1'],
// 'paypal', 'paypal', CH("per-paypal"), "", $klaso);
entajpbutono("<br/> ", 'pagmaniero_1', $_POST['pagmaniero_1'], 'ne-scias', 'ne-scias', CH("al-ne-scias"), "", $klaso);
/*
aliĝilo_tabelelektilo('pagmaniero',
CH('pagmaniero', "<a href='$pagmanierojligo'>", "</a>"),
$pagolisto,
$pagodefauxlto);
*/
echo "</td>";
?>
</tr>
<?php
simpla_aliĝilo_fino(1);
$dosiernomo = '../../../phplibraro/tmp/' . traduku_tabelnomon('partoprenantoj') . '.sql.gz';
if (file_exists($dosiernomo)) {
$dato = "de " . date("Y-m-d H:i", filemtime($dosiernomo) . ".");
} else {
$dato = "ne trovebla ({$dosiernomo})!";
}
entajpbutono("<p>", "kio", $kio, "backup", "backup", "Kreu sekurkopion de la datumbazo. (La lasta estas {$dato})</p>");
$dosiernomo = '../../../phplibraro/tmp/projekto-' . $tabelnomprefikso . '.sql.gz';
if (file_exists($dosiernomo)) {
$dato = "de " . date("Y-m-d H:i", filemtime($dosiernomo) . ".");
} else {
$dato = "ne trovebla ({$dosiernomo})!";
}
entajpbutono("<p>", "kio", $kio, "backup_is", "backup_is", "Kreu sekurkopion de la datumbazo (nur IS). (La lasta estas {$dato})</p>");
if (rajtas('teknikumi')) {
entajpbutono("<p>", "kio", $kio, "backup_programo", "backup_programo", "Kreu sekurkopion de la programo.</p>");
}
send_butono('Faru!');
echo "</FORM>\n";
eoecho("<h2>Aliaj gravaj aferoj</h2>");
rajtligu("landoj.php", "rigardu kaj eble s^ang^u la landoliston", "", "administri");
eoecho("<br/>");
eoecho("<p>Elprintu partoprenstatistikon:<br/>\n");
rajtligu("demandoj.php", "partopren statistikojn", "", "administri");
echo "(das ist leider zur Zeit etwas kaputt) <br/>";
rajtligu("finkalkulado.php", "IS - Abrechnung", "", "administri");
echo "<br/>";
rajtligu("cxambrostatistiko.php", "montru la c^ambrostatistikon kaj la mang^statistikon", "", "administri");
echo "</p>";
if (rajtas("teknikumi")) {
eoecho("<h2>Nur por teh^nikistoj</h2>\n<p>");
function montru_elekto_liston($teksto_id, $pago_tipo, $butono_nomo, $kutima_teksto = '')
{
$antauxpaguloj = donu_tekston($teksto_id);
$antauxpaguloj = explode("\r\n", $antauxpaguloj);
echo "<BR><BLOCKQUOTE><p>";
$uloj = array();
foreach ($antauxpaguloj as $linio) {
// echo "hallo:".$ulo."||";
if ($linio[0] == '#') {
continue;
}
if ($linio[0] == '-') {
echo "</p>\n<p>";
continue;
}
list($ulo, $teksto) = explode("|", $linio);
$uloj[] = $ulo;
if (!isset($teksto)) {
$teksto = $kutima_teksto . $ulo;
}
entajpbutono("", $butono_nomo, $pago_tipo, $ulo, $ulo, $teksto . "<br />\n");
}
if ($pago_tipo and !in_array($pago_tipo, $uloj)) {
entajpbutono("<br/>", tipo, $pago_tipo, $pago_tipo, $pago_tipo, "<b>malnova:</b> " . $pago_tipo . "<br />\n");
}
echo "</p></BLOCKQUOTE>";
}
{
eoecho("<p>Lau^ nia kalkulo, {$ri} estas " .
"<strong>tro ag^a</strong> por ig^i " .
"TEJO-membro. Do ne eblas ricevi TEJO-rabaton.</p>\n");
}
*/
eoecho("<p>Lau^ la datumbazo, " . $statoteksto . "</p>\n");
eoecho("<h3>Nova stato</h3>\n");
echo "<form action='akceptado-uea.php' method='post' class='elekto-listo'>";
entajpbutono("<p>", 'ago', 'igxu', $stato, 'igxu', "{$Ri} ig^as UEA-membro kaj pagos la UEA-kotizon kun la" . " renkontig^a kotizo.");
simpla_entajpejo("<br/>Kotizo: ", 'kotizo', $uea_krompago->datoj['kvanto'], 10);
$valuto = $uea_krompago->datoj['valuto'] or $valuto = 'EUR';
simpla_elektolisto_el_konfiguroj('kotizo_valuto', 'valuto', $valuto);
entajpbutono("<p>", 'ago', 'jam', $stato, 'jam', "{$Ri} jam estas UEA-membro por " . TEJO_MEMBRO_JARO . " kaj povis pruvi tion, do ricevos rabaton sen pagi" . " apartan UEA-kotizon.</p>");
entajpbutono("<p>", 'ago', 'ne', $stato, 'ne', "{$Ri} nek estas UEA-membro nek volas au^ povas ig^i, kaj " . "rezignas pri la UEA-rabato.</p>");
/*
entajpbutono("<p>", 'ago', 'pagas', $stato, 'pagas',
"{$Ri} nek estas UEA-membro nek volas au^ povas ig^i, kaj".
" rezignas pri la UEA-rabato.<br/> {$Ri} ial tamen pagas ");
simpla_entajpejo("", 'krompago', $partopreno->datoj['tejo_membro_kotizo'],
"10", "", " E^ kun la renkontig^a kotizo al TEJO/UEA," .
" ekzemple por UEA-membreco (kvankam troag^a por TEJO)," .
" membreco en kategorio MG au^ membrokotizo por alia " .
" persono. Certigu, ke vi notos sur tau^ga papero (ekzemple".
" la alig^ilo), kiom $ri pagis por kio.</p>");
*/
echo "<p>\n";
tenukasxe('partoprenidento', $partopreno->datoj['ID']);
send_butono("S^ang^u");
echo "\n</p></form>\n";
if ($redaktu == 'nova') {
$linio = array("ID" => 'nova');
eoecho("<p> Ni aldonas novan landon\n");
} else {
$sql = datumbazdemando('*', 'landoj', "ID = '{$redaktu}'");
$rez = sql_faru($sql);
$linio = mysql_fetch_assoc($rez);
eoecho("<p>ID: {$linio['ID']}\n");
}
tenukasxe("ID", $linio['ID']);
echo "<br/>\n<table>";
tabelentajpejo("esperantlingva nomo:", "nomo", $linio['nomo'], 20);
tabelentajpejo("lokalingva nomo:", "lokanomo", $linio['lokanomo'], 20);
entajpbutono("<tr><th>Landokategorio:</th><td>", 'kategorio', $linio['kategorio'], 'A', 'A', "A ");
entajpbutono(" | ", 'kategorio', $linio['kategorio'], 'B', 'B', "B ");
entajpbutono("| ", 'kategorio', $linio['kategorio'], 'C', 'C', "C", "kutima");
echo "</td></tr>\n</table><br/>\n";
eoecho(" ... en la datumbazon.</p>");
// echo "<br/>\n";
if ($id == 'nova') {
send_butono("S^ang^u");
} else {
send_butono("Aldonu");
}
entajpbokso("<p>(", "redaktu", "", "jes", $linio['ID'], "Pluredaktu tiun c^i landon.)", "", "sen kasxa");
ligu("landoj.php", "Reen al la listo");
if ($redaktu != "nova") {
ligu("landoj.php?forigu={$redaktu}", "Forigu tiun c^i landon!");
}
echo "</p>";
echo "</form>\n";
eoecho("<p>Finita.</p>");
ligu("partrezultoj.php?partoprenantoidento=" . $ppeno->datoj['partoprenantoID'], "Reen");
HtmlFino();
exit;
}
}
}
break;
default:
// faru nenion.
}
sesio_aktualigu_laux_get();
$panto = $_SESSION['partoprenanto'];
$panto->montru_aligxinto("sen bla");
eoecho("<p>Kion vi volas forigi?</p>");
echo "<form action='partoprenforigo.php?panto=" . $panto->datoj['ID'] . "' method='POST'>\n";
entajpbutono("<ul>\n<li>", 'kion', "", "partoprenanto", "partoprenanto", "La partoprenanton #" . $panto->datoj['ID'] . " (" . $panto->tuta_nomo() . ") kun c^iuj " . $panto->personapronomo . "aj partoprenoj kaj la sekvaj notoj:");
listu_notojn($panto->datoj['ID']);
echo "</li>\n";
$sql = datumbazdemando(array("pp.ID" => "enoID", "r.ID" => "rID", "r.mallongigo", "pp.de", "pp.gxis"), array("partoprenoj" => "pp", "renkontigxo" => "r"), array("pp.renkontigxoID = r.ID", "pp.partoprenantoID = '" . $panto->datoj['ID'] . "'"), "", array("order" => "pp.ID"));
$rez = sql_faru($sql);
while ($linio = mysql_fetch_assoc($rez)) {
entajpbutono("<li>", 'kion', "", $linio['enoID'], $linio['enoID'], "La partoprenon " . donu_ligon("partrezultoj.php?partoprenidento=" . $linio['enoID'], "#" . $linio['enoID'] . " en " . $linio['mallongigo']) . " (" . $linio['de'] . "—" . $linio['gxis'] . ") </li>\n");
}
entajpbutono("<li>", 'kion', "", "nenion", "nenion", "Mi nenion volas forigi nun.</li>\n</ul>\n", "kutima");
eoecho("<p>Atentu, ne eblos restarigi iam forigitajn datumojn!</p>\n<p>");
butono('forigu', "Forigu!");
// TODO: eble uzu $_SESSION['sekvontapagxo'] ?
ligu("partrezultoj.php?partoprenantoidento=" . $anto->datoj['ID'], "Reen");
echo "</p>\n</form>\n";
HtmlFino();
?>
<br/><BR>
<b>Rimarkoj:</b> Mi havas la jenajn rimarkojn:<BR>
<textarea name="rimarkoj" cols="57" rows="5" wrap="soft"><?php
print $_SESSION["partopreno"]->datoj[rimarkoj];
?>
</textarea>
<hr/>
<?php
// entajpbokso("<BR>","ekskursbileto",$_SESSION["partopreno"]->datoj[ekskursbileto][0],"J",
// "JES","Mi mendas bileton por la tutaga ekskurso (krompago de 7 E^)");
entajpbutono("interreta listo:", 'listo', $_SESSION['partopreno']->datoj['listo'], 'J', 'J', "Mi volas aperi", "kutima");
entajpbutono(" ", 'listo', $_SESSION['partopreno']->datoj['listo'], 'N', 'N', "Mi ne volas aperi");
entajpbutono("<br/>postrenkontig^a partoprenintolisto:", 'intolisto', $_SESSION['partopreno']->datoj['intolisto'], 'J', 'J', "Mi volas aperi", "kutima");
entajpbutono(" ", 'intolisto', $_SESSION['partopreno']->datoj['intolisto'], 'N', 'N', "Mi ne volas aperi");
entajpejo("<br/>Pagmaniero lau^ alig^ilo:", 'pagmaniero', $_SESSION["partopreno"]->datoj['pagmaniero'], 20);
entajpbokso("<hr/>", "KKRen", $_SESSION["partopreno"]->datoj['KKRen'][0], "J", "J", "estas " . organizantoj_nomo . "ano (validas por la 1a kategorio).<BR>");
echo "<hr/>";
$vosto = date("Y-m-d");
entajpejo("<br> alvenodato (de la alig^ilo):", aligxdato, $_SESSION["partopreno"]->datoj[aligxdato], 11, "", "{$vosto}", " (jaro-monato-tago)");
if ($_SESSION["partopreno"]->datoj[aligxdato] != "" and !kontrolu_daton($_SESSION["partopreno"]->datoj[aligxdato])) {
erareldono("La dato kion vi entajpis ne ekzistas au^ estis malg^uste.");
}
if ($_SESSION["partopreno"]->datoj[aligxkategoridato] == "0000-00-00") {
$_SESSION["partopreno"]->datoj[aligxkategoridato] = "";
}
entajpejo("<br> relevanta dato por la alig^kategorio:", aligxkategoridato, $_SESSION["partopreno"]->datoj[aligxkategoridato], 11, "", "", " (jaro-monato-tago)<BR>(Nur uzu por specialaj rabatoj)");
if ($_SESSION["partopreno"]->datoj[aligxkategoridato] and !kontrolu_daton($_SESSION["partopreno"]->datoj[aligxkategoridato])) {
erareldono("La dato kion vi entajpis ne ekzistas au^ estis malg^uste.");
}
/**
* Montras la aktualan staton de cxambro.
* $grandeco: - se ne donita aux "malgranda", montras nur
* - se "granda", ...
* verda se estas tauxga
* rugxa se ne tauxgas (pro sekso)
*/
function montru_cxambron($cxambro, $renkontigxo, $partoprenanto, $partopreno, $grandeco = "malgranda")
{
$cxam_sql = datumbazdemando(array("litonombro", "nomo", "tipo", "etagxo", "dulita", "rimarkoj"), "cxambroj", "ID = '{$cxambro}'");
$cxam_rezulto = sql_faru($cxam_sql);
$row = mysql_fetch_array($cxam_rezulto, MYSQL_BOTH);
if (tauxgas($partopreno->datoj[cxambrotipo], $partoprenanto->datoj[sekso], $row[tipo])) {
$koloro = "green";
} else {
if ($row[tipo] == '') {
$koloro = "black";
} else {
$koloro = "red";
}
}
if ($grandeco == "granda") {
ligu("cxambroj.php?etagxo=" . $row[etagxo], "Etag^o " . $row[etagxo]);
echo " |";
}
ligu("cxambroj.php?cxambronombro={$cxambro}", "C^ambro: {$row['nomo']}");
echo "<font color={$koloro}><strong>";
if ($row[tipo] == "v") {
echo " (vira)";
} else {
if ($row[tipo] == "i") {
echo " (ina)";
} else {
if ($row[tipo] == "g") {
echo " (gea)";
} else {
echo " (nedifinita)";
}
}
}
echo "</strong></font>\n";
rajtligu("kreu_cxambron.php?id={$cxambro}", $grandeco == 'granda' ? "redaktu bazajn informojn" : "red.", "", "teknikumi", "ne");
if ($grandeco == "granda") {
//sxangxi la cxambrotipon
echo "<form action='cxambroj.php?cxambronombro={$cxambro}' method='post'>";
entajpbutono("(", "tipo", $row[tipo], "g", "g", 'gea');
entajpbutono("", "tipo", $row[tipo], "v", "v", 'vira');
entajpbutono("", "tipo", $row[tipo], "i", "i", 'ina)');
entajpbokso("[", dulita, $row[dulita], J, J, "dulita c^ambro]");
entajpejo("<BR>Rimarkoj:", "rimarkoj", $row[rimarkoj], 20);
send_butono("Ek!");
echo "</form>";
}
$renkontigxdauxro = kalkulu_tagojn($renkontigxo->datoj[de], $renkontigxo->datoj[gxis]);
$partoprentagoj = kalkulu_tagojn($partopreno->datoj[de], $partopreno->datoj[gxis]);
if ($partoprenanto->datoj[ID] and $grandeco == "granda") {
echo "<form ACTION='cxambroj.php?cxambronombro={$cxambro}' METHOD='POST'>\n";
}
echo "<Table border><TR><TD>Nokto: ";
if ($grandeco == "granda") {
$manko = eltrovu_litojn($partopreno->datoj[ID]);
$ar = JMTdisigo($renkontigxo->datoj[de]);
$tago = $ar[tago];
for ($noktoj = 1; $noktoj <= $renkontigxdauxro; $noktoj++) {
$ar = JMTdisigo(sekvandaton($renkontigxo->datoj[de], $noktoj));
$sektago = $ar[tago];
echo "<TD align=\"center\"> {$tago} / {$sektago}";
$tago = $sektago;
}
echo "<TD><TD align=\"center\">tuta tempo";
} else {
for ($noktoj = 1; $noktoj <= $renkontigxdauxro; $noktoj++) {
echo "<TD>{$noktoj}</noktoj>";
}
}
for ($litoj = 1; $litoj <= $row[litonombro]; $litoj++) {
echo "<TR valign = center>\n<TD nowrap>Lito: " . $litoj;
$uzata = false;
for ($noktoj = 1; $noktoj <= $renkontigxdauxro; $noktoj++) {
$r = cxambro_uzata($cxambro, $noktoj, $litoj);
$diferenco = $r[nokto_gxis] - $noktoj;
echo "<TD align = center ";
if ($diferenco > 0) {
$noktoj += $diferenco++;
//TODO:? hehe [respondo de Martin:] Das ist einfach nur eine geniale Funktion.
echo "colspan = {$diferenco} ";
}
if ($r[rezervtipo] == "d") {
echo " bgcolor=green> ";
$uzata = true;
} else {
if ($r[rezervtipo] == "r") {
echo " bgcolor=yellow> ";
$uzata = true;
} else {
if ($partoprenanto and $grandeco == "granda" and sekvandaton($renkontigxo->datoj[de], $noktoj - 1) >= $partopreno->datoj[de] and sekvandaton($renkontigxo->datoj[de], $noktoj) <= $partopreno->datoj[gxis] and $manko[$noktoj] != "1") {
echo "";
entajpbokso(">", "nokto[{$noktoj}]", "falseoderso", "", "{$litoj}", "", "", "ne");
} else {
echo " bgcolor=white>--";
}
}
}
echo "<A href = \"partrezultoj.php?partoprenidento={$r['3']}&partoprenantoidento={$r['0']}\" onClick=\"doSelect({$r['0']});\">";
if (($grandeco == "granda" or $diferenco > 3) and $r[partoprenantoID]) {
$loka_partoprenanto = new Partoprenanto($r[partoprenantoID]);
$teksto = $loka_partoprenanto->datoj[personanomo] . " " . $loka_partoprenanto->datoj[nomo] . " (" . eltrovu_landon($loka_partoprenanto->datoj[lando]) . " / " . $loka_partoprenanto->datoj[sekso] . "/" . $loka_partopreno->datoj[agxo] . ")";
if ($grandeco == "granda") {
eoecho($teksto . "<BR> ");
} else {
eoecho($teksto);
}
//eoecho (/*substr*/($teksto,0,$diferenco*3));
}
if ($diferenco > 3 and !$r[partoprenantoID] or $grandeco == "granda") {
switch ($r[rezervtipo]) {
case "d":
echo "disdonita";
break;
case "r":
echo "rezervita";
break;
}
} else {
if ($diferenco < 4) {
echo $r[rezervtipo];
}
}
echo "</A>";
}
if ($partoprenanto and $grandeco == "granda") {
echo "<TD> <TD align=center>";
if ($uzata == false and $partoprentagoj == $renkontigxdauxro and $manko[sumo] == 0) {
entajpbokso("", "tute", "falseoderso", "", "{$litoj}", "", "", "ne");
}
}
}
echo "</Table>";
if ($partoprenanto->datoj[ID] and $grandeco == "granda") {
echo "<select name=\"tipo\" size=1>\n";
echo "<option selected>rezervi\n";
echo "<option>disdoni\n";
echo "</select><BR>\n";
send_butono("Faru!");
echo "</FORM>";
}
if ($grandeco != "granda") {
eoecho($row[rimarkoj]);
}
}
<br/><BR>
<b>Rimarkoj:</b> Mi havas la jenajn rimarkojn:<BR>
<textarea name="rimarkoj" cols="57" rows="5" wrap="soft"><?php
print $_SESSION["partopreno"]->datoj[rimarkoj];
?>
</textarea>
<hr/>
<?php
// entajpbokso("<BR>","ekskursbileto",$_SESSION["partopreno"]->datoj[ekskursbileto][0],"J",
// "JES","Mi mendas bileton por la tutaga ekskurso (krompago de 7 E^)");
entajpbokso("interreta Listo: ", 'listo', $_SESSION['partopreno']->datoj[listo][0], "N", "NE", "Mi ne volas aperi en la interreta listo de la partoprenantoj.", "", "ne");
entajpejo("<br/>Pagmaniero lau^ alig^ilo:", 'pagmaniero', $_SESSION["partopreno"]->datoj['pagmaniero'], 20);
echo "<hr/>";
entajpbutono(deviga_membreco_nomo . "-membro: ", GEJmembro, $_SESSION["partopreno"]->datoj[GEJmembro][0], "J", JES, jes);
entajpbutono("", GEJmembro, $_SESSION["partopreno"]->datoj[GEJmembro][0], "N", NE, "ne", "kutima");
eoecho("<BR>(Estas krompago de " . $_SESSION["renkontigxo"]->datoj[nemembrecpunpago] . " E^ por " . nemembreculoj . " kiuj ne estas membro de " . deviga_membreco . ", sed eblas membrig^i surloke)\n");
entajpbokso("<br/>", "kunmangxas", $_SESSION["partopreno"]->datoj[kunmangxas][0], "J", "JES", "kunmang^as (nur por specila uzo)");
entajpbokso("<BR>", "KKRen", $_SESSION["partopreno"]->datoj[KKRen][0], "J", "JES", "estas " . organizantoj_nomo . "ano (validas por la 1a kategorio).<BR>");
//<!-- fino ---- nur por KKRenanoj ---- -->
echo "<hr/>";
$vosto = date("Y-m-d");
entajpejo("<br> alvenodato (de la alig^ilo):", aligxdato, $_SESSION["partopreno"]->datoj[aligxdato], 11, "", "{$vosto}", " (jaro-monato-tago)");
if ($_SESSION["partopreno"]->datoj[aligxdato] != "" and !kontrolu_daton($_SESSION["partopreno"]->datoj[aligxdato])) {
erareldono("La dato kion vi entajpis ne ekzistas au^ estis malg^uste.");
}
if ($_SESSION["partopreno"]->datoj[aligxkategoridato] == "0000-00-00") {
$_SESSION["partopreno"]->datoj[aligxkategoridato] = "";
}
entajpejo("<br> relevanta dato por la alig^kategorio:", aligxkategoridato, $_SESSION["partopreno"]->datoj[aligxkategoridato], 11, "", "", " (jaro-monato-tago)<BR>(Nur uzu por specialaj rabatoj)");
if ($_SESSION["partopreno"]->datoj[aligxkategoridato] and !kontrolu_daton($_SESSION["partopreno"]->datoj[aligxkategoridato])) {
entajpbutono("<td>", germanakonfirmilo, $retakonfirmilo, '=', '=', jes);
entajpbutono("<td>", germanakonfirmilo, $retakonfirmilo, '<>', '<>', ne);
entajpbutono("<td>", germanakonfirmilo, $retakonfirmilo, a, ambaux, "egalas", "kutima");
}
echo "<tr><td><b>kontrolita:</b>";
entajpbutono("<td>", kontrolata, $kontrolata, '=', '=', jes);
entajpbutono("<td>", kontrolata, $kontrolata, '<>', '<>', ne);
entajpbutono("<td>", kontrolata, $kontrolata, a, ambaux, "egalas", "kutima");
echo "<tr><td><b>1akonfirmilo sendata:</b>";
entajpbutono("<td>", konf1a, $konf1a, '<>', '<>', jes);
entajpbutono("<td>", konf1a, $konf1a, '=', '=', ne);
entajpbutono("<td>", konf1a, $konf1a, a, ambaux, "egalas", "kutima");
echo "<tr><td><b>2akonfirmilo sendata:</b>";
entajpbutono("<td>", konf2a, $konf2a, '<>', '<>', jes);
entajpbutono("<td>", konf2a, $konf2a, '=', '=', ne);
entajpbutono("<td>", konf2a, $konf2a, a, ambaux, "egalas", "kutima");
echo "<tr><td><b>kontribuoj:</b>";
entajpbokso("<td>", tema, $tema, J, J, "teme");
entajpbokso("<td>", distra, $distra, J, J, "distre");
entajpbokso("<td>", vespera, $vespera, J, J, "vespere");
if (KAMPOELEKTO_IJK) {
entajpbokso("<td>", 'helpo', $helpo, 'J', 'J', "helpo");
entajpbokso("<td>", 'lingva_festivalo', $lingva_festivalo, 'J', 'J', "lingva festivalo");
} else {
entajpbokso("<td>", muzika, $muzika, J, J, "muzike");
}
echo "</table>";
eoecho("<BR><b>Montri kiel:</b><BR>");
?>
<input type="radio" name="csv" value="0" checked> tabulo<br>
<input type="radio" name="csv" value="1"> csv<br>
montru_landoelektilon(5, $_SESSION["partoprenanto"]->datoj["lando"]);
entajpejo("S^ildlando (se alia):", sxildlando, $_SESSION["partoprenanto"]->datoj[sxildlando], 30, "", "", "");
echo "<hr/>";
entajpejo("Telefono:", telefono, $_SESSION["partoprenanto"]->datoj[telefono], 30, "", "", "(internacie)");
entajpejo("Retpos^to:", retposxto, $_SESSION["partoprenanto"]->datoj[retposxto], 40);
if (KAMPOELEKTO_IJK) {
granda_entajpejo("Tujmesag^iloj", 'tujmesagxiloj', $_SESSION['partoprenanto']->datoj['tujmesagxiloj']);
} else {
entajpejo("Telefakso:", telefakso, $_SESSION["partoprenanto"]->datoj[telefakso], 30, "", "", "(internacie)");
}
echo "<hr/>\n";
entajpejo("UEA-kodo:", "ueakodo", $_SESSION['partoprenanto']->datoj['ueakodo'], 6);
echo "<hr/>\n";
entajpbutono("sendu informmesag^ojn:", 'retposxta_varbado', $_SESSION["partoprenanto"]->datoj['retposxta_varbado'], 'j', 'j', 'en x-kodo', 'defauxlto');
entajpbutono("", 'retposxta_varbado', $_SESSION["partoprenanto"]->datoj['retposxta_varbado'], 'u', 'u', 'en unikodo');
entajpbutono("", 'retposxta_varbado', $_SESSION["partoprenanto"]->datoj['retposxta_varbado'], 'n', 'n', 'tute ne');
echo "<hr/>\n";
entajpbokso("", "nekontrolu", $nekontrolu, "JES", "JES", "Se vi maldeziras datkontroladon pro problemojn, marku c^i tie.");
echo "<br/>\n";
echo "</td><td width=10%></td></tr></table>\n";
echo "<div align=center>\n";
if ($_SESSION["ago"] == "sxangxi") {
if (strpos($_SESSION['sekvontapagxo'], '?') === false) {
$aldono = '?';
} else {
$aldono = '&';
}
ligu($_SESSION["sekvontapagxo"] . $aldono . "partoprenantoidento=" . $_SESSION["partoprenanto"]->datoj[ID], "ne s^ang^u kaj reen ");
send_butono("S^ang^u!");
//sqlago=forgesu&
} else {
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();
case 'j?':
eoecho("{$ri} asertis esti membro de TEJO por " . TEJO_MEMBRO_JARO . ", kaj kontrolo ne jam okazis.");
$stato = 'igxu';
break;
case 'ji':
case 'ni':
eoecho("<p>{$ri} decidis ig^i surloke membro de TEJO por " . TEJO_MEMBRO_JARO . " kaj pagis au^ pagos la kotizon de " . $partopreno->datoj['tejo_membro_kotizo'] . " E^.");
$stato = 'igxu';
break;
case 'nn':
case 'n?':
eoecho("{$ri} ne estas TEJO-membro por " . TEJO_MEMBRO_JARO . ".");
$stato = 'ne';
default:
darf_nicht_sein("illegaler Zustand von <code>tejo_membro_laudire</code> (" . $partopreno->datoj['tejo_membro_laudire'] . ") oder <code>tejo_membro_kontrolita</code (" . $partopreno->datoj['tejo_membro_kontrolita'] . ").");
}
eoecho(" Kion ni faru?</p>");
entajpbutono("<p>", 'ago', 'igxu', $stato, 'igxu', "{$Ri} ig^as TEJO-membro kaj pagas ");
simpla_entajpejo("la kotizon de ", 'kotizo', $partopreno->datoj['tejo_membro_kotizo'], "10", "", "", " E^ kun la renkontig^a kotizo.</p>");
entajpbutono("<p>", 'ago', 'jam', $stato, 'jam', "{$Ri} jam estas TEJO-membro por " . TEJO_MEMBRO_JARO . " kaj povis pruvi tion, do ricevos rabaton sen pagi" . " apartan TEJO-kotizon.</p>");
entajpbutono("<p>", 'ago', 'ne', $stato, 'ne', "{$Ri} nek estas TEJO-membro nek volas au^ povas ig^i, kaj rezignas" . " pri la TEJO-rabato.</p>");
echo "</li></ul><p>";
tenukasxe('partoprenidento', $partopreno->datoj['ID']);
send_butono("S^ang^u");
if (necesas_lokaasocio_traktado()) {
ligu("akceptado-lokaasocio.php", "TEJO-kotizo klaras, plu al <em>membreco c^e " . deviga_membreco_nomo . "</em>.");
} else {
ligu("akceptado-cxambro.php", "TEJO-kotizo klaras, plu al <em>cxambroj</em>.");
}
echo "</p></form>";
HtmlFino();
/**
* kreas elekto-liston (per radiaj butonoj) el datumbaza teksto, ekzemple
* por rabatkauxzoj aux (antaux)pagotipoj.
*
* Jen gramatiko:
* <pre>
* listo -> linio (1)
* -> linio '\n' listo (2)
*
* linio -> komento (4)
* -> elektero (5)
* -> dividilo (6)
* komento -> '#' komento-enhavo (7)
* elektero -> kodo (8)
* -> kodo '|' enhavo (9)
* dividilo -> '-' komento-enhavo (10)
* komento-enhavo -> <em>teksto, sen '\n'</em> (11)
* (ne estos uzata)
* kodo -> <em>teksto, sen '\n' kaj '|'.</em> (12)
* Estos uzata kiel valoro por
* sendi, se tiu butono estas
+ elektita.</em>
* enhavo -> <em>teksto, sen '\n' kaj '|'.</em> (13)
* Tiu estos montrata kiel teksto
* de la radia butono.
* Eblas uzo de c^-kodigo.
* </pre>
* @param string $teksto_id kodo por trovi la ĝustan tekston
* el la datumbazo.
* @param string $valoro kiu el la kodoj estu antauxelektita. Se estas ne-nula
* kaj mankas en la listo, ni kreas apartan elekteblecon por
* tiu.
* @param string $butono_nomo je kiu nomo sendi la rezulto al la servilo.
* @param string $kutima_teksto prefikso por krei la radiobutono-tekston
* en kazo (8).
* @param string $renkontigxo renkontigxo-objekto. Se ne donita, uzas
* $_SESSION['renkontigxo'] aux $GLOBALS['renkontigxo'].
*/
function montru_elekto_liston($teksto_id, $valoro, $butono_nomo, $kutima_teksto = '', $renkontigxo = '')
{
$teksto = donu_renkkonfiguron($teksto_id, $renkontigxo);
$listo = explode("\n", $teksto);
echo "<p>\n";
$uloj = array();
foreach ($listo as $linio) {
$linio = trim($linio);
// echo "hallo:".$ulo."||";
if ($linio[0] == '#') {
// komento
continue;
}
if ($linio[0] == '-') {
// nova grupo
echo "</p>\n<p>";
continue;
}
list($ulo, $teksto) = explode("|", $linio);
$uloj[] = $ulo;
if (!isset($teksto)) {
$teksto = $kutima_teksto . $ulo;
}
entajpbutono("", $butono_nomo, $valoro, $ulo, $ulo, $teksto . "<br />");
}
// $valoro ne estas en la listo
if ($valoro and !in_array($valoro, $uloj)) {
echo "</p><p>";
entajpbutono("", $butono_nomo, $valoro, $valoro, $valoro, "<b>malnova:</b> " . $valoro . "\n");
}
echo "</p>";
}
/**
* Montras la formularon kun diversaj opcioj gravaj
* por administrantoj.
*/
function montru_administradan_formularon()
{
eoecho("<h2>Grava Administrado</h2>");
eoecho("<form action='administrado.php' method='post'>\n");
eoecho("<p>Printu:<BR>");
entajpbutono("", 'kio', valoro($_POST['kio']), "n", 'n', "noms^ildojn", "kutima");
entajpbutono("(", "nkkren", valoro($_POST['nkkren']), "cxiuj", "cxiuj", "c^iuj", "kutima");
entajpbutono("|", "nkkren", valoro($_POST['nkkren']), "nur", "nur", "nur " . organizantoj_nomo);
entajpbutono("|", "nkkren", valoro($_POST['nkkren']), "sen", "sen", "sen " . organizantoj_nomo . " )");
// entajpejo("(Nur por: ", "kiuj", $_POST['kiuj'], "", "", "", ")");
echo "<br/>";
entajpbutono("", 'kio', valoro($_POST['kio']), 's', 's', "specialajn noms^ildojn");
entajpbutono("<br/>", 'kio', valoro($_POST['kio']), "m", 'm', "mang^kuponojn");
entajpbutono("(", 'tipo', valoro($_POST['tipo']), "N", 'N', 'viande', "kutima");
entajpbutono("", 'tipo', valoro($_POST['tipo']), "A", 'A', 'vegane');
entajpbutono("", 'tipo', valoro($_POST['tipo']), "J", 'J', "vegetare)");
entajpbutono("<br/>", 'kio', valoro($_POST['kio']), "k", 'k', 'konfirmilojn');
entajpbutono("<br/>", 'kio', valoro($_POST['kio']), "a", 'a', 'akceptofoliojn');
entajpbutono("</p><p>Por ", 'nombro', valoro($_POST['nombro']), 1, 1, " 1 pag^o", "kutima");
entajpbutono(" ", 'nombro', valoro($_POST['nombro']), 5, 5, " 5 pag^oj");
entajpbutono(" ", 'nombro', valoro($_POST['nombro']), 20, 20, " 20 pag^oj");
entajpbutono(" ", 'nombro', valoro($_POST['nombro']), 999, 999, " c^iuj");
entajpbutono(" ", 'nombro', valoro($_POST['nombro']), 'speciale', 'speciale', "tiom: ");
simpla_entajpejo("", 'nombro_speciale', valoro($_POST['nombro_speciale']), 4, "", "(nur por akceptofolioj)");
simpla_entajpejo(", ekde ", 'ekde', valoro($_POST['ekde']) + valoro($_POST['nombro_speciale'], 0), 4);
entajpbokso("<p>", 'savu', valoro($_POST['savu'], "N"), "J", "J", "Savu ke vi premis/sendis en la partoprendatumoj");
entajpbokso("<BR>", 'sen', valoro($_POST['sen']), "s", "s", "malplenaj folioj</p>");
entajpbutono("<p>", 'kio', valoro($_POST['kio']), "adres", 'adres', "elprintu adresaron ");
entajpbokso("(", 'bunta', valoro($_POST['bunta']), 'JES', 'JES', "buntan,", "kutima");
entajpbokso(" ", 'granda', valoro($_POST['granda']), 'JES', 'JES', "grandan (por korekti))");
entajpbutono("<p>", 'kio', valoro($_POST['kio']), "gepatra_permeso", "gepatra_permeso", "kreu malplenajn gepatrajn permesilojn<br/>");
/*
$dosiernomo = '../../../phplibraro/tmp/' .traduku_tabelnomon('partoprenantoj') . '.sql.gz';
if (file_exists($dosiernomo))
{
$dato = "de " . date("Y-m-d H:i", filemtime($dosiernomo) .".");
}
else
{
$dato = "ne trovebla ($dosiernomo)!";
}
entajpbutono ("<p>","kio",$kio, "backup","backup",
"Kreu sekurkopion de la datumbazo. (La lasta estas $dato)</p>");
$dosiernomo = '../../../phplibraro/tmp/projekto-'. $tabelnomprefikso . '.sql.gz';
if (file_exists($dosiernomo))
{
$dato = "de " . date("Y-m-d H:i", filemtime($dosiernomo) .".");
}
else
{
$dato = "ne trovebla ($dosiernomo)!";
}
entajpbutono ("<p>","kio",$kio, "backup_is","backup_is",
"Kreu sekurkopion de la datumbazo (nur IS). (La lasta estas $dato)</p>");
if (rajtas('teknikumi'))
{
entajpbutono("<p>", "kio", $kio, "backup_programo", "backup_programo",
"Kreu sekurkopion de la programo.</p>");
}
*/
send_butono('Faru!');
echo "</p></form>\n";
}
* kodigon.
*
* Kiam oni entajpis, la retumilo sendas la informojn
* al index.php, kiu siavice kontrolas la kodvortojn
* kaj komencas la PHP-sesion.
*/
require_once 'iloj/iloj.php';
session_start();
malfermu_datumaro();
HtmlKapo();
echo "<div style='text-align:center'>";
echo "<P class='granda'>\n";
if ($_GET['malgxusta']) {
erareldono("Bedau^rinde via kombino de uzantnomo kaj pasvorto ne tau^gas por la datumbazo");
eoecho("Se vi supozas, ke estu tiel, plendu c^e " . teknika_administranto . " (" . teknika_administranto_retadreso . "). <br />");
}
eoecho("Vi j^us atingis la pag^on por la " . renkontigxo_nomo . "-administrado. \n<BR>\n");
echo "La uzado estas permesata nur al " . organizantoj_nomo . "anoj, do bonvolu identigi vin. (Jen la persona uzantonomo kaj pasvorto.) \n<BR>\n<BR>\n";
echo "<form action='index.php' target='_top' method='POST'>\n";
entajpejo("Via alig^nomo: ", "lakodnomo", $_SESSION["kodnomo"], 10);
entajpejo("Via kodvorto: ", "lakodvorto", "", 10, "", "", "", "j");
echo "<BR>\n";
entajpbutono("Enkodo: ", "laenkodo", $_SESSION["enkodo"], "utf-8", "utf-8", "unikodo", "");
entajpbutono("", "laenkodo", $_SESSION["enkodo"], "x-metodo", "x-metodo", "x-kodo<BR>", "kutima");
eoecho("Bonvolu elekti la enkodmanieron por a supersignoj. \n<BR>\n");
eoecho("(Se vi povas legi la menuon, elektu unikodo, se mankas leteroj prenu la x-kodon.)\n<BR>\n<BR>\n");
// Elektilo por la renkontigxo
montru_renkontigxoelektilon(DEFAUXLTA_RENKONTIGXO);
send_butono("Preta");
echo "<div>";
HtmlFino();
// {
// eoecho("$ri jam estas membro. Kontrolu! (kaj eble");
// ligu("partopreno.php?ago=sxangxi", "s^ang^u"); eoecho(".)");
// }
// else
// {
// eoecho("$ri ankorau^ ne estas membro.<br />");
// eoecho("$Ri "); ligu("partopreno.php?ago=sxangxi", "ig^u membro");
// eoecho(" (kaj pagos la kotizon por 2005)." .
// "Alikaze $ri pagos samgrandan krompagon.");
// }
eoecho("Atentu, kion skribis la membroadministranto sur la folion!<br/>");
eoecho("<form action='akceptado.php' method='POST'>\n");
entajpbutono("", "surloka_membrokotizo", $_SESSION['partopreno']->datoj['surloka_membrokotizo'], 'n', 'n', "{$Ri} ne devos pagi por la sekva jaro ({$ri} jam " . "antau^e pagis au^ donis enkasigrajton).<br/>", "kutima");
entajpbutono("", "surloka_membrokotizo", $_SESSION['partopreno']->datoj['surloka_membrokotizo'], 'j', 'j', "{$Ri} estas membro kaj pagu la membrokotizon por" . " la sekva jaro ...<br/>");
entajpbutono("", "surloka_membrokotizo", $_SESSION['partopreno']->datoj['surloka_membrokotizo'], "k", "k", "{$Ri} rifuzas membrig^i kaj pro tio pagu krompagon... <br/>");
entajpejo("... de ", 'membrokotizo', $_SESSION['partopreno']->datoj['membrokotizo'], 5, "", "", " E^.");
eoecho("<button name='sendu' value='sxangxu_membrokotizon'>S^ang^u</button>");
echo "</form>\n";
} else {
eoecho("Li ne log^as en Germanio kaj tial ne devas membrig^i.");
ligu("akceptado.php?membrokontrolo=jes", "{$Ri} tamen estas membro!", "");
}
eoecho("</li>\n");
eoecho("<li>{$Ri} suskribu la subtenliston</li>");
eoecho("<li>Se ekzistas neprilaborata noto, rigardu g^in</li>");
echo "</ul>";
// "select ID,prilaborata,dato,partoprenantoID,subjekto,kiu,kunKiu,tipo from notoj where partoprenantoID='".$partoprenanto->datoj[ID]."'"
$sql = datumbazdemando(array("ID", "prilaborata", "dato", "partoprenantoID", "subjekto", "kiu", "kunKiu", "tipo"), "notoj", "", array("partoprenanto" => "partoprenantoID"));
sercxu($sql, array("dato", "desc"), array(array('ID', '', '->', 'z', '"notoj.php?wahlNotiz=XXXXX"', '-1'), array('prilaborata', 'prilaborata?', 'XXXXX', 'z', '', '-1'), array('dato', 'dato', 'XXXXX', 'l', '', '-1'), array('subjekto', 'subjekto', 'XXXXX', 'l', '', '-1'), array("kiu", "kiu", 'XXXXX', 'l', '', '-1'), array("kunKiu", "kun Kiu?", 'XXXXX', 'l', '', '-1'), array("tipo", "tipo", 'XXXXX', 'l', '', '-1')), array(array('', array('∑ XX', 'A', 'z'))), "notoj-akceptado", array('Zeichenersetzung' => array('1' => array('j' => '<strong class="malaverto">prilaborata</strong>', '' => '<strong class="averto">neprilaborata</strong>', 'n' => '<strong class="averto">neprilaborata</strong>'))), 0, '', '', 'ne');
// Kotizokalkulado kaj kotizkolektado
echo ">{$dateloop}\n";
$dateloop = sekvandaton($dateloop);
} while ($dateloop != $renkontigxo->datoj[gxis]);
?>
</select>
<?php
eoecho("g^is:");
?>
<select name="gxis" size="1">
<?php
$dateloop = $renkontigxo->datoj[de];
do {
$dateloop = sekvandaton($dateloop);
echo "<option";
if ($gxis == $dateloop or !$gxis and $dateloop == $renkontigxo->datoj[gxis]) {
echo " selected ";
}
echo ">{$dateloop}\n";
} while ($dateloop != $renkontigxo->datoj[gxis]);
echo "</select> <BR>\n";
entajpbokso("", "invitilo", $invitilo[0], "J", "JES", "bezonas invitilon");
// TODO: ripari "dulita"
entajpbokso("<BR>", "dulita", $dulita[0], "J", "JES", "dulitan c^ambron //c^i - tie ne funkcias");
entajpbokso("<BR>", "ekskursbileto", $ekskursbileto[0], "J", "JES", "ekskursbileto");
//entajpbokso("<BR>","studento",$studento[0],"J","JES"," estas studento kun internacia legetimilo"); // im Moment nicht berücksichtigt.
entajpbutono("<BR>" . deviga_membreco_nomo . '-membro: ', GEJmembro, $GEJmembro[0], "J", JES, jes, kutima);
entajpbutono("", GEJmembro, $GEJmembro[0], "N", NE, "ne<BR>");
entajpbutono("", domotipo, $domotipo[0], "J", JunularGastejo, " seminariejo<BR>", kutima);
entajpbutono("", domotipo, $domotipo[0], "M", MemZorganto, " memzorganto en amaslog^ejo<BR><BR>");
send_butono("Faru!");
HtmlFino();
/**
* Montras formulareton por sxangxi la bazajn ecojn de cxambro,
* kiel tipon, rimarkojn kaj dulitecon.
*
* @param Cxambro $cxambro la cxambro, pri kiu temas.
*/
function formularo_por_bazaj_cxambroinformoj($cxambro)
{
echo "<form action='cxambro-detaloj.php?cxambronumero=" . $cxambro->datoj['ID'] . "' method='post'>\n";
entajpbutono("(", "tipo", $cxambro->datoj['tipo'], "g", "g", 'gea');
entajpbutono("", "tipo", $cxambro->datoj['tipo'], "v", "v", 'vira');
entajpbutono("", "tipo", $cxambro->datoj['tipo'], "i", "i", 'ina)');
// TODO: repripensu, kio tie estas elektebla.
entajpbokso("[", 'dulita', $cxambro->datoj['dulita'], 'U', 'U', "unulita c^ambro]");
// entajpbokso ("[",'dulita',$cxambro->datoj['dulita'],J,J,"dulita c^ambro]");
entajpejo("<BR>Rimarkoj:", "rimarkoj", $cxambro->datoj['rimarkoj'], 20);
butono('cxambrotipsxangxo', "S^ang^u");
echo "</form>";
}
