require_once 'iloj/fpdf/ufpdf.php';
echo "<!-- FPDF_FONTPATH: " . FPDF_FONTPATH . "-->";
$fp = fopen("dosieroj_generitaj/adresaro.csv", "w");
//por la .csv versio
$font = 'FreeSans';
$pdf = new UFPDF();
$pdf->AddFont($font, '', $font . '.php');
$pdf->AddFont($font, 'B', $font . 'Bold.php');
$pdf->SetFont($font, '', 15);
$pdf->Open();
$pdf->AddPage();
$pdf->write(7, uni("Listo de Partoprenantoj\n" . $_SESSION["renkontigxo"]->datoj["nomo"] . " en " . $_SESSION["renkontigxo"]->datoj["loko"] . " (" . $_SESSION["renkontigxo"]->datoj["de"] . " g^is " . $_SESSION["renkontigxo"]->datoj["gxis"] . ")\n"));
if ('JES' == $granda) {
$pdf->SetFont($font, '', 12);
$pdf->write(8, uni("Bonvolu kontroli (kaj eble korekti) vian adreson en la adresaro, por ke en" . " la fina versio estu g^ustaj datoj."));
$pdf->ln(12);
$linlargxo = 7;
$interlinspaco = 13;
} else {
$pdf->SetFont($font, '', 9);
$pdf->write(3.7, uni("Vi rajtas uzi tiun adresaron nur por personaj celoj. Vi ne rajtas" . " uzi g^in por amasaj leteroj au^ retmesag^oj (ankau^ ne por informi pri via" . " Esperanto-renkontig^o), kaj ne rajtas pludoni" . " g^in (ec^ ne parte). " . " Se amiko de vi (kiu partoprenis la " . $_SESSION['renkontigxo']->datoj['mallongigo'] . ") ne ricevis la adresaron," . " li povas mendi propran c^e is.admin@esperanto.de. La sama validas," . " se vi perdis g^in.\n" . "Atentu, la g^usta sinsekvo de la adres-partoj sur leteroj - depende de la lando -" . " ofte ne estas la sama kiel tiu en tiu c^i listo. Informig^u antau^ eksendado" . " de letero (ekzemple per retpos^to al la ricevonto)."));
$pdf->ln(7);
$linlargxo = 3.0;
$interlinspaco = 4.05;
}
$pdf->write($linlargxo * 1.7, uni("persona nomo; nomo; adresaldonaj^o; strato; pos^tkodo; urbo; lando; telefono; telefakso; retpos^to"));
$pdf->ln($interlinspaco);
$pdf->ln($interlinspaco);
// $demando = "select p.ID,pn.ID,p.nomo, personanomo,l.nomo,retposxto,adresaldonajxo,strato,posxtkodo,urbo,lando,telefono,telefakso,retposxto from partoprenantoj as p, partoprenoj as pn, landoj as l where pn.partoprenantoID=p.ID and l.ID=lando and renkontigxoID='".$_SESSION["renkontigxo"]->datoj[ID]."' and alvenstato='a' order by personanomo,p.nomo";
$demando = datumbazdemando(array("p.ID", "pn.ID", "p.nomo", "personanomo", "l.nomo", "retposxto", "adresaldonajxo", "strato", "posxtkodo", "urbo", "lando", "telefono", "telefakso"), array("partoprenantoj" => "p", "partoprenoj" => "pn", "landoj" => "l"), array("pn.partoprenantoID = p.ID", "l.ID = lando", "alvenstato = 'a'"), "renkontigxoID", array("order" => "personanomo, p.nomo"));
echo "<BR><BR>";