Changeset 50 for www/finance/index.php

Timestamp:

Feb 24, 2008, 2:07:52 PM (17 years ago)

Author:

george

Message:

Změněno: Odebrán proměnný podíl na zařízení sítě.
Změněno: Ceny tarifů změněny na pevné.
Změněno: Měsíční přehled nákladů a výnosů sítě.
Odebráno: Účtování spotřeby.
Upraveno: Systém zobrazení navigačního řádku.

File:

• www/finance/index.php (modified) (4 diffs)

www/finance/index.php

@@ -4 +4 @@
 
 ShowHeader('Financování sítě','Finance');
+
+echo('<table><tr><td valign="top">');
 
 echo('<table><tr><td width="30%"><a href="zarizeni.php">Výpis zařízení</a><br>
@@ -31 +33 @@
 */
 
-echo('</td></tr></table>');    
+echo('</td></tr></table><br>');    
 
-echo('<br><strong>Souhrn:</strong><br>');
+echo('<strong>Souhrn:</strong><br>');
 
 $DbResult = $Database->query("SELECT * FROM finance_monthly_overall ORDER BY date DESC LIMIT 0,1");
@@ -39 +41 @@
 echo('Aktuální měsíční poplatek za společný internet ('.$RealMaxSpeed.'/'.$RealMaxSpeed.' kbit/s): <strong>'.$Internet.' Kč</strong><br>');
 
-$DbResult = $Database->query("SELECT COUNT(*) FROM users WHERE role=0");
+$DbResult = $Database->query("SELECT COUNT(*) FROM users WHERE role=2");
 $Row2 = $DbResult->fetch_array();
 echo('Počet členů (s internetem): <strong>'.$Row2[0].' ('.$InternetUsers.')</strong><br>');
@@ -54 +56 @@
 echo('Celkem peněz na účtech: <strong>'.$Row4[0].' Kč</strong><br>');
 echo('Stanovená cena jedné kWh: <strong>'.$kWh.' Kč</strong><br>');
-echo('Komunitou stanovený poplatek za správu sítě pro jednoho uživatele: <strong>'.$Sprava.' Kč</strong><br>');
-$DbResult = $Database->query("SELECT SUM(family) FROM users WHERE role=0");
+//echo('Komunitou stanovený poplatek za správu sítě pro jednoho uživatele: <strong>'.$Sprava.' Kč</strong><br>');
+$DbResult = $Database->query("SELECT SUM(family) FROM users WHERE role=2");
 $Row5 = $DbResult->fetch_array();
 $TotalFamily = 600;
-echo('V připojených domácnostech celkem <strong>'.$Row5[0].'</strong> občanů ze všech <strong>'.$TotalFamily.'</strong> ('.round($Row5[0]/$TotalFamily*100).' %)<br>');
+echo('V připojených domácnostech celkem <strong>'.$Row5[0].'</strong> občanů ze všech <strong>'.$TotalFamily.'</strong> ('.round($Row5[0] / $TotalFamily * 100).' %)<br>');
 echo('Provizorní bankovní účet kam lze posílát peníze: <strong>86-7755240207/0100</strong><br>');
 
-echo('<br>Měsíční platba:<br><table border="1" cellspacing="0" cellpadding="3"><tr><th>Název položky</th><th>Cena [Kč]</th></tr>');
-echo('<tr><td>Internet</td><td align="right">'.$Internet.'</td></tr>');
-$Celkem = $Internet;
-echo('<tr><td>Správa sítě</td><td align="right">'.$Sprava * $SpravaUsers.'</td></tr>');
-$Celkem += $Sprava * $SpravaUsers;
+echo('</td><td valign="top">');
+
+$UsersPayment = $TotalInternetPaid;
+$NetworkManagement = $Sprava * $SpravaUsers;
+$TotalGain = 0;
+$TotalExpense = 0;
 $DbResult = $Database->query("SELECT SUM(consumption) FROM network_devices WHERE used=1");
-$Spotreba = $DbResult->fetch_array();
-echo('<tr><td>Spotřeba energie</td><td align="right">'.round($Spotreba[0]*0.72*$kWh).'</td></tr>');
-$Celkem += round($Spotreba[0]*0.72*$kWh);
-echo('<tr><td><strong>Celkem</strong></td><td align="right"><strong>'.$Celkem.'</strong></td></tr>');
+$Row = $DbResult->fetch_array();
+$TotalConsumption = W2Kc($Row[0]);
+//$Users
+
+echo('Měsíční vyúčtování:<br>
+<table border="1" cellspacing="0" cellpadding="3">
+<tr><th>Položka</th><th>Cena [Kč]</th></tr>
+<tr><th colspan="2">Příjmy</th></tr>');
+echo('<tr><td>Poplatky účastníků za internet</td><td align="right">'.$UsersPayment.'</td></tr>');
+$TotalGain += $UsersPayment;
+echo('<tr><td><strong>Celkem</strong></td><td align="right"><strong>'.$TotalGain.'</strong></td></tr>');
+echo('<tr><th colspan="2">Výdaje</th></tr>
+<tr><td>Internet</td><td align="right">'.$Internet.'</td></tr>');
+$TotalExpense += $Internet;
+echo('<tr><td>Správa sítě</td><td align="right">'.$NetworkManagement.'</td></tr>');
+$TotalExpense += $NetworkManagement;
+echo('<tr><td>Spotřeba energie</td><td align="right">'.$TotalConsumption.'</td></tr>');
+$TotalExpense += $TotalConsumption;
+echo('<tr><td><strong>Celkem</strong></td><td align="right"><strong>'.$TotalExpense.'</strong></td></tr>');
+echo('<tr><td colspan="2">&nbsp;</td></tr>');
+echo('<tr><td><strong>Rozdíl</strong></td><td align="right"><strong>'.($TotalGain - $TotalExpense).'</strong></td></tr>');
+echo('<tr><td>Převod do dalšího měsíce</td><td align="right">'.($TotalGain - $TotalExpense).'</td></tr>');
 echo('</table><br>');
+$DbResult = $Database->select('users', 'cash', 'id='.$UserIdNetwork);
+$Row = $DbResult->fetch_array();
+$NetworkCash = $Row['cash'];
+echo('Stav účtu sítě: '.$NetworkCash.' Kč<br><a href="clenove.php?show=user&id='.$UserIdNetwork.'">Výpis účtu</a><br>');
 
-echo('Celková měsíční suma je rozpočítána podílově na jednotlivé uživatele. Poplatek je odečten z účtu vždy první den v měsíci. Peníze noste nejlépe předem.<br><br>');
+echo('<td></tr></table>');
+
+/*
+echo('Poplatek je odečten z účtu vždy první den v měsíci. Peníze noste nejlépe předem.<br><br>');
 echo('<strong>Jak se rozpočítávají finance</strong><br>Internet i zařízení sítě se platí za domácnost. Systém výpočtu vychází z topologie sítě. Síť má stromovou topologii přičemž listy stromu jsou jednotliví uživatelé a kořen stromu je linka do internetu. Dosavadní systém je uzpůsoben tak, aby linky, které jsou nejvíce zatíženy, byly nejlépe zaplaceny a mohlo na nich tak být dražší a výkonější zařízení. Nejvytíženější linky se nazývají páteřní. Proto platí každý uživatel podílově zařízení, které vede od něj až ke kořenu stromu, což je v našem případě server Centrála s trvalým internetovým připojením. Pro jednoduchost je síť rozdělena na segmenty. Segment je část sítě, kterou využívá konstantní počet uživatelů. Každý segment je tvořen skupinou zařízení a má svoji celkovou cenu. Každý uživatel je přirozeně napojen na některý ze segmentů. Podíl klienta na zařízení sítě je vypočten jako součet podílů na jednotlivých segmentech směrem ke kořenu. Podíl na segmentu znamená celková cena segmentu podělená počtem uživatelů využívajících daný segment.<br>');
+*/
 ShowFooter();
 ?>