function kreu_informmesagxan_tekston_en($lingvo, $partoprenanto, $partopreno, $renkontigxo, $kodigo)
{
eniru_lingvon($lingvo);
$tabelo = kreu_konfirmilan_kontroltabelon($partoprenanto, $partopreno, $kodigo);
$sxablono = CH_lau("~#informmesagxo-marto-sxablono", $lingvo);
if (!$sxablono) {
return null;
}
// $sxablono = preg_replace('/\r/m', '', $sxablono);
$sxablono = transformu_x_al_eo(utf8_al_iksoj($sxablono));
$kotizo = new Kotizokalkulilo($partoprenanto, $partopreno, $renkontigxo, new Kotizosistemo($renkontigxo->datoj['kotizosistemo']));
debug_echo("<!-- kotizokalkulilo: \n" . var_export($kotizo, true) . "-->");
$kotForm = new TekstaKotizoFormatilo($lingvo, $kodigo);
$kotizo->tabelu_kotizon($kotForm);
// debug_echo( "<!-- kotizotabelo X : \n" .
// $kotForm->preta_tabelo . "\n -->");
$invitpeto = $partopreno->sercxu_invitpeton();
if (!$invitpeto) {
$vizoteksto = CH("~#vizo-ne-mendis");
} else {
if ($kotizo->detalolisto['pagoj']['sumo'] <= 0) {
$vizoteksto = CH("~#vizo-ne-antauxpagis");
} else {
if ($invitpeto->datoj['invitletero_sendenda'] == 'n') {
$vizoteksto = CH("~#vizo-ne-sendos");
} else {
$vizoteksto = CH("~#vizo-ja-sendos");
}
}
}
switch ($partopreno->datoj['studento']) {
case 'j':
$studentoteksto = CH("~#vi-estos-studento");
break;
case 'n':
$studentoteksto = CH("~#vi-ne-estos-studento");
break;
default:
$studentoteksto = CH("~#se-studento-bonvolu-informi");
break;
}
$speciala = array("detaltabelo" => $tabelo, "vizoteksto" => $vizoteksto, "studentoteksto" => $studentoteksto, "kotizotabelo" => $kotForm->preta_tabelo);
debug_echo("<!-- speciala: " . var_export($speciala, true) . "-->");
$datumoj = array('anto' => $partoprenanto, 'eno' => $partopreno, 'igxo' => $renkontigxo, 'speciala' => $speciala);
$teksto = transformu_tekston($sxablono, $datumoj);
$teksto = eotransformado($teksto, $kodigo);
eliru_lingvon();
return $teksto;
}
/**
* Traktas <variablonomo> el la gramatiko cxe
* transformu_tekston().
*
* akceptas eo-supersignojn ankaux en unikoda formo, transformas
* al X-metodo.
*/
function teksttransformo_donu_datumon($variablonomo, &$datumoj)
{
return teksttransformo_donu_datumon_rek(utf8_al_iksoj($variablonomo), $datumoj);
}
/**
* @param u8string $objekto
* @param u8string $eco
*/
function objekteca_Valoro($objekto, $eco)
{
$this->objnomo = utf8_al_iksoj($objekto);
$this->eco = utf8_al_iksoj($eco);
}
