fhiiqm/test/vertrag_list_csv.php
author Bettina Schwarzer
Fri, 17 Jan 2014 08:50:55 +0100
changeset 42 cfc409017ba8
parent 26 3c1e3ac7089f
permissions -rw-r--r--
+ Keytyp_Depot Aendern Bem., Korrekturen

<?php

/**
 * @author Bettina Schwarzer, Fritz-Haber-Institut
 * @copyright 04/2012
 * 
 * Export Vertragsliste als csv-File
 * 
 */

    error_reporting(E_ALL ^ E_NOTICE);
    
    include_once($_SERVER["DOCUMENT_ROOT"]."/fhiiqm/inc/dbconnect.inc.php");
    if (!isset($dbc) || !$dbc) $dbc = new dbconnection();
    
	$sort   = $_GET["s"];   // Sortierung nach Spalte
    if (!$sort) $sort   = 2;
    $dir    = $_GET["d"];   // Sortierrichtung
    if (!$dir) $dir    = '';
    $fnum   = $_GET["f"];   // Spaltennummer, nach der aktuell gefiltert wird
    if (!$fnum) $fnum   = 1;
    $filter = $_GET["b"];   // Filterbegriff 
    if (!$filter) $filter = '';
    $start = $_GET["st"];   // Start-DS - 1
    if (!$start) $start  = 0;
    $zeil = $_GET["z"];     // Anzahl zu zeigender DS
    if (!$zeil) $zeil   = 9999;
    $listg  = $_GET["l"];   // Recht fuer ausgewaehlte Produktgruppen
    if (!$listg) $listg = '';

    $sql = "CALL fhiiqm.vertrag_flist2(" . $sort . ",'" . $dir . "', " . $fnum . ", '" . $filter . "', '" . $listg . "',$start,$zeil, @anz, @ganz)";

    $result = $dbc ->queryObjectArray($sql);

    if ($result)
    {
        $crlf = array("\r\n","\n\r","\r","\n"); // Zeilenumbrueche
        $file ="Vertrag-ID;Bezeichnung;Beschreibung;Typ;zu Produkt;Partner;Bearbeiter;Beginn;Ende;Verlängerung;Künd.Frist(mon);Bemerkung;E-Mail?;Jahr;Kosten\r\n";
        $cid=0;

        foreach ($result as $row)
        {
            $file .= $row->contract_ID . ";";
            if ($row->contract_ID != $cid)
            {   // Anzeigen der nur einmal relevanten Daten
                $file .= $row->cname . ";";
                $file .= str_replace($crlf,", ",$row->clong) . ";";
                $file .= $row->typ . ";";
                $file .= str_replace(";",":",$row->prod) . ";";
                $file .= $row->partfirma . ";";
                $file .= str_replace(";",":",$row->bearb) . ";";
                if ($row->cbegin)
                {
                    $cb = new DateTime($row->cbegin);    
                    $file .= $cb->format('d.m.Y').";";
                }
                else $file .= ";";
                if ($row->cend)
                {
                    $cb = new DateTime($row->cend);    
                    $file .= $cb->format('d.m.Y').";";
                }
                else $file .= ";";
                if ($row->cautoend) $file .= "automatisch;"; else $file .= ";";
                $file .= $row->kmon . ";";
                $file .= str_replace(";",":",str_replace($crlf,", ",$row->bem)) . ";";
                if ($row->email) $file .= "ja;"; else $file .= ";";   
            }
            if ($row->kosten)
            { 
                if ($cid == $row->contract_ID) $file .= ";;;;;;;;;;;;"; 
                $file .= $row->kyear .";";
                $file .= number_format($row->kosten,2,",",".") . ";";
            }    
            $file .= "\r\n";
            $cid = $row->contract_ID;    
        }
        header( 'Content-Type: text/csv' );
        header('Content-Disposition: attachment; filename="vertrag.csv"');
        header("Content-Length: " . strlen($file));
        echo $file;
    }
    else echo "kein Ergebnis!";
?>