/**
 * konservas la sercxon en la serxo-tabelo.
 */
function konservuSercxon($nomo, $priskribo, $koditaSercxo, $id = '')
{
    if ($id) {
        sxangxu_datumbazon("sercxoj", array("nomo" => $nomo, "priskribo" => $priskribo, "sercxo" => $koditaSercxo, "entajpanto" => $_SESSION['kkren']['entajpanto']), array('ID' => $id));
    } else {
        aldonu_al_datumbazo("sercxoj", array("nomo" => $nomo, "priskribo" => $priskribo, "sercxo" => mysql_real_escape_string($koditaSercxo), "entajpanto" => $_SESSION['kkren']['entajpanto']));
    }
}
/**
 * konservas la serĉon en la serxo-tabelo.
 * La funkcias eldonas iun HTML-tekstan informon pri la rezulto.
 *
 * @param eostring $nomo la nomo, sub kiu ni savu la serĉon.
 * @param eostring $priskribo priskriba teksto pri la serĉo.
 * @param string   $koditaSercxo serĉo-detaloj en kodita formo
 * @param int      $id identigilo - se donita, ni ŝanĝos ekzistantan
 *                    serĉon, alikaze kreas novan.
 */
function konservuSercxon($nomo, $priskribo, $koditaSercxo, $id = '')
{
    if ($id) {
        sxangxu_datumbazon("sercxoj", array("nomo" => $nomo, "priskribo" => $priskribo, "sercxo" => $koditaSercxo, "entajpanto" => $_SESSION['kkren']['entajpanto']), array('ID' => $id));
        eoecho("<p>Serc^o #" . $id . "  s^ang^ita.</p>");
    } else {
        aldonu_al_datumbazo("sercxoj", array("nomo" => $nomo, "priskribo" => $priskribo, "sercxo" => mysql_real_escape_string($koditaSercxo), "entajpanto" => $_SESSION['kkren']['entajpanto']));
        $id = mysql_insert_id();
        eoecho("<p>Serc^o #" . $id . "  aldonita.</p>");
    }
}
 */
/**
 */
require_once 'iloj/iloj.php';
require_once 'iloj/iloj_cxambroj.php';
session_start();
malfermu_datumaro();
kontrolu_rajton("cxambrumi");
if ($_REQUEST['sp']) {
    $_SESSION['sekvontapagxo'] = $_REQUEST['sp'];
}
sesio_aktualigu_laux_get();
if ($_REQUEST['sendu'] == "cxambrotipsxangxo") {
    kontrolu_rajton("cxambrumi");
    // sxangxo de cxambrotipo (gea/unuseksa), duliteco kaj/aux rimarkoj.
    sxangxu_datumbazon("cxambroj", array("tipo" => $_REQUEST['tipo'], "rimarkoj" => $_REQUEST['rimarkoj'], "dulita" => $_REQUEST['dulita']), array("ID" => $_REQUEST['cxambronumero']));
}
HtmlKapo();
debug_echo("<!-- POST: " . var_export($_POST, true) . "-->");
if ($_SESSION["partoprenanto"]) {
    eoecho("Ni serc^as c^ambron por: <b>" . $_SESSION["partoprenanto"]->datoj[personanomo] . " " . $_SESSION["partoprenanto"]->datoj[nomo] . " [" . $_SESSION["partoprenanto"]->datoj[sekso] . "/" . $_SESSION["partopreno"]->datoj[cxambrotipo] . "/" . $_SESSION["partopreno"]->datoj['agxo'] . "] </b> de: " . $_SESSION["partopreno"]->datoj[de] . " g^is: " . $_SESSION["partopreno"]->datoj[gxis] . "<BR>\n");
    if ($_SESSION["partopreno"]->datoj['renkontigxoID'] != $_SESSION["renkontigxo"]->datoj['ID']) {
        erareldono("malg^usta renkontig^o!");
        exit;
    }
}
// montru, kiu sxatas kunlogxi kun kiu
montru_kunlogxantojn($cxambronumeo);
// montru nun la cxambron mem.
montru_cxambron($cxambronumero, $_SESSION["renkontigxo"], $_SESSION["partoprenanto"], $_SESSION["partopreno"], "granda");
montru_cxambrointersxangxilon($cxambronumero);
        } else {
            eoecho("<p>Kreis novan " . donu_eokatsisnomon($tipo) . " #" . $id . ".</p>\n");
        }
        break;
    case 'katSxangxu':
        // -------------- Sxangxo de unuopaj kategorioj --------
        if (DEBUG) {
            echo "<!-- GET: ";
            var_export($_GET);
            echo "POST: ";
            var_export($_POST);
            echo "-->";
        }
        foreach ($_REQUEST['kategorio'] as $katID => $datumoj) {
            // TODO: kontrolu, cxu necesas sxangxo
            sxangxu_datumbazon($tipo . "kategorioj", $datumoj, $katID);
        }
        $katSistemo = donu_katsistemon($_REQUEST['id'], $tipo);
        $katSistemo->mangxu_aliajn_kategorisxangxojn();
        eoecho("<p>S^ang^is plurajn " . donu_eokatnomon($tipo) . "jn por sistemo #" . $_REQUEST['id'] . "</p>\n");
        break;
    case 'katNova':
        // kreas malplenan kategorio-objekton.
        $kategorio = donu_kategorion($tipo, 0);
        $kategorio->kopiu();
        $kategorio->datoj['sistemoID'] = $_REQUEST['id'];
        $kategorio->skribu_kreante();
        break;
    default:
        darf_nicht_sein("sendu: '" . $_REQUEST['sendu'] . "'");
}
if ($_POST['sendu']) {
    $antauxa_kontrolstato = $partopreno->datoj['tejo_membro_kontrolita'];
    switch ($_POST['ago']) {
        case 'ne':
            sxangxu_datumbazon('partoprenoj', array('tejo_membro_kontrolita' => 'n'), array('ID' => $partopreno->datoj['ID']));
            break;
        case 'igxu':
            sxangxu_datumbazon('partoprenoj', array('tejo_membro_kontrolita' => 'i', 'tejo_membro_kotizo' => $_REQUEST['kotizo']), array('ID' => $partopreno->datoj['ID']));
            $bla = "<strong>{$Ri} plenigu la TEJO-alig^ilon por " . TEJO_MEMBRO_JARO . ".</strong>";
            break;
        case 'pagas':
            sxangxu_datumbazon('partoprenoj', array('tejo_membro_kontrolita' => 'p', 'tejo_membro_kotizo' => $_REQUEST['krompago']), array('ID' => $partopreno->datoj['ID']));
            $bla = "<strong>{$Ri} plenigu la TEJO-alig^ilon por " . TEJO_MEMBRO_JARO . ".</strong>";
            break;
        case 'jam':
            sxangxu_datumbazon('partoprenoj', array('tejo_membro_kontrolita' => 'j'), array('ID' => $partopreno->datoj['ID']));
            break;
        default:
            darf_nicht_sein("ago = " . $_POST['ago']);
    }
    $partopreno = new Partopreno($partopreno->datoj['ID']);
    eoecho("<p>S^ang^is <code>tejo_membro_kontrolita</code> de <code>" . $antauxa_kontrolstato . "</code> al <code>" . $partopreno->datoj['tejo_membro_kontrolita'] . "</code>.</p>");
    if ($bla) {
        eoecho("<p>" . $bla . "</p>");
    }
}
// ###############################################################################
switch ($partopreno->datoj['tejo_membro_laudire'] . $partopreno->datoj['tejo_membro_kontrolita']) {
    case 'jj':
    case 'nj':
        $statoteksto = "{$ri} estas konfirmita membro de TEJO por " . TEJO_MEMBRO_JARO . ".";
        }
    }
    $_SESSION["partopreno"]->skribu();
}
if ($sendu == 'Tiu') {
    echo "Partopreno nun apartenas al #{$kune}";
    $_SESSION["partopreno"]->datoj[partoprenantoID] = $kune;
    $_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';
/**
 * Rekalkulas aĝojn de partoprenantoj.
 * 
 * Rekalkulas ĉiujn aĝojn (aŭ nur la aĝojn de la
 * partopreno kun $id) de la partoprenantoj je la
 * komencoj de la renkontiĝoj.
 * Tiu funkcio demandas kaj eble ŝanĝas la datumbazon,
 * sed ne redonas ion.
 *
 * @param string|int $id
 *      - "renkontigxo" por rekalkuli ĉiujn partoprenojn
 *          en $_SESSION['renkontigxo']
 *      - "partoprenanto" por rekalkuli ĉiujn partoprenojn
 *          de $_SESSION['partoprenanto']
 *      - int-numero, por rekalkuli nur partoprenon kun tiu ID.
 *      - "", por rekalkuli ĉiujn partoprenojn (defaŭlto)
 */
function rekalkulu_agxojn($id = "")
{
    $where = array("p.partoprenantoid = pn.ID", "p.renkontigxoid = r.ID");
    if (intval($id) != 0) {
        $where[] = "p.ID = '{$id}'";
    } else {
        if ($id != "") {
            $where[] = "p.{$id}id = '{$_SESSION[$id]->datoj['ID']}'";
        }
    }
    $sql = datumbazdemando(array("p.ID" => "ID", "FLOOR((TO_DAYS(r.de)-TO_DAYS(pn.naskigxdato))/365.25)" => "nova_agxo", "p.agxo"), array("partoprenoj" => "p", "partoprenantoj" => "pn", "renkontigxo" => "r"), $where);
    $rez = sql_faru($sql);
    while ($linio = mysql_fetch_assoc($rez)) {
        if ($linio['nova_agxo'] != $linio['agxo']) {
            sxangxu_datumbazon("partoprenoj", array("agxo" => $linio['nova_agxo']), array("ID" => $linio['ID']));
        }
        if (DEBUG) {
            echo "<!-- sxangxis #{$linio['ID']} de {$linio['agxo']} al {$linio['nova_agxo']} -->";
        }
    }
}
malfermu_datumaro();
kontrolu_rajton("akcepti");
require_once 'iloj/iloj_akceptado.php';
$partoprenanto = $_SESSION["partoprenanto"];
// por repreni aktualajn datumojn, kaze ke iu alia intertempe printis
// nomsxildojn aux simile
$partopreno = new Partopreno($_SESSION['partopreno']->datoj['ID']);
// la persona pronomo (li aux sxi)
$ri = $partoprenanto->personapronomo;
$Ri = ucfirst($ri);
if ($_POST['sendu'] == 'akceptu') {
    // datumbazsxangxoj
    $partopreno->datoj['alvenstato'] = 'a';
    if ($partopreno->datoj['domotipo'] == 'J') {
        // cxambro-disdonado
        sxangxu_datumbazon("litonoktoj", array("rezervtipo" => "d"), array(), "partopreno");
        if ($partopreno->datoj['havasMangxkuponon'] == 'N') {
            $mankasKupono = true;
        } else {
            // havasMangxkuponon estas aux 'P' aux 'J', aux en iu nedefinita stato
            $partopreno->datoj['havasMangxkuponon'] = 'J';
        }
    }
    if ($partopreno->havasNomsxildon == 'N') {
        $mankasSxildo = true;
    } else {
        $partopreno->havasNomsxildon = 'J';
    }
    $partopreno->skribu();
    $partopreno = $_SESSION['partopreno'] = new Partopreno($partopreno->datoj['ID']);
    akceptado_kapo("post-fino");
    tenukasxe("al", $al->datoj["ID"]);
    eoecho("<p><input type='checkbox' name='forigu' value='jes' />Tuj forigu la maldekstran personon!</p>");
    send_butono("faru");
    echo "</form>";
    HtmlFino();
    exit;
}
if ($sendu == "faru" && $de && $al) {
    if ($de == $al) {
        eoecho("Vi ne povas s^ovi de iu persono al la sama persono!");
        HtmlFino();
        exit;
    }
    sxangxu_datumbazon("partoprenoj", array("partoprenantoID" => $al), array("partoprenantoID" => $de));
    sxangxu_datumbazon("notoj", array("partoprenantoID" => $al), array("partoprenantoID" => $de));
    sxangxu_datumbazon("entajpantoj", array("partoprenanto_id" => $al), array("partoprenanto_id" => $de));
    if ($forigu == "jes") {
        forigu_el_datumbazo("partoprenantoj", $de);
        eoecho("<p>Vi s^ovis c^iujn partoprenojn de {$de} al ");
        ligu("partrezultoj.php?partoprenantoidento={$al}", "#" . $al);
        eoecho(", kaj tuj forigis {$de}.</p>");
    } else {
        eoecho("<p>Vi s^ovis c^iujn partoprenojn de ");
        ligu("partrezultoj.php?partoprenantoidento={$de}", "#" . $de);
        eoecho(" al ");
        ligu("partrezultoj.php?partoprenantoidento={$al}", "#" . $al);
        eoecho(".</p>");
    }
    HtmlFino();
    exit;
}
/**
 * aldonas aux sxangxas minimumajn antauxpagojn laux la entajpitajxo.
 */
function novaj_antauxpagoj()
{
    if (DEBUG) {
        echo "<!-- REQUEST: ";
        var_export($_REQUEST);
        echo "-->";
    }
    foreach ($_REQUEST['antauxpago'] as $lando => $pagoj) {
        $sql = datumbazdemando(array('oficiala_antauxpago', 'interna_antauxpago'), 'minimumaj_antauxpagoj', array("kotizosistemo = '" . $_REQUEST['id'] . "'", "landokategorio = '" . $lando . "'"));
        if ($linio = mysql_fetch_assoc(sql_faru($sql))) {
            if (count(array_diff_assoc($pagoj, $linio)) > 0) {
                // iu sxangxo
                sxangxu_datumbazon("minimumaj_antauxpagoj", $pagoj, array("kotizosistemo" => $_REQUEST['id'], 'landokategorio' => $lando));
            } else {
                // neniu sxangxo (aux mankanta valoro?)
            }
        } else {
            // ankoraux ne ekzistas -> aldonu
            aldonu_al_datumbazo("minimumaj_antauxpagoj", array_merge($pagoj, array("kotizosistemo" => $_REQUEST['id'], 'landokategorio' => $lando)));
        }
    }
}
require_once 'iloj/iloj.php';
require_once 'iloj/iloj_cxambroj.php';
session_start();
malfermu_datumaro();
if (!rajtas("cxambrumi")) {
    ne_rajtas();
}
if ($sendu == "Nun!") {
    $ppID = $_SESSION["partopreno"]->datoj["ID"];
    eoecho("S^ang^o de #{$ppID} al #{$al} farita");
    //    sql_faru("update litonoktoj set partopreno='XXXXX' where partopreno='".$_SESSION["partopreno"]->datoj[ID]."'");
    //    sql_faru("update litonoktoj set partopreno='".$_SESSION["partopreno"]->datoj[ID]."' where partopreno='$al'");
    //    sql_faru("update litonoktoj set partopreno='".$al."' where partopreno='XXXXX'");
    // intersxangxu la cxambrojn ...
    sxangxu_datumbazon("litonoktoj", array("partopreno" => "XXXXX"), array("partopreno" => $ppID));
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $ppID), array("partopreno" => $al));
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $al), array("partopreno" => "XXXXX"));
}
HtmlKapo();
//  $cxam_sql = "select p.ID,pn.ID,nomo,personanomo,l.ID,partopreno,nokto_de,nokto_gxis,rezervtipo from litonoktoj as l,partoprenoj as pn, partoprenantoj as p where l.partopreno=pn.ID and pn.partoprenantoID=p.ID and renkontigxoID='".$_SESSION["renkontigxo"]->datoj[ID]."' order by personanomo,nomo";
$cxam_sql = datumbazdemando(array("p.ID", "pn.ID", "nomo,personanomo", "l.ID", "partopreno,nokto_de", "nokto_gxis", "rezervtipo"), array("litonoktoj" => "l", "partoprenoj" => "pn", "partoprenantoj" => "p"), array("l.partopreno = pn.ID", "pn.partoprenantoID = p.ID"), "renkontigxoID", array("order" => "personanomo, nomo"));
$cxam_rezulto = sql_faru($cxam_sql);
echo "<form action=\"cxambro_sxangxo.php\" method=\"post\">";
eoecho($_SESSION["partoprenanto"]->datoj[personanomo] . " " . $_SESSION["partoprenanto"]->datoj[nomo] . " volas s^ang^i kun: ");
echo "<select name=\"al\" size=\"5\">\n";
while ($row = mysql_fetch_array($cxam_rezulto, MYSQL_BOTH)) {
    eoecho("<option value = \"" . $row[1] . "\">" . $row[personanomo] . " " . $row[nomo] . " (" . $row[nokto_de] . "-" . $row[nokto_gxis] . "/" . $row[rezervtipo] . ")");
}
echo " </select>";
send_butono("Nun!");
HtmlFino();
 */
require_once 'iloj/iloj.php';
require_once 'iloj/iloj_cxambroj.php';
session_start();
malfermu_datumaro();
kontrolu_rajton('cxambrumi');
sesio_aktualigu_laux_get();
HtmlKapo();
if ($_REQUEST['sendu'] == "sxangxu") {
    $tempID = rand(-10000, -1000);
    $al = substr($_REQUEST['al'], 1);
    $ppID = $_REQUEST['ppID'];
    // intersxangxu la cxambrojn ...
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $tempID), array("partopreno" => $ppID));
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $ppID), array("partopreno" => $al));
    sxangxu_datumbazon("litonoktoj", array("partopreno" => $al), array("partopreno" => $tempID));
    eoecho("<p>S^ang^o de");
    ligu("partrezultoj.php?partoprenidento=" . $ppID, "#" . $ppID);
    eoecho(" al ");
    ligu("partrezultoj.php?partoprenidento=" . $al, "#" . $al);
    eoecho(" farita.</p>");
}
function formatu_litonokton($linio)
{
    return "c^. " . $linio['cxambronomo'] . "/" . $linio['nokto_de'] . "&ndash;" . $linio['nokto_gxis'] . "/" . $linio['rezervtipo'];
}
eoecho("<h2>Inters^ang^o de la c^ambroj de du partoprenantoj</h2>");
echo "<form action='cxambro_sxangxo.php' method='post'>";
echo "<table>";
$sql = datumbazdemando(array('nokto_de', 'nokto_gxis', 'rezervtipo', 'cx.nomo' => 'cxambronomo'), array('litonoktoj', 'cxambroj' => 'cx'), array("cxambro = cx.id"), array('partopreno'), array('order' => 'nokto_de, nokto_gxis'));
$rez = sql_faru($sql);
session_start();
malfermu_datumaro();
kontrolu_rajton("akcepti");
require_once 'iloj/iloj_akceptado.php';
sesio_aktualigu_laux_get();
$partoprenanto = $_SESSION["partoprenanto"];
$partopreno = $_SESSION['partopreno'];
// la persona pronomo (li aux sxi)
$ri = $partoprenanto->personapronomo;
$Ri = ucfirst($ri);
if ($_POST['posxtkodo']) {
    sxangxu_datumbazon('partoprenantoj', array('posxtkodo' => $_POST['posxtkodo']), array('ID' => $partoprenanto->datoj['ID']));
    $partoprenanto->prenu_el_datumbazo();
}
if ($_POST['studento']) {
    sxangxu_datumbazon('partoprenoj', array('studento' => $_POST['studento']), array('ID' => $partopreno->datoj['ID']));
    $partopreno->prenu_el_datumbazo();
}
// TODO!: metu alvenstato al 'i' (vidita) jam komence de la akceptado.
akceptado_kapo("datoj");
akceptada_instrukcio("<strong>Bonvenon en la " . renkontigxo_nomo . "!</strong>");
// #####################################################################################
// kontrolu, cxu jam alvenis (= estis akceptita antauxe)
if ($partopreno->datoj['alvenstato'] == 'a') {
    akceptada_instrukcio("Lau^ la datumbazo, <strong>{$ri} jam antau^e estis" . " akceptita, do ne " . "necesas akcepti {$ri}n denove</strong>. Bonvolu" . " demandi la c^efadministranton pri tio.");
} else {
    if ($partopreno->datoj['alvenstato'] == 'm') {
        akceptada_instrukcio("Lau^ la datumbazo, <strong>{$ri} malalig^is</strong>," . " do estas iom strange, ke {$ri} tamen venas. (Nu," . " eble {$ri} redecidis.)</li>");
    }
}
if (ministeriaj_listoj == 'jes') {
 /**
  * mangxas la rezulton de la formulareroj, kiujn produktis
  * listu_kategoriojn (en la redaktebla-varianto).
  */
 function mangxu_aliajn_kategorisxangxojn()
 {
     foreach ($_REQUEST['landokategorio'] as $landoID => $katID) {
         $sxlosilo = array("sistemoID = '" . $this->datoj['ID'] . "'", "landoID = '" . $landoID . "'");
         $sql = datumbazdemando("kategorioID", "kategorioj_de_landoj", $sxlosilo);
         $rez = sql_faru($sql);
         if ($linio = mysql_fetch_assoc($rez)) {
             if ($linio['kategorioID'] != $katID) {
                 sxangxu_datumbazon("kategorioj_de_landoj", array("kategorioID" => $katID), array('sistemoID' => $this->datoj['ID'], 'landoID' => $landoID));
             } else {
                 debug_echo("<!-- jam ekzistas: (lando: " . $landoID . ", sistemo: " . $sistemoID . ", kategorio: " . $kategorioID . ") -->");
             }
         } else {
             aldonu_al_datumbazo("kategorioj_de_landoj", array('sistemoID' => $this->datoj['ID'], 'landoID' => $landoID, 'kategorioID' => $katID));
         }
         mysql_free_result($rez);
     }
 }
Example #15
0
    HtmlFino();
    return;
}
if ($_REQUEST['sendu'] == 'forigu') {
    foriguSercxon($id);
}
// echo "<!-- POST: \n";
// var_export($_POST);
// // echo "\n valoroj: \n";
// // var_export($valoroj);
// echo "-->\n";
if ($_POST['sendu'] == 'konservu') {
    konservuSercxon($_POST['nomo'], $_POST['priskribo'], base64_decode($_POST['sercxo']), $_POST['ID']);
}
if ($_POST['sendu'] == 'sxangxu') {
    sxangxu_datumbazon("sercxoj", array("nomo" => $_REQUEST['nomo'], "priskribo" => $_REQUEST['priskribo']), array("ID" => $_REQUEST['ID']));
}
if ($_REQUEST['sendu'] == 'redaktu') {
    eoecho("<h3>Redaktu serc^on #" . $_REQUEST['id'] . "</h3>");
    echo "<form action='sercxoj.php' method='post'>\n<p>";
    $sql = datumbazdemando(array("s.ID" => "ID", "s.nomo" => "nomo", "s.priskribo" => "priskribo"), array("sercxoj" => "s"), array("s.ID = '" . $_REQUEST['id'] . "'"));
    $linio = mysql_fetch_assoc(sql_faru($sql));
    eoecho("Bonvolu entajpi nomon kaj priskribon por via serc^o." . " Eblas uzi la &#99;^-kodigon por la esperantaj supersignoj" . " (&#69;^ por E^).</p>\n");
    echo "<table>";
    tabela_kasxilo('ID', 'ID', $linio['ID']);
    tabelentajpejo("Nomo:", 'nomo', $linio['nomo']);
    granda_tabelentajpejo("Priskribo:", 'priskribo', $linio['priskribo'], '60', '6');
    echo "</table><p>";
    butono("sxangxu", "S^ang^u");
    ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'], "Ne s^ang^u, montru serc^on");
    ligu("gxenerala_sercxo.php?antauxa_sercxo=" . $linio['ID'] . "&sendu=sercxu", "Ne s^ang^u, tuj serc^u");
function mangxu_kontrolitaSxangxojn($malnova, $nova)
{
    foreach ($nova as $id => $val) {
        if ($val != $malnova[$id]) {
            eoecho("<p>s^ang^as eno[#{$id}].kontrolita de " . "'{$malnova[$id]}' al '{$val}'.</p>\n");
            sxangxu_datumbazon('partoprenoj', array('tejo_membro_kontrolita' => $val), $id);
        }
    }
}
Example #17
0
        exit;
    }
    //    $row = mysql_fetch_array(sql_faru( "select ID from litonoktoj where cxambro='$de' and rezervtipo!='r'"),MYSQL_NUM);
    //    $row2 = mysql_fetch_array(sql_faru("select ID from litonoktoj where cxambro='$al' and rezervtipo!='r'"),MYSQL_NUM);
    $row = mysql_fetch_array(sql_faru(datumbazdemando("ID", "litonoktoj", array("cxambro = '{$de}' or cxambro = '{$al}'", "rezervtipo != 'r'"))), MYSQL_NUM);
    if ($row) {
        erareldono("Iu lito estas jam disdonata.");
        exit;
    }
    //intersxangxo
    //     sql_faru("update litonoktoj set cxambro = 'XXXXX' where cxambro='".$de."'");
    //     sql_faru("update litonoktoj set cxambro = '$de' where cxambro='".$al."'");
    //     sql_faru("update litonoktoj set cxambro = '$al' where cxambro='XXXXX'");
    sxangxu_datumbazon("litonoktoj", array("cxambro" => "XXXXX"), array("cxambro" => $de));
    sxangxu_datumbazon("litonoktoj", array("cxambro" => $de), array("cxambro" => $al));
    sxangxu_datumbazon("litonoktoj", array("cxambro" => $al), array("cxambro" => "XXXXX"));
    /*
        $row = mysql_fetch_array(sql_faru("select tipo,rimarkoj from cxambroj where cxambro='$de'"),MYSQL_NUM);
        $row2= mysql_fetch_array(sql_faru("select tipo,rimarkoj from cxambroj where cxambro='$al'"),MYSQL_NUM);
        sql_faru("update cxambroj set tipo = '".$row[tipo]."', rimarkoj='".$row[rimarkoj]."' where cxambro='$al'");    
        sql_faru("update cxambroj set tipo = '".$row[tipo]."', rimarkoj='".$row2[rimarkoj]."' where cxambro='$de'");
    */
    $tipo = $cxambrode->datoj[tipo];
    $cxambrode->datoj[tipo] = $cxambroal->datoj[tipo];
    $cxambroal->datoj[tipo] = $tipo;
    $rimarkoj = $cxambrode->datoj[rimarkoj];
    $cxambrode->datoj[rimarkoj] = $cxambroal->datoj[rimarkoj];
    $cxambroal->datoj[rimarkoj] = $rimarkoj;
    $cxambroal->skribu();
    $cxambrode->skribu();
}
Example #18
0
    //   echo "<pre>";
    //   var_export($_POST);
    //   echo "</pre>";
    $sxangxlisto = array();
    foreach (array("nomo", "kodo") as $tipo) {
        if ($_POST[$tipo]) {
            $sxangxlisto[$tipo] = $_POST[$tipo];
        }
    }
    if ($_POST['ID'] == 'nova') {
        aldonu_al_datumbazo("landoj", $sxangxlisto);
        $num = mysql_insert_id();
        eoecho("<p>Mi aldonis landon #" . $num . " al la tabelo.</p>");
        $redaktu = $num;
    } else {
        sxangxu_datumbazon("landoj", $sxangxlisto, array("ID" => $_POST['ID']));
        eoecho("<p>Mi s^ang^is landon #" . $_POST['ID'] . " en la tabelo.</p>");
    }
}
if ($_REQUEST['redaktu']) {
    eoecho("<h1>Redakto de lando</h1>");
    echo "<form method='POST' action='landoj.php'>\n";
    if ($_REQUEST['redaktu'] == 'nova') {
        $linio = array("ID" => 'nova');
        eoecho("<p> Ni aldonas novan landon</p>\n");
    } else {
        $sql = datumbazdemando('*', 'landoj', "ID = '" . $_REQUEST['redaktu'] . "'");
        $rez = sql_faru($sql);
        $linio = mysql_fetch_assoc($rez);
        eoecho("<p>ID: {$linio['ID']}\n");
    }
        if ($_REQUEST['sendu'] == 'kopiu') {
            $sistemo->kopiu_kondicxojn_el($_REQUEST['ID']);
            eoecho("<p>Kreis novan Malalig^kotizosistemon" . " #" . $id . " kiel kopio de #" . $_REQUEST['ID'] . ".</p>\n");
        } else {
            eoecho("<p>Kreis novan Malalig^kotizosistemon #" . $id . ".</p>\n");
        }
        $_REQUEST['id'] = $id;
        // case kreu/kopiu
        break;
    case 'sxangxuKond':
        foreach ($_REQUEST['kondicxtipo'] as $kat => $tipo) {
            $sql = datumbazdemando("kondicxtipo", "malaligxkondicxoj", array("sistemo = '" . $_REQUEST['ID'] . "'", "aligxkategorio = '" . $kat . "'"));
            $linio = mysql_fetch_assoc(sql_faru($sql));
            if ($linio) {
                if ($linio['kondicxtipo'] != $tipo) {
                    sxangxu_datumbazon("malaligxkondicxoj", array("kondicxtipo" => $tipo), array("sistemo" => $_REQUEST['ID'], "aligxkategorio" => $kat));
                    eoecho("<p>S^ang^is kondic^on por kategorio #" . $kat . " de #" . $linio['kondicxtipo'] . " al #" . $tipo . ".\n</p>");
                }
            } else {
                aldonu_al_datumbazo("malaligxkondicxoj", array("kondicxtipo" => $tipo, "sistemo" => $_REQUEST['ID'], "aligxkategorio" => $kat));
                eoecho("<p>Aldonis kondic^on #" . $tipo . " por kategorio #" . $kat . ".\n</p>");
            }
        }
        $_REQUEST['id'] = $_REQUEST['ID'];
        break;
    default:
        echo "<pre>";
        var_export($_POST);
        echo "</pre>";
}
if ($_REQUEST['id']) {
    $mono->datoj[renkontigxo] = $_SESSION["renkontigxo"]->datoj[ID];
    $mono->datoj[kvanto] = $kvanto;
    $mono->datoj[kauzo] = "surlokpago de ";
    $mono->datoj[tempo] = date("Y-m-d H:M:s");
    $mono->datoj[kvitanconumero] = '0';
    $mono->datoj[alKiu] = '';
    $mono->datoj[kiaMonujo] = 'kaso 1';
    $mono->kreu();
    $mono->skribu();
    if ($_SESSION["partopreno"]->datoj[domotipo] == 'J') {
        sxangxu_datumbazon("litonoktoj", array("rezervtipo" => "d"), "", "partopreno");
    }
    // TODO:? Kial ne rekte sxangxi $_SESSION["partopreno"] kaj ->skribu()?
    sxangxu_datumbazon("partoprenoj", array("alvenstato" => "a"), "", array("ID" => "partopreno"));
    sxangxu_datumbazon("partoprenoj", array("havasMangxkuponon" => "J"), "", array("ID" => "partopreno", "havasMangxkuponon" => "P"));
    sxangxu_datumbazon("partoprenoj", array("havasNomsxildon" => "J"), "", array("ID" => "partopreno", "havasNomsxildon" => "P"));
}
if ($sendu == "sxangxu_membrokotizon") {
    $_SESSION['partopreno']->datoj['surloka_membrokotizo'] = $surloka_membrokotizo;
    if ($surloka_membrokotizo == 'n') {
        $_SESSION['partopreno']->datoj['membrokotizo'] = 0;
    } else {
        $_SESSION['partopreno']->datoj['membrokotizo'] = $membrokotizo;
    }
    $_SESSION['partopreno']->skribu();
    $_SESSION['partopreno'] = new Partopreno($_SESSION['partopreno']->datoj['ID']);
}
HtmlKapo();
$partoprenanto = $_SESSION["partoprenanto"];
// la persona pronomo (li aux sxi)
$ri = $partoprenanto->personapronomo;
Example #21
0
require_once 'iloj/iloj.php';
session_start();
malfermu_datumaro();
Htmlkapo();
kontrolu_rajton("teknikumi");
$renk = $_SESSION['renkontigxo']->datoj;
if ($_POST['sendu'] == 'sxangxu') {
    eoecho("Nun s^ang^ig^is la jenaj renkontig^aj datoj:");
    foreach ($_POST as $nomo => $valoro) {
        if (substr($nomo, 0, 8) == 'mesagxo_') {
            $mID = substr($nomo, 8);
            $sql = datumbazdemando(array("ID", "teksto"), "tekstoj", array("mesagxoID = '{$mID}'"), "renkontigxoID");
            $rez = sql_faru($sql);
            $linio = mysql_fetch_assoc($rez);
            if ($linio and $linio['teksto'] != $valoro) {
                sxangxu_datumbazon("tekstoj", array("teksto" => $valoro), array("ID" => $linio['ID']));
                // donu mesagxon, kio sxangxigxis:
                eoecho("<p>Mi s^ang^is la tekston '" . $mID . "' (#" . $linio['ID'] . ") de:</p><pre>" . $linio['teksto'] . "</pre><p>al:</p><pre>" . $valoro . "</pre>");
            }
        }
    }
    ligu("administrado.php", "Reen al la Administrado.");
    ligu("renkontigxo.php", "Reen al la renkontig^o");
    ligu("tekstoj.php", "Reen al la teksto-listo");
    HtmlFino();
    return;
}
if ($_POST['sendu'] == 'redaktu' or $_POST['sendu'] == 'redaktu_cxiujn') {
    if (DEBUG) {
        echo "<!-- POST: " . var_export($_POST, true) . "-->";
    }
/**
 * kreas tekston por la unua konfirmilo,
 * sendas gxin al la partoprenanto (se tiu
 * donis retadreson) kaj eblaj kopioj-ricevantoj
 * kaj redonas la tekston (por montri gxin).
 *
 * @uses kreu_unuan_konfirmilan_tekston()
 * @uses sxangxu_datumbazon()
 *
 * @param Partoprenanto $partoprenanto
 * @param Partopreno    $partopreno
 * @param Renkontigxo   $renkontigxo
 * @param string        $sendanto  Sendanto de la mesaĝo,
 *                      ekzemple "aliĝilo" aŭ la entajpanto-nomo.
 * @return string la teksto, kiu estis sendita en la mesaĝo.
 */
function kreu_kaj_sendu_unuan_konfirmilon($partoprenanto, &$partopreno, $renkontigxo, $sendanto = "Alig^ilo")
{
    // heuxristiko: Se la homoj volas retposxtan varbadon
    // en UTF-8-formato, ili versxajne ankaux volas la
    // konfirmilon en UTF-8.
    $kodigo = $partoprenanto->datoj['retposxta_varbado'] == 'u' ? "utf-8" : "x-metodo";
    $teksto = kreu_unuan_konfirmilan_tekston($partoprenanto, $partopreno, $renkontigxo, $kodigo);
    $mesagxo = kreu_auxtomatan_mesagxon();
    $mesagxo->temo_estu("Unua konfirmilo por la " . $renkontigxo->datoj['nomo']);
    if ($partoprenanto->datoj['retposxto']) {
        $mesagxo->ricevanto_estu($partoprenanto->datoj['retposxto'], $partoprenanto->tuta_nomo());
        $mesagxo->kopion_al(constant('unua_konfirmilo_kopioj_al'));
    } else {
        $mesagxo->ricevanto_estu(constant('unua_konfirmilo_kopioj_al'), "Aligxilo-Kopioj-ricevanto");
    }
    $mesagxo->auxtomata_teksto_estu($teksto, $kodigo, $sendanto, $renkontigxo);
    $mesagxo->eksendu();
    // memoru la sendodaton:
    sxangxu_datumbazon("partoprenoj", array('1akonfirmilosendata' => date("Y-m-d")), $partopreno->datoj['ID']);
    $partopreno->prenu_el_datumbazo();
    return $teksto;
}
        eoecho("<p>Aldonis la sekvan tekston #" . $rez['id'] . " kun identifikilo '{$mesagxoID}' al la renkontig^o '" . $_SESSION['renkontigxo']->datoj['mallongigo'] . "' (#" . $_SESSION['renkontigxo']->datoj['ID'] . "):</p>");
        echo "<pre>" . $teksto . "</pre>";
    }
} else {
    if ($_POST['sendu'] == 'sxangxu') {
        eoecho("<h2>S^ang^o de Teksto</h2>");
        // unue ni rigardas, cxu teksto kun sama identifikilo
        //  jam estas en la datumbazo (li estu!)
        $sql = datumbazdemando(array('mesagxoID', 'teksto', 'renkontigxoID'), "tekstoj", array("id = '" . $id . "'"));
        $rez = sql_faru($sql);
        if (mysql_num_rows($rez) != 1) {
            // tro multe aux tro malmulte
            darf_nicht_sein("Anzahl= " . mysql_num_rows($rez));
        }
        // Alikaze ni sxangxas la enhavon de la datumbazo
        sxangxu_datumbazon('tekstoj', array('mesagxoID' => $_POST['mesagxoID'], 'teksto' => $_POST['teksto']), array('id' => $_POST['id']));
        eoecho("<p>Mi s^ang^is la tekston #" . $_POST['id'] . ", nova identifikilo estas '{$mesagxoID}',  nova teksto estas:");
        echo "<pre>" . $teksto . "</pre>";
        echo "<p>";
        ligu("tekstoj.php", "Reen al la teksto-listo");
        ligu("renkontigxo.php", "Reen al la renkontig^o");
        ligu("administrado.php", "Reen al la grava administrado");
        echo "</p>";
        //         HtmlFino();
        //         exit();
    }
}
if ($_REQUEST['id']) {
    // redaktu unuopan tekston
    if (DEBUG) {
        echo "<!-- " . var_export($_REQUEST, true) . "-->";
    if ($_POST['pasvortsxangxo'] == 'jes') {
        if ($_POST['kodvorto']) {
            $sxangxlisto['kodvorto'] = $_POST['kodvorto'];
        } else {
            erareldono("Vi petis pri s^ang^o de pasvorto, sed ne donis novan!");
        }
    }
    if ($_POST['ID'] == 'nova') {
        aldonu_al_datumbazo("entajpantoj", $sxangxlisto);
        $num = mysql_insert_id();
        eoecho("<p>Mi aldonis linion #" . $num . " al la tabelo.</p>");
        if ($redaktu == 'nova') {
            $redaktu = $num;
        }
    } else {
        sxangxu_datumbazon("entajpantoj", $sxangxlisto, array("ID" => $_POST['ID']));
        eoecho("<p>Mi s^ang^is linion #" . $_POST['ID'] . " en la tabelo.</p>");
    }
}
if ($redaktu) {
    eoecho("<h1>Redakto de entajpanto</h1>");
    echo "<form method='POST' action='entajpantoj.php'>\n";
    if ($redaktu == 'nova') {
        $linio = array("ID" => 'nova');
        eoecho("<p> Ni kreas novan entajpanton\n");
    } else {
        $sql = datumbazdemando('*', 'entajpantoj', "ID = '{$redaktu}'");
        $rez = sql_faru($sql);
        $linio = mysql_fetch_assoc($rez);
        eoecho("<p>ID: {$linio['ID']}\n");
    }