fhiiqm/inc/pdf_ma_tel.inc.php
author Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
Fri, 21 Dec 2012 15:31:50 +0100
changeset 33 f1a8785434e4
child 34 fc60ef80a7ad
permissions -rw-r--r--
+ MA-Telefon-Liste, Edit MA, Telefon + Report dezentrale Anlagen + Report MA - Beziehungen
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     1
<?php
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     2
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     3
/**
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     4
 * @author Bettina Schwarzer, Fritz-Haber-Institut
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     5
 * @copyright 11/2012
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     6
 * 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     7
 * Klasse PDF zur Telefonliste
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     8
 */
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
     9
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    10
    include ($_SERVER['DOCUMENT_ROOT']."/fhiiqm/tool/fpdf.php");
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    11
    class PDF extends FPDF
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    12
    {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    13
        //Author Patrick Benny: Fit text to cell 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    14
        //*********************************************************************
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    15
        //Cell with horizontal scaling if text is too wide
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    16
        function CellFit($w, $h=0, $txt='', $border=0, $ln=0, $align='', $fill=false, $link='', $scale=false, $force=true)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    17
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    18
            //Get string width
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    19
            $str_width=$this->GetStringWidth($txt);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    20
            // Division by 0 avoid, 21.11.2012, bs
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    21
            if ($str_width == 0) $str_width = 0.1;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    22
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    23
            //Calculate ratio to fit cell
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    24
            if($w==0)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    25
                $w = $this->w-$this->rMargin-$this->x;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    26
            $ratio = ($w-$this->cMargin*2)/$str_width;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    27
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    28
            $fit = ($ratio < 1 || ($ratio > 1 && $force));
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    29
            if ($fit)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    30
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    31
                if ($scale)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    32
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    33
                    //Calculate horizontal scaling
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    34
                    $horiz_scale=$ratio*100.0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    35
                    //Set horizontal scaling
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    36
                    $this->_out(sprintf('BT %.2F Tz ET',$horiz_scale));
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    37
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    38
                else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    39
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    40
                    //Calculate character spacing in points
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    41
                    $char_space=($w-$this->cMargin*2-$str_width)/max($this->MBGetStringLength($txt)-1,1)*$this->k;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    42
                    //Set character spacing
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    43
                    $this->_out(sprintf('BT %.2F Tc ET',$char_space));
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    44
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    45
                //Override user alignment (since text will fill up cell)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    46
                $align='';
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    47
            }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    48
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    49
            //Pass on to Cell method
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    50
            $this->Cell($w,$h,$txt,$border,$ln,$align,$fill,$link);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    51
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    52
            //Reset character spacing/horizontal scaling
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    53
            if ($fit)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    54
                $this->_out('BT '.($scale ? '100 Tz' : '0 Tc').' ET');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    55
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    56
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    57
        //Cell with horizontal scaling only if necessary
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    58
        function CellFitScale($w, $h=0, $txt='', $border=0, $ln=0, $align='', $fill=false, $link='')
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    59
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    60
            $this->CellFit($w,$h,$txt,$border,$ln,$align,$fill,$link,true,false);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    61
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    62
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    63
        //Cell with horizontal scaling always
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    64
        function CellFitScaleForce($w, $h=0, $txt='', $border=0, $ln=0, $align='', $fill=false, $link='')
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    65
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    66
            $this->CellFit($w,$h,$txt,$border,$ln,$align,$fill,$link,true,true);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    67
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    68
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    69
        //Cell with character spacing only if necessary
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    70
        function CellFitSpace($w, $h=0, $txt='', $border=0, $ln=0, $align='', $fill=false, $link='')
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    71
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    72
            $this->CellFit($w,$h,$txt,$border,$ln,$align,$fill,$link,false,false);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    73
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    74
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    75
        //Cell with character spacing always
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    76
        function CellFitSpaceForce($w, $h=0, $txt='', $border=0, $ln=0, $align='', $fill=false, $link='')
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    77
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    78
            //Same as calling CellFit directly
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    79
            $this->CellFit($w,$h,$txt,$border,$ln,$align,$fill,$link,false,true);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    80
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    81
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    82
        //Patch to also work with CJK double-byte text
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    83
        function MBGetStringLength($s)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    84
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    85
            if($this->CurrentFont['type']=='Type0')
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    86
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    87
                $len = 0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    88
                $nbbytes = strlen($s);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    89
                for ($i = 0; $i < $nbbytes; $i++)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    90
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    91
                    if (ord($s[$i])<128)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    92
                        $len++;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    93
                    else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    94
                    {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    95
                        $len++;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    96
                        $i++;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    97
                    }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    98
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    99
                return $len;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   100
            }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   101
            else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   102
                return strlen($s);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   103
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   104
        //*********************************************************************
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   105
        
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   106
        //Kopfzeile
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   107
        function Header()
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   108
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   109
            global $header;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   110
            //$this->Cell(20);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   111
            //Titel
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   112
            //Arial fett 15
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   113
            $this->SetFont('Arial','BI',11);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   114
            $this->Cell(55,10,'Fritz-Haber-Institut',0,0,'L');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   115
            $this->SetFont('Arial','B',11);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   116
            $this->Cell(40,10,'Telefonverzeichnis',0,0,'L');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   117
            $this->SetTextColor(255,0,0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   118
            $this->Cell(0,10,'(intern)',0,0,'L');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   119
            //Logo
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   120
            $this->Image($_SERVER['DOCUMENT_ROOT']."/fhiiqm/img/fhilogotransp.png",170,8,25);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   121
            //Zeilenumbruch
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   122
            $this->Ln(20);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   123
            //Colors, line width and bold font
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   124
            $this->SetFont('helvetica','',8);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   125
            $this->SetFillColor(104,172,191);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   126
            $this->SetTextColor(0,0,102);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   127
            $this->SetDrawColor(255,255,255);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   128
            $this->SetLineWidth(.0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   129
            $this->SetFont('','B');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   130
            //Tabellen-Header immer im Kopf
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   131
            $w=array(55,40,30,15,40);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   132
            for($i=0;$i<count($header);$i++)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   133
                $this->Cell($w[$i],5,$header[$i],1,0,'L',1);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   134
            $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   135
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   136
        
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   137
        //Fusszeile
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   138
        function Footer()
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   139
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   140
            //Position 1,5 cm von unten
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   141
            $this->SetY(-15);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   142
            //Arial kursiv 8
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   143
            $this->SetFont('Arial','I',8);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   144
            //Datum der Liste
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   145
            $heute = new DateTime();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   146
            $this->Cell(0,10,$heute->format('d.m.Y H:i:s'),0,0,'L');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   147
            //Seitenzahl
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   148
            $this->Cell(0,10,'Seite '.$this->PageNo().'/{nb}',0,0,'R');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   149
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   150
        //Colored table
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   151
        function FancyTable($header,$data)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   152
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   153
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   154
            //Colors, line width and bold font
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   155
            $this->SetFillColor(104,172,191);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   156
            $this->SetTextColor(0,0,102);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   157
            $this->SetDrawColor(255,255,255);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   158
            $this->SetLineWidth(.0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   159
            $this->SetFont('','B');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   160
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   161
            //Header notwendig fuer Tabelle, Hoehe = 0!
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   162
            $w=array(55,40,30,15,40); // Breite der Zellen
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   163
            for($i=0;$i<count($header);$i++)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   164
                $this->Cell($w[$i],0,'',1,0,'L',1);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   165
            $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   166
            //Color and font restoration
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   167
//            $this->SetFillColor(222,222,222);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   168
            $this->SetFillColor(238,238,238);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   169
            $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   170
            $this->SetFont('');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   171
            //Data
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   172
            $fill=0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   173
            $fill = !$fill;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   174
            foreach($data as $row)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   175
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   176
    			if ($row->persknr != $vpnr)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   177
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   178
                    $fill=!$fill;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   179
                    if (substr($row->name,0,1) != $vfirst) $this->Ln(5); //$this->AddPage();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   180
                    $titel = ($row->titel)? ", $row->titel" : "" ;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   181
                    $vname = ($row->vorname)? ", $row->vorname" : "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   182
                    $name = $row->name . $titel . $vname;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   183
                    $this->CellFitScale($w[0],4.5,$name,0,0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   184
                    $this->CellFitScale($w[1],4.5,$row->abt_name,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   185
                    if ($row->telefon_typ == "fax") $typ = " FAX"; else $typ = "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   186
                    if (!$row->public) $this->SetTextColor(255,0,0); else $this->SetTextColor(0,0,136); 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   187
                    $this->CellFitScale($w[2],4.5,$row->telefon_nr.$typ,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   188
                    $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   189
                    $this->CellFitScale($w[3],4.5,$row->geb_ID . " " . $row->raum_nr,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   190
                    $this->CellFitScale($w[4],4.5,$row->email,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   191
                    $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   192
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   193
                else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   194
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   195
                    $this->Cell($w[0],4.5,'','LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   196
                    if ($vabt != $row->abt_name) $abt = $row->abt_name;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   197
                    else $abt = '';    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   198
                    $this->CellFitScale($w[1],4.5,$abt,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   199
                    if ($row->telefon_typ == "fax") $typ = " FAX"; else $typ = "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   200
                    if (!$row->public) $this->SetTextColor(255,0,0); else $this->SetTextColor(0,0,136); 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   201
                    $this->CellFitScale($w[2],4.5,$row->telefon_nr.$typ,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   202
                    $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   203
                    $this->CellFitScale($w[3],4.5,$row->geb_ID . " " . $row->raum_nr,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   204
                    $this->Cell($w[4],4.5,'','LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   205
                    $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   206
                    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   207
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   208
                $vpnr = $row->persknr;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   209
                $vabt = $row->abt_name;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   210
                $vfirst = substr($row->name,0,1);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   211
            }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   212
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   213
        function FancyTableOldMySQL($header,$data)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   214
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   215
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   216
            //Colors, line width and bold font
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   217
            $this->SetFillColor(104,172,191);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   218
            $this->SetTextColor(0,0,102);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   219
            $this->SetDrawColor(255,255,255);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   220
            $this->SetLineWidth(.0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   221
            $this->SetFont('','B');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   222
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   223
            //Header notwendig fuer Tabelle, Hoehe = 0!
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   224
            $w=array(55,40,30,15,40);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   225
            for($i=0;$i<count($header);$i++)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   226
                $this->Cell($w[$i],0,'',1,0,'L',1);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   227
            $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   228
            //Color and font restoration
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   229
//            $this->SetFillColor(222,222,222);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   230
            $this->SetFillColor(238,238,238);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   231
            $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   232
            $this->SetFont('');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   233
            //Data
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   234
            $fill=0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   235
            $fill = !$fill;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   236
            while ($row = mysql_fetch_assoc($data)) 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   237
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   238
    			if ($row["persknr"] != $vpnr)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   239
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   240
                    $fill=!$fill;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   241
                    $titel = ($row["titel"])? ", ".$row["titel"]  : "" ;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   242
                    $vname = ($row["vorname"])? ",". $row["vorname"] : "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   243
                    $name = $row["name"] . $titel . $vname;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   244
                    $this->CellFitScale($w[0],4.5,$name,0,0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   245
                    $this->CellFitScale($w[1],4.5,$row["abt_name"],'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   246
                    if ($row["telefon_typ"] == "fax") $typ = " FAX"; else $typ = "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   247
                    if (!$row["public"]) $this->SetTextColor(255,0,0); else $this->SetTextColor(0,0,136); 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   248
                    $this->CellFitScale($w[2],4.5,$row["telefon_nr"].$typ,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   249
                    $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   250
                    $this->CellFitScale($w[3],4.5,$row["geb_ID"] . " " . $row["raum_nr"],'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   251
                    $this->CellFitScale($w[4],4.5,$row["email"],'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   252
                    $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   253
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   254
                else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   255
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   256
                    $newline = 0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   257
                    $this->Cell($w[0],4.5,'','LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   258
                    if ($vabt != $row["abt_name"]) $abt = $row["abt_name"];
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   259
                    else $abt = '';    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   260
                    $this->CellFitScale($w[1],4.5,$abt,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   261
                    if ($row["telefon_typ"] == "fax") $typ = " FAX"; else $typ = "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   262
                    if (!$row["public"]) $this->SetTextColor(255,0,0); else $this->SetTextColor(0,0,136); 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   263
                    $this->CellFitScale($w[2],4.5,$row["telefon_nr"].$typ,'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   264
                    $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   265
                    $this->CellFitScale($w[3],4.5,$row["geb_ID"] . " " . $row["raum_nr"],'LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   266
                    $this->Cell($w[4],4.5,'','LR',0,'L',$fill);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   267
                    $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   268
                    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   269
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   270
                $vpnr = $row["persknr"];
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   271
                $vabt = $row["abt_name"];
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   272
            }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   273
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   274
    }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   275
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   276
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   277
?>