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

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