source: www/web/finance/clenove.php@ 1

<?

$DirectoryList = array('Seznam èlenù', 'Seznam èlenù sítì',
);

function Finance_Clenove_Show()
{
  global $PathRemain, $Internet, $InternetUsers, $kWh, $Sprava, $SpravaUsers, $PathRemain, $InternetSegmentId;

  if(count($PathRemain) > 0)
  {
    $UserId = addslashes($PathRemain[0]);
    DB_Query("SELECT * FROM users WHERE id=".$UserId);
    $Row2 = DB_Row();
    $Result = '<table width="100%" border="0" cellspacing="0" cellpadding="3"><tr><td valign="top">';
  
    // Tabulka operaci
    $Result .= 'Výpis operací pro èlena '.$Row2['fullname'].':<br>';
    $Result .= '<table style="font-size: smaller;" border="1" cellspacing="0" cellpadding="3"><tr><th>Datum</th><th>Zmìna</th><th>Komentáø</th></tr>';
    DB_Query("SELECT * FROM finance_operations WHERE user=".$UserId.' ORDER BY date DESC');
    while($Row = DB_Row())
    {
      if($Row['money']>0) $Row['money'] = '+'.$Row['money'];
      $Result .= '<tr><td align="right">'.HumanDate($Row['date']).'</td><td>'.$Row['money'].'</td><td>'.$Row['comment'].'&nbsp;</td></tr>';
    }
    $Result .= '<tr><td>&nbsp;</td><td>-'.$Row2['network_device'].'</td><td>Promìnná cena za zaøízení</td></tr></table>';
    $Result .= '<h3><strong>Stav úètu: </strong>'.$Row2['cash'].' Kè</h3><br>';
    $Result .= '</td><td valign="top">';

    // Mìsíèní bilance
    if($Row2['inet'] == 1) $InternetPrice = round($Internet/$InternetUsers); else $InternetPrice = 0;
    if($Row2['overheads'] == 0) 
    {
      $PoplatekSprava = 0;
      $PoplatekSpotreba = 0;
      $PrijemSpotreba = $Row2['plus'];
    } else {
      $PoplatekSprava = $Sprava;
      $PoplatekSpotreba = $Row2['consumption'];
      $PrijemSpotreba = $Row2['plus'];
    }
    $Result .= 'Rozpis mìsíèního poplatku:<br><table border="1" cellspacing="0" cellpadding="3">'.
    '<tr><th>Èást</th><th>Cena [Kè]</th></tr>'.
    '<tr><td>Internet</td><td>'.$InternetPrice.'</td></tr>'.
    '<tr><td>Správa</td><td>'.$PoplatekSprava.'</td></tr>'.
    '<tr><td>Poplatek za spotøebu</td><td>'.$PoplatekSpotreba.'</td></tr>'.
    '<tr><td>Pøíjem za spotøebu</td><td>'.(-1*$PrijemSpotreba)  .'</td></tr>'.
    '<tr><td><strong>Celkem</strong></td><td><strong>'.($InternetPrice + $PoplatekSprava + $PoplatekSpotreba - $PrijemSpotreba).'</strong></td></tr></table><br>';
    
    // Rozpis ceny za zaøízení
    $Result .= 'Výpis podílu na zaøízení segmentù:';
    $Result .= '<table border="1" cellspacing="0" cellpadding="3"><tr><th>Název segmentu</th><th>Cena [Kè]</th><th>U¾ivatelù</th><th>Podíl [Kè]</th></tr>';
    $ID = $Row2['network_segment'];
    $Money = 0;
    while($ID>0)
    {
      DB_Query("SELECT * FROM network_segments WHERE id=".$ID);
      $Row = DB_Row();
      if(!(($Row2['inet_hw'] == 0) and ($ID == $InternetSegmentId)))
      {     
        $Money += $Row['price']/$Row['users'];
        $Result .= '<tr><td>'.$Row['name'].'</td><td>'.$Row['price'].'</td><td>'.$Row['users'].'&nbsp;</td><td>'.round($Row['price']/$Row['users']).'</td></tr>';
      }
      $ID = $Row['parent'];
    }
    $Result .= '<tr><td><strong>Celkem</strong></td><td>&nbsp;</td><td>&nbsp;</td><td><strong>'.round($Money).'</strong></td></tr>';
    $Result .= '</table><br>';

    // Rozpis platba spotøeby segmentù
    $Result .= 'Výpis podílu na spotøebì segmentù:';
    $Result .= '<table border="1" cellspacing="0" cellpadding="3"><tr><th>Název segmentu</th><th>Cena [Kè]</th><th>U¾ivatelù</th><th>Podíl [Kè]</th></tr>';
    $ID = $Row2['network_segment'];
    $Money = 0;
    while($ID>0)
    {
      DB_Query("SELECT * FROM network_segments WHERE id=".$ID);
      $Row = DB_Row();
      $Money += round(W2Kc($Row['consumption'])/$Row['users_overheads']);
      $Result .= '<tr><td>'.$Row['name'].'</td><td>'.W2Kc($Row['consumption']).'</td><td>'.$Row['users_overheads'].'&nbsp;</td><td>'.round(W2Kc($Row['consumption'])/$Row['users_overheads']).'</td></tr>';
      $ID = $Row['parent'];
    }
    $Result .= '<tr><td><strong>Celkem</strong></td><td>&nbsp;</td><td>&nbsp;</td><td><strong>'.round($Money).'</strong></td></tr>';
    $Result .= '</table><br>';
    
    $Result .= 'Mìsíèní pøíjem za spotøebu zaøízení umístìných u u¾ivatele:<br>';
    $Result .= '<table border="1" cellspacing="0" cellpadding="3"><tr><th>Název zaøízení</th><th>Spotøeba [W]</th><th>Pøíjem [Kè]</th></tr>';
    DB_Query("SELECT * FROM network_devices WHERE user=".$UserId." AND used=1");
    $TotalW = 0;
    $TotalPrice = 0;
    while($Row = DB_Row())
    {
      $Result .= '<tr><td>'.$Row['name'].'</td><td>'.$Row['consumption'].'</td><td>'.W2Kc($Row['consumption']).'</td></tr>';
      $TotalW += $Row['consumption'];
      $TotalPrice += W2Kc($Row['consumption']);
    }
    $Result .= '<tr><td><strong>Celkem</strong></td><td><strong>'.$TotalW.'</strong></td><td><strong>'.$TotalPrice.'</strong></td></tr>';
    $Result .= '</table>';

    $Result .= '</td></tr></table>';
  } else {
    // Seznam èlenù
    $Result = 'Seznam èlenù:<br>'.
    '<table style="font-size: smaller;" border="1" cellspacing="0" cellpadding="3">'.
    '<tr><th>Jméno</th><th>Cena za zaøízení [Kè]</th><th>Mìsíèní poplatek [Kè]</th><th>Stav úètu [Kè]</th><th>Poznámky</th></tr>';
    $TotalDevice = 0;
    $TotalMonth = 0;
    $TotalCash = 0;
    DB_Query("SELECT * FROM users WHERE role=0 ORDER BY fullname");
    while($Row = DB_Row())
    {
      $Monthly = $Row['monthly'] - $Row['plus'];
      if($Row['hw'] == 0) $Monthly = '(trvale nepøipojen) '.(-$Row['plus']);
      else {     
        if($Row['overheads'] == 0) $Monthly = '(doèasnì nepøipojen) '.$Monthly;
        else {
          if($Row['inet'] == 0) $Monthly = '(bez internetu) '.$Monthly;
          else $Monthly = $Monthly;
        }
      } 
      $TotalCash += $Row['cash'];
      if($Row['cash']<0) $Row['cash'] = '<span style="color: red;">'.$Row['cash'].'</span>';
      $Result .= '<tr><td><a href="'.$Row['id'].'/">'.$Row['fullname'].'</a></td><td align="right">'.$Row['network_device'].'</td><td align="right">'.$Monthly.'</td><td align="right">'.$Row['cash'].'</td><td>'.$Row['notice'].'&nbsp;</td></tr>';
      $TotalDevice += $Row['network_device'];
      $TotalMonth += ($Row['monthly']-$Row['plus']);
    }
    $Result .= '<tr><td><strong>Celkem</strong></td><td align="right"><strong>'.$TotalDevice.'</strong></td><td align="right"><strong>'.$TotalMonth.'</strong></td><td align="right"><strong>'.$TotalCash.'</strong></td><td align="right">&nbsp;</td></tr>';
    $Result .= '</table>';
  }
  return($Result);
}

?>