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();
entajpbutono("<br/>", kio, $kio, "k", k, 'konfirmilojn'); entajpbutono("<br/>", kio, $kio, "a", a, 'akceptofoliojn'); entajpbutono("</p><p>Por ", numero, $numero, 1, 1, " 1 pag^o", "kutima"); entajpbutono(" ", numero, $numero, 5, 5, " 5 pag^oj"); entajpbutono(" ", numero, $numero, 20, 20, " 20 pag^oj"); entajpbutono(" ", numero, $numero, 999, 999, " c^iuj"); entajpbutono("</p><p>", kio, $kio, "sendu", sendu, "Sendu retajn konfirmilojn."); //TODO:? jau, auch dies kann man aus der DB ziehen. // [respondo de Martin:] Fällt mir im Moment nicht ein. Soll womöglich bedeuten, daß der Button nur erscheint, wenn der betreffende auch reta ausgewählt wurde. entajpbokso("<BR>", eksendu, $eksendu, P, P, "Vere eksendu ilin al la partoprenantoj. (Alikaze al " . funkciuladreso("admin") . ")"); eoecho("<br/>Atentu: Tiu c^i funkcio (amasa sendado da retmesag^oj) ankorau^ ne estas bone testita - Martin ne uzis g^in la lastaj jaroj. -- Pau^lo</p>"); entajpbokso("<p>", savu, $savu, J, J, "Savu ke vi premis/sendis en la partoprendatumoj"); entajpbokso("<BR>", sen, $sen, s, s, "malplenaj folioj</p>"); entajpbutono("<p>", 'kio', $kio, "adres", adres, "elprintu adresaron "); entajpbokso("(", 'bunta', $bunta, 'JES', 'JES', "buntan,", "kutima"); entajpbokso(" ", 'granda', $granda, 'JES', 'JES', "grandan (por korekti))"); entajpbutono("<p>", 'kio', $kio, "gepatra_permeso", "gepatra_permeso", "elprintu malplenan gepatran permesilon"); entajpbutono("(", 'perm_tipo', $perm_tipo, "ina", "ina", "ina (filino) "); entajpbutono("|", 'perm_tipo', $perm_tipo, "vira", "vira", "vira (filo) )</p>"); $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})!";
/** * 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); } }
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> <input type="radio" name="csv" value="2"> csv por preni <?php eoecho("<BR>"); send_butono("Serc^u!"); echo "</FORM>\n<br><hr/>"; eoecho("<h3 id='specialaj'>Specialaj serc^oj</h3>\n"); eoecho("<h4>Pagoj kaj rabatoj:</h4>\n<p>"); ligu("sercxrezultoj.php?elekto=antauxpagoj", "—> c^iu antau^pago"); ligu("sercxrezultoj.php?elekto=rabatoj", "—> c^iu (individua) rabato");
} 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"); entajpbokso("<BR>", "dulita", $dulita[0], "J", "JES", " dulitan c^ambron"); entajpbokso("<BR>", "studento", $studento[0], "J", "JES", " estas studento/senlaborulo"); entajpbutono("<BR>GEJ-membro: ", GEJmembro, $GEJmembro[0], "J", JES, jes, kutima); entajpbutono("", GEJmembro, $GEJmembro[0], "N", NE, "ne<BR>"); entajpbutono("", domotipo, $domotipo[0], "J", JunularGastejo, " dormas en la seminariejo<BR>", kutima); entajpbutono("", domotipo, $domotipo[0], "M", MemZorganto, " memzorganto en amaslog^ejo<BR><BR>"); send_butono("Faru!"); echo "</form></div>"; HtmlFino();
if ($linio['sendanto_nomo']) { $sendantolisto[] = $linio['sendanto_nomo']; } $sendantolisto = array_combine($sendantolisto, $sendantolisto); $adresolisto = array_combine($adresolisto, $adresolisto); echo "<table>"; tabela_kasxilo("ppanto-ID", 'ID', $_SESSION['partoprenanto']->datoj['ID']); tabela_elektilo("Sendanto-nomo", 'de_nomo', $sendantolisto); tabela_elektilo("Sendanto-adreso", "de_adreso", $adresolisto); tabela_kasxilo("Al-Nomo", 'alkiu', $alkiu); tabela_kasxilo("Al-Retadreso", 'retposxto', $_SESSION['partoprenanto']->datoj['retposxto']); tabelentajpejo("Temo", 'temo', $temo, 57); granda_tabelentajpejo("Enhavo", 'teksto', $teksto, 57, 20); echo "</table>"; echo "<p>"; entajpbokso("", "prilaborata", "", "j", "j", "prilaborita<BR>", '', 'ne'); // tenukasxe("elektata", $elektata); butono("not+send", "Notu kaj sendu!"); butono("sendu", "Nur sendu!"); butono("notu", "Nur notu!"); ligu("partrezultoj.php", "Reen"); echo "</p>"; echo "</form>"; break; case 'sendu': sendu_gxin(); montru_gxin(); break; case 'notu': faru_noton_el_gxi(); montru_gxin();
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> <input type="radio" name="csv" value="2"> csv por preni <?php eoecho("<BR>"); send_butono("Serc^u!"); echo "</FORM>\n<br><hr/>"; eoecho("<h3 id='specialaj'>Specialaj serc^oj</h3>\n"); eoecho("<h4>Pagoj kaj rabatoj:</h4>\n<p>"); ligu("sercxrezultoj.php?elekto=antauxpagoj", "—> c^iu antau^pago"); ligu("sercxrezultoj.php?elekto=rabatoj", "—> c^iu (individua) rabato");
$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("ISO-3166-1-kodo:", 'kodo', $linio['kodo'], 3); echo "</table><br/>\n"; eoecho(" ... en la datumbazon.</p>"); // echo "<br/>\n"; if ($_REQUEST['redaktu'] != '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"; HtmlFino(); return; } // montru tabelon de cxiuj landoj $sql = datumbazdemando(array("ID", "nomo", "kodo"), "landoj"); sercxu($sql, array("nomo", "asc"), array(array('ID', 'ID', 'XXXXX', 'z', 'landoj.php?redaktu=XXXXX', -1), array("kodo", 'kodo', "XXXXX", 'c', '', ''), array('nomo', 'nomo', 'XXXXX', 'l', '', '')), array(), "landoj", array(), 0, "Jen listo de c^iuj landoj.", 0, 0); ligu("landoj.php?redaktu=nova", "Aldonu novan landon"); // TODO: rajtoj? echo "<p>Redaktu la landokategoriojn en sistemo: ";
/** * 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"; }
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"); } tenukasxe("ago", $_SESSION["ago"]); //sqlago=forgesu& send_butono("S^ang^u!"); } else { send_butono("Aligu!"); } echo "</p>"; echo "</TD><TD width=20%></TD></TR></TABLE>\n"; echo "</form>\n";
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 { send_butono("Aligu!"); }
/** * 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]); } }
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"; }
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"; } echo "<p align=center>\n"; entajpbokso("", "nekontrolup", valoro($_REQUEST['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", valoro($_REQUEST['konsento']), "J", "J", "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"); } tenukasxe("ago", $_SESSION["ago"]); //sqlago=forgesu& send_butono("S^ang^u!"); } else { send_butono("Aligu!"); } echo "</p>"; echo "</TD><TD width=20%></TD></TR></TABLE>\n"; echo "</form>\n";
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 "</form>\n"; HtmlFino(); return; } // montru tabelon de cxiuj entajpantoj $sql = datumbazdemando(array_merge(array("ID", "nomo", "retposxtadreso", "partoprenanto_id", 'sendanto_nomo'), array_keys($rajtolisto)), "entajpantoj"); $kruco = array('J' => "<strong>X</strong>", 'N' => " _ "); $anstatauxoj = array_fill(4, 13, $kruco);
/** * Montras la aktualan staton de ĉambro. * $grandeco: - se ne donita aŭ "malgranda", montras nur * - se "granda", ... * verda se estas taŭga * ruĝa se ne taŭgas (pro sekso) * * @todo transformu en pli bone uzeblan funkcio(j)n */ function montru_cxambron($cxambroID, $renkontigxo, $partoprenanto, $partopreno, $grandeco = "malgranda", $reenligo = "") { $cxambro = new Cxambro($cxambroID); $row = $cxambro->datoj; if ($grandeco == "granda") { ligu("cxambroj.php?etagxo=" . $row['etagxo'], "Etag^o " . $row['etagxo']); echo " |"; } ligu("cxambro-detaloj.php?cxambronumero=" . $cxambroID, "C^ambro: " . $row['nomo']); montru_cxambrosekson($row['tipo'], $partopreno, $partoprenanto); rajtligu("kreu_cxambron.php?id={$cxambroID}", $grandeco == 'granda' ? "redaktu bazajn informojn" : "red.", "", "teknikumi", "ne"); if ($grandeco == "granda") { //formularo por sxangxi la cxambrotipon formularo_por_bazaj_cxambroinformoj($cxambro); } $renkontigxdauxro = $renkontigxo->renkontigxonoktoj(); $partoprentagoj = is_object($partopreno) ? $partopreno->partoprennoktoj() : 0; echo "<form action='cxambroago.php' method='POST'>\n"; tenukasxe("cxambronumero", $cxambroID); if (!$reenligo) { if ($_SERVER['REQUEST_METHOD'] == "GET") { $reenligo = $_SERVER['PHP_SELF']; if ($_SERVER['QUERY_STRING']) { $reenligo .= "?" . $_SERVER['QUERY_STRING']; } } } if ($reenligo) { tenukasxe("reiru", $reenligo); } echo "<table class='cxambrolisto-{$grandeco}'><tr><th>Nokto:</th>"; if ($grandeco == "granda") { $manko = eltrovu_litojn($partopreno->datoj['ID']); $ar = JMTdisigo($renkontigxo->datoj['de']); $tago = $ar['tago']; $estis_elektebleco = false; // cxu estis ebla elekti liton por nokto? for ($noktoj = 1; $noktoj <= $renkontigxdauxro; $noktoj++) { $ar = JMTdisigo(sekvandaton($renkontigxo->datoj['de'], $noktoj)); $sektago = $ar['tago']; echo "<th align='center'> {$tago} / {$sektago} </th>"; $tago = $sektago; } if ($partoprenanto) { // ebleco mendi tutan tempon echo "<td/><th>tuta tempo</th>"; } echo "</th>"; } else { // simpla noktolisto for ($noktoj = 1; $noktoj <= $renkontigxdauxro; $noktoj++) { echo "<th>{$noktoj}</th>"; } } echo "</tr>"; for ($litoj = 1; $litoj <= $row['litonombro']; $litoj++) { echo "<tr >\n<th class='litonomo'>Lito: " . $litoj . "</th>"; $uzata = false; for ($noktoj = 1; $noktoj <= $renkontigxdauxro; $noktoj++) { // detaloj pri la rezervado $r = cxambro_uzata($cxambroID, $noktoj, $litoj); if ($r) { $uzata = true; $noktoj += metu_partoprenant_litan_keston($r, $noktoj, $partopreno->datoj['ID'], $grandeco); } 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") { // ebligu mendi tiun liton por tiu nokto echo "<td class='elektebla'>"; entajpbokso("", "nokto[{$noktoj}]", "falseoderso", "", "{$litoj}", "", "", "ne"); echo "</td>"; $estis_elektebleco = true; } else { echo "<td class='malplena'>--</td>"; } } // else } // for (noktoj) if ($partoprenanto and $grandeco == "granda") { // mendi cxiujn noktojn? echo "<td> </td><td class='elektebla'>"; if ($uzata == false and $partoprentagoj == $renkontigxdauxro and $manko['sumo'] == 0) { entajpbokso("", "tute", "falseoderso", "", "{$litoj}", "", "", "ne"); } echo "</td>"; } echo "</tr>"; } // for (litoj) echo "</table>"; if ($partoprenanto->datoj['ID'] and $grandeco == "granda") { if ($estis_elektebleco) { // butono por rezervi butono('rezervu', "Rezervu elektitajn litojn"); // butono por disdoni - TODO: aux cxu nur surloke? butono('disdonu', "Disdonu elektitajn litojn"); } // 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]); } }