*            2004-2006 Paul Ebermann   (paĝo 'publikkontrolo.php')
 *            2006-2009 Paul Ebermann.
 *       Uzebla laŭ kondiĉoj de GNU Ĝenerala Publika Permesilo (GNU GPL)
 */
/**
 */
simpla_aliĝilo_komenco(6, CH('aligxilo#titolo'));
define("echo_sendis_mesagxon", false);
require_once $prafix . '/iloj/iloj.php';
require_once $prafix . '/iloj/iloj_mangxoj.php';
$renkontigxo = new Renkontigxo($GLOBALS['renkontigxoID']);
// kontrolado okazis en kontrolu.php
protokolu('aligxo');
require_once $GLOBALS['prafix'] . "/iloj/iloj_aligxilo.php";
require_once $GLOBALS['prafix'] . "/tradukendaj_iloj/iloj_konfirmilo.php";
list($partoprenanto, $partopreno, $invitpeto) = mangxu_Aligxilajn_datumojn($GLOBALS['renkontigxoID']);
$partoprenanto->skribu_kreante();
$partopreno->datoj['partoprenantoID'] = $partoprenanto->datoj['ID'];
$partopreno->skribu_kreante();
rekalkulu_agxojn($partopreno->datoj['ID']);
// reprenu el la datumbazo
$partopreno = new Partopreno($partopreno->datoj['ID']);
if (DEBUG) {
    echo "<!-- invitpeto: ";
    var_export($invitpeto);
    echo "-->";
}
if ($invitpeto) {
    $invitpeto->datoj['ID'] = $partopreno->datoj['ID'];
    $invitpeto->skribu_kreante_kun_ID();
}
?>
      <tr>
    <td colspan='4'>
<?php 
echo CH("bonvolu-kontroli");
?>
    </td>
        </tr>
		  <tr>
   <td colspan='4'>
<?php 
// eoecho ("<em>Ĉi tie aperos listo de ĉio, kio estis" .
//         " entajpita ĝis nun (ankoraŭ ne pretas).</em>");
require_once $GLOBALS['prafix'] . "/iloj/iloj_aligxilo.php";
require_once $GLOBALS['prafix'] . "/tradukendaj_iloj/iloj_konfirmilo.php";
$listo =& mangxu_Aligxilajn_datumojn($GLOBALS['renkontigxoID']);
/*
echo "<!-- ";
var_export($listo);
echo "-->";
*/
list($partoprenanto, $partopreno) = $listo;
if (DEBUG) {
    echo "<!-- ";
    var_export($partoprenanto);
    var_export($partopreno);
    echo "-->";
}
eoecho(kreu_aligxilan_kontroltabelon($partoprenanto, $partopreno));
?>
      </td>