function pseuxdopaga_subtabelo($klaso, $titolo, $valoroj)
{
    $tabelnomo = $GLOBALS['pp_tabelnomoj'][$klaso];
    sercxtabelkapo($titolo, $tabelnomo, $valoroj);
    sercxtabellinio("ID", $tabelnomo, 'ID', $valoroj, $klaso . "ID");
    sercxtabellinio("Kvanto", $tabelnomo, 'kvanto', $valoroj, $klaso . "kvanto");
    el_konfigura_sercxelektolinio("Valuto", $tabelnomo, 'valuto', $valoroj, 'valuto', $klaso . "valuto");
    sercxtabellinio("Dato", $tabelnomo, 'dato', $valoroj, $klaso . 'dato');
    el_konfigura_sercxelektolinio("Tipo", $tabelnomo, 'tipo', $valoroj, $klaso . 'tipo', $klaso . "tipo");
}
sercxtabelkapo("Pago (unuopa)", "pagoj", $valoroj);
sercxtabellinio("ID", 'pagoj', 'ID', $valoroj, "pagoid");
sercxtabellinio("Kvanto", 'pagoj', 'kvanto', $valoroj, "pagokvanto");
sercxtabellinio("Dato", 'pagoj', 'dato', $valoroj, "pagodato");
sercxtabellinio("Tipo", 'pagoj', 'tipo', $valoroj, "pagotipo");
sercxtabelkapo("Rabato (unuopa)", "rabatoj", $valoroj);
sercxtabellinio("ID", 'rabatoj', 'ID', $valoroj, "rabatoid");
sercxtabellinio("Kvanto", 'rabatoj', 'kvanto', $valoroj, "rabatokvanto");
sercxtabellinio("Kau^zo", 'rabatoj', 'kauzo', $valotoj);
sercxtabelkapo("Litonoktoj", "litonoktoj", $valoroj);
sercxtabellinio("ID", 'litonoktoj', 'ID', $valoroj, "litonoktoid");
sercxtabellinio("Lito-numero", 'litonoktoj', 'litonumero', $valoroj);
sercxtabellinio("Nokto de", 'litonoktoj', 'nokto_de', $valoroj);
sercxtabellinio("Nokto g^is", 'litonoktoj', 'nokto_gxis', $valoroj);
sercxtabellinio("Rezervtipo", 'litonoktoj', 'rezervtipo', $valoroj, array('d' => 'disdonitaj', 'r' => 'rezervitaj'));
sercxtabelkapo("C^ambroj", "cxambroj", $valoroj);
sercxtabellinio("ID", 'cxambroj', 'ID', $valoroj, "cxambroid");
sercxtabellinio("Nomo", 'cxambroj', 'nomo', $valoroj, "cxambronomo");
sercxtabellinio("Etag^o", 'cxambroj', 'etagxo', $valoroj);
sercxtabellinio("Lito-nombro", 'cxambroj', 'litonombro', $valoroj);
sercxelektolinio("Tipo", 'cxambroj', 'tipo', $valoroj, array('' => 'ne elektis', 'g' => 'gea', 'i' => 'ina', 'v' => 'vira'), "cxambrotipo");
sercxelektolinio("Dulita", 'cxambroj', 'dulita', $valoroj, array('J' => 'Jes', 'N' => 'Ne'));
sercxtabellinio("Rimarkoj", 'cxambroj', 'rimarkoj', $valoroj, "cxambrorimarkoj");
eoecho("</table>\n");
echo "<p>";
butono('sercxu', "Serc^u");
butono('dauxrigu', "Konservu");
echo "</p>";
echo "</form>\n";
// TODO
HtmlFino();