source: trunk/admin/modules/Elezioni/controllo_voti.php@ 424

<?php

/************************************************************************/
/* Eleonline - Raccolta e diffusione dei dati elettorali                */
/* by Roberto Gigli & Luciano Apolito                                   */
/* http://www.eleonline.it                                              */
/* info@eleonline.it  luciano@aniene.net rgigli@libero.it               */
/************************************************************************/
/* Modulo Controllo dei voti                                            */
/* Amministrazione                                                      */
/************************************************************************/

if (!defined('ADMIN_FILE')) {
    die ("You can't access this file directly...");
}

$aid=$_SESSION['aid'];
global $dbi;
$prefix=$_SESSION['prefix'];
$currentlang=$_SESSION['lang'];
$id_comune=$_SESSION['id_comune'];
$id_cons_gen=$_GET['id_cons_gen'];
$bgcolor1=$_SESSION['bgcolor1'];
$bgcolor2=$_SESSION['bgcolor2'];

$perms=ChiSei($id_cons_gen);
if ($perms<16 or !$id_cons_gen) die("$perms Non hai i permessi per inserire dati, o non hai scelto la consultazione!");
        $sql="SELECT t1.tipo_cons,t2.id_cons,t2.solo_gruppo,t2.disgiunto FROM ".$prefix."_ele_consultazione as t1, ".$prefix."_ele_cons_comune as t2 where t1.id_cons_gen=t2.id_cons_gen and t2.id_cons_gen='$id_cons_gen' and t2.id_comune='$id_comune'";
        $sth = $dbi->prepare("$sql");
        $sth->execute();        
        list($tipo_cons,$id_cons,$dettnulli,$disgiunto) = $sth->fetch(PDO::FETCH_BOTH);
        $sql="SELECT genere,voto_g,voto_l FROM ".$prefix."_ele_tipo where tipo_cons='$tipo_cons'";
        $sth = $dbi->prepare("$sql");
        $sth->execute();        
        $row = 
        list($genere,$votog,$votol) = $sth->fetch(PDO::FETCH_NUM);
include("modules/Elezioni/funzionidata.php");
include("modules/Elezioni/ele.php");
if (isset($param['ops'])) $ops=addslashes($param['ops']); else $ops='';
if (isset($param['pag'])) $pag=intval($param['pag']); else $pag=0;
if (isset($param['num_ref'])) $num_ref=intval($param['num_ref']);
if (isset($param['num_refs'])) $num_refs=intval($param['num_refs']);
ele();
//**************************************************************************
//        ELE
//**************************************************************************
 
    global $prefix, $dbi,$fascia,$limite;
        $sql="SELECT sum(maschi),sum(femmine) FROM ".$prefix."_ele_sezioni where id_cons='$id_cons'";
        $sth = $dbi->prepare("$sql");
        $sth->execute();        
#       $row = $sth->fetch(PDO::FETCH_BOTH);
        list($totm,$totf) =  $sth->fetch(PDO::FETCH_NUM);
        $totel=$totm+$totf;
        if (!IsSet($pag)) {$pag=0;} //inizializza il numero di pagina 
        if (!IsSet($num_ref)) { 
                $num_ref=1;
                $sql="SELECT id_gruppo from ".$prefix."_ele_gruppo where id_cons=$id_cons";
                $sth = $dbi->prepare("$sql");
                $sth->execute();        
                $num_refs= $sth->rowCount(); //quante pagine?
#               $row = $sth->fetch(PDO::FETCH_BOTH);
        }
        if((($genere!=4) and $pag==0 and !$votog) or $genere==1 or $genere==2){ //diverso da liste a piu' candidati
                $ops=4; //gestione gruppi (anche liste uninominali)
        }else{
                $ops=3; //gestione liste
        }
        OpenTable();
                $sql="SELECT id_gruppo,num_gruppo from ".$prefix."_ele_gruppo where id_cons=$id_cons and num_gruppo=$num_ref";
                $sth = $dbi->prepare("$sql");
                $sth->execute();        
#               $row = $sth->fetch(PDO::FETCH_BOTH);
                list($idg,$numg) = $sth->fetch(PDO::FETCH_BOTH);
                $sql="SELECT id_sez,num_sez,t1.id_sede as id_sede,t2.id_circ as id_circ FROM ".$prefix."_ele_sezioni as t1,".$prefix."_ele_sede as t2 where t1.id_cons='$id_cons' and t1.id_sede=t2.id_sede order by num_sez";
                $sth = $dbi->prepare("$sql");
                $sth->execute();
                $num_sez = $sth->rowCount();  //quante sezioni?
                $sezione=array();
for ($i=1;$i<=$num_sez;$i++){
                $sezione[$i]=array();
                $sezione[$i]= $sth->fetch(PDO::FETCH_BOTH); //inizializza l'array delle sezioni
                $ar[$i]=0;
        }
        $tab3="_ele_voti_lista";
//      if ($genere==3) {$tab3="_ele_voti_candidati";} else {$tab3="_ele_voti_lista";} //i voti di lista per le uninominali sono memorizzati in ele_voti_candidati altrimenti in ele_voti_lista.
if ($genere==1 or $genere==2) $tab3="_ele_voti_gruppo";
        if ($genere>0) {  //se non e' un referendum
                if (!($genere==4) and $pag==0){  //se non e' una lista uninominale ed e' la prima pagina
                        $tab="SELECT 0,t2.id_sez,t2.num_sez,t2.validi,'0',t2.validi,t2.nulli,t2.bianchi,t2.contestati, t4.id_circ,t2.id_sede,'0',t2.voti_nulli,t2.validi_lista,t2.voti_nulli_lista,t2.contestati_lista,t2.solo_gruppo,t2.solo_lista FROM ".$prefix."_ele_sezioni as t2 left join ".$prefix."_ele_sede as t4 on (t2.id_sede=t4.id_sede) where t2.id_cons='$id_cons' and t2.validi+t2.nulli+t2.bianchi+t2.contestati>0 order by t2.num_sez";
                }else{ // e' una lista uninominale o la seconda pagina
                        $tab="SELECT '0',t1.id_sez,t1.num_sez,sum(t2.voti),t1.solo_gruppo,t1.validi,t1.nulli,t1.bianchi,t1.contestati, t4.id_circ,t1.id_sede,'0',t1.voti_nulli,t1.validi_lista,t1.voti_nulli_lista,t1.contestati_lista,t1.solo_gruppo,t1.solo_lista
                        FROM ".$prefix."_ele_sezioni as t1 left join ".$prefix.$tab3." as t2 on (t1.id_sez=t2.id_sez)
                        left join ".$prefix."_ele_sede as t4 on (t1.id_sede=t4.id_sede)
                        where t1.id_cons='$id_cons' and t1.id_cons=t2.id_cons group by t1.id_sez,t1.num_sez,t1.solo_gruppo,t1.validi,t1.nulli,t1.bianchi,t1.contestati, t4.id_circ,t1.id_sede,t1.voti_nulli,t1.validi_lista,t1.voti_nulli_lista,t1.contestati_lista,t1.solo_gruppo,t1.solo_lista order by t1.num_sez"; 
                }
                $riga1="<tr><td>\n<table border=\"0\" width=\"100%\" bgcolor=\"$bgcolor1\" ><tr><td align=\"center\">"._SEZSCR." "._CONSULTAZIONE."</td></tr></table></td></tr>\n";
        }else{ // e' un referendum
                $tab="SELECT t1.id_gruppo,t1.id_sez,t2.num_sez,t1.si,t1.no,t1.validi,t1.nulli,t1.bianchi,t1.contestati, t4.id_circ,t2.id_sede,t3.num_gruppo,'0','0','0','0','0','0'
                FROM ".$prefix."_ele_voti_ref as t1 left join ".$prefix."_ele_sezioni as t2 on (t1.id_sez=t2.id_sez)
                left join  ".$prefix."_ele_gruppo as t3 on (t1.id_gruppo=t3.id_gruppo) left join ".$prefix."_ele_sede as t4 on (t2.id_sede=t4.id_sede)
                where t1.id_cons='$id_cons' and t1.id_gruppo='$idg' order by t2.num_sez";
                $riga1= "<tr><td>\n<table border=\"0\" width=\"100%\" bgcolor=\"$bgcolor1\" ><tr><td align=\"center\">"._SEZSCR." "._CONSULTAZIONE." N. ".$numg."</td></tr></table></td></tr>\n";
        }
        $sth = $dbi->prepare("$tab ");
                        $sth->execute();
        $num_scr = $sth->rowCount(); 
        $riga2= "<tr><td>\n<table border=\"0\" width=\"100%\" bgcolor=\"$bgcolor1\" ><tr><td align=\"center\">"._SEZIONI." $num_scr "._SU." $num_sez</td></tr></table></td></tr>\n";//sezioni scrutinate
        $riga2 .= "<tr><td>\n<table border=\"0\" width=\"100%\"  align=\"center\">";
        $riga3 = "<tr bgcolor=\"$bgcolor2\" align=\"center\"><td width=\"5%\"><b>"._SEZIONI."</b></td>"
    ."<td><b>"._VOTIU."</b></td>"."<td><b>"._VOTID."</b></td>"."<td><b>"._VOTIE."</b></td>"; //testata con nomi dei campi
        if ($genere==0) {  //se e' un referendum
                $riga3 .= "<td><b>"._SI."</b></td><td><b>"._NO."</b></td>";
        } elseif ((($genere==5) or ($genere==3)) and $pag==1){
                $riga3 .= "<td><b>"._ASOLA_LISTA."</b></td>";
                if (!$votog) $riga3 .= "<td><b>"._ASOLO_GRUPPO."</b></td>";
        }
        $riga3 .= "<td><b>"._VALIDI."</b></td><td><b>"._NULLI."</b></td><td><b>"._BIANCHI."</b></td><td><b>"._CONTESTATI."</b></td>";
//      if (($genere==2 or $genere==3 or $genere==5) and !$votog)
//              $riga3 .= "<td><b>"._PREFGRU."</b></td>";
//      if ($genere>1 and !$votol)
//              $riga3 .= "<td><b>"._PREFLIS."</b></td>";
        $riga3 .= "<td><b>"._STATO."</b></td></tr>\n";
        $righe= "";
        $scrutinate=1;
//      if ($genere>1 and $pag==1) $ops=3;
        $tot_u=0;$tot_d=0;$tot_voti=0; $tot_si=0;$tot_no=0;$tot_validi=0;$tot_nulli=0;$tot_bianchi=0;$tot_contestati=0;$tgrup_pref=0;$tot_voti_nulli=0;$tot_val_lista=0;$tot_vot_nul_lis=0;$tot_cont_lis=0;$tot_solog=0;$tot_solol=0;$errors=0;
        while ( list($id_gruppo,$id,$num,$si,$no,$validi,$nulli,$bianchi,$contestati,$id_circ,$id_sede,$gruppo,$voti_nulli,$val_lista,$vot_nul_lis,$cont_lis,$solog,$solol) = $sth->fetch(PDO::FETCH_NUM)){
//controllare
        // inserimento numeri di sez non scrutinate
                while ($scrutinate < $num) { 
                        $righe.= "<tr align=\"center\"><td><a href=\"admin.php?op=voti&amp;id_cons_gen=$id_cons_gen&amp;id_sez=".$sezione[$scrutinate]['id_sez']."&amp;id_circ=".$sezione[$scrutinate]['id_circ']."&amp;id_sede=".$sezione[$scrutinate]['id_sede']."&amp;do=spoglio&amp;ops=$ops\"><span style=\"color: rgb(255, 0, 0);\">$scrutinate</span></a></td></tr>\n";
                        $scrutinate++;
                }
                $scrutinate++; 
        // fine inserimento     
                if (($genere==2 or $genere==3 or $genere==5) and !$votog and !$dettnulli) {
                        $sql="select sum(voti) from ".$prefix."_ele_voti_gruppo where id_sez='$id'";
                        $sth2 = $dbi->prepare("$sql");
                        $sth2->execute();       
                        list ($gruppref) = $sth2->fetch(PDO::FETCH_NUM);
                        $tgrup_pref += $gruppref;
                }
                $tab2="SELECT max(voti_donne),max(voti_uomini),max(voti_complessivi) FROM ".$prefix."_ele_voti_parziale where id_cons='$id_cons' and id_sez='$id'";
                if ($genere==0) $tab2 .= " and id_gruppo=$id_gruppo";
                        $sth2 = $dbi->prepare("$tab2");
                        $sth2->execute();       
                        list($votid,$votiu,$voti) = $sth2->fetch(PDO::FETCH_NUM);
//              $voti=$votiu+$votid;
                
                $tot_u+=$votiu;
                $tot_d+=$votid;
                $tot_voti+=$voti;
                $tot_si+=$si;
                $tot_no+=$no;
                $tot_validi+=$validi;
                $tot_nulli+=$nulli;
                $tot_bianchi+=$bianchi;
                $tot_contestati+=$contestati;
                $tot_voti_nulli+=$voti_nulli;
                $tot_val_lista+=$val_lista;
                $tot_vot_nul_lis+=$vot_nul_lis;
                $tot_cont_lis+=$cont_lis;
                $tot_solog+=$solog;
                $tot_solol+=$solol;
                $righe .= "<tr bgcolor=\"$bgcolor2\" align=\"center\"><td>$num</td><td>".number_format($votiu,0,',','.')."</td><td>".number_format($votid,0,',','.')."</td><td>".number_format($voti,0,',','.')."</td>";
                if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1)){$righe .= "<td>".number_format($si,0,',','.')."</td>";}
                if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1 and !$votog)){$righe .= "<td>".number_format($no,0,',','.')."</td>";}
                $righe .= "<td>".number_format($validi,0,',','.')."</td><td>$nulli</td><td>$bianchi</td><td>$contestati</td>";
                $g_err=0;
                if (($genere==2 or $genere==3 or $genere==5) and $pag==1 and !$votog and !$dettnulli) {
                        if ($gruppref!=$validi) {
                                $g_err=1;
                                $ops=4;
                        }
                }
                $controllo1=$validi+$nulli+$bianchi+$contestati+$voti_nulli; #prova
                if($pag==0) $controllo2=$si+$no; else $controllo2=$si+$no+$vot_nul_lis+$cont_lis;
                if($genere==5 and !$votog) #$validi+$nulli+$bianchi+$vcont+$vn 
                        if($pag==0 and !$votog or $fascia<=$limite) {$controllo1=$validi+$nulli+$bianchi+$contestati+$voti_nulli;} else { $controllo1=$val_lista+$nulli+$bianchi+$contestati+$voti_nulli+$cont_lis+$vot_nul_lis+$solog;$controllo2=$si+$no-$solol+$cont_lis+$vot_nul_lis;}
                        $sth2 = $dbi->prepare("select count(0) from ".$prefix."_ele_controlli where id_cons='$id_cons' and id_sez='$id'");
                        $sth2->execute();       
                        list($crlis) = $sth2->fetch(PDO::FETCH_NUM);

                if ($voti==$controllo1 and $validi==$controllo2 and !$g_err and !$crlis){
                        $righe .= "<td>"._OK."</td></tr>\n";
                }else{
                        $righe .= "<td><a href=\"admin.php?op=voti&amp;id_cons_gen=$id_cons_gen&amp;id_sez=$id&amp;id_circ=$id_circ&amp;id_sede=$id_sede&amp;do=spoglio&amp;ops=$ops\"><span style=\"color: rgb(255, 0, 0);\">"._ERRORE."</span></a></td></tr>\n";$errors=1;
                        if ($ops==4) $ops=3;
                }
        }
        if ($num<$num_sez) {
                for (;$scrutinate<=$num_sez;$scrutinate++) {
                        $righe .= "<tr align=\"center\"><td><a href=\"admin.php?op=voti&amp;id_cons_gen=$id_cons_gen&amp;id_sez=".$sezione[$scrutinate]['id_sez']."&amp;id_circ=".$sezione[$scrutinate]['id_circ']."&amp;id_sede=".$sezione[$scrutinate]['id_sede']."&amp;do=spoglio&amp;ops=$ops\"><span style=\"color: rgb(255, 0, 0);\">$scrutinate</span></td></tr>\n";
                }
        }
        if($num_scr){
        if(isset($totf) and $totf) $eled=number_format($tot_d*100/$totf,2); else $eled=0;
        if(isset($totm) and $totm) $elem=number_format($tot_u*100/$totm,2); else $elem=0;       
        $righet = "<tr align=\"center\"><td><b>"._TOT."</b></td><td><b>".number_format($tot_u,0,',','.')."</b><br><i>(".$elem." %)</i></td><td><b>".number_format($tot_d,0,',','.')."</b><br><i>(".$eled." %)</i></td><td><b>".number_format($tot_voti,0,',','.')."</b><br><i>(".number_format($tot_voti*100/$totel,2)." %)</i></td>";
        // se e' un referendum o una consultazione con raggruppamenti
        if($tot_validi){
        if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1)){$righet .= "<td><b>".number_format($tot_si,0,',','.')."</b><br><i>(".number_format($tot_si*100/$tot_validi,2)." %)</i></td>";}
        if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1 and !$votog)){$righet .= "<td><b>".number_format($tot_no,0,',','.')."</b><br><i>(".number_format($tot_no*100/$tot_validi,2)." %)</i></td>";}
        $righet .= "<td><b>".number_format($tot_validi,0,',','.')."</b><br><i>(".number_format($tot_validi*100/$tot_voti,2)." %)</i></td><td><b>"
        .number_format($tot_nulli,0,',','.')."</b><br><i>(".number_format($tot_nulli*100/$tot_voti,2)." %)</i></td><td><b>".number_format($tot_bianchi,0,',','.')."</b><br><i>(".number_format($tot_bianchi*100/$tot_voti,2)." %)</i></td><td><b>".number_format($tot_contestati,0,',','.')."</b><br><i>(".number_format($tot_contestati*100/$tot_voti,2)." %)</i></td>";
        }else{
        if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1)){$righet .= "<td><b>".number_format($tot_si,0,',','.')."</b><br><i>(0.00 %)</i></td>";}
        if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1 and !$votog)){$righet .= "<td><b>".number_format($tot_no,0,',','.')."</b><br><i>(0.00 %)</i></td>";}
        $righet .= "<td><b>".number_format($tot_validi,0,',','.')."</b><br><i>(0.00 %)</i></td><td><b>"
        .number_format($tot_nulli,0,',','.')."</b><br><i>(".number_format($tot_nulli*100/$tot_voti,2)." %)</i></td><td><b>".number_format($tot_bianchi,0,',','.')."</b><br><i>(".number_format($tot_bianchi*100/$tot_voti,2)." %)</i></td><td><b>".number_format($tot_contestati,0,',','.')."</b><br><i>(".number_format($tot_contestati*100/$tot_voti,2)." %)</i></td>";
        }
        $g_err=0;
        if (($genere==2 or $genere==3 or $genere==5) and $pag==1 and !$votog) {
                if ($tgrup_pref!=$tot_validi) {
                        $g_err=1;
                }
        }
#       if ($tot_voti==$tot_validi+$tot_nulli+$tot_bianchi+$tot_contestati and
#               $tot_validi==$tot_si+$tot_no and !$g_err) {
        if (! $errors) {
                $righet .= "<td>"._OK."</td></tr>\n";
        }else{
                $righet .= "<td><span style=\"color: rgb(255, 0, 0);\">"._ERRORE."</span></td></tr>\n";
        }
        }else $righet='';
        //$righe .= "</table></td></tr>\n";

        echo "$riga1";
        echo $riga2;
        echo $righet;
        echo $riga3;
        echo $righe;
        CloseTable();

    echo"<table align=\"center\" width=\"100%\" bgcolor=\"$bgcolor1\"><tr>\n";
    if($genere==0){ //se e' referendum
        #'Pagina precedente' e 'Pagina Successiva'
            $cur=$num_ref;
        if ($cur>1) {
              $num_ref--;
                          echo "<td colspan=\"5\" align=\"center\" bgcolor=\"$bgcolor1\"><a href=\"admin.php?op=controllo_voti&amp;id_cons_gen=$id_cons_gen&amp;num_ref=$num_ref&amp;num_refs=$num_refs\">";
              echo "<b>"._PREV_MATCH."</b></a></td>";
        }
        if ($cur<$num_refs) {
                $cur++;        
                        echo "<td colspan=\"5\" align=\"center\" bgcolor=\"$bgcolor1\"><a href=\"admin.php?op=controllo_voti&amp;id_cons_gen=$id_cons_gen&amp;num_ref=$cur&amp;num_refs=$num_refs\">";
            echo "<b>"._NEXT_MATCH."</b></a></td>";
        }
    }elseif(($genere==5 and ($fascia>=$limite or $dettnulli)) or ($genere==3) or ($genere==2) or $genere==1){ //se vi sono raggruppamenti
                $pag=($pag==0 ? 1:0);
                echo "<td colspan=\"5\" align=\"center\" bgcolor=\"$bgcolor1\"><a href=\"admin.php?op=controllo_voti&amp;id_cons_gen=$id_cons_gen&amp;pag=$pag\"><b>";
        if($pag) echo _CONTR_PREF;
                else echo _CONTR_ESPR;
                echo "</b></a></td>";

        }/* elseif ($genere==1){
                $pag=($pag==0 ? 1:0);
                echo "<td colspan=\"5\" align=\"center\" bgcolor=\"$bgcolor1\"><a href=\"admin.php?op=controllo_voti&amp;id_cons_gen=$id_cons_gen&amp;pag=$pag\"><b>";
        if($pag) echo _CONTR_GRUP;
                else echo _CONTR_ESPR;
                echo "</b></a></td>";
        }*/
        echo "</tr></table><br>\n";
echo "</table>\n</td></tr></table>\n";

   include ("footer.php");

?>