// array("tipo","kau^zo",'XXXXX','l','','')
// );
// if (!rajtas("rabati")) {
// array_shift($kolumnoj);
// }
// eoecho("rabatoj:");
// sercxu($sql,
// array("tipo","desc"),
// $kolumnoj,
// array(array('',array('∑ XX','N','z'))),
// "rabatoj-partrezultoj",
// 0, 0, "",'','ne');
// // TODO: krompago-listo
// echo "</td></tr></table>\n";
if (DEBUG) {
eoecho(" [lau^ malnova kalkulo: " . $kotkal->restas_pagenda() . "]");
}
echo " </td></tr>\n";
echo "<tr><td class='kalkulilo' colspan=1>";
// <A href=partrezultoj.php?montrukotizo=";
if ($montrukotizo != "montru") {
ligu("partrezultoj.php?montrukotizo=montru", "montru kotizkalkuladon....");
} else {
ligu("partrezultoj.php?montrukotizo=kasxu", "kas^u kotizkalkuladon....");
if (DEBUG) {
echo "<pre>";
var_export($kotkal);
echo "</pre>";
}
$kotkal->tabelu_kotizon(new HTMLKotizoFormatilo());
if (DEBUG) {
/**
* kalkulas, kiom alta estus la TEJO/UEA-rabato, se tiu
* persono estus TEJO/UEA-membro. Pli precize, kalkulas la diferencon
* inter la kotizo, se li estus ne-membro, kaj se li estus membro.
*
* @param Partoprenanto $partoprenanto
* @param Partopreno $partoprenao
* @param Renkontigxo $renkontigxo
* return number
*/
function kalkulu_tejo_rabaton($partoprenanto, $partopreno, $renkontigxo)
{
$org_val = $partopreno->datoj['tejo_membro_kontrolita'];
$partopreno->datoj['tejo_membro_kontrolita'] = 'j';
$kalk_membro = new Kotizokalkulilo($partoprenanto, $partopreno, $renkontigxo);
$kotizo_membro = $kalk_membro->restas_pagenda();
$partopreno->datoj['tejo_membro_kontrolita'] = 'n';
$kalk_nemembro = new Kotizokalkulilo($partoprenanto, $partopreno, $renkontigxo);
$kotizo_nemembro = $kalk_nemembro->restas_pagenda();
// restarigo de la originalo ...
$partopreno->datoj['tejo_membro_kontrolita'] = $org_val;
return $kotizo_nemembro - $kotizo_membro;
}
/**
* kreas konfirmilon en unu el du lingvoj.
* $partopreno - Partopreno-objekto
* $partoprenanto - la Partoprenanto-objekto
* $renkontigxo - Renkontigxo-objekto
* @param Kotizokalkulilo $kotizo - Kotizo-objekto (estu kreita el la tri antauxe
* menciitaj objektoj)
* @param lingvokodo $lingvo
*/
function kreu_konfirmilon_unulingve($partopreno, $partoprenanto, $renkontigxo, $kotizo, $lingvo)
{
require_once $GLOBALS['prafix'] . "/tradukendaj_iloj/trad_htmliloj.php";
eniru_dosieron();
eniru_lingvon($lingvo);
// TODO!: cxio GEJ-specifa estu konfigurebla.
$this->pdf->AddPage();
$this->pdf->SetLeftMargin(20);
$this->pdf->SetRightMargin(20);
$this->pdf->Image($GLOBALS['prafix'] . '/bildoj/tejo-emblemo.png', 20, 10, 30);
$this->pdf->Image($GLOBALS['prafix'] . '/bildoj/ijk-emblemo.png', 160, 10, 30);
// $this->pdf->Image($GLOBALS['prafix'] . '/bildoj/eo-logo.png', 162, 10, 28);
$this->pdf->SetFontSize($this->unikode ? 17 : 19);
// TODO: el datumbazo
$this->pdf->text(50, 17, "Tutmonda Esperantista Junulara Organizo");
$this->pdf->text(60, 26, $this->trans_eo($renkontigxo->datoj['nomo']));
// falc- kaj truil-markiloj
$this->pdf->line(4, 100, 9, 100);
$this->pdf->line(4, 147, 7, 147);
$this->pdf->line(4, 198, 9, 198);
// adreso de la partoprenanto
$this->pdf->SetFont('', 'B', 12);
$this->pdf->setY(59);
$this->pdf->cell(60, 5, $this->trans_eo($partoprenanto->tuta_nomo()));
$this->pdf->ln();
$this->pdf->write(5, $this->trans_eo($partoprenanto->datoj['adreso']));
/* if ($partoprenanto->datoj[adresaldonajxo]!='') */
/* { */
/* $this->pdf->write(5,$this->trans_eo($partoprenanto->datoj[adresaldonajxo])); */
/* $this->pdf->ln(); */
/* } */
/* $this->pdf->write(5,$this->trans_eo($partoprenanto->datoj[strato])); */
$this->pdf->ln();
$this->pdf->write(5, $this->trans_eo($partoprenanto->datoj['posxtkodo'] . " " . $partoprenanto->datoj['urbo']));
$this->pdf->ln();
$this->pdf->Cell(60, 5, $this->trans_eo($partoprenanto->landonomo_en_lingvo($lingvo)));
$this->pdf->setXY(120, 60);
if ($partoprenanto->datoj['sxildnomo']) {
$cxefnomo = $partoprenanto->datoj['sxildnomo'];
$malcxefnomo = $partoprenanto->datoj['personanomo'] . " " . $partoprenanto->datoj['nomo'];
} else {
$cxefnomo = $partoprenanto->datoj['personanomo'];
$malcxefnomo = $partoprenanto->datoj['nomo'];
}
$this->pdf->SetFont('', "B", 14);
$this->pdf->Cell(40, 10, $this->trans_eo($cxefnomo), "LTR", 2, "R");
$this->pdf->SetFont('', '', 10);
$this->pdf->Cell(40, 6, $this->trans_eo($malcxefnomo), "LR", 2, "R");
$this->pdf->Cell(40, 6, $this->trans_eo($partoprenanto->sxildlando()), "LRB", 1, "R");
$this->pdf->SetFont('', '', 10);
$this->pdf->setY(90);
$this->pdf->write(5, "Saluton!");
$this->pdf->ln();
$this->pdf->write(5, $this->trans_eo(donu_tekston_lauxlingve("konf2-enkonduko", $lingvo, $renkontigxo)));
$this->pdf->ln();
$this->pdf->SetLeftMargin(30);
/* $kotizo->montru_kotizon($lingvo == 'eo' ? 3 : 4, $this); */
$kotizo->tabelu_kotizon(new PDFKotizoFormatilo($this->pdf, $lingvo, $this->unikode));
$this->pdf->SetLeftMargin(20);
$this->pdf->ln(3);
$this->pdf->SetFontSize(10);
// $this->pdf->setXY(30,102);
if (DEBUG) {
echo "<!-- alk: [{$alk}] -->";
// echo "<!-- renkontigxo->datoj['meze']: [" . $renkontigxo->datoj['meze']. "] -->" ;
echo "<!--";
// echo "\npartopreno: ";
// var_export($partopreno);
// echo "\npartoprenanto: ";
// var_export($partoprenanto);
echo "\nrenkontigxo: ";
var_export($renkontigxo);
echo "-->";
}
// TODO: tio ĉi estas speciala por IJK 2009:
switch ($partopreno->datoj['domotipo']) {
case 'A':
$mendo = CH("mendis-amaslogxejon");
break;
case 'J':
if ($partopreno->datoj['dulita'] == 'U') {
$mendo = CH("mendis-studenthejmon-unulitan");
} else {
if ($partopreno->datoj['cxambrotipo'] == 'u') {
$mendo = CH("mendis-studenthejmon-dulitan-unuseksan");
} else {
$mendo = CH("mendis-studenthejmon-dulitan-ambauxseksan");
}
if ($partopreno->datoj['kunKiu']) {
$mendo .= " " . CH("volas-logxi-kun", eotransformado($partopreno->datoj['kunKiu'], 'utf-8'));
}
}
break;
case 'T':
$mendo = CH("mendis-tendon");
break;
case 'M':
$mendo = CH("mendis-nenion");
break;
default:
$mendo = "-- erara domotipo: " . $partopreno->datoj['domotipo'] . " --";
erareldono($mendo);
}
$teksto = $mendo;
// la granda teksto, kiu konfirmas la aligxon.
$this->pdf->SetFont('', 'B', 10);
$this->pdf->write(4, $this->trans_uni($teksto));
$this->pdf->ln();
// atentigo pri pagenda resto:
$pagenda = $kotizo->restas_pagenda();
echo "<!-- restas_pagenda: " . $pagenda . " -->";
if ($pagenda > 0) {
list($kurzo, $dato) = eltrovu_kurzon('EUR');
$pagenda_eur = number_format((double) $pagenda / (double) $kurzo, 2, ".", "");
$teksto = CH("restas-pagenda-CZK-EUR-dato", $pagenda, $pagenda_eur, $kurzo, $dato);
// $teksto = strtr(donu_tekston_lauxlingve("konf2-kunportu-reston",
// $lingvo,
// $renkontigxo),
// array("{{sumo}}" => $pagenda));
// atentigo pri kunportado de mono
$this->pdf->SetFont('', 'B', 8);
$this->pdf->write(3.8, $this->trans_uni($teksto));
$this->pdf->ln();
}
$this->pdf->SetFont("", "", 10);
$this->pdf->write(5, $this->trans_uni(CH("vi-mendis-mangxojn")));
$this->pdf->ln();
pdf_montru_manĝojn($this->pdf, $partopreno, $this);
//$this->pdf->setY(155);
$this->pdf->SetFont('', 'B', 11);
$this->pdf->Write(6, $this->trans_uni(CH("gravaj-informoj")));
$this->pdf->ln();
$this->pdf->SetFont('', '', 9);
$this->pdf->setX(25);
$teksto = donu_tekston_lauxlingve("konf2-gravaj-informoj", $lingvo, $renkontigxo);
/* if ($partopreno->datoj['agxo']< 18) */
/* $teksto .= " " . donu_tekston_lauxlingve("konf2-junulo", $lingvo, $renkontigxo); */
/* if ($domotipo=='junulargastejo' and $cioenordo == 'jes') */
/* { */
/* $teksto .= " " . donu_tekston_lauxlingve("konf2-21a-horo", $lingvo, $renkontigxo); */
/* //aus der DB zaubern */
/* } */
/* else if ($domotipo=='memzorgantejo') */
/* { */
/* $teksto .= " " . donu_tekston_lauxlingve("konf2-memzorganto", $lingvo, $renkontigxo); */
/* } */
/* if ($partoprenanto->datoj['lando']==HEJMLANDO) //germanio */
/* { */
/* $teksto .= "\n" . donu_tekston_lauxlingve("konf2-membreco-averto", $lingvo, $renkontigxo); */
/* } */
if ($partopreno->datoj['tejo_membro_kontrolita'] == 'j') {
$teksto .= "" . donu_tekston_lauxlingve("konf2_tejo_estos_membro", $lingvo, $renkontigxo);
} else {
$teksto .= "" . donu_tekston_lauxlingve("konf2_tejo_ne_jam", $lingvo, $renkontigxo);
}
$teksto .= ' ';
$this->pdf->multicell(170, 3.8, $this->trans_eo($teksto), 0, "L");
$this->pdf->SetFontSize(10);
$this->pdf->ln(5);
// $this->pdf->setY(200);
// TODO: cxu sencas absoluta pozicio?
// $this->pdf->setY(240);
$this->pdf->write(5, $this->trans_eo(donu_tekston_lauxlingve("konf2-elkonduko", $lingvo, $renkontigxo)));
// $this->pdf->Image($GLOBALS['prafix'] . '/bildoj/subskribo-julia-2.png', 100, 251, 80); // TODO: allgemein (el konfiguro aux datumbazo)
$this->pdf->Ln(10.0);
eliru_dosieron();
eliru_lingvon();
}
$pago = new Pago();
$pago->kreu();
$pago->datoj['valuto'] = $_POST['valuto'];
$pago->datoj['partoprenoID'] = $partopreno->datoj['ID'];
$pago->datoj['kvanto'] = -$_POST['malpago'];
$pago->datoj['dato'] = date('Y-m-d');
$pago->datoj['tipo'] = $_POST['sendu'] == 'donacu' ? 'donaco' : 'repago';
$pago->skribu();
// TODO: monujo (nur cxe repago)
} else {
// ni nun unuan fojon alvenis ...
$ne_pluiru = true;
}
}
$kot = new Kotizokalkulilo($partoprenanto, $partopreno, $_SESSION['renkontigxo']);
$restas = $kot->restas_pagenda();
if ($restas == 0.0 and !$ne_pluiru) {
kalkulu_necesajn_kaj_eblajn_pasxojn('pago');
$pasxo = sekva_pasxo();
http_redirect('akceptado-' . $pasxo['id'] . '.php', null, false, 303);
exit;
}
$informoj = $kot->restas_pagenda_en_valutoj();
if (DEBUG) {
echo "<pre>";
var_export($informoj);
echo "</pre>";
}
akceptado_kapo("pago");
akceptada_instrukcio("Komparu la kalkulon kun tiu sur la akceptofolio. " . "Se necesas, s^ang^u la akceptofolion. Se io estas" . " neklara, voku la c^efadministranton.");
if ($informoj['ni_fajfas']) {
} else {
if ("kotizokomparo" == $elekto) {
$kotizosistemo = new Kotizosistemo($_SESSION['renkontigxo']->datoj['kotizosistemo']);
$sql = datumbazdemando(array("pn.ID" => "eno", "pt.ID" => "anto"), array("partoprenoj" => "pn", "partoprenantoj" => "pt"), array("pn.partoprenantoID = pt.ID"), "renkontigxoID");
$rez = sql_faru($sql);
HtmlKapo();
eoecho("<table>\n" . "<tr><th>p-enoID</th><th>nomo</th><th>nova kotizo</th>" . "<th>malnova kotizo</th><th>diferenco</th></tr>\n");
while ($linio = mysql_fetch_assoc($rez)) {
$pprenanto = new Partoprenanto($linio['anto']);
$ppreno = new Partopreno($linio['eno']);
// malnova kotizosistemo
$kot = new Kotizo($ppreno, $pprenanto, $_SESSION['renkontigxo']);
// nova kotizosistemo
$kotkal = new Kotizokalkulilo($pprenanto, $ppreno, $_SESSION['renkontigxo'], $kotizosistemo);
$malnova = $kot->restas_pagenda();
$nova = $kotkal->restas_pagenda();
if (abs($nova - $malnova) < 1) {
echo "<!-- " . $pprenanto->tuta_nomo() . "(" . $nova . "/" . $malnova . ") -->";
} else {
eoecho("<tr><td>" . donu_ligon("partrezultoj.php?partoprenidento=" . $ppreno->datoj['ID'], $ppreno->datoj['ID']) . "</td><td>" . $pprenanto->tuta_nomo() . "</td><td>" . $nova . "</td><td>" . $malnova . "</td><td>" . ($nova - $malnova) . "</td></tr>");
}
}
echo "</table>";
HtmlFino();
} else {
if ("lasta_sercxo" == $elekto) {
// nova varianto de memligo (por la nova sercxilo-objekto)
$sercxilo = $_SESSION['lasta_sercxo'][$_REQUEST['id']];
if ($_REQUEST['ordigo']) {
$sercxilo->metu_ordigon($_REQUEST['ordigo'], $_REQUEST['direkto']);
}
