} if ($sendu == 'Transferu') { // TODO: Umstellen auf bessere Auswahl - siehe unten bei "peter" // (eventuell muss dass hier gar nicht geändert werden.) // TODO: ĉu plu necesas? Ĉu ni nun ne havas transferi.php? echo "C^io nun apartenas al #{$kune}"; sxangxu_datumbazon("partoprenoj", array("partoprenantoID" => $kune), array("partoprenantoID" => $antauxa)); sxangxu_datumbazon("notoj", array("partoprenantoID" => $kune), array("partoprenantoID" => $antauxa)); } if ($faru == "2konfirmi") { require_once $prafix . '/tradukendaj_iloj/kreu_konfirmilon.php'; if (DEBUG) { echo "<!-- bezonas_unikodon: [" . (string) bezonas_unikodon($_SESSION['partoprenanto'], $_SESSION['partopreno']) . "] -->"; } $kon = new Konfirmilo(bezonas_unikodon($_SESSION['partoprenanto'], $_SESSION['partopreno'])); $kon->kreu_konfirmilon($_SESSION["partopreno"]->datoj[ID], $_SESSION["partoprenanto"]->datoj[ID]); // kreas PDF-dosieron, ne sendas, malgraux la nomo. $kon->sendu(); } if ($faru == '2konfirmelsendo') { kontrolu_rajton("retumi"); require_once $prafix . '/tradukendaj_iloj/kreu_konfirmilon.php'; require_once $prafix . '/iloj/retmesagxiloj.php'; require_once $prafix . '/tradukendaj_iloj/iloj_konfirmilo.php'; require_once $prafix . '/iloj/diversaj_retmesagxoj.php'; sendu_duan_informilon($_SESSION['partoprenanto'], $_SESSION['partopreno'], $partopreno_renkontigxo, 'J'); $_SESSION['partopreno']->prenu_el_datumbazo(); } if ($faru == '2konfirm_papere') { // nur notu en la datumbazo, ke ni nun sendas gxin papere $_SESSION['partopreno']->datoj['2akonfirmilosendata'] = date('Y-m-d');
hazard_ligu("dosieroj_generitaj/mangxkuponoj.pdf", "els^utu la kuponojn.", "_blank"); //send_butono("Faru!"); } // KONFIRMILOJ if ($kio == 'k') { require_once 'iloj/kreu_konfirmilon.php'; $nombroperpagxo = 1; $numero = $numero * $nombroperpagxo; // $demando = "select p.ID,pn.ID,nomo, personanomo from partoprenantoj as p, partoprenoj as pn where pn.partoprenantoID=p.ID and retakonfirmilo!='J' and 2akonfirmilosendata='0000-00-00' and renkontigxoID='".$_SESSION["renkontigxo"]->datoj[ID]."' and kontrolata='J' and alvenstato='v' limit 0,$numero"; $demando = datumbazdemando(array("p.ID", "pn.ID", "nomo", "personanomo"), array("partoprenantoj" => "p", "partoprenoj" => "pn"), array("pn.partoprenantoID = p.ID", "retakonfirmilo!='J'", "2akonfirmilosendata='0000-00-00'", "kontrolata='J'", "alvenstato = 'v'"), "renkontigxoID", array("order" => "personanomo, nomo", "limit" => "0, {$numero}")); eoecho("<B><BR><BR>Elpremu la konfirmilon por:</B><BR>"); $kon = new Konfirmilo(); $rezulto = sql_faru($demando); while ($row = mysql_fetch_array($rezulto, MYSQL_BOTH)) { eoecho($row[personanomo] . " " . $row[nomo] . "<BR>"); $kon->kreu_konfirmilon($row[1], $row[0], $savu); } $kon->sendu(); hazard_ligu("dosieroj_generitaj/konfirmilo.pdf", "els^uti la konfirmilojn.", "_top", "jes"); } if ($kio == 'sendu') { // $demando = "select p.ID,pn.ID,nomo, personanomo,retposxto,agxo from partoprenantoj as p, partoprenoj as pn where pn.partoprenantoID=p.ID and retakonfirmilo='J' and 2akonfirmilosendata='0000-00-00' and renkontigxoID='".$_SESSION["renkontigxo"]->datoj[ID]."' and alvenstato='v' limit 0,$numero"; $demando = datumbazdemando(array("p.ID", "pn.ID", "nomo", "personanomo", "retposxto", "pn.agxo", "germanakonfirmilo" => "germane"), array("partoprenantoj" => "p", "partoprenoj" => "pn"), array("pn.partoprenantoID = p.ID", "retakonfirmilo = 'J'", "2akonfirmilosendata = '0000-00-00'", "alvenstato = 'v'"), "renkontigxoID", array("limit" => "0, {$numero}")); eoecho("<B><BR><BR>Elsendu la konfirmilon por:</B><BR>"); $rezulto = sql_faru($demando); while ($row = mysql_fetch_array($rezulto, MYSQL_BOTH)) { eoecho($row[personanomo] . " " . $row[nomo] . ""); // TODO:? Kial ne rekte al la partoprenantoj? // [respondo de Martin:] Reine Sicherheitsmaßnahme. Das ist eine Funktion die mehrere Hundert eMails verschickt. Die hab ich totgelegt, damit da nicht versehentlich jemand draufdrückt. // -> vielleicht mit Passwortschutz versehen, oder noch eine Sicherheitsabfrage. $to_name = funkciulo("admin");
/** * kreas PDF-dokumenton kun duaj informiloj por tiuj, kiuj petis * paperan duan informilon. * * @param int $nombro kiom da ni kreu nun? * @param string $savu "J" = memoru, ke ni kreis/printis/sendis, * alikaze "NE" (ekzemple por kontroli, * ĉu aspektas bone) */ function printu_duajn_konfirmilojn($nombro, $savu) { require_once 'tradukendaj_iloj/kreu_konfirmilon.php'; // paperaj konfirmiloj // $demando = "select p.ID,pn.ID,nomo, personanomo from partoprenantoj as p, partoprenoj as pn where pn.partoprenantoID=p.ID and retakonfirmilo!='J' and 2akonfirmilosendata='0000-00-00' and renkontigxoID='".$_SESSION["renkontigxo"]->datoj[ID]."' and kontrolata='J' and alvenstato='v' limit 0,$nombro"; $demando = datumbazdemando(array("p.ID", "pn.ID", "nomo", "personanomo"), array("partoprenantoj" => "p", "partoprenoj" => "pn"), array("pn.partoprenantoID = p.ID", "retakonfirmilo!='J' or p.retposxto=''", "2akonfirmilosendata='0000-00-00'", "kontrolata='J'", "alvenstato = 'v'"), "renkontigxoID", array("order" => "personanomo, nomo", "limit" => "0, {$nombro}")); eoecho("<B><BR><BR>Kreas la konfirmilon por:</B><BR>"); $kon = new Konfirmilo("unikode"); $rezulto = sql_faru($demando); while ($row = mysql_fetch_array($rezulto, MYSQL_BOTH)) { eoecho($row['personanomo'] . " " . $row['nomo'] . "<BR>"); $kon->kreu_konfirmilon($row[1], $row[0], $savu); } $kon->sendu(); hazard_ligu("dosieroj_generitaj/konfirmilo.pdf", "els^uti la konfirmilojn."); }
/** * sendo de la dua informilo. * @uses kreu_duan_konfirmilan_tekston * @uses Konfirmilo * * @param Partoprenanto $partoprenanto * @param Partopreno $partopreno * @param Renkontigxo $renkontigxo * @param string $savu cxu savi en la partpreno, * ke ni sendis la informilon? */ function sendu_duan_informilon($partoprenanto, $partopreno, $renkontigxo, $savu = "NE") { $mesagxo = kreu_auxtomatan_mesagxon(); $kodigo = $partoprenanto->datoj['retposxta_varbado'] == 'u' ? "utf-8" : "x-metodo"; $sendanto = $_SESSION['kkren']['entajpantonomo']; $mesagxo->temo_estu("Dua konfirmilo kaj informilo por la " . $renkontigxo->datoj['nomo']); if (!$partoprenanto->datoj['retposxto']) { return; } $mesagxo->ricevanto_estu($partoprenanto->datoj['retposxto'], $partoprenanto->tuta_nomo()); // // por testaj celoj ... // $mesagxo->ricevanto_estu(teknika_administranto_retadreso, // $partoprenanto->tuta_nomo()); $teksto = kreu_duan_konfirmilan_tekston($partoprenanto, $partopreno, $renkontigxo, "ne kodigu"); $mesagxo->auxtomata_teksto_estu($teksto, $kodigo, $sendanto, $renkontigxo); $konfirmilo = new Konfirmilo(bezonas_unikodon($partoprenanto, $partopreno)); $konfirmilo->kreu_konfirmilon($partopreno, $partoprenanto, $savu, $renkontigxo); $konfirmilo->sendu(); // kreas konfirmilo.pdf $mesagxo->aldonu_dosieron_el_disko($GLOBALS['prafix'] . "/dosieroj_generitaj/konfirmilo.pdf"); // aldonu la duan informilon, se gxi ekzistas. $informilodosiero = $GLOBALS['prafix'] . "/dosieroj/2aInformilo.pdf"; if (file_exists($informilodosiero)) { $mesagxo->aldonu_dosieron_el_disko($informilodosiero); } $mesagxo->eksendu(); }
/** * TODO: dokumentado por sendu_2ankonfirmilon * TODO: 2a konfirmilo adaptu al Wetzlar (aux * prenu el datumbazo) * TODO: Übergabeparameter verschönern * * ### Uzata en administrado.php, partrezultoj.php . ### */ function sendu_2ankonfirmilon($row, $savu, $to_name, $to_address, $bcc = '') { $prafix = $GLOBALS['prafix']; require_once $prafix . '/iloj/kreu_konfirmilon.php'; $korpo = "Saluton " . $to_name . ","; if ($row['germane'] == 'J') { $korpo .= "\n\n [Deutsche Ãœbersetzung unten / Germana traduko sube.]"; } // TODO: Xanten -> verallgemeinern (datumbazo) (en kelkaj lokoj) // TODO: Eble metu la tekston en la datumbazon aux en konfigurdosieron. $korpo .= "\n\nla organiza teamo tre gxojas, ke vi intencas veni al la cxijara Internacia Seminario en Wewelsburg.\n"; $korpo .= "\nPer tiu cxi retmesagxo vi ricevas la oficialan konfirmilon por la IS kiel pdf-komputildosiero. Bonvolu traglegi gxin kaj kunporti elpresitan version de gxi al la IS.\n"; //$korpo .= "\nSe vi ne povas legi la .pdf bonvolu kontaktu min.\n"; // TODO: Auf 2006 umstellen/verallgemeinern $korpo .= "Por pli detalaj informoj bonvolu ankaux uzi nian retpagxon sub http://www.esperanto.de/is/eo/2006/\n"; $korpo .= "\nEnhavo:\n - konfirmilo.pdf (Kotizoj kaj gravaj informoj.)"; if ($row[agxo] < '18') { $korpo .= "\n(enhavante ankaux la gepatran permeson por la IS - nepre kunportu gxin plenumota)"; } $korpo .= "\n - 2ainformilo.pdf (Pliaj informoj pri la IS-ejo, kaj la vojo al Wewelsburg)"; // TODO: subskribo auxtomata $korpo .= "\n\namike,\nJulia"; if ($row['germane'] == 'J') { $korpo .= "\n\n-----[ Deutsche Ãœbersetzung / germana traduko ]-----------"; $korpo .= "\n\nSaluton " . $to_name . ","; $korpo .= "\n\nDas Organisations-Team freut sich sehr, dass du zur Internationalen Woche nach Wewelsburg kommen willst.\n"; $korpo .= "\nMit dieser E-Mail erhältst du die offizielle Bestätigung für das IS als PDF-Datei. Bitte lies es dir durch und bring eine ausgedruckte Version zum IS mit.\n"; //$korpo .= "\nSe vi ne povas legi la .pdf bonvolu kontaktu min.\n"; // TODO: Auf 2004 umstellen/verallgemeinern $korpo .= "Für weitere Informationen nutze bitte auch unsere Webseite unter http://www.esperanto.de/is/de/2006/\n"; $korpo .= "\nInhalt:\n - konfirmilo.pdf (Beitrag und wichtige Informationen - zweisprachig.)"; if ($row[agxo] < '18') { $korpo .= "\n(enthält auch die Eltern-Erlaubnis für das IS - unbedingt ausgefüllt mitbringen!)"; } $korpo .= "\n - 2ainformilo.pdf (Weitere Informationen über das IS, den IS-Ort, und den Weg nach Wewelsburg.)"; } $ppanto = new Partoprenanto($row[0]); $kon = new Konfirmilo(bezonas_unikodon($ppanto)); $kon->kreu_konfirmilon($row[1], $row[0], $savu); $kon->sendu(); // dauxrigas kiel konfirmilo.pdf $dosierojn = array('dosieroj_generitaj/konfirmilo.pdf', 'dosieroj/2aInformilo.pdf'); // jen la necesaj dosieroj echo "Al: {$to_address}\n"; sendu_dosier_mesagxon("Konfirmilo por via IS partopreno", $korpo, $to_name, $to_address, $dosierojn, $bcc); erareldono("Messag^o sendata!"); }