Changeset 157 for www/finance/index.php


Ignore:
Timestamp:
Feb 18, 2009, 11:19:12 AM (15 years ago)
Author:
george
Message:
  • Upraveno: Soubor include.php ve financích přepracován na třídy ve finance.php.
File:
1 edited

Legend:

Unmodified
Added
Removed
  • www/finance/index.php

    r156 r157  
    11<?php
    22include_once('../global.php');
    3 include_once('include.php');
    43
    54class FinanceOverview extends Page
     
    109  function Show()
    1110  {
    12     global $Config, $RealMaxSpeed, $Internet, $InternetUsers, $kWh, $TotalInternetPaid, $SpravaUsers, $Sprava, $UserIdNetwork;
    13 
    14     $Output = '<table><tr><td valign="top">';
     11    $Finance = $this->System->Modules['Finance'];
     12        $Output = '<table><tr><td valign="top">';
    1513
    1614    if(GetMemberByIP(GetRemoteAddress()) > 0) $Output .= '<a href="user_state_ip.php">Vaše finanční operace</a> (Tato volba je také přístupná po přihlášení do systému v uživatelském menu).<br /><br /><br />';
     
    2119    if($this->System->Modules['User']->CheckPermission('Finance', 'SubjectList')) $Output .= '<a href="clenove.php">Seznam členů</a><br />';
    2220    $Output .= '<a href="spotreba.php">Spotřeba energie</a><br />';
    23     $Output .= '<a href="'.$Config['Web']['RootFolder'].'/aktuality/index.php?category=9">Investice v síti</a><br />';
     21    $Output .= '<a href="'.$this->System->Config['Web']['RootFolder'].'/aktuality/index.php?category=9">Investice v síti</a><br />';
    2422    //$Output .= '<a href="faktury/">Faktury za internet</a><br />';
    2523    //$Output .= '<a href="inventory.php">Výpis skladových zásob</a><br />';
     
    2927    $DbResult = $this->Database->query("SELECT * FROM finance_monthly_overall ORDER BY date DESC LIMIT 0,1");
    3028    $Row = $DbResult->fetch_array();
    31     $Output .= 'Platba za internetovou linku ('.$RealMaxSpeed.'/'.$RealMaxSpeed.' kbit/s): <strong>'.$Internet.' Kč</strong><br />';
     29    $Output .= 'Platba za internetovou linku ('.$Finance->RealMaxSpeed.'/'.$Finance->RealMaxSpeed.' kbit/s): <strong>'.$Finance->Internet.' Kč</strong><br />';
    3230
    3331    $DbResult = $this->Database->query("SELECT COUNT(*) FROM users WHERE role=2");
     
    4240    $Row4 = $DbResult->fetch_array();
    4341    $Output .= 'Celkem peněz na účtech: <strong>'.$Row4[0].' Kč</strong><br />';
    44     $Output .= 'Stanovená cena jedné kWh: <strong>'.$kWh.' Kč</strong><br />';
     42    $Output .= 'Stanovená cena jedné kWh: <strong>'.$Finance->kWh.' Kč</strong><br />';
    4543    //echo('Komunitou stanovený poplatek za správu sítě pro jednoho uživatele: <strong>'.$Sprava.' Kč</strong><br />');
    4644    $DbResult = $this->Database->query("SELECT SUM(family) FROM users WHERE role=2");
     
    5553    $Output .= '</td><td valign="top">';
    5654
    57     $UsersPayment = $TotalInternetPaid;
    58     $NetworkManagement = $Sprava * $SpravaUsers;
     55    $UsersPayment = $Finance->TotalInternetPaid;
     56    $NetworkManagement = $Finance->Sprava * $Finance->SpravaUsers;
    5957    $TotalGain = 0;
    6058    $TotalExpense = 0;
    6159    $DbResult = $this->Database->query("SELECT SUM(consumption) FROM network_devices WHERE used=1");
    6260    $Row = $DbResult->fetch_array();
    63     $TotalConsumption = W2Kc($Row[0]);
     61    $TotalConsumption = $this->System->Modules['Finance']->W2Kc($Row[0]);
    6462
    6563    $Output .= 'Měsíční vyúčtování:<br />
     
    7068    $TotalGain += $UsersPayment;
    7169    $Output .= '<tr><td><strong>Celkem</strong></td><td align="right"><strong>'.$TotalGain.'</strong></td></tr>';
    72     $Output .= '<tr><th colspan="2">Výdaje</th></tr><tr><td>Internet</td><td align="right">'.$Internet.'</td></tr>';
    73     $TotalExpense += $Internet;
     70    $Output .= '<tr><th colspan="2">Výdaje</th></tr><tr><td>Internet</td><td align="right">'.$Finance->Internet.'</td></tr>';
     71    $TotalExpense += $Finance->Internet;
    7472    $Output .= '<tr><td>Správa sítě</td><td align="right">'.$NetworkManagement.'</td></tr>';
    7573    $TotalExpense += $NetworkManagement;
     
    8179    $Output .= '<tr><td>Převod do dalšího měsíce</td><td align="right">'.($TotalGain - $TotalExpense).'</td></tr>';
    8280    $Output .= '</table><br />';
    83     $DbResult = $this->Database->select('users', 'cash', 'id='.$UserIdNetwork);
     81    $DbResult = $this->Database->select('users', 'cash', 'id='.$Finance->UserIdNetwork);
    8482    $Row = $DbResult->fetch_array();
    8583    $NetworkCash = $Row['cash'];
    86     $Output .= 'Stav účtu sítě: '.$NetworkCash.' Kč<br /><a href="clenove.php?show=user&amp;id='.$UserIdNetwork.'">Výpis účtu</a><br />';
     84    $Output .= 'Stav účtu sítě: '.$NetworkCash.' Kč<br /><a href="clenove.php?show=user&amp;id='.$Finance->UserIdNetwork.'">Výpis účtu</a><br />';
    8785
    8886    $Output .= '</td></tr></table>';
Note: See TracChangeset for help on using the changeset viewer.