/**
* Donas liston de cxiuj regulaj pseuxdopago de iu tipo
* (t.e. krompagoj aux rabatoj), kiuj estas relevantaj en
* tiu cxi kotizosistemo.
*
* @param asciistring $tipo aux 'rabato' aux 'krompago'.
* @return array el {@link Regula_Pseuxdopago}-objektoj.
*
*/
function listu_regulajn_pseuxdopagojn($tipo)
{
if (is_array($this->pseuxdopagoj[$tipo])) {
return $this->pseuxdopagoj[$tipo];
}
$listo = array();
$tabelnomo = "regulaj_" . $tipo . "j";
$sql = datumbazdemando('ID', $tabelnomo, array('kotizosistemo' => $this->datoj['ID']));
$rez = sql_faru($sql);
while ($linio = mysql_fetch_assoc($rez)) {
$listo[] = donu_regulan_pseuxdopagon($tipo, $linio['ID']);
}
$this->pseuxdopagoj[$tipo] = $listo;
return $listo;
}
/**
* sxangxas la ekzistantajn (regulajn) krompagojn
* laux la entajpitajxoj.
*/
function sxangxu_pagojn($tipo)
{
foreach ($_POST[$tipo] as $id => $informoj) {
$regpago = donu_regulan_pseuxdopagon($tipo, $id);
if ($regpago->sxangxus_ion($informoj)) {
$regpago->kopiu($informoj);
$regpago->skribu();
eoecho("<p>S^ang^is la regulan " . $tipo . "n #" . $regpago->datoj['ID'] . ".</p>");
}
}
}