Exemplo n.º 1
0
    $_SESSION["partopreno"]->skribu();
}
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
/**
 * 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!");
}
/**
 * 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();
}
 $rezulto = sql_faru($sql);
 $i = $komenco;
 eoecho("<p> sendante " . ($unikodaj ? "unikodajn" : "neunikodajn") . " konfirmilojn.</p><p>");
 while ($linio = mysql_fetch_assoc($rezulto)) {
     $partopreno = new Partopreno($linio['partoprenoID']);
     $partoprenanto = new Partoprenanto($linio['partoprenantoID']);
     eoecho("<br/>" . $i . ": " . $partoprenanto->tuta_nomo() . " (#" . $partoprenanto->datoj['ID'] . "/" . $partopreno->datoj['ID'] . ")\n");
     $i++;
     if ($partopreno->datoj['alvenstato'] != 'v') {
         eoecho($partopreno->alvenstato());
     } else {
         if ($partopreno->datoj['2akonfirmilosendata'] and $partopreno->datoj['2akonfirmilosendata'] != "0000-00-00") {
             eoecho("(jam sendita antau^e)");
         } else {
             if ($partoprenanto->datoj['retposxto']) {
                 if (bezonas_unikodon($partoprenanto, $partopreno) == $unikodaj) {
                     if ($_POST['vere'] == 'jes') {
                         sendu_duan_informilon($partoprenanto, $partopreno, $_SESSION['renkontigxo'], "J");
                     } else {
                         eoecho("(nur elprovo)");
                     }
                     flush();
                     usleep(200);
                 } else {
                     eoecho("(malg^usta unikodeco)");
                 }
             } else {
                 eoecho("(mendis paperan)");
             }
         }
     }