echo "<center>";
if ($parto == "korekti") {
erareldono("Hmm, ion malg^ustan okazis.");
}
echo "</center>";
sercxu(datumbazdemando(array("ID", "partoprenoID", "kvanto", "tipo", "dato"), "pagoj", "partoprenoID = '" . $_SESSION["partopreno"]->datoj[ID] . "'"), array("dato", "desc"), array(array('0', '', '->', 'z', '"antauxpago.php?jena=XXXXX"', '1'), array('dato', 'dato', 'XXXXX', 'l', '', '-1'), array('kvanto', 'sumo', 'XXXXX', 'r', '', '-1'), array("tipo", "tipo", 'XXXXX', 'l', '', '-1')), array(array('', '', array('∑ XX', 'N', 'z'))), 0, 0, 0, "G^isnunaj antau^pagoj:", '', "ne");
echo "<form ACTION=\"antauxpago.php\" METHOD=\"POST\">";
eoecho("Vi nun entajpas pagon de: " . $_SESSION["partoprenanto"]->datoj[personanomo] . " " . $_SESSION["partoprenanto"]->datoj[nomo] . " (" . $_SESSION["partoprenanto"]->datoj[ID] . ") por la " . $_SESSION["renkontigxo"]->datoj[nomo] . " en " . $_SESSION["renkontigxo"]->datoj[loko] . "<BR>\n");
if (!$pago->datoj[dato]) {
$pago->datoj[dato] = date("Y-m-d");
}
entajpejo("<BR>alvenodato:", dato, $pago->datoj[dato], 11, "", "", " (jaro-monato-tago)");
if (!$pago->datoj[dato] and !kontrolu_daton($pago->datoj[dato])) {
erareldono("La dato kion vi entajpis ne ekzistas au^ estis malg^uste");
}
entajpejo("sumo:", kvanto, $pago->datoj[kvanto], 5, "", "", " E^");
montru_elekto_liston("antauxpaguloj", $pago->datoj['tipo'], 'tipo', 'antau^pago al ');
/* entajpbutono("<BR><BR><BLOCKQUOTE>",tipo,$pago->datoj[tipo],"GEJ",GEJ,"antau^pago per GEJ-konto<BR>","");
entajpbutono("",'tipo',$pago->datoj['tipo'],"BerO",'BerO',"antau^pago al BerO-kaso<BR>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"UEA",'UEA',"antau^pago per UEA-konto<BR>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"JEFO",'JEFO',"antau^pago al JEFO<br/>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"HEJ",'HEJ',"antau^pago al HEJ<br/>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"IEJ",'IEJ',"antau^pago al IEJ<br/>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"Martin",'Martin',"antau^pago al Martin<BR>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"Julia",'Julia',"antau^pago al Julia<BR>");
entajpbutono("",'tipo',$pago->datoj['tipo'], "Andreas", "Andreas",
"antau^pago al Andreas<br/>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"alia",'alia',"alia antau^pago (faru noton!)<BR/><BR/>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"surlokpago",'surlokpago',"surloka pago<BR>","kutima");
entajpbutono("",'tipo',$pago->datoj['tipo'],"donaco",'donaco',"doncao<BR>");
entajpbutono("",'tipo',$pago->datoj['tipo'],"repago",'repago',"repago</BLOCKQUOTE>");
} else {
$partopreno->datoj[okupigxo] = 0;
}
$partopreno->datoj[domotipo] = $domotipo;
$partopreno->datoj[de] = $de;
$partopreno->datoj[gxis] = $gxis;
$partopreno->datoj[partoprentipo] = $partoprentipo;
$kot = new Kotizo($partopreno, $partoprenanto, $renkontigxo);
echo "<table id='rezulto'>\n";
$kot->montru_kotizon(0, $partopreno, $partoprenanto, $renkontigxo);
echo "</table>\n";
}
eoecho("<h1>Antau^kalkuli la kotizon</h1><p>por la " . $renkontigxo->datoj[nomo] . " en " . $renkontigxo->datoj[loko] . ".</p>");
echo "<div style='margin-left: 1em;'><form method='post' action='{$_SERVER['REDIRECT_SCRIPT_URL']}#rezulto' >";
entajpejo("", naskigxdato, $naskigxdato, 10, "", "1900-01-01", " naskig^dato (jaro-monato-tago)");
entajpejo("", aligxdato, $aligxdato, 10, "", $renkontigxo->datoj[de], " alig^-/antaupagdato (jaro-monato-tago)");
echo "Hejmlando: \n";
montru_landoelektilon(1);
entajpbutono("", partoprentipo, $partoprentipo[0], "t", tuttempa, tuttempa, "kutima");
echo "<BR>";
entajpbutono("", partoprentipo, $partoprentipo[0], "p", partatempa, partatempa);
echo "partopreno de:\n";
echo "<select name=\"de\" size=1>\n";
//TODO: (dateloop) Geht kürzer, oder als Fkt ==> später mal.
$dateloop = $renkontigxo->datoj[de];
do {
echo "<option";
if ($de == $dateloop) {
echo " selected ";
}
echo "> {$dateloop}\n";
}
echo "</TABLE>\n";
} else {
echo "Mi ne trovas tiajn datumojn\n";
}
}
eoecho("<h3>Simpla serc^ilo</h3>");
eoecho("<p>(lokoteniloj: '_' estas iu signo, '%' estas iuj signoj.)</p>\n");
echo "<FORM ACTION='partsercxo.php?sql=sercxu' METHOD='POST'>\n";
echo "<TABLE><TR><TD><p style='text-align:right;margin-left:1cm;'>";
entajpejo("persona nomo:", personanomo, $personanomo, 15);
entajpejo("familia nomo:", nomo, $nomo, 15);
entajpejo("urbo:", urbo, $urbo, 15);
entajpejo("pos^tkodo:", posxtkodo, $posxtkodo, 15);
entajpejo("naskig^dato:", naskigxdato, $naskigxdato, 15);
entajpejo("ID:", ID, $ID, 15);
send_butono("Serc^u!");
echo "</p></TABLE>";
echo "</FORM>\n";
echo "<hr/>\n";
echo "<p>";
ligu("sercxrezultoj.php?elekto=venantoj&ordo=aligxdato", "c^iu partoprenanto de la " . $_SESSION["renkontigxo"]->datoj[nomo] . " (lau^ alventempo de la alig^ilo)");
echo "</p><p>";
ligu("gxenerala_sercxo.php", "G^enerala serc^o pri c^io ajn");
echo "</p>";
require_once 'iloj/iloj_sercxo_konservo.php';
kasxeblaSercxoElektilo();
echo "<hr/>\n";
eoecho("<h3 id='detala'>Detala serc^o</h3>\n");
echo "<form action='sercxrezultoj.php?elekto=pliaj' method='post'>\n";
eoecho("<b>ag^o inter: </b>");
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();
$sql = datumbazdemando('*', 'entajpantoj', "ID = '{$redaktu}'");
$rez = sql_faru($sql);
$linio = mysql_fetch_assoc($rez);
eoecho("<p>ID: {$linio['ID']}\n");
}
tenukasxe("ID", $linio['ID']);
echo "<br/>\n";
entajpejo("Salutnomo:", "nomo", $linio['nomo'], 20);
entajpejo("Retpos^ta adreso:", "retposxtadreso", $linio['retposxtadreso'], 20);
entajpejo("Retpos^tsenda nomo:", "sendanto_nomo", $linio['sendanto_nomo'], 30);
entajpbokso("", "pasvortsxangxo", "", "jes", "jes");
entajpejo("Nova pasvorto: ", "kodvorto", "", 20, "", "", "", "j");
// entajpboksokajejo("pasvortsxangxo", "", "jes", "jes",
// "Nova pasvorto: ", '', 'kodvorto', '', 20, 'Mankas pasvorto.');
// echo("<br/>\n");
entajpejo("Partoprenanto-ID: ", "partoprenanto_id", $linio['partoprenanto_id'], 6);
eoecho("</p>\n<p>Li/s^i havu la rajton ...");
foreach ($rajtolisto as $rajto => $alias) {
echo "<br/>\n";
entajpbokso("", $rajto, $linio[$rajto], 'J', 'J', $alias);
}
echo "<br/>\n";
eoecho(" ... en la datumbazo</p>");
entajpbokso("<p>", "redaktu", "", "jes", $linio['ID'], "Pluredaktu tiun c^i entajpanton.", "", "sen kasxa");
echo "<br/>\n";
send_butono("S^ang^u");
ligu("entajpantoj.php", "Reen");
if ($redaktu != "nova") {
ligu("entajpantoj.php?forigu={$redaktu}", "Forigu tiun c^i entajpanton!");
}
echo "</p>";
}
echo "</TABLE>\n";
} else {
echo "Mi ne trovas tiajn datumojn\n";
}
}
eoecho("<h3>Simpla serc^ilo</h3>");
eoecho("<p>(lokoteniloj: '_' estas iu signo, '%' estas iuj signoj.)</p>\n");
echo "<FORM ACTION='partsercxo.php?sql=sercxu' METHOD='POST'>\n";
echo "<TABLE><TR><TD><p style='text-align:right;margin-left:1cm;'>";
entajpejo("persona nomo:", 'personanomo', $personanomo, 15);
entajpejo("familia nomo:", 'nomo', $nomo, 15);
entajpejo("urbo:", 'urbo', $urbo, 15);
entajpejo("pos^tkodo:", 'posxtkodo', $posxtkodo, 15);
entajpejo("naskig^dato:", 'naskigxdato', $naskigxdato, 15);
entajpejo("ID:", 'ID', $ID, 15);
send_butono("Serc^u!");
echo "</p></TABLE>";
echo "</FORM>\n";
echo "<hr/>\n";
echo "<p>";
ligu("sercxrezultoj.php?elekto=venantoj&ordo=aligxdato", "c^iu partoprenanto de la " . $_SESSION["renkontigxo"]->datoj['nomo'] . " (lau^ alventempo de la alig^ilo)");
echo "</p><p>";
ligu("gxenerala_sercxo.php", "G^enerala serc^o pri c^io ajn");
echo "</p>";
require_once 'iloj/iloj_sercxo_konservo.php';
kasxeblaSercxoElektilo();
echo "<hr/>\n";
eoecho("<h3 id='detala'>Detala serc^o</h3>\n");
echo "<form action='sercxrezultoj.php?elekto=pliaj' method='post'>\n";
eoecho("<b>ag^o inter: </b>");
echo "<form action='kreu_cxambron.php' method='post'>\n";
echo "<table>\n";
eoecho("<tr><th>ID</th><td>");
if ($redakto) {
eoecho($cxambro->datoj['ID']);
tenukasxe("id", $cxambro->datoj['ID']);
} else {
eoecho("<em>au^tomate disdonota</em>");
}
eoecho("</td></tr>\n");
eoecho("<tr><th>renkontig^o</th><td>" . $_SESSION['renkontigxo']->datoj['nomo'] . "</td></tr>\n");
eoecho("<tr><th>nomo</th><td>");
entajpejo("", "nomo", $cxambro->datoj['nomo'], 10);
eoecho("</td></tr>");
eoecho("<tr><th>etag^o</th><td>");
entajpejo("", "etagxo", $cxambro->datoj['etagxo'], 50);
eoecho("</td></tr>");
eoecho("<tr><th>litonombro</th><td>");
entajpejo("", "litonombro", $cxambro->datoj['litonombro'], 5);
eoecho("</td></tr>");
eoecho("<tr><th>rimarkoj</th><td>");
entajpejo("", "rimarkoj", "", 30);
eoecho("</td></tr>");
echo "</table>\n";
if ($redakto) {
butono("kreu", "Kreu novan (kun alia ID)");
butono("sxangxu", "S^ang^u ekzistantan");
} else {
butono("kreu", "Kreu");
}
echo "</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();
/**
* 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]);
}
}
}
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.");
}
entajpejo("<br> alvenodato (de la malalig^ilo):", 'malaligxdato', $_SESSION["partopreno"]->datoj['malaligxdato'], 11, "", "0000-00-00", " (jaro-monato-tago)");
if (is_null($_SESSION["partopreno"]->datoj['malaligxdato']) and !kontrolu_daton($_SESSION["partopreno"]->datoj['malaligxdato'])) {
erareldono("La dato kion vi entajpis ne ekzistas au^ estis malg^uste.");
}
if (kalkulu_tagojn($_SESSION["partopreno"]->datoj["aligxdato"], $_SESSION["partopreno"]->datoj["malaligxdato"]) < 0) {
erareldono("La malalig^dato estas antau^ la alig^dato.");
}
echo "<BR>";
if (rajtas("administri")) {
entajpejo("<br> 1a konfirmilo sendata:", '1akonfirmilosendata', $_SESSION["partopreno"]->datoj['1akonfirmilosendata'], 11, "", "", " (jaro-monato-tago)");
entajpejo("<br> 2a konfirmilo sendata:", '2akonfirmilosendata', $_SESSION["partopreno"]->datoj['2akonfirmilosendata'], 11, "", "", " (jaro-monato-tago)");
}
if ($_SESSION["partopreno"]->datoj[ID]) {
echo "partopreno-ID: " . $_SESSION["partopreno"]->datoj[ID] . " <BR>\n";
}
// muss noch ge䮤ert werden
echo "<p align=center>\n";
entajpbokso("", "nekontrolup", $nekontrolup, "JES", "JES", "Se vi maldeziras datkontroladon pro problemojn, marku c^i tie.<BR>");
echo "<hr/><p><b>Por A- kaj B-Landanoj: </b>\n";
eoecho("Precipe mi konscias, ke mia alig^o validas nur ekde la " . "alveno de mia antau^pago c^e GEJ.</p>");
entajpbokso("", "konsento", $konsento[0], "J", "JES", "Mi legis kaj agnoskas la suprajn kondic^ojn.<br/>", "J");
if ($_SESSION["ago"] == "sxangxi") {
if ($_SESSION['sekvontapagxo']) {
ligu($_SESSION['sekvontapagxo'], "ne s^ang^u kaj pluen");
} else {
ligu("partrezultoj.php?partoprenantoidento=" . $_SESSION["partoprenanto"]->datoj[ID] . "&partoprenidento=" . $_SESSION["partopreno"]->datoj[ID], "ne s^ang^u kaj reen");
function entajpanto_redaktilo($entajpanto)
{
echo "<form method='POST' action='entajpantoj.php'>\n";
echo "<table>\n";
$linio = $entajpanto->datoj;
tabela_kasxilo("ID", 'ID', $linio['ID']);
tabelentajpejo("Salutnomo", "nomo", $linio['nomo'], 20);
tabelentajpejo("Retpos^ta adreso", "retposxtadreso", $linio['retposxtadreso'], 20);
tabelentajpejo("Retpos^tsenda nomo", "sendanto_nomo", $linio['sendanto_nomo'], 30, "Uzata por sendado de ne-au^tomataj mesag^oj");
entajpbokso("<tr><th>", "pasvortsxangxo", "", "JES", "JES");
entajpejo("Nova pasvorto </th><td>", "pasvorto", "", 20, "", "", "nur entajpu, se estas s^ang^o (kaj tiam metu hokon antau^e)</td>", "j");
// entajpboksokajejo("pasvortsxangxo", "", "jes", "jes",
// "Nova pasvorto: ", '', 'kodvorto', '', 20, 'Mankas pasvorto.');
// echo("<br/>\n");
tabelentajpejo("Partoprenanto-ID ", "partoprenanto_id", $linio['partoprenanto_id'], 6, "(0 = ne havas partoprenanton)");
echo "<table>\n";
eoecho("</p>\n<p>Li/s^i havu la rajton ...</p>");
echo "<table style='margin-left: 2em; '>\n";
foreach ($GLOBALS['rajtolisto'] as $ero) {
entajpbokso("<tr><td>", $ero['rajto'], $linio[$ero['rajto']], 'J', 'J', "</td><td>" . $ero['alias'] . "</td></tr>");
}
echo "</table>\n";
eoecho("<p> ... en la datumbazo</p>");
entajpbokso("<p>", "redaktu", "", "jes", $linio['ID'], "Pluredaktu tiun c^i entajpanton.", "", "sen kasxa");
echo "<br/>\n";
send_butono("S^ang^u");
ligu("entajpantoj.php", "Reen al la listo");
if ($linio['ID'] != "nova") {
ligu("entajpantoj.php?forigu=" . $linio['ID'], "Forigu tiun c^i entajpanton!");
}
echo "</p>";
echo "</form>\n";
}
echo "<form action='kreu_cxambron.php' method='post'>\n";
echo "<table>\n";
eoecho("<tr><th>ID</th><td>");
if ($redakto) {
eoecho($cxambro->datoj['ID']);
tenukasxe("id", $cxambro->datoj['ID']);
} else {
eoecho("<em>au^tomate disdonota</em>");
}
eoecho("</td></tr>\n");
eoecho("<tr><th>renkontig^o</th><td>" . $_SESSION['renkontigxo']->datoj['nomo'] . "</td></tr>\n");
eoecho("<tr><th>nomo</th><td>");
entajpejo("", "nomo", $cxambro->datoj['nomo'], 10);
eoecho("</td></tr>");
eoecho("<tr><th>etag^o</th><td>");
entajpejo("", "etagxo", $cxambro->datoj['etagxo'], 50);
eoecho("</td></tr>");
eoecho("<tr><th>litonombro</th><td>");
entajpejo("", "litonombro", $cxambro->datoj['litonombro'], 5);
eoecho("</td></tr>");
eoecho("<tr><th>rimarkoj</th><td>");
entajpejo("", "rimarkoj", $cxambro->datoj['rimarkoj'], 30);
eoecho("</td></tr>");
echo "</table>\n";
if ($redakto) {
butono("kreu", "Kreu novan (kun alia ID)");
butono("sxangxu", "S^ang^u ekzistantan");
} else {
butono("kreu", "Kreu");
}
echo "</form>\n";
HtmlKapo();
if ($_REQUEST['sendu'] == 'Elektu' && $_REQUEST['invitpetoID']) {
// ni uzas la saman identifikilon por la invitpetoj
// kiel por la partoprenoj, cxar estas 1-1-rilato.
$partoprenoID = $_REQUEST['invitpetoID'];
if ($partoprenoID) {
$_SESSION['partopreno'] = new Partopreno($partoprenoID);
} else {
erareldono("La invitpeto-identifikilo #" . $_REQUEST['invitpetoID'] . " ne ekzistas.");
}
}
if (!$_SESSION['partopreno']) {
// ne okazu
erareldono("Forgesig^is la partopreno. Bonvolu unue elekti partoprenon..");
echo "<form method='GET' action='invitpeto.php'>\n";
entajpejo("Por specialaj uzoj, vi povas entajpi c^i tie la partopreno-identifikilon:", 'invitpetoID');
send_butono("Elektu");
echo "</form>";
HtmlFino();
exit;
}
if ($_SESSION['partoprenanto']->datoj['ID'] != $_SESSION['partopreno']->datoj['partoprenantoID']) {
$_SESSION['partoprenanto'] = new Partoprenanto($_SESSION['partopreno']->datoj['partoprenantoID']);
}
/*
* ni difinas $partopreno_renkontigxo por uzi anstataux
* $_SESSION['renkontigxo'], cxar gxi ja povus esti io alia
* (se oni rigardas malnovan partoprenon, ekzemple).
*/
if ($_SESSION['partopreno']->datoj['renkontigxoID'] != $_SESSION['renkontigxo']->datoj['ID']) {
$partopreno_renkontigxo = new Renkontigxo($_SESSION['partopreno']->datoj['renkontigxoID']);
malfermu_datumaro();
unset($_SESSION["partoprenanto"]);
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 c^-kodigon por la esperantaj supersignoj" . " (E^ por E^).</p>\n<p>\n");
tenukasxe('sercxo', $kodita);
entajpejo("Nomo:", 'nomo', $valoroj['sercxo_titolo']);
granda_entajpejo("Priskribo:", 'priskribo', "", '50', '5');
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') {
}
entajpejo("Pos^tkodo:", posxtkodo, $_SESSION["partoprenanto"]->datoj[posxtkodo], 13, "");
entajpejo("Urbo:", urbo, $_SESSION["partoprenanto"]->datoj[urbo], 20, "urbon");
eoecho("Log^lando: \n");
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 = '&';
}
/**
* Kombino de {@link entajpbokso()} kaj {@link entajpejo()}.
*
*<pre>
* [_] teksto [________] postteksto
*</pre>
*
* @param string $boxnomo
* @param string $boxio
* @param string $boxvaloro
* @param string $teksto
* @param string $postteksto
* @param string $ejnomo
* @param string $ejio
* @param int $grandeco longeco de la kampo.
* @param string $manko erareldono, uzata se $boxio == $boxkomparo (= hoko)
* sed $ejio = "" (= nenio entajpita).
* @todo daŭrigi dokumentadon.
* @uses entajpbokso()
* @uses entajpejo()
*/
function entajpboksokajejo($boxnomo, $boxio, $boxkomparo, $boxvaloro, $teksto, $postteksto, $ejnomo, $ejio, $grandeco, $manko)
{
if ($ejio) {
$boxio = "JES";
}
entajpbokso("", $boxnomo, $boxio, $boxkomparo, $boxvaloro);
eoecho($teksto);
entajpejo("", $ejnomo, $ejio, $grandeco, "", "", $postteksto);
if ($boxio == $boxkomparo and $ejio == "") {
erareldono($manko);
}
}
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 "<table>";
$kot = new Kotizo($_SESSION["partopreno"], $partoprenanto, $_SESSION["renkontigxo"]);
$kot->montru_kotizon(0, $_SESSION["partopreno"], $partoprenanto, $_SESSION["renkontigxo"]);
echo "</table>";
echo "<form action='akceptado.php' method='post'>";
eoecho("<h2>Farendas:</h2><ul>");
echo "<li>Kolektu la pagon de:";
entajpejo("", kvanto, $nenio, 5, "", "", " E^ (Se mankas mono nepre prenu garantiaj^on!)");
echo "</li>";
/************** cxambromontrado kaj -disdono ************/
if ($_SESSION["partopreno"]->datoj[domotipo] == 'J') {
$row = mysql_fetch_array(eltrovu_cxambrojn($_SESSION["partopreno"]->datoj[ID]), MYSQL_NUM);
echo "<li>";
montru_cxambron($row[0], $_SESSION["renkontigxo"], $partoprenanto, $_SESSION["partopreno"], "malgranda");
eoecho("<br />Notu la c^ambronumero sur {$ri}a bros^uro</li>");
} else {
eoecho("<li>Notu 'M' kiel c^ambronumero sur {$ri}a bros^uro</li>");
}
/******** Disdono de diversajxoj *************/
eoecho("<li>Eldonu la broschuron.</li>");
if ($_SESSION["partopreno"]->datoj[domotipo] == 'J' or $_SESSION["partopreno"]->datoj[kunmangxas] == 'J') {
eoecho("<li>Eldonu la mang^kuponon.</li>");
}
$partopreno->datoj[de] = $de;
$partopreno->datoj[gxis] = $gxis;
//$partopreno->datoj[partoprentipo] = $partoprentipo;
$kot = new Kotizo($partopreno, $partoprenanto, $renkontigxo);
echo "<table id='rezulto'>\n";
$kot->montru_kotizon(0, $partopreno, $partoprenanto, $renkontigxo);
echo "</table>\n";
echo "<hr />\n";
}
echo "<form method='post' action='{$PHP_SELF}#rezulto'>";
tenukasxe("formrenkontigxo", $renkontigxo->datoj["ID"]);
eoecho("<BR>Antau^kalkuli la kotizon por: la " . $renkontigxo->datoj["nomo"] . " en " . $renkontigxo->datoj["loko"]);
eoecho("<BR>Se vi alig^us hodiau^!");
echo "<BR><BR>";
entajpejo("", naskigxdato, $naskigxdato, 13, "", "1900-01-01", " naskig^dato (jaro-monato-tago)");
entajpejo("", aligxdato, $aligxdato, 13, "", date("Y-m-d", time()), " relevanta alig^dato (jaro-monato-tago)");
eoecho("Log^lando: \n");
montru_landoelektilon(5, $lando);
/*entajpbutono("",partoprentipo,$partoprentipo[0],"t",tuttempa,tutempa,"kutima");
echo "<BR>";
entajpbutono("",partoprentipo,$partoprentipo[0],"p",partatempa,partatempa);
*/
echo "partopreno de:\n";
echo "<select name=\"de\" size=1>\n";
// TODO: Geht kürzer, oder als Fkt ==> später mal.
$dateloop = $renkontigxo->datoj[de];
do {
echo "<option";
if ($de == $dateloop) {
echo " selected ";
}
/**
* 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>";
}
