/** * montras la bazajn datumojn de iu kotizosistemo. * * kun du butonoj, por redakti aux krei novan. */ function redaktilo_por_bazaj_datumoj($sistemo) { eoecho("<h2>Bazaj datumoj</h2>\n"); echo "<form action='kotizosistemo.php' method='POST'>\n"; eoecho("<table>\n<tr><th>ID</tr><td>" . $sistemo->datoj['ID']); tenukasxe('id', $sistemo->datoj['ID']); echo "</td></tr>\n"; $entajpanto = eltrovu_entajpanton($sistemo->datoj['entajpanto']); eoecho("<tr><th>entajpanto</tr><td>" . $entajpanto . "</td></tr>\n"); tabelentajpejo("nomo", 'nomo', $sistemo->datoj['nomo'], 30); granda_tabelentajpejo("priskribo", 'priskribo', $sistemo->datoj['priskribo'], 40, 4); foreach ($GLOBALS['kategoriotipoj'] as $tipo) { $katsis = $sistemo->donu_kategorisistemon($tipo); eoecho("<tr><th>" . $katsis->donu_eoklasnomon() . "</th><td>\n"); elektilo_simpla_db(donu_katsisnomon($tipo), donu_katsisnomon($tipo) . "j", "nomo", "ID", $katsis->datoj['ID']); echo "</td></tr>\n"; } // // TODO: eble elpensu pli gxeneralan sistemon // tabelentajpejo("Malfaktoro por parttempaj kotizoj", // 'parttempdivisoro', // $sistemo->datoj['parttempdivisoro'], // 5); tabela_elektilo_db("Malalig^kondic^o-sistemo", 'malaligxkondicxsistemo', 'malaligxkondicxsistemoj', 'nomo', 'ID', $sistemo->datoj['malaligxkondicxsistemo'], '', "Elektu sistemon por trakti malalig^intojn."); eoecho("</table>\n<p>"); // TODO: opcioj por kopii ekzistantajn kotizo-valorojn butono('novaj_kategorioj', "S^ang^u"); butono("kopiu", "Kopiu"); eoecho("(tiam nepre necesas nova nomo)"); echo "</p></form>\n"; echo "<hr/>\n"; // ----------------------------------------------------- }
function montru_kondicxoredaktilon($kondicxo) { eoecho("<h2>" . ($kondicxo->datoj['ID'] ? "S^ang^o" : "Kreo") . " de kondic^o</h2>\n"); echo "<form action='kondicxo.php' method='POST'>\n"; echo "<table>\n"; tabela_kasxilo("ID", 'ID', $kondicxo->datoj['ID']); tabelentajpejo("Nomo", 'nomo', $kondicxo->datoj['nomo'], 30); $panto = $kondicxo->datoj['entajpanto']; tabela_kasxilo("Entajpanto", "entajpanto", $panto, $panto ? eltrovu_entajpanton($panto) : "-"); granda_tabelentajpejo("Priskribo", "priskribo", $kondicxo->datoj['priskribo'], 60, 4); granda_tabelentajpejo("Kondic^okodo", "kondicxoteksto", $kondicxo->datoj['kondicxoteksto'], 60, 4); granda_tabelentajpejo("J^avaskripta formo", "jxavaskripta_formo", $kondicxo->datoj['jxavaskripta_formo'], 60, 4); echo "</table>\n<p>"; if ($kondicxo->datoj['ID']) { butono('sxangxu', "S^ang^u"); } else { butono('kreu', "Kreu"); } echo "</form>\n"; }
function montru_reguloformularon($regulo) { if ($regulo->datoj['ID']) { eoecho("<h1>Redakto de " . $regulo->regulovorto . " <em>" . $regulo->datoj['nomo'] . "</em></h1>"); } else { eoecho("<h1>Kreado de nova " . $regulo->regulovorto . "</h1>"); } echo "<form action='regulo.php?tipo=" . $regulo->tipo . "' method='POST'>\n"; echo "<table>\n"; tabela_kasxilo("ID", "ID", $regulo->datoj['ID']); tabelentajpejo("nomo", "nomo", $regulo->datoj['nomo'], 20); tabelentajpejo("Mallongigo", "mallongigo", $regulo->datoj['mallongigo'], 10); granda_tabelentajpejo("Priskribo", "priskribo", $regulo->datoj['priskribo'], 40, 4); tabela_kondicxoelektilo("Elektu c^i tie la g^ustan kondic^on por tiu " . "krompagotipo. (Se vi bezonas aliajn, aldonu per " . donu_ligon("kondicxo.php", "la kondic^oredaktilo") . ".)", $regulo->datoj['kondicxo']); tabela_elektilo("uzebla", "uzebla", array('j' => 'jes', 'n' => 'ne'), $regulo->datoj['uzebla'], "C^u montri en la g^enerala listo?"); tabela_elektilo("lau^nokte", 'lauxnokte', array('j' => 'lau^ nokto', 'n' => 'nur unufoje'), $regulo->datoj['lauxnokte'], "C^u lau^nokta krompago, c^u unufoja?"); echo "</table>\n<p>"; if ($regulo->datoj['ID']) { butono('sxangxu', "S^ang^u"); } else { butono('kreu', "Kreu"); } echo "</p>\n</form>"; }
$alia = mysql_fetch_assoc($rez); if ($alia) { eoecho("<p>Ekzistas "); ligu("nova_teksto.php?id=" . $alia['ID'], "germana versio de tiu teksto"); eoecho(".</p>"); } else { eoecho("<p>Por tiu teksto devus ekzisti germana versio."); ligu("nova_teksto.php?mesagxoID=" . $_REQUEST['mesagxoID'] . "_de", "Kreu g^in"); echo "</p>"; } } } } ?> <form action='nova_teksto.php' method='POST'> <table class='tekstoj-redaktilo'> <?php tabelentajpejo("Identifikilo", 'mesagxoID', $_REQUEST['mesagxoID'], 30, $id_postt); granda_tabelentajpejo("Teksto", 'teksto', $_REQUEST['teksto'], '70', '10'); echo "</table>"; if ($_REQUEST['id']) { tenukasxe('id', $_REQUEST['id']); butono('sxangxu', 'S^ang^u'); } else { butono("aldonu", "Aldonu"); } ligu("tekstoj.php", "Reen al la teksto-listo"); ligu("renkontigxo.php", "Reen al la renkontig^o"); ligu("administrado.php", "Reen al la grava administrado"); echo "</form>"; HtmlFino();
echo "<pre>"; var_export($_POST); echo "</pre>"; } if ($_REQUEST['id']) { $kondicxsistemo = new Malaligxkondicxsistemo($_REQUEST['id']); eoecho("<h1>Redaktado de malalig^kondic^sistemo " . $kondicxsistemo->datoj['nomo'] . "</h1>\n"); } else { eoecho("<h1>Nova malalig^kondic^sistemo</h1>"); } eoecho("<h2>Bazaj datumoj</h2>"); echo "<form action='malaligxkondicxsistemo.php' method='POST'>\n"; echo "<table>\n"; tabela_kasxilo("ID", "ID", $kondicxsistemo->datoj['ID']); tabelentajpejo("nomo", 'nomo', $kondicxsistemo->datoj['nomo'], 20); granda_tabelentajpejo("priskribo", "priskribo", $kondicxsistemo->datoj['priskribo'], 40, 5); tabela_elektilo_db("alig^kategorisistemo", 'aligxkategorisistemo', 'aligxkategorisistemoj', 'nomo', 'ID', $kondicxsistemo->datoj['aligxkategorisistemo']); echo "</table>\n"; echo "<p>"; if (!$_REQUEST['id']) { butono("kreu", "Kreu"); echo "</p>\n</form>\n"; } else { butono("sxangxu", "S^ang^u"); butono("kopiu", "Kopiu"); eoecho("(tiam donu novan nomon!)"); echo "</p>\n</form>\n"; echo "<hr/>\n"; eoecho("<h2>Kondic^oj por la unuopaj malalig^periodoj</h2>"); echo "<form action='malaligxkondicxsistemo.php' method='POST'>\n"; tenukasxe("ID", $kondicxsistemo->datoj['ID']);
// // var_export($valoroj); // echo "-->\n"; if ($_POST['sendu'] == 'konservu') { konservuSercxon($_POST['nomo'], $_POST['priskribo'], base64_decode($_POST['sercxo']), $_POST['ID']); } if ($_POST['sendu'] == 'sxangxu') { sxangxu_datumbazon("sercxoj", array("nomo" => $_REQUEST['nomo'], "priskribo" => $_REQUEST['priskribo']), array("ID" => $_REQUEST['ID'])); } if ($_REQUEST['sendu'] == 'redaktu') { eoecho("<h3>Redaktu serc^on #" . $_REQUEST['id'] . "</h3>"); echo "<form action='sercxoj.php' method='post'>\n<p>"; $sql = datumbazdemando(array("s.ID" => "ID", "s.nomo" => "nomo", "s.priskribo" => "priskribo"), array("sercxoj" => "s"), array("s.ID = '" . $_REQUEST['id'] . "'")); $linio = mysql_fetch_assoc(sql_faru($sql)); eoecho("Bonvolu entajpi nomon kaj priskribon por via serc^o." . " Eblas uzi la c^-kodigon por la esperantaj supersignoj" . " (E^ por E^).</p>\n"); echo "<table>"; tabela_kasxilo('ID', 'ID', $linio['ID']); tabelentajpejo("Nomo:", 'nomo', $linio['nomo']); granda_tabelentajpejo("Priskribo:", 'priskribo', $linio['priskribo'], '60', '6'); echo "</table><p>"; butono("sxangxu", "S^ang^u"); ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'], "Ne s^ang^u, montru serc^on"); ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'] . "&sendu=sercxu", "Ne s^ang^u, tuj serc^u"); ligu("partsercxo.php", "Reen al <em>serc^i partoprenantojn</em>"); ligu("sercxoj.php", "Reen al la listo"); echo "</p>\n</form>"; HtmlFino(); return; } sercxoElektilo(); ligu("gxenerala_sercxo.php", "Nova Serc^o"); HtmlFino();
} // TODO if ($_REQUEST['id']) { $malaligxkondicxotipo = new Malaligxkondicxotipo($_REQUEST['id']); eoecho("<h1>Redakto de malalig^kondic^otipo <em>" . $malaligxkondicxotipo->datoj['nomo'] . "</em></h1>"); } else { eoecho("<h1>Kreado de nova malalig^kondic^otipo</h1>"); } echo "<form action='malaligxkondicxotipo.php' method='POST'>\n"; echo "<table>\n"; tabela_kasxilo("ID", "ID", $malaligxkondicxotipo->datoj['ID']); tabelentajpejo("nomo", "nomo", $malaligxkondicxotipo->datoj['nomo'], 20); /*tabelentajpejo("nomo_lokalingve", "nomo_lokalingve", $malaligxkondicxotipo->datoj['nomo_lokalingve'], 20); */ tabelentajpejo("mallongigo", "mallongigo", $malaligxkondicxotipo->datoj['mallongigo'], 10); granda_tabelentajpejo("priskribo", "priskribo", $malaligxkondicxotipo->datoj['priskribo'], 40, 4); tabela_ma_kondicxoelektilo("<span style='display:inline-block; vertical-align:text-top; max-width:70ex;'> Elektu c^i tie la g^ustan funkcion por la" . " kotizokalkulado por tiu" . " malalig^kondic^otipo. (Se vi bezonas alian" . " funkcion, necesas programi kaj aldoni g^in en" . " <code>konfiguroj/ma-kondicxoj.php</code>.)</span>", $malaligxkondicxotipo->datoj['funkcio']); tabelentajpejo("parametro", "parametro", (string) $malaligxkondicxotipo->datoj['parametro'], 10, "Kelkaj funkcioj bezonas specialan parametron. Se vi" . " ne scias, lasu malplena."); tabela_elektilo("uzebla", "uzebla", array('j' => 'jes', 'n' => 'ne'), $malaligxkondicxotipo->datoj['uzebla'], "C^u montri en la g^enerala listo?"); /*tabela_elektilo("lau^nokte", 'lauxnokte', array('j' => 'lau^ nokto', 'n' => 'nur unufoje'), $malaligxkondicxotipo->datoj['lauxnokte'], "C^u lau^nokta krompago, c^u unufoja?");*/ echo "</table>\n<p>"; if ($_REQUEST['id']) { butono('sxangxu', "S^ang^u"); } else { butono('kreu', "Kreu"); } echo "</p>\n</form>"; echo "<hr/>\n<p>";
/** * Montras formularon por krei/ŝanĝi noton. * * @param Partoprenanto $partoprenanto la Partoprenanto, al kiu rilatas * la noto. * @param Noto $noto la noto-objekto ŝanĝenda. */ function montru_notoformularon($partoprenanto, $noto) { if ($noto->datoj['ID']) { eoecho("<h2>S^ang^o de noto</h2>\n"); } else { eoecho("<h2>Nova noto</h2>\n"); } echo "<form method='post' action='notoj.php'>\n"; echo "<table>\n"; tabela_kasxilo("Noto-ID", 'ID', $noto->datoj['ID']); tabela_kasxilo("Ppanto-ID", 'partoprenantoID', $partoprenanto->datoj['ID'], $partoprenanto->tuta_nomo() . " (" . donu_ligon("partrezultoj.php?partoprenantoidento=" . $partoprenanto->datoj['ID'], "#" . $partoprenanto->datoj['ID']) . ")"); tabel_entajpbutono("Tipo", 'tipo', $noto->datoj['tipo'], 'telefon', "telefona kontakto", '', true); tabel_entajpbutono("", 'tipo', $noto->datoj['tipo'], 'persone', "persona kontakto", '', true); tabel_entajpbutono("", 'tipo', $noto->datoj['tipo'], 'letere', "letera kontakto", '', true); tabel_entajpbutono("", 'tipo', $noto->datoj['tipo'], 'rete', "ret(pos^t)a kontakto", '', true); tabel_entajpbutono("", 'tipo', $noto->datoj['tipo'], 'rimarko', "alia rimarko", '', true); tabelentajpejo("dato/tempo", 'dato', $noto->datoj['dato'], 20); tabelentajpejo("noto de ...", 'kiu', $noto->datoj['kiu'], 45); tabelentajpejo("pri komunikado kun ...", 'kunKiu', $noto->datoj['kunKiu'], 45); eoecho("<tr><th>noto por:</th><td>"); $entajpantoj = $noto->listu_entajpantojn(); foreach ($entajpantoj as $id => $inf) { echo "<span style='display: inline-block;'>"; jes_ne_bokso('noto_por[' . $id . ']', $inf[1]); eoecho($inf[0] . "</span>\n "); } eoecho("</td></tr>"); tabelentajpejo("temo", 'subjekto', $noto->datoj['subjekto'], 45); granda_tabelentajpejo("teksto", 'enhavo', $noto->datoj['enhavo'], 57, 20); tabela_elektilo("prilaborita", 'prilaborata', array("j" => 'jes', '' => 'ne'), $noto->datoj['prilaborata'], " (se ne, remontru je ..."); tabelentajpejo("", 'revidu', $noto->datoj['revidu'], 20, ")"); echo "</table>\n<p>"; if ($noto->datoj['ID']) { butono("notu", "S^ang^u la noton!"); } else { butono("notu", "Nova noto!"); } ligu("sercxrezultoj.php?elekto=notojn&partoprenantoidento=" . $partoprenanto->datoj['ID'], "C^iuj notoj de " . $partoprenanto->tuta_nomo()); ligu("partrezultoj.php?partoprenantoidento=" . $partoprenanto->datoj['ID'], "Partoprenanto-detaloj"); echo "</p>\n</form>\n"; }
if ($linio['retposxtadreso']) { $adresolisto[] = $linio['retposxtadreso']; } 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;
/** * kreas formularerojn por krei novan kategorion en tiu sistemo. * * adaptenda en subklasoj. */ function kreu_kategorikreilon() { tabelentajpejo("nomo", "nomo", "", 20); granda_tabelentajpejo("priskribo", "priskribo", "", 40, 4); }
echo "</pre>"; // TODO } // TODO eoecho("<h1>Redaktado de kostosistemo</h1>\n"); eoecho("<h2>Bazaj datumoj</h2>\n"); $sistemo = new Kostosistemo($_REQUEST['id']); echo "<form action='kostosistemo.php' method='POST'>\n"; // TODO: priskribo + nomo eoecho("<table>\n<tr><th>ID</tr><td>" . $sistemo->datoj['ID']); tenukasxe('id', $sistemo->datoj['ID']); echo "</td></tr>\n"; $entajpanto = eltrovu_entajpanton($sistemo->datoj['entajpanto']); eoecho("<tr><th>entajpanto</tr><td>" . $entajpanto . "</td></tr>\n"); tabelentajpejo("nomo", 'nomo', $sistemo->datoj['nomo'], 30); granda_tabelentajpejo("priskribo", 'priskribo', $sistemo->datoj['priskribo'], 40, 4); eoecho("</table>\n<p>"); // TODO: opcioj por kopii ekzistantajn kosto-valorojn butono('sxangxu_baze', "S^ang^u"); butono("kopiu", "Kopiu"); eoecho("(tiam nepre necesas nova nomo)"); echo "</p></form>\n"; echo "<hr/>\n"; // -------------------------------------------------------- eoecho("<h2>Personkostoj</h2>"); if (rajtas("teknikumi")) { function formatu_personkostotipon($tipo) { return donu_ligon("personkostotipo.php?id=" . $tipo->datoj['ID'], $tipo->datoj['nomo']); } } else {
break; default: darf_nicht_sein("sendu: " . $_REQUEST['sendu']); } // TODO if ($_REQUEST['id']) { $personkostotipo = new Personkostotipo($_REQUEST['id']); eoecho("<h1>Redakto de personkostotipo <em>" . $personkostotipo->datoj['nomo'] . "</em></h1>"); } else { eoecho("<h1>Kreado de nova personkostotipo</h1>"); } echo "<form action='personkostotipo.php' method='POST'>\n"; echo "<table>\n"; tabela_kasxilo("ID", "ID", $personkostotipo->datoj['ID']); tabelentajpejo("nomo", "nomo", $personkostotipo->datoj['nomo'], 20); granda_tabelentajpejo("priskribo", "priskribo", $personkostotipo->datoj['priskribo'], 40, 4); tabela_kondicxoelektilo("Elektu la g^ustan kondic^on por la kromkosto. " . "(Se vi bezonas alian kondic^on, necesas programi" . " kaj aldoni g^in en konfiguroj/kondicxoj.php.)", $personkostotipo->datoj['kondicxo']); tabela_elektilo("uzebla", "uzebla", array('j' => 'jes', 'n' => 'ne'), $personkostotipo->datoj['uzebla'], "C^u montri en la g^enerala listo?"); tabela_elektilo("lau^nokte", 'lauxnokte', array('j' => 'lau^ nokto', 'n' => 'nur unufoje'), $personkostotipo->datoj['lauxnokte'], "C^u lau^nokta personkosto, c^u unufoja?"); echo "</table>\n<p>"; if ($_REQUEST['id']) { butono('sxangxu', "S^ang^u"); } else { butono('kreu', "Kreu"); } echo "</p>\n</form>"; echo "<hr/>\n<p>"; ligu("kotizosistemoj.php", "C^iuj kotizosistemoj"); ligu("kategorisistemoj.php#kromtipoj", "C^iuj kategoriosistemoj"); ligu("kotizoj.php", "c^io rilate al kotizoj"); HtmlFino();
if ($aktuala_invitpeto) { eoecho("<h1>S^ang^u invitpeto-datojn</h1>"); } else { 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");