Changeset 157 for www/finance/tarify.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/tarify.php

    r152 r157  
    11<?php
    22include_once('../global.php');
    3 include_once('include.php');
    43
    54class FinanceTarrifsPage extends Page
     
    109  function TariffTable()
    1110  {
    12     global $Tarify, $Internet, $InternetUsers, $RealMaxSpeed, $SpeedReserve, $MaxSpeed;
    13 
    14     $Output = 'Poplatek za společný internet: <strong>'.$Internet.' Kč</strong><br />';
    15     $Output .= 'Rychlost společné linky: <strong>'.$RealMaxSpeed.' kbit/s</strong><br />';
    16     $Output .= 'Rezerva (nevyužitá kapacita pro zlepšení odezvy sítě): <strong>'.$SpeedReserve.' kbit/s</strong><br />';
    17     $Output .= 'Maximální dostupná kapacita pro použití: <strong>'.$MaxSpeed.' kbit/s</strong><br />';
     11    $Finance = &$this->System->Modules['Finance'];
     12       
     13    $Output = 'Poplatek za společný internet: <strong>'.$Finance->Internet.' Kč</strong><br />';
     14    $Output .= 'Rychlost společné linky: <strong>'.$Finance->RealMaxSpeed.' kbit/s</strong><br />';
     15    $Output .= 'Rezerva (nevyužitá kapacita pro zlepšení odezvy sítě): <strong>'.$Finance->SpeedReserve.' kbit/s</strong><br />';
     16    $Output .= 'Maximální dostupná kapacita pro použití: <strong>'.$Finance->MaxSpeed.' kbit/s</strong><br />';
    1817    $Output .= '<br />';
    1918
     
    2221    $TotalPrice = 0;
    2322    $TotalUnits = 0;
    24     foreach($Tarify as $Index => $Tarif)
     23    foreach($Finance->Tarify as $Index => $Tarif)
    2524    {
    2625      $Output .= '<tr><td style="color: blue;">'.$Tarif['name'].'</td><td align="center">'.round($Tarif['min_speed'] / 1024).'</td><td align="center" style="color: blue;">'.round($Tarif['max_speed'] / 1024).'</td><td align="center">'.$Tarif['aggregation'].'</td><td align="center">'.$Tarif['price_units'].'</td><td align="center">'.$Tarif['user_count'].'</td><td align="center">'.
     
    2928      $TotalUnits = $TotalUnits + $Tarif['total_units'];
    3029    }
    31     $Output .= '<tr><td>Součty</td><td colspan="4">&nbsp;</td><td align="center">'.$InternetUsers.'</td><td align="center">'.$TotalUnits.'</td><td>&nbsp;</td><td align="center">'.$TotalPrice.'</td></tr>';
     30    $Output .= '<tr><td>Součty</td><td colspan="4">&nbsp;</td><td align="center">'.$Finance->InternetUsers.'</td><td align="center">'.$TotalUnits.'</td><td>&nbsp;</td><td align="center">'.$TotalPrice.'</td></tr>';
    3231    $Output .= '</table>';
    3332    return($Output);
     
    3635  function Show()
    3736  {
    38     global $Tarify, $Internet, $InternetUsers, $RealMaxSpeed, $SpeedReserve, $MaxSpeed;
    39     $Output = 'Počet členů s internetovým připojením: <strong>'.$InternetUsers.'</strong><br /><br />';
     37        $Finance = &$this->System->Modules['Finance'];
     38    $Output = 'Počet členů s internetovým připojením: <strong>'.$Finance->InternetUsers.'</strong><br /><br />';
    4039    $Output .= '<table><tr><td valign="top">';
    4140
    42     NactiMesicniParametry(0);
     41    $Finance->LoadMonthParameters(0);
    4342    $Output .= '<strong>Stav pro aktuální měsíc:</strong><br />';
    4443    $Output .= $this->TariffTable();
     
    4645    $Output .= '<br /></td></tr><tr><td valign="top">';
    4746
    48     NactiMesicniParametry(1);
     47    $Finance->LoadMonthParameters(1);
    4948    $Output .= '<strong>Stav pro další měsíc:</strong><br />';
    5049    $Output .= $this->TariffTable();
Note: See TracChangeset for help on using the changeset viewer.