function listu_regulojn($tipo)
{
echo "<p>";
rajtligu("regulo.php?tipo=" . $tipo, "Nova " . $tipo . "regulo", "", "teknikumi");
echo "</p>";
eoecho("<table class='regulotabelo'>\n" . "<tr><th>ID</th><th>nomo</th><th>priskribo</th><th>uzebla</th>" . "<th>lau^nokte</th></tr>\n");
$regulolisto = listu_cxiujn_regulojn($tipo, " 1=1 ");
foreach ($regulolisto as $regulo) {
eoecho("<tr><td>" . $regulo->datoj['ID'] . "</td><td>" . $regulo->formatu_nomon() . "</td><td>" . $regulo->datoj['priskribo'] . "</td><td>" . $regulo->datoj['uzebla'] . "</td><td>" . $regulo->datoj['lauxnokte'] . "</td></tr>\n");
}
echo "</table>";
}
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
}