'; if(!@$show) $show="all"; if(!@$order) $order="prijmeni"; if(!@$platba) $platba="vsechno"; if(!@$pokladna) $pokladna="vsechno"; if(!@$rok) $rok="vsechno"; # default trideni if($platba=="vsechno") { $condition = ""; } else { $condition = "AND f.platba=$platba"; } if($pokladna=="vsechno") { $condition .= ""; } else { $condition .= " AND f.pokladna=$pokladna"; } if($rok=="vsechno") { $condition .= ""; } else { $condition .= " AND YEAR(f.datum)=$rok"; } if(@$clen==0 || @$clen) { $condition .= " AND c.id=$clen"; } else { $condition .= ""; } echo "
"; #tisk datumu plateb echo "Rok : "; $dotaz=MySQL_Query("SELECT DISTINCT YEAR(datum) from finance ORDER BY datum"); $count=MySQL_Num_Rows($dotaz); $count++; for ($i=1;$i<$count;$i++) { $radek=MySQL_Fetch_Array($dotaz); echo "".$radek["YEAR(datum)"].' * '; echo ' '; } #dotisk posledni volby pro vsechny platby echo "všechno"; echo '

'; if(!$order) $order="prijmeni"; $where="WHERE active IN (0,1) $condition "; echo 'Seznam příspěvků uživatele: '.id_to_name($clen).' '; echo "
"; #tisk vsech moznosti plateb echo "Platby : "; $dotaz=MySQL_Query("SELECT * from platby ORDER BY id"); $count=MySQL_Num_Rows($dotaz); $count++; for ($i=1;$i<$count;$i++) { $radek=MySQL_Fetch_Array($dotaz); echo "".$radek["nazev"].' * '; echo ' '; } #dotisk posledni volby pro vsechny platby echo "všechno"; echo ' '; echo "
"; #tisk vsech moznosti pokladen echo "Pokladny : "; $dotaz=MySQL_Query("SELECT * from pokladny ORDER BY id"); $count=MySQL_Num_Rows($dotaz); $count++; for ($i=1;$i<$count;$i++) { $radek=MySQL_Fetch_Array($dotaz); echo "".$radek["nazev"].' * '; echo ' '; } #dotisk posledni volby pro vsechny platby echo "všechno"; echo ' '; #finalni dotaz do databaze pred vypisem zvolene sestavy $string=MySQL_Query("SELECT c.id as cid, c.*, f.id as fid, f.*, p.id as pid, p.* FROM (cleni c LEFT JOIN finance f ON c.id = f.clen) LEFT JOIN platby p ON f.platba = p.id $where ORDER BY $order"); echo '
'; $color=1; while($vysledek=MySQL_Fetch_Array($string)) { $celkem++; if($color==0) { $color=1; $barva="#E6E4E4"; } else { $color=0; $barva="#FFFFFF"; } if($vysledek["id"]<1000) { $dot="lan.bmp"; $alt="LAN Jablonka"; } else { if($vysledek["id"]==1000) { $dot="apy.bmp"; $alt="AP Yenik"; } if($vysledek["id"]==1001) { $dot="apj.bmp"; $alt="AP Jablonecká"; } } $icons=""; if($show=="all" && $vysledek["active"]==2) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==1) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==0) $icons=$icons.' '; if($vysledek["finance"]==1) $icons=$icons.' '; if($vysledek["internet"]==1) $icons=$icons.' '; if($vysledek["energy"]==1) $icons=$icons.' '; if($vysledek["energy"]==2) $icons=$icons.' '; echo ' '; $castkacelkem=$castkacelkem+str_replace(",",".",$vysledek["hodnota"]); Next($vysledek); } echo '
  ID  Jméno  Příjmení: Přezdívka: v.s.: Pokladna Účtenka Komentář Dodavatel Datum Hodnota Platba
  '.$vysledek["cid"].' '.$vysledek["jmeno"].' '.$vysledek["prijmeni"].' '.$vysledek["prezdivka"].' '.$vysledek["vs"].' ';echo id_to_pokladna($vysledek["pokladna"]);echo ' '.$vysledek["uctenka"].' '.$vysledek["komentar"].' ';echo id_to_dodavatel($vysledek["dodavatel"]);echo ' + '; if(!@$vysledek["datum"]) { $datum=""; } else { $datum=sql2datum($vysledek["datum"]); } echo ' '.$datum.' '.$vysledek["hodnota"].' '.$vysledek["nazev"].'
Celkem zobrazeno '.$celkem.' záznamů. Celková částka zobrazených záznamů je '.$castkacelkem.'Kč '; ################################################################################################################ ### Ukony ################################################################################################################ echo '

'; if($rok=="vsechno") { $condition = ""; } else { $condition = " AND YEAR(uk.datum)=$rok"; } if(@$clen==0 || @$clen) { $condition .= " AND c.id=$clen"; } else { $condition .= ""; } $celkem=0; if(!$order) $order="prijmeni"; $where="WHERE active IN (0,1) $condition"; echo 'Seznam úkonů uživatele: '.id_to_name($clen).' '; #finalni dotaz $string=MySQL_Query("SELECT c.id as cid, c.*, uk.id as ukid, uk.*, u.id as uid, u.*, i.id as iid, i.* FROM ((cleni c LEFT JOIN ukony uk ON c.id = uk.clen) LEFT JOIN udalosti u ON uk.udalost = u.id) LEFT JOIN ipecka i ON uk.predmet = i.id AND uk.udalost IN (7,8) $where ORDER BY $order"); echo '
'; $color=1; while($vysledek=MySQL_Fetch_Array($string)) { $celkem++; if($color==0) { $color=1; $barva="#E6E4E4"; } else { $color=0; $barva="#FFFFFF"; } if($vysledek["id"]<1000) { $dot="lan.bmp"; $alt="LAN Jablonka"; } else { if($vysledek["id"]==1000) { $dot="apy.bmp"; $alt="AP Yenik"; } if($vysledek["id"]==1001) { $dot="apj.bmp"; $alt="AP Jablonecká"; } } $icons=""; if($show=="all" && $vysledek["active"]==2) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==1) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==0) $icons=$icons.' '; if($vysledek["finance"]==1) $icons=$icons.' '; if($vysledek["internet"]==1) $icons=$icons.' '; if($vysledek["energy"]==1) $icons=$icons.' '; if($vysledek["energy"]==2) $icons=$icons.' '; echo ' '; } echo ' '; Next($vysledek); } echo '
  ID  Jméno  Příjmení: Přezdívka: Email: A F I E Domů Mobil Datum Událost Předmět
  '.$vysledek["cid"].' '.$vysledek["jmeno"].' '.$vysledek["prijmeni"].' '.$vysledek["prezdivka"].' '; $from="info@jablonka.cz"; $subject = ""; $text = "Zdravím, hezký den \n"; $text = str_replace(" ","%20",$text); $text = str_replace("\n","%0d",$text); if ( $vysledek["email"] ) { echo ' int ext '.$vysledek["email"].''.$icons.' '.$vysledek["domu"].' '.$vysledek["mobil"].' + '; if(!@$vysledek["datum"]) { $datum=""; } else { $datum=sql2datum($vysledek["datum"]); } echo ' '.$datum.' '.$vysledek["nazev"].' '.$vysledek["ip"].'
Celkem zobrazeno '.$celkem.' záznamů. '; ################################################################################################################ ### Prispevky ################################################################################################################ if(!@$show) $show="all"; if(!@$order) $order="prijmeni"; if($rok=="vsechno") { # $rok = "now()"; $rok = date("Y"); } $where="WHERE c.id=".$clen; #finalni dotaz $string=MySQL_Query("SELECT c.id as cid, c.*, f.id as fid, f.*, p.id as pid, p.*, u.id as uid, u.datum as udatum, u.*, i.id as iid, i.* FROM (((cleni c LEFT JOIN finance f ON c.id = f.clen AND f.platba = 2 AND YEAR(f.datum) = $rok ) LEFT JOIN platby p ON f.platba = p.id) LEFT JOIN ukony u ON c.id = u.clen AND u.udalost = 7) LEFT JOIN ipecka i ON c.id = i.clen AND i.id = u.predmet $where ORDER BY $order"); echo '

Prispevky za rok '.$rok.'
Vybrat vše Invertovat
'; # nastaveni pocatecnich hodnot pro tisk tabulky # pokud ma clen vice radku tak se tiskne jen jeden souhrnny $color=1; $lastcid=-1; $celkem=0; $castkacelkem=0; $mindatum="2008-12-31"; $ipecka=""; $platby=""; $soucetplateb=0; while($vysledek=MySQL_Fetch_Array($string)) { #pro prvni je treba rovnou priradit lastcid if ($lastcid == -1 ) $lastcid = $vysledek["cid"]; #pokud je uz jiny clen tak se jde na tisk predchoziho if ( $lastcid != $vysledek["cid"] ) { $celkem++; if($color==0) { $color=1; $barva="#E6E4E4"; } else { $color=0; $barva="#FFFFFF"; } $delkaletos = round((strtotime("2008-12-31")-strtotime($mindatum))/(60*60*24*30.42)); if($delkaletos>12) $delkaletos=12; $prenos=id_to_prenos($cid,$rok); $delkapripojeniletos=round(id_to_delkazarok($cid,$rok,22,23)/(60*60*24*30.42)); $delkanapajeniletos=round(id_to_delkazarok($cid,$rok,5,6)/(60*60*24*30.42)); $delkanapajenirouteruletos=round(id_to_delkazarok($cid,$rok,24,25)/(60*60*24*30.42)); $delkakonektivityletos=round(id_to_delkazarok($cid,$rok,7,8)/(60*60*24*30.42)); $castka = ( 50 * $delkapripojeniletos - 25 * $delkanapajeniletos - 50 * $delkanapajenirouteruletos + 50 * $delkakonektivityletos); $castkacelkem=$castkacelkem+$castka; tisk_radku($barva,$cid,$lastcid,$jmeno,$prijmeni,$icons,$mindatum,$delkapripojeniletos,$delkanapajeniletos,$delkanapajenirouteruletos,$delkakonektivityletos,$castka,$varsymb,$platby,$prenos,$mail); $mindatum="2008-12-31"; $ipecka=""; $platby=""; $soucetplateb=0; $lastcid = $vysledek["cid"]; } #vytvari se a ukladaji promenne pro clena - muze byt i z vice radku $icons=""; if($show=="all" && $vysledek["active"]==2) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==1) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==0) $icons=$icons.' '; if($vysledek["finance"]==1) $icons=$icons.' '; if($vysledek["internet"]==1) $icons=$icons.' '; if($vysledek["energy"]==1) $icons=$icons.' '; if($vysledek["energy"]==2) $icons=$icons.' '; $cid = $vysledek["cid"]; $jmeno = $vysledek["jmeno"]; $prijmeni = $vysledek["prijmeni"]; #pokud je nove datum pripojeni nejakeho IP starsi tak ho vezmem jako nove minimum if ($vysledek["datum"]) if ( strtotime($mindatum) > strtotime($vysledek["datum"])) $mindatum = $vysledek["datum"]; $energy = $vysledek["energy"]; $internet = $vysledek["internet"]; $ipecka = $ipecka." ".$vysledek["ip"]; $varsymb = $vysledek["vs"]; # $platby = $vysledek["hodnota"]; if ( $vysledek["fid"] ) { $platby = $platby.":".$vysledek["fid"]." ".$vysledek["hodnota"]; $soucetplateb = 1; } $mail=$vysledek["email"]; } # while ############################################################ #rozdeli hodnoty pole podle mezery na klic a hodnotu #v hodnote jsou dve cisla a prvni je brano jako klic a druhe jako hodnota pod timto klicem #zaroven to odstrani i duplikatni hodnoty function unikatni_dvojice($array) { $result = array(); foreach ($array as $tvalue) { $polozky = explode(" ", $tvalue); $result[$polozky[0]] = $polozky[1]; } return $result; } ############################################################ function tiskni_platby($platby) { #rozdeleni jednotlivych plateb do pole $jednotlive = explode (":",$platby); #odstraneni prvniho pole ktere obsahuje nesmysly $prvni=array_shift($jednotlive); #setrideni a vyhazeni unikatnich $jednotlive=unikatni_dvojice($jednotlive); $pocetplateb = count($jednotlive); $soucet=0; $platby_tisk=""; foreach (array_keys($jednotlive) as $key) { $platba="$jednotlive[$key] "; $platby_tisk=$platby_tisk."".$platba; #desetinne carky se prevedou na tecky $soucet=$soucet+str_replace(",",".",$jednotlive[$key]); } global $vybranocelkem; $vybranocelkem=$vybranocelkem+$soucet; unset($vybranocelkem); global $vybrano; $vybrano=$soucet; unset($vybrano); if ($pocetplateb) { return str_replace(" konec","",$platby_tisk."konec") ; } else { return "" ; } } ############################################################ function tisk_radku($barva,$cid,$lastcid,$jmeno,$prijmeni,$icons,$mindatum,$delkaletos,$delkanapajeniletos,$delkanapajenirouteruletos,$delkakonektivityletos,$castka,$varsymb,$platby,$prenos,$mail) { global $vybranocelkem; global $vybrano; $dot="lan.bmp"; $alt="Přehled"; echo ' '; unset($vybranocelkem); unset($vybrano); } ############################################################ #dotisk posledniho radku $celkem++; if($color==0) { $color=1; $barva="#E6E4E4"; } else { $color=0; $barva="#FFFFFF"; } $delkaletos = round((strtotime("2008-12-31")-strtotime($mindatum))/(60*60*24*30.42)); if($delkaletos>12) $delkaletos=12; $prenos=id_to_prenos($cid,$rok); $delkapripojeniletos=round(id_to_delkazarok($cid,$rok,22,23)/(60*60*24*30.42)); $delkanapajeniletos=round(id_to_delkazarok($cid,$rok,5,6)/(60*60*24*30.42)); $delkanapajenirouteruletos=round(id_to_delkazarok($cid,$rok,24,25)/(60*60*24*30.42)); $delkakonektivityletos=round(id_to_delkazarok($cid,$rok,7,8)/(60*60*24*30.42)); $castka = ( 50 * $delkapripojeniletos - 25 * $delkanapajeniletos - 50 * $delkanapajenirouteruletos + 50 * $delkakonektivityletos); $castkacelkem=$castkacelkem+$castka; tisk_radku($barva,$cid,$lastcid,$jmeno,$prijmeni,$icons,$mindatum,$delkapripojeniletos,$delkanapajeniletos,$delkanapajenirouteruletos,$delkakonektivityletos,$castka,$varsymb,$platby,$prenos,$mail); #konec dotisku posledniho radku echo '
ID  Jméno  Příjmení A F I E email Připojen od Přip. měsíců (50) Inet měsíců (50) Sleva switch (-25) Sleva router (-50) Částka var.symb. Přehled plateb Součet plateb Přenos z předchozího roku Celkem
  '.$lastcid.' '.$jmeno.' '.$prijmeni.' '.$icons.' '; $from="info@jablonka.cz"; $subject = "Členství v o.s. jablonka.cz"; $text = "Zdravím, dík Síma \n"; $text = str_replace(" ","%20",$text); $text = str_replace("\n","%0d",$text); if ( @$mail ) { echo ' int ext '.$mail.' '; } echo ' '.sql2datum($mindatum).' '.$delkaletos.' '.$delkakonektivityletos.' '.$delkanapajeniletos.' '.$delkanapajenirouteruletos.' '.$castka.' '.$varsymb.' '; echo ' + '.tiskni_platby($platby).' '.$vybrano.' '.$prenos.' '.($vybrano+str_replace(",",".",$prenos)-$castka).' '; $from="info@jablonka.cz"; $subject = "Výzva k zaplacení členských příspěvků jablonka.cz : $jmeno $prijmeni"; $text = "Dobrý den, v tomto mailu Vám posíláme informace o stavu Vašich členských příspěvků pro tento rok. \n"; $text .= "Jméno člena : $jmeno $prijmeni\n"; $text .= "Číslo konta : 2118436001/5500\n"; $text .= "Zbývá zaplatit : ".(-1*($vybrano+str_replace(",",".",$prenos)-$castka))."Kč\n"; $text .= "Var.Symbol : ".$varsymb."\n\n"; $text .= "Pro minimalizaci bankovních poplatků plaťte větší částky najednou - tedy alespoň 300Kč čtvrtletně. Plaťte prosím na začátku daného období vždy do 15. dne v prvním měsíci každého čtvrtletí, ale nejlépe bude pokud zaplatíte jednou jedinou platbou až do konce roku. Neplaťte prosím v tomto roce více než je třeba, protože přeplatek nám přidělává práci v účetnictví. Nezapomínejte prosím vyplnit variabilní symbol. Neposílejte peníze přes českou poštu, protože odstraňují variabilní symbol a přidělává nám to práci. hezký den www.jablonka.cz "; $text = str_replace(" ","%20",$text); $text = str_replace("\n","%0d",$text); $celkemjeden=(-1*($vybrano+str_replace(",",".",$prenos)-$castka)); $aktualnidatum=date("Y-m-d"); #tohle spocita pocet mesicu ktere v tomto roce nemusi byt jeste zaplaceny #je to pouzito k rozliseni kdo tech kteri maji zaplaceno alespon tri mesice dopredu $budoucimesice = round((strtotime("2008-12-31")-strtotime($aktualnidatum))/(60*60*24*30.42)); #odpocet se stanovi tak aby lidi meli dopredu placeno aspon 300Kc $odpocet=$budoucimesice*100-300; echo ' int ext

Celkem zobrazeno '.$celkem.' záznamů. Celková částka je '.$castkacelkem.'Kč a zatím se vybralo '.$vybranocelkem.'Kč '; ################################################################################################################ ### Adresy ################################################################################################################ echo '

'; $celkem=0; if(@$clen==0 || @$clen) { $condition = " AND c.id=$clen"; } else { $condition = ""; } if(!$order) $order="prijmeni"; $where="WHERE active IN (0,1) $condition"; echo 'Seznam Adres a IP adres uživatele: '.id_to_name($clen).' '; $string=MySQL_Query("SELECT c.id as cid, c.*, a.id as aid, a.*, i.id as iid, i.* FROM (cleni c LEFT JOIN adresy a ON c.id = a.clen) LEFT JOIN ipecka i ON c.id = i.clen AND a.id = i.adresa $where ORDER BY $order"); echo '
'; $color=1; while($vysledek=MySQL_Fetch_Array($string)) { $celkem++; if($color==0) { $color=1; $barva="#E6E4E4"; } else { $color=0; $barva="#FFFFFF"; } if($vysledek["id"]<1000) { $dot="lan.bmp"; $alt="LAN Jablonka"; } else { if($vysledek["id"]==1000) { $dot="apy.bmp"; $alt="AP Yenik"; } if($vysledek["id"]==1001) { $dot="apj.bmp"; $alt="AP Jablonecká"; } } $icons=""; if($show=="all" && $vysledek["active"]==2) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==1) $icons=$icons.' '; if($show=="all" && $vysledek["active"]==0) $icons=$icons.' '; if($vysledek["finance"]==1) $icons=$icons.' '; if($vysledek["internet"]==1) $icons=$icons.' '; if($vysledek["energy"]==1) $icons=$icons.' '; if($vysledek["energy"]==2) $icons=$icons.' '; $gwcimg='http://81.0.245.33/hotsanic/networks/int'.$vysledek["ip"].'-week.png'; $gwcurl='http://81.0.245.33/hotsanic/networks/int'.$vysledek["ip"].'.html'; $gwuimg='http://62.24.71.157/hotsanic/networks/int'.$vysledek["ip"].'-week.png'; $gwuurl='http://62.24.71.157/hotsanic/networks/int'.$vysledek["ip"].'.html'; list($ipa,$ipb,$ipc,$ipd)=explode('.',$vysledek["ip"]); $gwrrd=$ipa.'.'.$ipb.'.0.'.$ipc; $gwrimg='http://'.$ipa.'.'.$ipb.'.0.'.$ipc.'/hotsanic/networks/int'.$vysledek["ip"].'-week.png'; $gwrurl='http://'.$ipa.'.'.$ipb.'.0.'.$ipc.'/hotsanic/networks/int'.$vysledek["ip"].'.html'; $adresa_pro_mapu=iconv("ISO-8859-2", "UTF-8", $vysledek["ulice"]); $adresa_pro_mapu=urlencode( $adresa_pro_mapu); echo ' '; Next($vysledek); } echo '
  ID  Jméno  Příjmení: Přezdívka: Email: A F I E Domů Mobil IP Ulice č.p. Byt
  '.$vysledek["cid"].' '.$vysledek["jmeno"].' '.$vysledek["prijmeni"].' '.$vysledek["prezdivka"].' '.$vysledek["email"].' '.$icons.' '.$vysledek["domu"].' '.$vysledek["mobil"].' + '.$vysledek["ip"].' +  M  '.$vysledek["ulice"].' '.$vysledek["cp"].' '.$vysledek["byt"].'

'; $gwctrn=getweb('http://10.33.0.25/cgi-bin/rrdfetch.pl?'.$vysledek["ip"].'&week&0'); $gwctrn=preg_replace('/\s+/', ' ', $gwctrn); $gwctrn=preg_replace('/^\s+/', '', $gwctrn); list($gwcin,$gwcout)=explode(' ',$gwctrn); $gwcin = round($gwcin / 104857.6)/10 ; $gwcout = round($gwcout / 104857.6)/10 ; echo "Casa ".$gwcin."MiB ".$gwcout."MiB"; echo '

'; $gwutrn=getweb('http://10.33.0.30/cgi-bin/rrdfetch.pl?'.$vysledek["ip"].'&week&0'); $gwutrn=preg_replace('/\s+/', ' ', $gwutrn); $gwutrn=preg_replace('/^\s+/', '', $gwutrn); list($gwuin,$gwuout)=explode(' ',$gwutrn); $gwuin = round($gwuin / 104857.6)/10 ; $gwuout = round($gwuout / 104857.6)/10 ; echo "UPC ".$gwuin."MiB ".$gwuout."MiB"; echo '

'; $gwrtrn=getweb('http://'.$gwrrd.'/cgi-bin/rrdfetch.pl?'.$vysledek["ip"].'&week&0'); $gwrtrn=preg_replace('/\s+/', ' ', $gwrtrn); $gwrtrn=preg_replace('/^\s+/', '', $gwrtrn); list($gwrin,$gwrout)=explode(' ',$gwrtrn); $gwrin = round($gwrin / 104857.6)/10 ; $gwrout = round($gwrout / 104857.6)/10 ; echo "Router ".$gwrin."MiB ".$gwrout."MiB"; echo '

Celkem zobrazeno '.$celkem.' záznamů. '; ?> WebSVN - is - Blame - Rev 4 - /trunk/html/clen.php
  jablonka.czprosek.czf

is

Subversion Repositories:
[/] [trunk/] [html/] [clen.php] - Blame information for rev 4

 

Line No. Rev Author Line

Powered by WebSVN 2.2.1