/**
* @param Mangxtempo $mangxtempo
*/
function montru_mangxredaktilon($mangxtempo)
{
echo "<form action='mangxredakto.php' method='POST'>\n<table>";
$linio = $mangxtempo->datoj;
if (!$linio['renkontigxoID']) {
$linio['renkontigxoID'] = $_SESSION['renkontigxo']->datoj['ID'];
}
tabela_kasxilo("ID", 'ID', $linio['ID']);
tabela_kasxilo("renkontig^o-ID", 'renkontigxoID', $linio['renkontigxoID']);
// TODO: pli bona dato-entajpilo (ekzemple simile al komenco-/findatoj)
tabelentajpejo("Dato", 'dato', $linio['dato'], 20);
// echo( "<!-- mangxotipoj: " . var_export($GLOBALS['mangxotipoj'], true) . "-->");
if ($linio['mangxotipo']) {
$tipoj = $GLOBALS['mangxotipoj'];
} else {
$tipoj = array_merge(array('-' => ""), $GLOBALS['mangxotipoj']);
}
// echo( "<!-- tipoj: " . var_export($tipoj, true) . "-->");
tabela_elektilo("mang^otipo", 'mangxotipo', $tipoj, $linio['mangxotipo']);
// tabelentajpejo("Prezo", 'prezo', $linio['prezo'], 10);
tabelentajpejo("Komento", 'komento', $linio['komento'], 20);
echo "</table>\n<p>\n";
if ($linio['ID']) {
butono("sxangxu", "S^ang^u");
butono("kreu", "Kreu novan");
} else {
butono("kreu", "Kreu");
}
ligu("mangxredakto.php", "Reen al la listo");
// butono + reen
echo "</p>\n</form>\n";
}
function montru_sxangxoformularon($konfiguro)
{
if ($konfiguro->datoj['ID']) {
eoecho("<h2>Konfiguro-s^ang^o</h2>");
} else {
eoecho("<h2>Nova konfiguro</h2>");
}
echo "<form action='renkontigxaj_konfiguroj.php' method='POST'>\n";
echo "<table>\n";
tabela_kasxilo("renkontig^o-ID", "renkontigxoID", $konfiguro->datoj['renkontigxoID']);
tabela_kasxilo("ID", 'ID', $konfiguro->datoj['ID']);
$elektoj = array();
foreach ($GLOBALS['konfiguraj_tipoj'] as $tipo => $titolo) {
$elektoj[$tipo] = $titolo[1];
}
tabela_elektilo("tipo", 'tipo', $elektoj, $konfiguro->datoj['tipo']);
tabelentajpejo("interna nomo", 'interna', $konfiguro->datoj['interna'], 20);
tabelentajpejo("grupo", 'grupo', $konfiguro->datoj['grupo'], 5);
tabelentajpejo("teksto", 'teksto', $konfiguro->datoj['teksto'], 50);
tabelentajpejo("rimarko", 'aldona_komento', $konfiguro->datoj['aldona_komento'], 50);
echo "</table>\n";
echo "<p>";
if ($konfiguro->datoj['ID']) {
butono('sxangxu', "S^ang^u");
butono("kreu", "Kreu (kun nova ID)");
} else {
butono('kreu', "Kreu");
}
ligu("renkontigxaj_konfiguroj.php", "Reen al la listo");
echo "</p>";
}
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>";
}
/**
* Elektilo en tabellinio por malaligxkondicxoj.
*
*<pre>
* .---------.------------------------.
* | funkcio | [_______] postteksto |
* '---------'--| |-------------'
* | |
* | |
* '-------'
*</pre>
*
* En la listo aperas la malaligxkondicxo-funkcioj uzeblaj
* por la kotizosistemo.
*
* @param eostring $postteksto kio estas skribita apude.
* @param string $defauxlto kio estas antauxelektita. Estu unu el
* la valoroj en $GLOBALS['ma_kondicxolisto'].
* @uses tabela_elektilo()
* @uses $GLOBALS['ma_kondicxolisto']
* @uses konvertu_funkcinomon
* @see tabela_kondicxoelektilo
*/
function tabela_ma_kondicxoelektilo($postteksto = "", $defauxlto = null)
{
$kondicxoj = array_combine($GLOBALS['ma_kondicxolisto'], array_map("konvertu_funkcinomon", $GLOBALS['ma_kondicxolisto']));
if (!$defauxlto) {
$kondicxoj = array_merge(array("---" => "(bonvolu elekti)"), $kondicxoj);
$defaulxto = "---";
}
tabela_elektilo("funkcio", "funkcio", $kondicxoj, $defauxlto, $postteksto);
}
$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>";
ligu("kotizosistemoj.php", "C^iuj kotizosistemoj");
ligu("kategorisistemoj.php#kromtipoj", "C^iuj kategoriosistemoj");
ligu("kotizoj.php", "c^io rilate al kotizoj");
/**
* 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";
}
$adresolisto[] = $miaPP->datoj['retposxto'];
}
}
$linio = eltrovu_laux_id(array("retposxtadreso", "sendanto_nomo"), "entajpantoj", $_SESSION['kkren']['entajpanto']);
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;
echo "<table>";
$sql = datumbazdemando(array('nokto_de', 'nokto_gxis', 'rezervtipo', 'cx.nomo' => 'cxambronomo'), array('litonoktoj', 'cxambroj' => 'cx'), array("cxambro = cx.id"), array('partopreno'), array('order' => 'nokto_de, nokto_gxis'));
$rez = sql_faru($sql);
$mialisto = array();
while ($linio = mysql_fetch_assoc($rez)) {
$mialisto[] = formatu_litonokton($linio);
}
tabela_kasxilo("Unua partopreno:", 'ppID', $_SESSION['partopreno']->datoj['ID'], donu_ligon("partrezultoj.php?partoprenidento=" . $_SESSION['partopreno']->datoj['ID'], "#" . $_SESSION['partopreno']->datoj['ID']) . " (" . $_SESSION['partoprenanto']->tuta_nomo() . ", " . implode(", ", $mialisto) . ") ");
$cxam_sql = datumbazdemando(array("pn.ID" => 'partoprenoID', "p.nomo", "personanomo", "nokto_de", "nokto_gxis", "rezervtipo", 'cx.nomo' => 'cxambronomo'), array("litonoktoj" => "l", "partoprenoj" => "pn", "partoprenantoj" => "p", 'cxambroj' => 'cx'), array("l.partopreno = pn.ID", "pn.partoprenantoID = p.ID", "l.cxambro = cx.ID"), "renkontigxoID", array("order" => "personanomo, nomo"));
$rez = sql_faru($cxam_sql);
$templisto = array();
while ($linio = mysql_fetch_assoc($rez)) {
// ni devas uzi iun prefikson por la sxlosiloj
// por ke tabela_elektilo ne pensu, ke ili estas
// nur simplaj array-indeksoj (= forjxetendaj).
$sx = '#' . $linio['partoprenoID'];
if (isset($templisto[$sx])) {
$templisto[$sx]['cxambroj'][] = formatu_litonokton($linio);
} else {
$templisto[$sx] = array('bazaj' => $sx . " – " . $linio['personanomo'] . " " . $linio['nomo'], 'cxambroj' => array(formatu_litonokton($linio)));
}
}
$listo = array();
foreach ($templisto as $sx => $val) {
$listo[$sx] = $val['bazaj'] . " (" . implode(", ", $val['cxambroj']) . ")";
}
tabela_elektilo("Dua partopreno:", 'al', $listo, "", "", min(10, count($listo)));
echo "</table>\n<p>";
butono("sxangxu", "Inters^ang^u!");
echo "</p>\n</form>";
HtmlFino();
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();
