/**
 * mesagxo al la invitilo-respondeculo,
 * kiam nova invit-petanto aligxas.
 */
function sendu_invitilomesagxon($partoprenanto, $partopreno, $renkontigxo, $sendanto = "nekonato")
{
    $invitpeto = $partopreno->sercxu_invitpeton();
    $teksto = "\nSaluton " . antauxnomo($renkontigxo->funkciulo('invitletero')) . "," . "\n" . "\nalig^is partoprenanto, kiu deziras invitleteron." . "\n" . "\n Personaj datumoj: " . "\n------------------" . "\n" . $partoprenanto->gravaj_detaloj_tekste() . "\n" . "\n Detaloj por la invitilo:" . "\n-------------------------" . "\n" . "\n" . $invitpeto->konfirmilaj_detaloj() . "\n";
    if ($partopreno->datoj['rimarkoj']) {
        $teksto .= "\n " . ucfirst($partoprenanto->personapronomo) . " rimarkis:" . "\n -------------" . "\n" . "\n" . $partopreno->datoj['rimarkoj'];
    }
    $mesagxo = kreu_auxtomatan_mesagxon();
    $mesagxo->ricevanto_estu($renkontigxo->funkciuladreso('invitletero'), $renkontigxo->funkciulo('invitletero'));
    $mesagxo->temo_estu("Invitpeto de " . $partoprenanto->tuta_nomo());
    $mesagxo->auxtomata_teksto_estu($teksto, "x-metodo");
    $mesagxo->eksendu();
}
Ejemplo n.º 2
0
/**
 * TODO: dokumentado por sendu_mesagxon_oficiala
 *
 *  ### uzata en sendu_mesagxon_invitilo() kaj ###
 *  ###          sendu_mesagxon_programan().   ###
 */
function sendu_mesagxon_oficiala($partoprenidento, $partoprenantoidento, $kaj, $kaj2, $to_name, $to_address, $rimarkoj)
{
    //TODO:? muß noch überarbeitet werden
    // [respondo de Martin:] a) da sind globale Variablen drin //  b) Die Funktion ist noch nicht allgemein genug. Da gibt es noch Codestücken die dasselbe machen.
    //  global $nomo, $personanomo;
    // eltrovu_partoprenanton($partoprenantoidento);
    $parto = new Partoprenanto($partoprenantoidento);
    $ri = $parto->personapronomo;
    $Ri = ucfirst($ri);
    $mesagxo = "Saluton kara " . antauxnomo($to_name) . ", \nj^us alig^is partoprenanto kiu deziras\n\n";
    $mesagxo .= $kaj;
    $mesagxo .= "Nomo: " . $parto->datoj[personanomo] . " " . $parto->datoj[nomo] . " \n";
    //ID: ".$partoprenantoidento partoprenidento: $partoprenidento";
    $mesagxo .= "retadreso: " . $parto->datoj[retposxto] . "\n";
    $mesagxo .= $kaj2;
    if ($rimarkoj != '') {
        $mesagxo .= "\n\n{$Ri} rimarkis:\n" . $rimarkoj;
    }
    sendu_mesagxon($mesagxo, $to_name, $to_address);
}