/**
* 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";
}
echo "<p>\n";
$demando = datumbazdemando(array("p.ID", "nomo", "personanomo", "retposxto", "sekso", "pn.agxo"), array("partoprenantoj" => "p", "partoprenoj" => "pn"), array("pn.partoprenantoID = p.ID", "retposxto <> ''", "alvenstato = 'a'"), "renkontigxoID", array("limit" => "{$komenco}, {$nombro}", "order" => "pn.ID ASC"));
eoecho("Demando: [<code>" . $demando . "</code>]<br/>\n");
eoecho("dato: " . date("Y-m-d H:i:s") . "<br/>\n");
$rezulto = sql_faru($demando);
$i = $komenco;
while ($row = mysql_fetch_array($rezulto, MYSQL_BOTH)) {
eoecho($i . " " . $row['personanomo'] . " " . $row['nomo'] . "<br/>\n");
$i++;
$to_name = eotransformado($row['personanomo'] . " " . $row['nomo'], "x-metodo");
// $to_address = teknika_administranto_retadreso;
$to_address = $row['retposxto'];
if ($_POST['vere'] == 'jes') {
sendu_adresaron($row, $to_name, $to_address, $bcc);
}
flush();
usleep(200);
}
eoecho("Fino.<br/>\n");
eoecho("dato: " . date("Y-m-d H:i:s") . "</p>\n");
}
echo "<h2>Sendado de adresaroj</h2>";
echo "<form action='sendu_adresaron_gxenerale.php' method='POST'>\n<table>";
tabelentajpejo("Nombro en unu pas^o:", 'nombro', $_POST['nombro'], 10, "", "", 1);
tabelentajpejo("Komencu c^e:", 'komenco', $i, 10, "", "", 0);
tabel_entajpbutono("", "vere", $_POST['vere'], 'jes', "vere sendu");
tabel_entajpbutono("", "vere", $_POST['vere'], 'ne', "nur listigu ricevontojn", "kutima");
echo "</table>\n<p>";
butono("sendu", "Sendu");
echo "</p></form>";
HtmlFino();
entajpbutono(" | ", 'tejo_membro_kontrolita', $_SESSION["partopreno"]->datoj['tejo_membro_kontrolita'][0], 'p', 'p', "pagas al TEJO/UEA, sed ne ig^as TEJO-membro" . " (= ne ricevas rabaton).");
entajpejo("<br/>TEJO-membrokotizo (au^ aliaj pagoj al UEA):", "tejo_membro_kotizo", $_SESSION['partopreno']->datoj['tejo_membro_kotizo'], 5);
if (!KAMPOELEKTO_IJK) {
// TODO: faru individuan krompagon el tio.
echo "<hr/>";
entajpbutono(deviga_membreco_nomo . "-membro (lau^ alig^ilo): ", 'GEJmembro', $_SESSION["partopreno"]->datoj['GEJmembro'][0], "J", 'J', 'jes');
entajpbutono(" ", 'GEJmembro', $_SESSION["partopreno"]->datoj['GEJmembro'][0], "N", 'N', "ne", "kutima");
eoecho("<br/>(Estas krompago por " . nemembreculoj . ", kiuj ne estas membroj de " . deviga_membreco . ", sed eblas membrig^i surloke)\n");
echo "<table>\n";
tabel_entajpbutono("C^u surloka membrokotizo?", 'surloka_membrokotizo', $_SESSION["partopreno"]->datoj['surloka_membrokotizo'], '?', "? - ne jam traktita (au^ antaukontrolo donis rezulton, ke ankorau^ ne pagis)", 'kutima', true);
tabel_entajpbutono("", 'surloka_membrokotizo', $_SESSION["partopreno"]->datoj['surloka_membrokotizo'], 'n', "n - ne estas membro kaj ne devas esti (ekzemple eksterlandanoj)", "", true);
tabel_entajpbutono("", 'surloka_membrokotizo', $_SESSION["partopreno"]->datoj['surloka_membrokotizo'], 'a', "a - jam membro, ne devas pagi nun (antau^e pagis/senpaga membro/enkasigrajtigo)", "", true);
tabel_entajpbutono("", 'surloka_membrokotizo', $_SESSION["partopreno"]->datoj['surloka_membrokotizo'], 'j', "j - jam estas membro, surloke rekotizas", "", true);
tabel_entajpbutono("", 'surloka_membrokotizo', $_SESSION["partopreno"]->datoj['surloka_membrokotizo'], 'i', "i - ig^as nova membro kaj surloke pagas", "", true);
tabel_entajpbutono("", 'surloka_membrokotizo', $_SESSION["partopreno"]->datoj['surloka_membrokotizo'], 'h', "h - nova membro, ne pagas nun (senkosta membreco au^ enkasigrajtigo", "", true);
tabel_entajpbutono("", 'surloka_membrokotizo', $_SESSION["partopreno"]->datoj['surloka_membrokotizo'], 'k', "k - devus membri, sed anstatau^e krompagas", "", true);
tabelentajpejo("membrokotizo/krompago", 'membrokotizo', $_SESSION["partopreno"]->datoj['membrokotizo'], 6, "E^");
echo "</table>\n";
}
echo "<hr/>\n";
//entajpejo ("rimarkoj:",partoprenrimarkoj,$partopreno->datoj[rimarkoj],30,"","","");
?>
<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
function redaktilo_por_regulaj_pseuxdopagoj($sistemo, $tipo)
{
eoecho("<h2 id='regulaj_" . $tipo . "j'>Regulaj " . $tipo . "j</h2>\n");
echo "<form action='kotizosistemo.php?id=" . $sistemo->datoj['ID'] . "&tipo=" . $tipo . "' method='POST'>\n";
echo "<table class='pseuxdopagoj'>\n";
eoecho(" <tr><th>ID</th><th>tipo</th><th>kvanto</th><th>valuto</th>" . "<th>priskribo</th></tr>\n");
$regulolisto = listu_cxiujn_regulojn($tipo);
$neuzitaj = array();
foreach ($regulolisto as $regulo) {
$pseuxdopago = $regulo->donu_regulan_pseuxdopagon($sistemo);
if ($pseuxdopago) {
eoecho("<tr><td>" . $pseuxdopago->datoj['ID'] . "</td><td>" . $regulo->formatu_nomon());
simpla_entajpejo("</td><td>", $tipo . '[' . $pseuxdopago->datoj['ID'] . '][kvanto]', $pseuxdopago->datoj['kvanto'], 6);
echo "</td><td>";
simpla_elektolisto_el_konfiguroj($tipo . '[' . $pseuxdopago->datoj['ID'] . '][valuto]', 'valuto', $pseuxdopago->datoj['valuto']);
eoecho("</td><td>" . $regulo->datoj['priskribo'] . "</td></tr>\n");
} else {
$neuzitaj[] = $regulo;
}
}
// foreach
echo "</table>\n<p>";
butono("sxangxu_pagojn", "S^ang^u " . $tipo . "jn");
echo "</p>\n</form>";
if (count($neuzitaj)) {
eoecho("<h3 id='regulaj_" . $tipo . "j'>Nova " . $tipo . "</h3>\n");
echo "<form action='kotizosistemo.php?id=" . $sistemo->datoj['ID'] . "&tipo=" . $tipo . "' method='POST'>\n";
echo "<table>\n";
eoecho("<tr><th>regulo</th></tr>\n");
foreach ($neuzitaj as $regulo) {
tabel_entajpbutono('', 'regulo', "", $regulo->datoj['ID'], $regulo->formatu_nomon() . " – " . $regulo->datoj['priskribo'], "", true);
}
tabelentajpejo("kvanto", 'kvanto', "", 6);
tabela_elektolisto_el_konfiguroj("valuto", 'valuto', 'valuto', "");
echo "</table>\n<p>";
butono("nova_pago", "Aldonu!");
rajtligu('regulo.php?tipo=' . $tipo, "Nova " . $tipo . "regulo", '', 'teknikumi');
echo "<p></form>\n";
}
// if
}
sendu_duan_informilon($partoprenanto, $partopreno, $_SESSION['renkontigxo'], "J");
} else {
eoecho("(nur elprovo)");
}
flush();
usleep(200);
} else {
eoecho("(malg^usta unikodeco)");
}
} else {
eoecho("(mendis paperan)");
}
}
}
echo "\n";
}
eoecho("<br/>Fino.<br/>\n");
eoecho("dato: " . date("Y-m-d H:i:s") . "</p>\n");
}
eoecho("<h2>Sendado de duaj konfirmiloj</h2>\n");
echo "<form action='sendu_duan_informilon.php' method='POST'>\n<table>";
tabelentajpejo("Nombro en unu pas^o:", 'nombro', $_POST['nombro'], 10, "", "", 1);
tabelentajpejo("Komencu c^e:", 'komenco', $i, 10, "", "", 0);
tabel_entajpbutono("", "vere", $_POST['vere'], 'jes', "vere sendu");
tabel_entajpbutono("", "vere", $_POST['vere'], 'ne', "nur listigu ricevontojn", "kutima");
tabel_entajpbutono("", "unikodaj", $_POST['unikodaj'], 'jes', "unikodaj");
tabel_entajpbutono("", "unikodaj", $_POST['unikodaj'], 'ne', "neunikodaj", "kutima");
echo "</table>\n<p>";
butono("sendu", "Sendu");
echo "</p></form>";
HtmlFino();
if ($_POST['sendu'] == 'sendu') {
$komenco = $_POST['komenco'];
$nombro = $_POST['nombro'];
echo "<p>\n";
$demando = datumbazdemando(array("p.ID" => "antoID", "pn.ID" => "enoID"), array("partoprenantoj" => "p", "partoprenoj" => "pn"), array("pn.partoprenantoID = p.ID", "p.retposxto <> ''", "pn.alvenstato" => 'a'), "renkontigxoID", array("limit" => "{$komenco}, {$nombro}", "order" => "pn.ID ASC"));
eoecho("Demando: [<code>" . $demando . "</code>]</p><p>\n");
eoecho("dato: " . date("Y-m-d H:i:s") . "<br/>\n");
$rezulto = sql_faru($demando);
$i = $komenco;
while ($row = mysql_fetch_assoc($rezulto)) {
$anto = new Partoprenanto($row['antoID']);
$eno = new Partopreno($row['enoID']);
eoecho($i . " " . $anto->tuta_nomo() . "<br/>\n");
$i++;
sendu_adresaro_demandon($anto, $eno, $_SESSION['renkontigxo'], "seria sendilo (" . $kkren['entajpantonomo'] . ")", $_POST['vere'] == "jes");
flush();
usleep(200);
}
eoecho("Fino.<br/>\n");
eoecho("dato: " . date("Y-m-d H:i:s") . "</p>\n");
}
eoecho("<h2>Sendado de informmesag^oj</h2>");
echo "<form action='" . $_SERVER['PHP_SELF'] . "' method='POST'>\n<table>";
tabelentajpejo("Nombro en unu pas^o:", 'nombro', $_POST['nombro'], 10, "", "", 1);
tabelentajpejo("Komencu c^e:", 'komenco', $i, 10, "", "", 0);
tabel_entajpbutono("", "vere", $_POST['vere'], 'jes', "vere sendu");
tabel_entajpbutono("", "vere", $_POST['vere'], 'ne', "sendu nur al kopio-ricevantoj", "kutima");
echo "</table>\n<p>";
butono("sendu", "Sendu");
echo "</p></form>";
HtmlFino();
}
echo "</table>\n<p>";
butono("sxangxu_personkostojn", "S^ang^u personkostojn");
echo "</p></form>\n";
if (count($neuzitaj)) {
echo "<hr/>\n";
// ------------------------------------------------
eoecho("<h2>Nova personkosto</h2>");
if (rajtas("teknikumi")) {
ligu("personkostotipo.php", "Nova personkostotipo");
}
echo "<form action='kostosistemo.php' method='POST'>\n";
tenukasxe('id', $sistemo->datoj['ID']);
eoecho("<table>\n<tr><th>tipo</th><td/><th>priskribo</th></tr>\n");
foreach ($neuzitaj as $kromtipo) {
tabel_entajpbutono(formatu_personkostotipon($kromtipo), 'tipo', "", $kromtipo->datoj['ID'], $kromtipo->datoj['priskribo']);
}
echo "</table>";
echo "<table>";
foreach ($informoj as $nomo => $titolo) {
tabelentajpejo($titolo, $nomo, "", 6);
}
echo "</table><p>";
butono("nova_personkosto", "Aldonu!");
echo "</p></form>\n";
}
echo "<hr/>\n";
// --------------------------------------------------------
eoecho("<h2>Fikskostoj</h2>");
echo "<form action='kostosistemo.php' method='POST'>\n";
tenukasxe('id', $sistemo->datoj['ID']);
