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

Last change on this file since 256 was 256, checked in by roby, 6 years ago
File size: 15.7 KB
RevLine 
[2]1<?php
2
3/************************************************************************/
4/* Eleonline - Raccolta e diffusione dei dati elettorali */
5/* by Roberto Gigli & Luciano Apolito */
6/* http://www.eleonline.it */
7/* info@eleonline.it luciano@aniene.net rgigli@libero.it */
8/************************************************************************/
9/* Modulo Controllo dei voti */
10/* Amministrazione */
11/************************************************************************/
12
13if (!defined('ADMIN_FILE')) {
14 die ("You can't access this file directly...");
15}
16
17$aid=$_SESSION['aid'];
18$dbi=$_SESSION['dbi'];
19$prefix=$_SESSION['prefix'];
20$currentlang=$_SESSION['lang'];
21$id_comune=$_SESSION['id_comune'];
22$id_cons_gen=$_GET['id_cons_gen'];
23$bgcolor1=$_SESSION['bgcolor1'];
24$bgcolor2=$_SESSION['bgcolor2'];
25
26$perms=ChiSei($id_cons_gen);
27if ($perms<16 or !$id_cons_gen) die("$perms Non hai i permessi per inserire dati, o non hai scelto la consultazione!");
[256]28 $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'";
29 $sth = $dbi->prepare("$sql");
30 $sth->execute();
31 $row = $sth->fetch(PDO::FETCH_BOTH);
32 list($tipo_cons,$id_cons,$dettnulli,$disgiunto) = explode($row);
33 $sql="SELECT genere,voto_g,voto_l FROM ".$prefix."_ele_tipo where tipo_cons='$tipo_cons'";
34 $sth = $dbi->prepare("$sql");
35 $sth->execute();
36 $row = $sth->fetch(PDO::FETCH_BOTH);
37 list($genere,$votog,$votol) = explode($row);
[2]38include("modules/Elezioni/funzionidata.php");
39include("modules/Elezioni/ele.php");
40if (! get_magic_quotes_gpc()) $magic='addslashes'; else $magic='';
41if (isset($param['ops'])) get_magic_quotes_gpc() ? $ops=$param['ops']:$ops=addslashes($param['ops']); else $ops='';
42if (isset($param['pag'])) $pag=intval($param['pag']); else $pag=0;
43if (isset($param['num_ref'])) $num_ref=intval($param['num_ref']);
44if (isset($param['num_refs'])) $num_refs=intval($param['num_refs']);
45ele();
46//**************************************************************************
47// ELE
48//**************************************************************************
49
50 global $prefix, $dbi,$fascia,$limite;
[256]51 $sql="SELECT sum(maschi),sum(femmine) FROM ".$prefix."_ele_sezioni where id_cons='$id_cons'";
52 $sth = $dbi->prepare("$sql");
53 $sth->execute();
54 $row = $sth->fetch(PDO::FETCH_BOTH);
55 list($totm,$totf) = explode($row);
[2]56 $totel=$totm+$totf;
57 if (!IsSet($pag)) {$pag=0;} //inizializza il numero di pagina
58 if (!IsSet($num_ref)) {
59 $num_ref=1;
[256]60 $sql="SELECT id_gruppo from ".$prefix."_ele_gruppo where id_cons=$id_cons";
61 $sth = $dbi->prepare("$sql");
62 $sth->execute();
63 $row = $sth->fetch(PDO::FETCH_BOTH);
64 $num_refs= $sth->rowCount(); //quante pagine?
[2]65 }
66 if((($genere!=4) and $pag==0 and !$votog) or $genere==1 or $genere==2){ //diverso da liste a piu' candidati
67 $ops=4; //gestione gruppi (anche liste uninominali)
68 }else{
69 $ops=3; //gestione liste
70 }
71 OpenTable();
[256]72 $sql="SELECT id_gruppo,num_gruppo from ".$prefix."_ele_gruppo where id_cons=$id_cons and num_gruppo=$num_ref";
73 $sth = $dbi->prepare("$sql");
74 $sth->execute();
75 $row = $sth->fetch(PDO::FETCH_BOTH);
76 list($idg,$numg) = explode($row);
77 $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";
78 $sth = $dbi->prepare("$sql");
79 $sth->execute();
80 $num_sez = $sth->rowCount(); //quante sezioni?
[2]81for ($i=1;$i<=$num_sez;$i++){
[256]82 $sezione[$i]== $sth->fetch(PDO::FETCH_BOTH); //inizializza l'array delle sezioni
[2]83 $ar[$i]=0;
84 }
85 $tab3="_ele_voti_lista";
86// 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.
87if ($genere==1 or $genere==2) $tab3="_ele_voti_gruppo";
88 if ($genere>0) { //se non e' un referendum
89 if (!($genere==4) and $pag==0){ //se non e' una lista uninominale ed e' la prima pagina
[139]90 $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 group by t2.id_sez order by t2.num_sez";
[2]91
92 }else{ // e' una lista uninominale o la seconda pagina
[139]93 $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
[2]94 FROM ".$prefix."_ele_sezioni as t1 left join ".$prefix.$tab3." as t2 on (t1.id_sez=t2.id_sez)
95 left join ".$prefix."_ele_sede as t4 on (t1.id_sede=t4.id_sede)
96 where t1.id_cons='$id_cons' and t1.id_cons=t2.id_cons group by t2.id_sez order by t1.num_sez";
97 }
98 $riga1="<tr><td>\n<table border=\"0\" width=\"100%\" bgcolor=\"$bgcolor1\" ><tr><td align=\"center\">"._SEZSCR." "._CONSULTAZIONE."</td></tr></table></td></tr>\n";
99 }else{ // e' un referendum
[139]100 $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'
[2]101 FROM ".$prefix."_ele_voti_ref as t1 left join ".$prefix."_ele_sezioni as t2 on (t1.id_sez=t2.id_sez)
102 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)
103 where t1.id_cons='$id_cons' and t1.id_gruppo='$idg' order by t2.num_sez";
104 $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";
105 }
[256]106 $sth = $dbi->prepare("$tab ");
107 $sth->execute();
108 $num_scr = $sth->rowCount();
[2]109 $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
110 $riga2 .= "<tr><td>\n<table border=\"0\" width=\"100%\" align=\"center\">";
111 $riga3 = "<tr bgcolor=\"$bgcolor2\" align=\"center\"><td width=\"5%\"><b>"._SEZIONI."</b></td>"
112 ."<td><b>"._VOTIU."</b></td>"."<td><b>"._VOTID."</b></td>"."<td><b>"._VOTIE."</b></td>"; //testata con nomi dei campi
113 if ($genere==0) { //se e' un referendum
114 $riga3 .= "<td><b>"._SI."</b></td><td><b>"._NO."</b></td>";
115 } elseif ((($genere==5) or ($genere==3)) and $pag==1){
116 $riga3 .= "<td><b>"._ASOLA_LISTA."</b></td>";
117 if (!$votog) $riga3 .= "<td><b>"._ASOLO_GRUPPO."</b></td>";
118 }
119 $riga3 .= "<td><b>"._VALIDI."</b></td><td><b>"._NULLI."</b></td><td><b>"._BIANCHI."</b></td><td><b>"._CONTESTATI."</b></td>";
120// if (($genere==2 or $genere==3 or $genere==5) and !$votog)
121// $riga3 .= "<td><b>"._PREFGRU."</b></td>";
122// if ($genere>1 and !$votol)
123// $riga3 .= "<td><b>"._PREFLIS."</b></td>";
124 $riga3 .= "<td><b>"._STATO."</b></td></tr>\n";
125 $righe= "";
126 $scrutinate=1;
127// if ($genere>1 and $pag==1) $ops=3;
[139]128 $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;
[256]129 while ( $row = $sth->fetch(PDO::FETCH_BOTH)){
130//controllare
131 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) = explode($row);
[2]132 // inserimento numeri di sez non scrutinate
133 while ($scrutinate < $num) {
134 $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";
135 $scrutinate++;
136 }
137 $scrutinate++;
138 // fine inserimento
[254]139 if (($genere==2 or $genere==3 or $genere==5) and !$votog and !$dettnulli) {
[256]140 $sql="select sum(voti) from ".$prefix."_ele_voti_gruppo where id_sez='$id'";
141 $sth2 = $dbi->prepare("$sql");
142 $sth2->execute();
143 $row2 = $sth2->fetch(PDO::FETCH_BOTH);
144 list ($gruppref) = explode($row2);
[2]145 $tgrup_pref += $gruppref;
146 }
147 $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'";
148 if ($genere==0) $tab2 .= " and id_gruppo=$id_gruppo";
[256]149 $sth2 = $dbi->prepare("$tab2");
150 $sth2->execute();
151 $row2 = $sth2->fetch(PDO::FETCH_BOTH);
152 list($votid,$votiu,$voti) = explode($row2);
[2]153// $voti=$votiu+$votid;
154
155 $tot_u+=$votiu;
156 $tot_d+=$votid;
157 $tot_voti+=$voti;
158 $tot_si+=$si;
159 $tot_no+=$no;
160 $tot_validi+=$validi;
161 $tot_nulli+=$nulli;
162 $tot_bianchi+=$bianchi;
163 $tot_contestati+=$contestati;
164 $tot_voti_nulli+=$voti_nulli;
165 $tot_val_lista+=$val_lista;
166 $tot_vot_nul_lis+=$vot_nul_lis;
167 $tot_cont_lis+=$cont_lis;
168 $tot_solog+=$solog;
[139]169 $tot_solol+=$solol;
[2]170 $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>";
171 if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1)){$righe .= "<td>".number_format($si,0,',','.')."</td>";}
172 if ($genere==0 or ((($genere==5) or ($genere==3)) and $pag==1 and !$votog)){$righe .= "<td>".number_format($no,0,',','.')."</td>";}
173 $righe .= "<td>".number_format($validi,0,',','.')."</td><td>$nulli</td><td>$bianchi</td><td>$contestati</td>";
174 $g_err=0;
[254]175 if (($genere==2 or $genere==3 or $genere==5) and $pag==1 and !$votog and !$dettnulli) {
[2]176 if ($gruppref!=$validi) {
177 $g_err=1;
178 $ops=4;
179 }
180 }
[254]181 $controllo1=$validi+$nulli+$bianchi+$contestati+$voti_nulli; #prova
182 if($pag==0) $controllo2=$si+$no; else $controllo2=$si+$no+$vot_nul_lis+$cont_lis;
[163]183 if($genere==5 and !$votog) #$validi+$nulli+$bianchi+$vcont+$vn
[254]184 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;}
[256]185 $sth2 = $dbi->prepare("select stato_lis from ".$prefix."_ele_controllosez where id_cons='$id_cons' and id_sez='$id'");
186 $sth2->execute();
187 $row2 = $sth2->fetch(PDO::FETCH_BOTH);
188 list($crlis) = explode($row2);
189
[254]190 if ($voti==$controllo1 and $validi==$controllo2 and !$g_err and $crlis!=-1){
[2]191 $righe .= "<td>"._OK."</td></tr>\n";
192 }else{
193 $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;
194 if ($ops==4) $ops=3;
195 }
196 }
197 if ($num<$num_sez) {
198 for (;$scrutinate<=$num_sez;$scrutinate++) {
199 $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";
200 }
201 }
202 if($num_scr){
203 $righet = "<tr align=\"center\"><td><b>"._TOT."</b></td><td><b>".number_format($tot_u,0,',','.')."</b><br><i>(".number_format($tot_u*100/$totm,2)." %)</i></td><td><b>".number_format($tot_d,0,',','.')."</b><br><i>(".number_format($tot_d*100/$totf,2)." %)</i></td><td><b>".number_format($tot_voti,0,',','.')."</b><br><i>(".number_format($tot_voti*100/$totel,2)." %)</i></td>";
204 // se e' un referendum o una consultazione con raggruppamenti
205 if($tot_validi){
206 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>";}
207 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>";}
208 $righet .= "<td><b>".number_format($tot_validi,0,',','.')."</b><br><i>(".number_format($tot_validi*100/$tot_voti,2)." %)</i></td><td><b>"
209 .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>";
210 }else{
211 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>";}
212 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>";}
213 $righet .= "<td><b>".number_format($tot_validi,0,',','.')."</b><br><i>(0.00 %)</i></td><td><b>"
214 .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>";
215 }
216 $g_err=0;
217 if (($genere==2 or $genere==3 or $genere==5) and $pag==1 and !$votog) {
218 if ($tgrup_pref!=$tot_validi) {
219 $g_err=1;
220 }
221 }
222# if ($tot_voti==$tot_validi+$tot_nulli+$tot_bianchi+$tot_contestati and
223# $tot_validi==$tot_si+$tot_no and !$g_err) {
224 if (! $errors) {
225 $righet .= "<td>"._OK."</td></tr>\n";
226 }else{
227 $righet .= "<td><span style=\"color: rgb(255, 0, 0);\">"._ERRORE."</span></td></tr>\n";
228 }
229 }else $righet='';
230 //$righe .= "</table></td></tr>\n";
231
232 echo "$riga1";
233 echo $riga2;
234 echo $righet;
235 echo $riga3;
236 echo $righe;
237 CloseTable();
238
239 echo"<table align=\"center\" width=\"100%\" bgcolor=\"$bgcolor1\"><tr>\n";
240 if($genere==0){ //se e' referendum
241 #'Pagina precedente' e 'Pagina Successiva'
242 $cur=$num_ref;
243 if ($cur>1) {
244 $num_ref--;
245 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\">";
246 echo "<b>"._PREV_MATCH."</b></a></td>";
247 }
248 if ($cur<$num_refs) {
249 $cur++;
250 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\">";
251 echo "<b>"._NEXT_MATCH."</b></a></td>";
252 }
[254]253 }elseif(($genere==5 and ($fascia>=$limite or $dettnulli)) or ($genere==3) or ($genere==2) or $genere==1){ //se vi sono raggruppamenti
[2]254 $pag=($pag==0 ? 1:0);
255 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>";
256 if($pag) echo _CONTR_PREF;
257 else echo _CONTR_ESPR;
258 echo "</b></a></td>";
259
260 }/* elseif ($genere==1){
261 $pag=($pag==0 ? 1:0);
262 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>";
263 if($pag) echo _CONTR_GRUP;
264 else echo _CONTR_ESPR;
265 echo "</b></a></td>";
266 }*/
267 echo "</tr></table><br>\n";
268echo "</table>\n</td></tr></table>\n";
269
270 include ("footer.php");
271
272?>
Note: See TracBrowser for help on using the repository browser.