source: trunk/client/modules/Elezioni/consiglieri.php@ 220

Last change on this file since 220 was 220, checked in by roby, 10 years ago

client: proiezione consiglio, seggio al candidato sindaco anche se intacca il premio di maggioranza
File size: 36.3 KB
Line 
1<?php
2/************************************************************************/
3/* Eleonline - Raccolta e diffusione dei dati elettorali */
4/* by Roberto Gigli & Luciano Apolito */
5/* http://www.eleonline.it */
6/* info@eleonline.it luciano@aniene.net rgigli@libero.it */
7/************************************************************************/
8/* Modulo previsione seggi */
9/* Amministrazione */
10/************************************************************************/
11if (!defined('MODULE_FILE')) {
12 die ("You can't access this file directly...");
13}
14# controllo
15if ($hondt<=0){ Header("Location: index.php");
16 die();
17}
18
19$param=strtolower($_SERVER['REQUEST_METHOD']) == 'get' ? $_GET : $_POST;
20
21if (isset($param['gruppo'])) $gruppo=intval($param['gruppo']); else $gruppo='';
22if (isset($param['numgruppo'])) $numgruppo=intval($param['numgruppo']); else $numgruppo='';
23if (isset($param['listecol'])) $listecol=intval($param['listecol']); else $listecol=0;
24
25$result = mysql_query("select id_conf,id_fascia from ".$prefix."_ele_cons_comune where id_cons='$id_cons'", $dbi);
26list($id_conf,$fascia) = mysql_fetch_row($result);
27
28$res = mysql_query("SELECT limite,consin,infpremio,supsbarramento,suppremio,listinfsbar,listinfconta,listsupconta,supminpremio,infminpremio from ".$prefix."_ele_conf where id_conf='$id_conf'",$dbi);
29list($limite,$consin,$infpremio,$supsbarramento,$suppremio,$listinfsbar,$listinfconta,$listsupconta,$supminpremio,$infminpremio) = mysql_fetch_row($res);
30$numcons=0;
31
32echo "<table><tr><td align=\"center\">"._PROIEZCONS."</td></tr></table>";
33
34
35function consiglio(){
36global $param,$id_cons_gen, $dbi, $prefix, $id_comune, $gruppo, $numgruppo, $listecol, $id_comune, $limite,$numcons,$id_conf,$fascia,$id_cons;
37$collegate= array();
38$collperd= array();
39$x=1;
40$primoturno=0;
41while (isset($param['num_lista'.$x])) {
42 if ($param['num_lista'.$x]==$gruppo) array_push($collegate,$_SESSION['num_lista'.$x]);
43 elseif ($param['num_lista'.$x]!=0) array_push($collperd,$_SESSION['num_lista'.$x]);
44 $x++;
45}
46$res = mysql_query("SELECT t1.tipo_cons,t2.id_cons,t2.id_fascia,t2.id_conf 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'" , $dbi);
47if (mysql_num_rows($res)){
48 list($tipo_cons,$id_cons,$fascia,$conf) = mysql_fetch_row($res);
49 $result = mysql_query("select capoluogo from ".$prefix."_ele_comuni where id_comune='$id_comune'", $dbi);
50 list($capoluogo) = mysql_fetch_row($result);
51 $result = mysql_query("select fascia_capoluogo from ".$prefix."_ele_conf where id_conf='$conf'", $dbi);
52 list($fascia2) = mysql_fetch_row($result);
53 if($fascia<$fascia2 and $capoluogo) $fascia=$fascia2;
54
55 $result = mysql_query("SELECT seggi from ".$prefix."_ele_fasce where id_fascia='$fascia' and id_conf=$id_conf",$dbi);
56 list($numcons) = mysql_fetch_row($result);
57$res_val= mysql_query("SELECT id_cand, sum(voti) from ".$prefix."_ele_voti_candidati where id_cons='$id_cons' group by id_cand",$dbi);
58$num_cons= mysql_num_rows($res_val);
59if ($num_cons<$numcons){
60 echo "Il numero di candidati al consiglio inseriti con preferenza ($num_cons) e' inferiore al numero di seggi previsti ($numcons). Non e' possibile procedere con il calcolo";
61 include("footer.php");
62 die();
63}
64 if (!$gruppo){
65 $res_val = mysql_query("SELECT sum(validi) from ".$prefix."_ele_sezioni where id_cons='$id_cons'",$dbi);
66 list($validi) = mysql_fetch_row($res_val);
67 $res_lis = mysql_query("SELECT t1.num_gruppo,sum(t2.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_voti_gruppo as t2 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo group by t1.num_gruppo order by voti desc limit 0,2",$dbi);
68 $test=0;$flag=0;
69 while (list($num_gruppo,$voti)= mysql_fetch_row($res_lis)){
70 if ($voti>($validi/2)) {$gruppo=$num_gruppo;$primoturno=1;}
71 if ($voti==$test) $flag=1; else $test=$voti;
72 }
73 }
74 if ($fascia<=$limite){
75 $res_lis = mysql_query("SELECT t1.num_gruppo,sum(t2.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_voti_gruppo as t2 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo group by t1.num_gruppo order by voti desc limit 0,2",$dbi);
76 list($num_gruppo1,$voti1)= mysql_fetch_row($res_lis);
77 list($num_gruppo2,$voti2)= mysql_fetch_row($res_lis);
78 if ($voti1>$voti2)
79 $numgruppo=$num_gruppo1;
80 }
81 if ($fascia<=$limite and $numgruppo) consmin($fascia,$numgruppo);
82 elseif ($gruppo>0) conssup($fascia,$gruppo,$collegate,$collperd,$primoturno);
83 elseif ($numgruppo>0){
84 $res_lis = mysql_query("SELECT t1.id_lista,t1.num_lista,t1.descrizione,t1.id_gruppo from ".$prefix."_ele_lista as t1, ".$prefix."_ele_gruppo as t2 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.num_gruppo not in (".$_SESSION['ballo1'].",".$_SESSION['ballo2'].")",$dbi);
85 $yy=mysql_num_rows($res_lis);
86 $res_voti = mysql_query("select sum(voti) from ".$prefix."_ele_voti_lista where id_cons='$id_cons'",$dbi);
87 list($validilista) = mysql_fetch_row($res_voti);
88 if ($yy){
89while(list($id_lista,$num_lista,$descr,$pgrup) = mysql_fetch_row($res_lis)) {
90 $res_voti = mysql_query("select sum(voti) from ".$prefix."_ele_voti_lista where id_lista='$id_lista'",$dbi);
91 list($votilista) = mysql_fetch_row($res_voti);
92 if(!isset($voti[$pgrup])) $voti[$pgrup]=0;
93 $voti[$pgrup]+=$votilista;
94}
95 foreach ($voti as $key=>$val){if($val<($validilista*3/100)) unset($voti[$key]);} ##################################################
96 mysql_data_seek($res_lis,0);
97 echo "<br/>";
98 echo "<form id=\"gruppo\" action=\"modules.php\">";
99 echo "<table cellspacing=\"0\" cellpadding=\"2\" border=\"1\"><tr class=\"bggray\"><td colspan=\"4\">"._COLLEGAMENTI."</td></tr><tr class=\"bggray\"><td>";
100 echo "<input type=\"hidden\" name=\"op\" value=\"consiglieri\"/>";
101 echo "<input type=\"hidden\" name=\"id_cons_gen\" value=\"$id_cons_gen\"/>";
102 echo "<input type=\"hidden\" name=\"id_comune\" value=\"$id_comune\"/></td>";
103
104echo "<td><b>".$_SESSION['grp1']."</b></td>";
105 echo "<td><b>".$_SESSION['grp2']."</b></td>";
106 echo "<td><b>"._NONCOLLE."</b></td></tr>";
107
108 $z=1;
109 while(list($id_lista,$num_lista,$descr,$pgrup) = mysql_fetch_row($res_lis)) {
110 if(!isset($voti[$pgrup])) continue;
111 $x=$_SESSION['ballo1'];
112 echo "<tr><td>$descr</td><td><input type=\"radio\" name=\"num_lista$z\" value=\"$x\"/></td>";
113 $x=$_SESSION['ballo2'];
114 $_SESSION['num_lista'.$z]=$num_lista;
115 echo "<td><input type=\"radio\" name=\"num_lista$z\" value=\"$x\"/></td>";
116 echo "<td><input type=\"radio\" name=\"num_lista$z\" value=\"0\" checked=\"checked\"/></td></tr>";
117 $z++;
118 }
119
120 echo "<tr><td colspan=\"4\"><input type=\"hidden\" name=\"listecol\" value=\"$x\"/><input type=\"hidden\" name=\"gruppo\" value=\"$numgruppo\"/>";
121 echo "<input type=\"submit\" name=\"invia\" value=\""._OK."\"/></td></tr></table></form>";
122 }else conssup($fascia,$numgruppo,$collegate,$collperd,$primoturno);
123 }else {
124 echo "<br/>";
125 echo "<form id=\"numgruppo\" action=\"modules.php\">";
126 echo "<table><tr class=\"bggray\"><td>"._SCELTASIN.":</td><td align=\"left\">";
127 echo "<input type=\"hidden\" name=\"op\" value=\"consiglieri\"/>";
128 echo "<input type=\"hidden\" name=\"id_cons_gen\" value=\"$id_cons_gen\"/>";
129 echo "<input type=\"hidden\" name=\"id_comune\" value=\"$id_comune\"/>";
130 $res = mysql_query("SELECT t1.id_gruppo,t1.num_gruppo,t1.descrizione, sum(t2.voti) as pref FROM ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_voti_gruppo as t2 where t1.id_gruppo=t2.id_gruppo and t1.id_cons='$id_cons' group by t1.num_gruppo,t1.descrizione order by pref desc limit 0,2", $dbi);
131 while(list($id_gruppo,$num_gruppo, $descr_gruppo,$pref) = mysql_fetch_row($res)) {
132 if (!isset($_SESSION['ballo1'])) {
133 $_SESSION['ballo1']=$num_gruppo;
134 $_SESSION['grp1']=$descr_gruppo;
135 $_SESSION['idgrp1']=$id_gruppo;
136 }else{
137 $_SESSION['ballo2']=$num_gruppo;
138 $_SESSION['grp2']=$descr_gruppo;
139 $_SESSION['idgrp2']=$id_gruppo;
140 }
141 echo "<input type=\"radio\" name=\"numgruppo\" value=\"$num_gruppo\"/>$descr_gruppo<br/>";
142 }
143 echo "</td>";
144 echo "<td><input type=\"submit\" name=\"invia\" value=\""._OK."\"/></td></tr></table></form>";
145
146 }
147 }
148}
149
150function consmin($fascia,$grp) {
151global $id_cons, $prefix,$dbi,$num_candlst,$quozienti,$PNE,$CSEC,$consin,$numcons;
152global $infpremio,$fisso,$sincons, $votol;
153if (!isset($fisso)) $fisso=0; #se fisso=1 il premio di maggioranza Ú fisso
154if (isset($votol)) {$votolista=$votol; $fisso=$votol;} #se votolista=1 c'e' voto di lista
155if (!isset($sincons)) $sincons=0; #se sincons=1 il sindaco eletto occupa un posto di consigliere
156$PNE=_PRIMONON;
157$CSEC=_SINDCONS;
158$sorteggio=0;
159$num_candlst=array();
160#funzione di calcolo per comuni fino a 15.000 abitanti (più esattamente fino al valore di $limite)
161
162if ($sincons) $numcons--;
163#$numcons--;
164$consel=array();
165$conselcsne=array();
166$conselmin=array();
167//$consel[]=array("Lista","Voti","Seggi","Nominativo","Cifra Elettorale","Quoziente");
168$consel[]=array(_LISTA,_VOTI,_SEGGI,_CANDIDATO,_CIFRAELE,_QUOZIENTI);
169#carica numero di liste e voti, i voti sono quelli del gruppo se non c'e' voto di lista
170if($votolista=='0')
171 $res_val = mysql_query("SELECT sum(validi) from ".$prefix."_ele_sezioni where id_cons='$id_cons'",$dbi);
172else
173 $res_val = mysql_query("SELECT sum(voti) from ".$prefix."_ele_voti_lista where id_cons='$id_cons'",$dbi);
174list($validi) = mysql_fetch_row($res_val);
175#se votolista==1, Ú abilitato il voto di lista ed Ú quello su cui si calcola l'assegnazione dei seggi
176if ($fisso==1){
177 #seleziona il sindaco
178$res_per = mysql_query("SELECT t1.descrizione,t1.num_gruppo,t2.id_lista,t2.num_lista,t2.descrizione,sum(t3.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_gruppo as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t1.id_gruppo=t3.id_gruppo group by t1.descrizione, t1.num_gruppo,t2.num_lista,t2.descrizione order by voti desc limit 0,1",$dbi);
179 list($descr,$num_gruppo,$id_lista1,$num_lista,$descr_lista,$voti)= mysql_fetch_row($res_per);
180$res_per = mysql_query("SELECT t2.id_lista, sum(t2.voti) as voti from ".$prefix."_ele_voti_lista as t2 where t2.id_cons='$id_cons' and t2.id_lista!='$id_lista1' group by t2.id_lista order by voti desc limit 0,1",$dbi);
181 list($id_lista2,$voti)= mysql_fetch_row($res_per);
182 #e la lista di minoranza
183 $ordine= $id_lista1>$id_lista2 ? "desc":"";
184$res_per = mysql_query("SELECT t1.descrizione,t1.num_gruppo,t2.id_lista,t2.num_lista,t2.descrizione,sum(t3.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where (t2.id_lista='$id_lista1' or t2.id_lista='$id_lista2') and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista group by t1.descrizione,t1.num_gruppo,t2.num_lista,t2.descrizione order by t2.id_lista $ordine",$dbi);
185 }else{
186$res_per = mysql_query("SELECT t1.descrizione,t1.num_gruppo,t2.id_lista,t2.num_lista,t2.descrizione,sum(t3.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_gruppo as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t1.id_gruppo=t3.id_gruppo group by t1.descrizione,t1.num_gruppo,t2.num_lista,t2.descrizione order by voti desc",$dbi);
187}
188$groups=array();
189$seggimag=array();
190$premio=0;
191$x=0;
192#carica l'array dei gruppi e della cifra di gruppo
193while (list($descr,$num_gruppo,$id_lista,$num_lista,$descr_lista,$voti)= mysql_fetch_row($res_per)){
194 $desgruppi[$num_gruppo]=$descr;
195 $desliste[$num_lista]=$num_lista.") ".$descr_lista;
196 $idlst[$num_lista]=$id_lista;
197 $listagruppo[$num_lista]=$num_gruppo;
198 $lists[$num_lista]=$voti;
199 if ($grp){
200 if ($grp!=$num_gruppo) {$groups[($num_gruppo)]=$voti;$listemin[$num_lista]=$voti;}
201 else {$gruppo[($num_gruppo)]=$voti;$listemag[$num_lista]=$voti;$lisvin=$num_lista;}
202 }else{
203 if ($x) {$groups[($num_gruppo)]=$voti;$listemin[$num_lista]=$voti;}
204 else {$gruppo[($num_gruppo)]=$voti;$listemag[$num_lista]=$voti;$lisvin=$num_lista;}
205 }
206 $x++;
207 }#controllo del premio di maggioranza
208// if ($gruppo[$listagruppo[$lisvin]]>($validi*2/3))
209 if ($gruppo[$listagruppo[$lisvin]]>($validi*$infpremio/100) and $fisso==0)
210 {
211$seggimag[$lisvin]=number_format($numcons*($gruppo[$listagruppo[$lisvin]]*100/$validi)/100);
212echo "<br> seggimag:".$seggimag[$lisvin];
213$num_cons=number_format($numcons-$seggimag[$lisvin]);
214# $num_cons=$numcons;
215 } else {
216// $seggimag[$lisvin]=number_format($numcons*2/3);
217// $num_cons=number_format($numcons/3);
218 $seggimag[$lisvin]=number_format($numcons*$infpremio/100);
219 $num_cons=number_format($numcons-$seggimag[$lisvin]);
220 }
221 foreach ($listagruppo as $lista=>$val){
222 $id_lista=$idlst[$lista];
223 $res_can = mysql_query("SELECT concat(substring(concat('0',t1.num_cand),-2),') ',t1.cognome,' ',substring(t1.nome from 1 for 1),'.') as descr,sum(t2.voti) as voti from ".$prefix."_ele_candidati as t1, ".$prefix."_ele_voti_candidati as t2 where t1.id_lista='$id_lista' and t1.id_cand=t2.id_cand GROUP BY descr order by voti desc,t1.num_cand",$dbi);
224
225 $num_candlst[$lista]=mysql_num_rows($res_can);
226 $pos=0;
227 while(list($cand,$pre)=mysql_fetch_row($res_can)){
228 if(!isset($lists[$lista])) $lists[$lista]=0;
229 $cifra[$lista][$pos]=$lists[$lista]+$pre;
230 $arvin[$lista][$pos++]=$cand;
231 }
232 }
233 if ($num_candlst[$lisvin]<$seggimag[$lisvin]) {
234 $num_cons+=$seggimag[$lisvin]-$num_candlst[$lisvin];
235 $seggimag[$lisvin]=$num_candlst[$lisvin];
236 }
237 if (isset($gruppo[$listagruppo[$lisvin]])) $seggimag=calcoloseggi($listemag,$seggimag[$lisvin],1);
238 if(isset($mex))
239 echo "$mex";
240 foreach ($seggimag as $lista=>$val)
241 for ($z=0;$z<$val;$z++){
242 if ($z) $consel[]=array("","","",$arvin[$lista][($z)],$cifra[$lista][($z)],number_format($quozienti[$lista][$z],2));
243 else $consel[]=array($desliste[$lista],$lists[$lista],$val,$arvin[$lista][($z)],$cifra[$lista][($z)],number_format($quozienti[$lista][$z],2));
244 }
245 if($arvin[$lista][($z)]) $consel[]=array($desliste[$lista],"$PNE","",$arvin[$lista][($z)],$cifra[$lista][($z)],number_format($quozienti[$lista][$z],2));
246 $seggimin=array();
247 $seggimin=calcoloseggi($listemin,$num_cons,1);
248 foreach ($seggimin as $lista=>$val){
249 if ($consin and $val>0){
250 $conselcsne[]=array("$CSEC","","",$desgruppi[$listagruppo[$lista]],"","");
251 $val--;
252 }
253 for ($z=0;$z<$val;$z++){
254 if ($z) $conselmin[]=array("","","",$arvin[$lista][($z)],$cifra[$lista][($z)],number_format($quozienti[$lista][$z],2));
255 else $conselmin[]=array($desliste[$lista],$lists[$lista],$val,$arvin[$lista][($z)],$cifra[$lista][($z)],number_format($quozienti[$lista][$z],2));
256 }
257 if($arvin[$lista][($z)]) $conselmin[]=array($desliste[$lista],"$PNE","",$arvin[$lista][($z)],$cifra[$lista][($z)],number_format($quozienti[$lista][$z],2));
258 }
259 foreach($conselcsne as $key=>$val)
260 {
261 $consel[]=array($val[0],$val[3]);
262 }
263 foreach($conselmin as $key=>$val)
264 {
265 $consel[]=array($val[0],$val[1],$val[2],$val[3],$val[4],$val[5]);
266 }
267
268
269
270 echo "<table summary=\"Tabella dei consiglieri eletti\" class=\"table-docs\" cellspacing=\"0\" cellpadding=\"2\" border=\"1\" rules=\"all\">";
271 echo "<tr class=\"bggray\"><td scope=\"row\">";
272 echo _SINDACO.": ".$desgruppi[$listagruppo[$lisvin]]."</td></tr></table>";
273 stampalista($consel);
274
275
276}
277
278
279
280function calcoloseggi($gruppi,$num_cons,$flag){
281global $ultimo,$mex,$sorteggio,$quozienti,$num_cand,$num_candlst;
282
283#carica le preferenze
284$pref = array();
285$ultimo=0;
286$mex='';
287$sorteggio=0;
288$eletti = array();
289$ele = array();
290$quozienti = array();
291$num_quoz= $num_cons;
292#inizializza l'array degli eletti
293foreach ($gruppi as $x=>$val){
294 $eletti[$x]=0;
295 }
296#carica gli array dei quozienti
297foreach($gruppi as $y=>$tmp){
298
299 if($flag) $num_quoz= $num_cons<$num_candlst[$y] ? $num_cons:$num_candlst[$y];
300 if(!isset($ele[$y][0])) $ele[$y][0]=0;
301 for ($x=0;$x<=$num_quoz;$x++){
302 $ele[$y][$x]= $tmp/($x+1);
303 $quozienti[$y][$x]= $tmp/($x+1); ###echo "<br>[$y][$x]=".$tmp/($x+1);
304 }
305}
306#estrae i quozienti piu' alti
307for ($y=0;$y<$num_cons;$y++){
308 $temp=0;
309 $cand=0;
310 if(! isset($pref['0'])) $pref['0']='';
311 if(! isset($pref['1'])) $pref['1']='';
312 foreach($gruppi as $x=>$tmp){
313 if(!isset($ele[$x][0])) $ele[$x][0]=0;
314 if(!isset($pref[$x])) $pref[$x]=0;
315 if ($ele[$x][0]==$temp and $pref[$x]==$pref[$cand] and ($y+1)==$num_cons) {$sorteggio=1; $mex="Per attribuire l'ultimo seggio ￜ necessario un sorteggio tra la lista n. ".($x+1)." e la lista n. ".($cand+1);}
316 if ($ele[$x][0]>$temp or ($ele[$x][0]==$temp and $pref[$x]>$pref[$cand])) {
317 $temp=$ele[$x][0];
318 $cand=$x;
319 $sorteggio=0;$mex='';
320 }
321 }
322 if (!$sorteggio){
323 $eletti[$cand]++;
324 $ultimo=$cand;
325 array_shift($ele[$cand]);
326 }
327}
328return ($eletti);
329}
330
331function stampalista($ar) {
332global $PNE,$CSEC;
333$cmin=_SEGGIMIN;
334$csin="";
335 $bg='bgw';
336
337 $tmpbg='bggray2';
338 $tmpbg1='bgw';
339 $tmpbg2='bggray';
340 $tmpbg3='bggray2';
341 $fmin=2;
342 echo "<table summary=\"Tabella dei consiglieri eletti\" class=\"table-docs\" cellspacing=\"0\" cellpadding=\"2\" border=\"1\" rules=\"all\">";
343 $y=1;$i='';$e=0;
344 foreach ($ar as $riga) {
345 $e++;
346 if($riga[0]==$CSEC and $fmin==2)
347 {
348 { $fmin=1;
349 echo "</table>";
350 echo "<table summary=\"Tabella dei candidati sindaco eletti consigliere\" class=\"table-docs\" cellspacing=\"0\" cellpadding=\"2\" border=\"1\" rules=\"all\">";
351 echo "<tr class=\"bggray\"><td scope=\"row\" colspan=\"3\"><b>";
352 echo $csin;
353 echo "</b></td></tr>";
354 echo "<tr class=\"bggray\"><td scope=\"row\"><b>"._CANDIDATO."</b></td><td scope=\"row\"><b>"._NOMINATIVO."</b></td></tr>";
355 }
356 }
357 if($riga[0]!=$CSEC and $fmin==1)
358 { $fmin=0;
359 echo "</table>";
360 echo "<table summary=\"Tabella dei consiglieri di minoranza\" class=\"table-docs\" cellspacing=\"0\" cellpadding=\"2\" border=\"1\" rules=\"all\">";
361 echo "<tr class=\"bggray\"><td scope=\"row\" colspan=\"6\"><b>";
362 echo $cmin;
363 echo "</b></td></tr>";
364 echo "<tr class=\"bggray\"><td scope=\"row\"><b>"._LISTA."</b></td><td scope=\"row\"><b>"._VOTI."</b></td><td scope=\"row\"><b>"._SEGGI."</b></td><td scope=\"row\"><b>"._NOMINATIVO."</b></td><td scope=\"row\"><b>"._CIFRAELE."</b></td><td scope=\"row\"><b>"._QUOZIENTI."</b></td></tr>";
365 }
366 if($riga[1]==$PNE) echo "<tr class=\"red\">";
367 else{
368 $bg= ($riga[1]) ? $tmpbg3:$tmpbg1;
369 if($y) {
370 echo "<tr class=\"bggray\">";
371 }else{
372 echo "<tr class=\"$bg\">";
373 }
374 }
375 foreach ($riga as $cella) {
376 if ($e==1){
377 $t="<th scope=\"colgroup\"";$f="</th>";
378 }else{
379 $t="<td scope=\"row\"";$f="</td>";
380 }
381 echo "$t $i align=\"left\">$cella $f";
382 $i='';
383
384 }
385 if ($y) $y=0;
386 echo "</tr>";
387 }
388 echo "</table>";
389
390}
391
392function conssup($fascia,$gruppo,$collegate,$collperd,$primoturno) {
393global $id_cons, $id_cons_gen, $id_comune, $prefix,$dbi;
394global $groups,$lists,$eletti,$ultimo,$quozienti,$num_candlst,$mex,$PNE,$CSEC,$consin;
395global $supsbarramento, $supminpremio, $suppremio;
396global $listsupconta,$numcons;
397#funzione di calcolo per comuni oltre 15.000 abitanti
398#carica il numero di consiglieri da eleggere$groups=array();
399$PNE=_PRIMONON;
400$CSEC=_SINDCONS;
401$lists=array();
402$eletti=array();
403$num_candlst=array();
404#$quozienti = array();
405$oldlists=array();
406$oldlstgrp=array();
407$premio=0;
408/* "Ai fini della determinazione nel secondo turno, della cifra elettorale complessiva delle liste collegate deve tenersi conto anche del collegamento intervenuto in vista del ballottaggio" (Cons. St. Sez. V 4 maggio 2001 n. 2519; 20 settembre 2000 n. 4894; 19 marzo 1996 n. 290)
409 */
410
411if (!isset($_SESSION['ballo1'])) $_SESSION['ballo1']='';
412if (!isset($_SESSION['ballo2'])) $_SESSION['ballo2']='';
413$gruppoperd= ($gruppo==$_SESSION['ballo1']) ? $_SESSION['ballo2'] : $_SESSION['ballo1'];
414
415#per voti validi non si intendono i voti validi alle liste ma i voti validi espressi
416#$res_val = mysql_query("SELECT sum(validi_lista) from ".$prefix."_ele_sezioni where id_cons='$id_cons'",$dbi);
417$res_val = mysql_query("SELECT sum(voti) from ".$prefix."_ele_voti_gruppo where id_cons='$id_cons'",$dbi);
418list($validi) = mysql_fetch_row($res_val);
419
420$sbarra=($validi*$supsbarramento)/100;
421$res_per = mysql_query("SELECT t1.descrizione,t1.num_gruppo,t2.id_lista,t2.num_lista,t2.descrizione,sum(t3.voti) as voti from ".$prefix."_ele_gruppo as t1, ".$prefix."_ele_lista as t2, ".$prefix."_ele_voti_lista as t3 where t1.id_cons='$id_cons' and t1.id_gruppo=t2.id_gruppo and t2.id_lista=t3.id_lista group by t1.descrizione,t1.num_gruppo,t2.num_lista,t2.descrizione order by voti desc",$dbi);
422$groups=array();
423$premio=0;
424//10-05-2009 gestione differenziata delle norme elettorali
425#carica l'array dei gruppi e della cifra di gruppo
426while (list($descr,$num_gruppo,$id_lista,$num_lista,$descr_lista,$voti)= mysql_fetch_row($res_per)){
427 if ($listsupconta or $voti>=$sbarra){
428 if (! isset($groups[($num_gruppo)])) $groups[($num_gruppo)]=0;
429 $desgruppi[$num_gruppo]=$descr;
430 $desliste[$num_lista]=$num_lista.") ".$descr_lista;
431 $idlst[$num_lista]=$id_lista;
432 $listagruppo[$num_lista]=$num_gruppo;
433 $lists[$num_lista]=$voti;
434 $groups[($num_gruppo)]+=$voti;
435 }
436}
437###################
438 $elencog=array();
439 $sindseggiopre=array();
440 foreach($groups as $testk=>$valk) if($testk!=$gruppo) {$elencog[$testk]=$valk;}
441 $testseggio=calcoloseggi($elencog,floor($numcons*(100-$suppremio)/100),0);
442 foreach($testseggio as $testk=>$valk) if($valk) {$sindseggiopre[]=$testk;}
443#foreach ($gruppomin as $key=>$val) {if (($numcons*60/100)<$val) $nopremio=0;if($key!=$gruppo){echo "<br>gruppomin: $key -- $val";}}
444##################
445$descrsind=$desgruppi[$gruppo];
446foreach ($groups as $key=>$val){
447 #controlla se un gruppo di liste, tra quelle perdenti, ha superato il 50%
448 if ($key!=$gruppo and $val> $validi/2) $premio=2;
449 #elimina gruppi che non hanno superato lo sbarramento
450 if ($val<$sbarra){
451 foreach ($listagruppo as $lst=>$grp)
452 if ($grp==$key){
453 unset($listagruppo[$lst]);
454 unset($desliste[$lst]);
455 unset($lists[$lst]);
456 }
457 unset($groups[($key)]);
458 unset($desgruppi[($key)]);
459
460 }
461}
462
463 foreach ($collegate as $lst)
464 if (isset($lists[$lst])){
465 if($premio){
466 $oldlstgrp[$lst]=$listagruppo[$lst];
467 $oldlists[$lst]=$lists[$lst];
468 }
469 $groups[$listagruppo[$lst]]-=$lists[$lst];
470 $listagruppo[$lst]=$gruppo;
471 $groups[$gruppo]+=$lists[$lst];
472 }
473 ////maggio 2011: da qui
474
475#controlla se la percentuale del gruppo vincente e' tra il 40 e il 60% o il sindaco e' eletto al secondo turno
476#e se nessun altro gruppo ha superato il 50% assegna il premio di maggioranza
477#e se nessun altro gruppo ha superato il 50% e nessuno ha ottenuto piu' del 60% dei seggi, assegna il premio di maggioranza
478$consmin=$numcons;
479$gruppomin=calcoloseggi($groups,$consmin,0);
480$nopremio=1;
481#die("qui:".($numcons*60/100)."<$val");
482if (($groups[$gruppo]>=(($validi*$supminpremio)/100) or ! $primoturno) and $groups[$gruppo]<(($validi*$suppremio)/100) and !$premio and $nopremio) $premio=1;
483else $premio=0;
484 $consel=array();
485 $consel[]=array(_LISTA,_VOTI,_SEGGI,_CANDIDATO,_CIFRAELE,_QUOZIENTI);
486$groupsappo=$groups;
487$candidati=array();
488//maggio 2011: a qui viene spostato in modo da aggiungere i voti di lista delle collegate per il perdente solo dopo aver controllato se supera il 50%, in questo modo si evita che il collegamento tra perdenti faccia decadere il premio di maggioranza se solo insieme superano il 50%
489//maggio 2011: da qui
490if(!isset($groups[$gruppoperd])) $groups[$gruppoperd]=0;
491 foreach ($collperd as $lst)
492 if (isset($lists[$lst])){
493 $oldlstgrp[$lst]=$listagruppo[$lst];
494 $listagruppo[$lst]=$gruppoperd;
495 $oldlists[$lst]=$lists[$lst];
496 $groups[$gruppoperd]+=$lists[$lst];
497 $groups[$oldlstgrp[$lst]]-=$lists[$lst];
498 }
499
500////maggio 2011: a qui (mettendolo dopo Ú come se l'avessi tolto ma possono esserci altre implicazioni visto che si modificano le percentuali del gruppo, così per ora non lo tolgo) va tolto se non vanno sommati i voti delle liste collegate al secondo turno con quelli del gruppo che perde il ballottaggio, se non si collegano viene favorita l'elezione del candidato sindaco con cui era collegata al primo turno mentre se si collegano viene favorito il principio di aggregazione. Per ora i perdenti sono considerati con la situazione al primo turno. Implementiamo cosￜ: il 50% deve essere superato dalla minoranza nel primo turno, quindo senza somma dei voti delle liste aggiunte nel secondo turno - la suddivisione dei seggi viene fatta considerando i collegamenti al secondo turno, le liste collegate partecipano alla suddivisione dei seggi con questo gruppo quindi si confronta con le liste del gruppo in cui era al primo turno e valutando i coefficienti si stabilisce quale lista cede il seggio al candidato sindaco non acceduto al ballottaggio.
501
502if ($premio) {
503#########
504################### nell'array sindseggio vengono inseriti i candidati sindaco che restano senza seggio per gli apparentamenti
505 $elencog=array();
506 $testseggio=array();
507 $sindseggio=array();
508 foreach($groups as $testk=>$valk) if($testk!=$gruppo) {$elencog[$testk]=$valk;}
509 $testseggio=calcoloseggi($elencog,floor($numcons*(100-$suppremio)/100),0);
510 foreach($sindseggiopre as $testk=>$valk) {if(!$testseggio[$valk]) $sindseggio[$valk]=$valk;}
511###########
512 $sindaco[$gruppo]=$groups[$gruppo]; $groups[$gruppo]=0;
513 $gruppomag=calcoloseggi($sindaco,ceil($numcons*$suppremio/100),0);
514#######calcola i seggi per lista
515foreach ($gruppomag as $key=>$val){
516 foreach($listagruppo as $lst=>$grp){
517 if($grp!=$key) continue;
518 $id_lista=$idlst[$lst];
519 $x=$lst;
520 $y=$lists[$x];
521 $pos=0;
522 $z=0;
523 $arvin[$x][$pos++]=$desliste[$lst];
524 $res_can = mysql_query("SELECT concat(substring(concat('0',t1.num_cand),-2),') ',t1.cognome,' ',substring(t1.nome from 1 for 1),'.') as descr,sum(t2.voti) as voti from ".$prefix."_ele_candidati as t1, ".$prefix."_ele_voti_candidati as t2 where t1.id_lista='$id_lista' and t1.id_cand=t2.id_cand GROUP BY descr order by voti desc,num_cand",$dbi);
525 $num_candlst[$x]=mysql_num_rows($res_can);
526 while(list($cand,$pre)=mysql_fetch_row($res_can)){
527 $cifra[$x][$pos]=$y+$pre;
528 $arvin[$x][$pos++]=$cand;
529 }
530 $listemag[$x]=$y;
531 $desliste[$x]=$descr;
532 $percliste[$x]="<br/>$y (".number_format($y*100/$validi,2)."%)";
533 $z++;
534 }
535 $seggimag=array();
536 $x=0;
537#####25 maggio 2014 - il candidato sindaco non eletto ha diritto al seggio anche se di maggioranza
538### individua ultimi seggi assegnati a liste collegate
539 $listdec =array();
540 $seggitmp=calcoloseggi($listemag,$val,1);
541 foreach ($seggitmp as $keyl=>$vall){ #echo "<br>sindseggio: $key - $val";
542# foreach ($sindseggio as $key=>$val){
543 if (in_array($keyl,$collegate) and ! isset($tempo[$keyl])) $tempo[$keyl]=number_format($quozienti[$keyl][$vall-1],2);
544# echo "<br>lista:$key";
545 $res = mysql_query("SELECT id_gruppo from ".$prefix."_ele_lista where num_lista='$keyl' and id_cons='$id_cons'",$dbi);
546 list($tempig)=mysql_fetch_row($res);
547 $res = mysql_query("SELECT num_gruppo from ".$prefix."_ele_gruppo where id_gruppo='$tempig' and id_cons='$id_cons'",$dbi);
548 list($tempng)=mysql_fetch_row($res);
549 if (in_array($tempng,$sindseggio)) $listdec[]=$keyl;
550}
551
552 /* while(){
553 if(isset($tempo[$tempnl])) echo "<br> tempnl: $tempnl -- key:$key".$tempo[$key];
554 }
555*/
556##########
557 $seggimag=calcoloseggi($listemag,$val,1);
558
559 foreach ($seggimag as $key=>$val){
560 ## condizione per esclusione di un seggio da destinare al sindaco non eletto
561 if(in_array($key,$listdec)) $val--;
562 ## fine condizione - impostare variabile in db per differenziare il comportamento per consultazioni diverse
563 for ($z=0;$z<$val;$z++){
564 if ($z) $consel[]=array("","","",$arvin[$key][($z+1)],$cifra[$key][($z+1)],number_format($quozienti[$key][$z],2));
565 else
566 {
567 $consel[]=array($arvin[$key][0],$percliste[$key],$val,$arvin[$key][($z+1)],$cifra[$key][($z+1)],number_format($quozienti[$key][$z],2));
568 $arlisdesv[]=$arvin[$key][0];$arlissegv[]=$val;$arlisnumv[]=$key;
569 }
570 }
571 $x++;
572 if($val)
573 $consel[]=array($arvin[$key][0],"$PNE","",$arvin[$key][($z+1)],$cifra[$key][($z+1)],number_format($quozienti[$key][$z],2));
574 }
575}
576}
577if ($premio) $consmin=floor($numcons*(100-$suppremio)/100);
578else $consmin=$numcons;
579
580#####calcolo per la minoranza o in caso non ci sia premio di maggioranza
581$gruppomin=calcoloseggi($groups,$consmin,0);
582$ordinati[$gruppo]=$gruppomin[$gruppo];
583foreach ($gruppomin as $key=>$val){
584 if($key!=$gruppo) $ordinati[$key]=$val;
585}
586$gruppomin=$ordinati;
587foreach ($gruppomin as $key=>$val){
588 if($premio and $key==$gruppo) continue;
589 $listemin=array();
590 $cifra=array();
591 foreach($listagruppo as $lst=>$grp){
592 if($grp!=$key) continue;
593
594 $id_lista=$idlst[$lst];
595 $x=$lst;
596 $y=$lists[$x];
597 $pos=0;
598 $z=0;
599 $pos=0;$z=0;
600 if(!$premio and $key==$gruppo) $arvin[$x][$pos++]=$desliste[$lst];
601 else $arper[$x][$pos++]=$desliste[$lst];
602 $res_can = mysql_query("SELECT concat(substring(concat('0',t1.num_cand),-2),') ',t1.cognome,' ',substring(t1.nome from 1 for 1),'.') as descr,sum(t2.voti) as voti from ".$prefix."_ele_candidati as t1, ".$prefix."_ele_voti_candidati as t2 where t1.id_lista='$id_lista' and t1.id_cand=t2.id_cand GROUP BY descr order by voti desc,num_cand",$dbi);
603 $num_candlst[$x]=mysql_num_rows($res_can);
604 while(list($cand,$pre)=mysql_fetch_row($res_can)) {
605 $cifra[$x][$pos]=$y+$pre;
606 if(!$premio and $key==$gruppo)
607 $arvin[$x][$pos++]=$cand;
608 else
609 $arper[$x][$pos++]=$cand;
610 }
611 $listemin[$x]=$y;
612 $desliste[$x]=$descr;
613 $percliste[$x]="<br/>$y (".number_format($y*100/$validi,2)."%)";
614 }
615 $seggimin=array();
616 echo "$mex";
617 $ultimo='';
618
619 $seggimin=calcoloseggi($listemin,$val,1);
620 echo "$mex";#foreach ($seggimin as $lista=>$valc) echo $seggimin[$lista]." key:$lista -val:$valc<br/>";
621 if(!$premio and $key==$gruppo)
622 foreach ($seggimin as $lista=>$valc){
623 $arper[$lista]=$arvin[$lista];
624}
625/* for ($z=0;$z<$valc;$z++){
626 if ($z) $consel[]=array("","","",$arvin[$lista][($z+1)],$cifra[$lista][($z+1)],$quozienti[$lista][$z]);
627 else $consel[]=array($arvin[$lista][0],$percliste[$lista],$valc,$arvin[$lista][($z+1)],$cifra[$lista][($z+1)],$quozienti[$lista][$z]);
628 }
629 }
630 $consel[]=array($arvin[$lista][0],"$PNE","",$arvin[$lista][($z+1)],$cifra[$lista][($z+1)],$quozienti[$lista][$z]);
631 }//else{
632*/
633
634 if ($val and $key!=$gruppo and $consin) {$conselsin[]=array("$CSEC",$desgruppi[$key]); $arcansin[]=$desgruppi[$key];}
635foreach ($seggimin as $lista=>$val)
636 if(isset($oldlstgrp[$lista]) and !isset($oldseggi[$lista])) {$oldseggi[$lista]=$val;
637}
638 if($val==0){
639 if($ultimo==''){
640 foreach($oldlists as $lst=>$vot)
641 {
642if (!isset($quozienti[$lst][($val)])) $quozienti[$lst][($val)]=$vot;
643 if ($oldlstgrp[$lst]!= $key or !isset($oldseggi[$lst]) or $oldseggi[$lst]==0) continue;
644 if($ultimo=='') $ultimo=$lst;
645 if($quozienti[$ultimo][($val)]==$last[$lst])
646 {
647 if($lists[$ultimo]==$lists[$lst]) $mex="Per attribuire l'ultimo seggio ￜ necessario un sorteggio tra la lista n. $ultimo e la lista n. $lst";
648 elseif($lists[$ultimo]>$lists[$lst]) {$ultimo=$lst;$mex="";}
649 }
650 if ($quozienti[$ultimo][($val)]> $last[$lst]) {$ultimo=$lst;$mex="";}
651 }$lst=$ultimo;
652 if($ultimo and $consin){
653# if($conselb[$ttl[($lst-1)]][2]>1) $conselb[$ttl[($lst-1)]][2]--;else $conselb[$ttl[($lst-1)]][2]='';
654# $daunset[]=$tt[($lst-1)];
655 if($conselb[$ttl[($lst)]][2]>1) $conselb[$ttl[($lst)]][2]--;else $conselb[$ttl[($lst)]][2]='';
656 $daunset[]=$tt[($lst)];
657 $conselsin[]=array("$CSEC",$desgruppi[$key]);
658 $arcansin[]=$desgruppi[$key];
659 }
660 }
661 }
662#if($key!=$gruppo){
663###############
664#foreach($collegate
665 foreach ($seggimin as $lista=>$val){
666 if($ultimo==$lista and $key!=$gruppo and $consin) $val--;
667 }
668################
669 foreach ($seggimin as $lista=>$val){
670 if($ultimo==$lista and $key!=$gruppo and $consin) $val--;
671
672
673 for ($z=0;$z<$val;$z++){
674 if ($z) $conselb[]=array("","","",$arper[$lista][($z+1)],$cifra[$lista][($z+1)],number_format($quozienti[$lista][$z],2));
675 else{
676 if(!isset($arper[$lista][($z+1)])) $arper[$lista][($z+1)]=0;
677 if(!isset($cifra[$lista][($z+1)])) $cifra[$lista][($z+1)]=0;
678 $conselb[]=array($arper[$lista][0],$percliste[$lista],$val,$arper[$lista][($z+1)],$cifra[$lista][($z+1)],number_format($quozienti[$lista][$z],2));
679 $ttl[$lista]=(count($conselb)-1);
680########
681# echo "<br>".$tt[$lista]." arper --- $gruppo --$ultimo--$key--".$arper[$lista][0];
682 }
683 }
684 if (isset($oldlists[$lista]))
685 {
686 $tt[$lista]=(count($conselb)-1);
687 if($z) $last[$lista]=$quozienti[$lista][($z-1)]; else $last[$lista]=0;
688
689 }
690 if($val){
691 if(!isset($arper[$lista][($z+1)])) $arper[$lista][($z+1)]=0;
692 if(!isset($cifra[$lista][($z+1)])) $cifra[$lista][($z+1)]=0;
693 if(!isset($quozienti[$lista][$z])) $quozienti[$lista][$z]=0;
694 $conselb[]=array($arper[$lista][0],"$PNE","",$arper[$lista][($z+1)],$cifra[$lista][($z+1)],number_format($quozienti[$lista][$z],2));
695 }
696 }
697# }//chiude if $key
698 }//chiude foreach gruppomin
699# }
700 echo "<table summary=\"Tabella dei consiglieri eletti\" class=\"table-docs\" cellspacing=\"0\" cellpadding=\"2\" border=\"1\" rules=\"all\">";
701 echo "<tr class=\"bggray\"><td scope=\"row\"><b>";
702 echo _SINDACO.": ".$desgruppi[$gruppo]."</b></td></tr></table>";
703 if(isset($daunset)){
704 if ((sort($daunset,SORT_NUMERIC))==false) echo "Errore di programma!";
705 ELSE {
706 $tmpda=array_reverse($daunset);
707 foreach($tmpda as $key=>$val) {
708 $conselb[$val][0]=$conselb[($val+1)][0];$conselb[$val][1]=$conselb[($val+1)][1];
709 unset($conselb[($val+1)]);
710 }
711 }
712 }#foreach($conselb as $key=>$val) if($val[2]) echo "$x) ".$val[0]."--".$val[2]."<br/>"; else echo "passa".$x++;
713 if (!$premio)
714 {
715 foreach($conselb as $key=>$val)
716 {
717 if ($val[2]){
718 $nlst=intval($val[0]);
719 $arlisdesv[]=$val[0];
720 $arlissegv[]=$val[2];
721 }
722 if($listagruppo[$nlst]!=$gruppo) continue;
723 $consel[]=array($val[0],$val[1],$val[2],$val[3],$val[4],$val[5]);
724 }
725 }
726#### condizione di aggiunta candidato sindaco non eletto in elenco consiglieri
727 foreach($sindseggio as $key=>$val) if ($consin) {$conselsin[]=array("$CSEC",$desgruppi[$key]); $arcansin[]=$desgruppi[$key];}
728####
729
730
731 if (isset($conselsin)) foreach($conselsin as $key=>$val)
732 {
733 $consel[]=array($val[0],$val[1]);
734 }
735 foreach($conselb as $key=>$val)
736 {
737 if ($val[2]){
738 $nlst=intval($val[0]);
739 $arlisdesp[]=$val[0];
740 $arlissegp[]=$val[2];
741 }
742 if($listagruppo[$nlst]==$gruppo) continue;
743 $consel[]=array($val[0],$val[1],$val[2],$val[3],$val[4],$val[5]);
744 }
745
746// plotgraf($descrsind,$arlisdesv,$arlissegv,$arlisdesp,$arlissegp,$arcansin); // per grafico
747 stampalista($consel);
748 unset($_SESSION['ballo1']);unset($_SESSION['ballo2']);unset($_SESSION['grp1']);unset($_SESSION['grp2']);
749}
750// Grafico
751function plotgraf($descrsind,$arlisdes,$arlisseg,$arlisdesp,$arlissegp,$arcansin){
752 //echo "sindaco: $descrsind<br/>";
753/* foreach($arlisdes as $key=>$val){
754 echo "key:$key -- val:$val seggi:".$arlisseg[$key]."<br/>";
755 }
756 echo "<br/><br/>";
757 foreach($arlisdesp as $key=>$val){
758 echo "key:$key -- val:$val seggi:".$arlissegp[$key]."<br/>";
759 } */
760 foreach($arlisdes as $key=>$val){
761 if($arlisseg[$key]=='1') $vocale="o"; else $vocale='';
762
763 $lista[]="$val \n [ ".$arlisseg[$key]." seggi".$vocale." ]";
764 $seggin[]=$arlisseg[$key]." seggi".$vocale."";
765 //echo "La lista $val ottiene ".$arlisseg[$key]." seggi.<br/>";
766 }
767 foreach($arcansin as $val) {
768 $seggin[]="1 seggio";
769 $arlisseg[]=1;
770 $lista[]=$val ."\n [ 1 seggio ]" ;
771 //echo "Il candidato sindaco $val e' eletto consigliere.<br/>";
772}
773$sindaco=urlencode($descrsind);
774
775$seggi=serialize($arlisseg);
776$seggi=urlencode($seggi);
777$seggin=serialize($seggin);
778$seggin=urlencode($seggin);
779$lista=serialize($lista);
780$lista=urlencode($lista);
781$title="Proiezione Composizione Consiglio Comunale";
782echo "<table><tr><td>
783 <img src='modules/Elezioni/grafici/consiglio.php?title=$title&amp;seggi=$seggi&amp;seggin=$seggin&amp;lista=$lista&amp;sindaco=$sindaco' alt=\"Grafico\" /></td></tr></table>";
784
785
786
787}
788?>
Note: See TracBrowser for help on using the repository browser.