fhiiqm/inc/pdf_ma_tel.inc.php
author Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
Wed, 27 Feb 2013 09:43:08 +0100
changeset 34 fc60ef80a7ad
parent 33 f1a8785434e4
child 38 45c139f74ea4
permissions -rw-r--r--
+ Telefonliste pdf: 4 Varianten + Projekte, Schritte + Arbeitssicherheit
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
    {
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
    13
        var $y0, $y, $xa, $width, $height;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
    14
        var $wid = array(55,25,40,15,40); // Breite: Spalten 'new'
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
    15
        var $fancy = 1;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
    16
        var $anzcol = 2;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
    17
        var $col = 0;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
    18
        //Author Patrick Benny: Fit text to cell (http://www.fpdf.org)
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    19
        //*********************************************************************
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    20
        //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
    21
        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
    22
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    23
            //Get string width
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    24
            $str_width=$this->GetStringWidth($txt);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    25
            // 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
    26
            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
    27
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    28
            //Calculate ratio to fit cell
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    29
            if($w==0)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    30
                $w = $this->w-$this->rMargin-$this->x;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    31
            $ratio = ($w-$this->cMargin*2)/$str_width;
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
            $fit = ($ratio < 1 || ($ratio > 1 && $force));
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    34
            if ($fit)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    35
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    36
                if ($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
                    //Calculate horizontal scaling
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    39
                    $horiz_scale=$ratio*100.0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    40
                    //Set horizontal scaling
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    41
                    $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
    42
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    43
                else
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
                    //Calculate character spacing in points
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    46
                    $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
    47
                    //Set character spacing
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    48
                    $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
    49
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    50
                //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
    51
                $align='';
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    52
            }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    53
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    54
            //Pass on to Cell method
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    55
            $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
    56
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    57
            //Reset character spacing/horizontal scaling
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    58
            if ($fit)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    59
                $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
    60
        }
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
        //Cell with horizontal scaling only if necessary
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    63
        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
    64
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    65
            $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
    66
        }
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
        //Cell with horizontal scaling always
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    69
        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
    70
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    71
            $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
    72
        }
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
        //Cell with character spacing only if necessary
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    75
        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
    76
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    77
            $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
    78
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    79
    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    80
        //Cell with character spacing always
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    81
        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
    82
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    83
            //Same as calling CellFit directly
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    84
            $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
    85
        }
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
        //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
    88
        function MBGetStringLength($s)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    89
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    90
            if($this->CurrentFont['type']=='Type0')
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    91
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    92
                $len = 0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    93
                $nbbytes = strlen($s);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    94
                for ($i = 0; $i < $nbbytes; $i++)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    95
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    96
                    if (ord($s[$i])<128)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    97
                        $len++;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    98
                    else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
    99
                    {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   100
                        $len++;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   101
                        $i++;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   102
                    }
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
                return $len;
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
            else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   107
                return strlen($s);
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
        //*********************************************************************
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   110
        
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   111
        //Kopfzeile
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   112
        function Header()
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   113
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   114
            global $header;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   115
            //$this->Cell(20);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   116
            //Titel
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   117
            //Arial fett 15
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   118
            $this->SetFont('helvetica','BI',11);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   119
            $this->Cell(55,10,'Fritz-Haber-Institut',0,0,'L');
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   120
            $this->SetFont('helvetica','B',11);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   121
            $this->Cell(40,10,'Telefonverzeichnis',0,0,'L');
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   122
            if ($this->fancy && !$this->anzcol)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   123
            {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   124
                $this->SetTextColor(255,0,0);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   125
                $this->Cell(0,10,'(intern)',0,0,'L');
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   126
            }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   127
            else
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   128
                $this->Cell(0,10,' ',0,0,'L');
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   129
            //Logo
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   130
            $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
   131
            //Zeilenumbruch
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   132
            $this->Ln(16);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   133
            if ($this->fancy)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   134
            {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   135
                //Colors, line width and bold font
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   136
                $this->SetFont('helvetica','',8);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   137
                $this->SetFillColor(104,172,191);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   138
                $this->SetTextColor(0,0,102);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   139
                $this->SetDrawColor(255,255,255);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   140
                $this->SetLineWidth(.0);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   141
                $this->SetFont('','B');
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   142
                //Tabellen-Header immer im Kopf
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   143
//                $w=array(55,40,30,15,40);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   144
                for($i=0;$i<count($header);$i++)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   145
                    $this->Cell($this->wid[$i],5,$header[$i],1,0,'L',1);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   146
                $this->Ln();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   147
            }
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   148
        }
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
        //Fusszeile
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   151
        function Footer()
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
            //Position 1,5 cm von unten
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   154
            $this->SetY(-15);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   155
            //Arial kursiv 8
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   156
            $this->SetFont('Arial','I',8);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   157
            //Datum der Liste
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   158
            $heute = new DateTime();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   159
            $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
   160
            //Seitenzahl
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   161
            $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
   162
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   163
        //Colored table
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   164
        function FancyTable($header,$data)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   165
        {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   166
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   167
            //Colors, line width and bold font
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   168
            $this->SetFillColor(104,172,191);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   169
            $this->SetTextColor(0,0,102);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   170
            $this->SetDrawColor(255,255,255);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   171
            $this->SetLineWidth(.0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   172
            $this->SetFont('','B');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   173
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   174
            //Header notwendig fuer Tabelle, Hoehe = 0!
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   175
//            $w=array(55,40,30,15,40); // Breite der Zellen
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   176
            for($i=0;$i<count($header);$i++)
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   177
                $this->Cell($this->wid[$i],0,'',1,0,'L',1);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   178
            $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   179
            //Color and font restoration
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   180
//            $this->SetFillColor(222,222,222);
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   181
            $this->SetFillColor(249,249,249);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   182
            $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   183
            $this->SetFont('');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   184
            //Data
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   185
            $fill=0;
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   186
            $height = 4;
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   187
            $fill = !$fill;
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   188
//            $breite = ($pdf->w - $pdf->lMargin - $pdf->rMargin) / 3;
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   189
            foreach($data as $row)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   190
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   191
    			if ($row->persknr != $vpnr)
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
                    $fill=!$fill;
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   194
                    if (substr($row->name,0,1) != $vfirst)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   195
                    { 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   196
                        $this->SetFont('','B',9);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   197
                        $kap = strtoupper(substr($row->name,0,1));
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   198
//                        $this->Ln(5); //$this->AddPage();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   199
                        $this->CellFitScale(175,$height,$kap,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   200
                        $this->Ln();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   201
                        $this->SetFont('','',8);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   202
                    }
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   203
                    $titel = ($row->titel)? ", $row->titel" : "" ;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   204
                    $vname = ($row->vorname)? ", $row->vorname" : "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   205
                    $name = $row->name . $titel . $vname;
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   206
                    $this->CellFitScale($this->wid[0],$height,$name,0,0,'L',$fill);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   207
                    $this->CellFitScale($this->wid[1],$height,$row->abt_name,'LR',0,'L',$fill);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   208
                    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
   209
                    if (!$row->public) $this->SetTextColor(255,0,0); else $this->SetTextColor(0,0,136); 
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   210
                    $this->CellFitScale($this->wid[2],$height,$row->telefon_nr.$typ,'LR',0,'L',$fill);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   211
                    $this->SetTextColor(0);
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   212
                    $this->CellFitScale($this->wid[3],$height,$row->geb_ID . " " . $row->raum_nr,'LR',0,'L',$fill);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   213
                    $this->CellFitScale($this->wid[4],$height,$row->email,'LR',0,'L',$fill);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   214
                    $this->Ln();
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
                else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   217
                {
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   218
                    $this->Cell($this->wid[0],$height,'','LR',0,'L',$fill);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   219
                    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
   220
                    else $abt = '';    
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   221
                    $this->CellFitScale($this->wid[1],$height,$abt,'LR',0,'L',$fill);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   222
                    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
   223
                    if (!$row->public) $this->SetTextColor(255,0,0); else $this->SetTextColor(0,0,136); 
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   224
                    $this->CellFitScale($this->wid[2],$height,$row->telefon_nr.$typ,'LR',0,'L',$fill);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   225
                    $this->SetTextColor(0);
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   226
                    $this->CellFitScale($this->wid[3],$height,'','LR',0,'L',$fill);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   227
                    $this->Cell($this->wid[4],$height,'','LR',0,'L',$fill);
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   228
                    $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   229
                    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   230
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   231
                $vpnr = $row->persknr;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   232
                $vabt = $row->abt_name;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   233
                $vfirst = substr($row->name,0,1);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   234
            }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   235
        }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   236
        function FancyTableOldMySQL($header,$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
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   239
            //Colors, line width and bold font
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   240
            $this->SetFillColor(104,172,191);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   241
            $this->SetTextColor(0,0,102);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   242
            $this->SetDrawColor(255,255,255);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   243
            $this->SetLineWidth(.0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   244
            $this->SetFont('','B');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   245
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   246
            //Header notwendig fuer Tabelle, Hoehe = 0!
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   247
            $w=array(55,40,30,15,40);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   248
            for($i=0;$i<count($header);$i++)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   249
                $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
   250
            $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   251
            //Color and font restoration
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   252
//            $this->SetFillColor(222,222,222);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   253
            $this->SetFillColor(238,238,238);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   254
            $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   255
            $this->SetFont('');
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   256
            //Data
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   257
            $fill=0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   258
            $fill = !$fill;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   259
            while ($row = mysql_fetch_assoc($data)) 
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   260
            {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   261
    			if ($row["persknr"] != $vpnr)
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   262
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   263
                    $fill=!$fill;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   264
                    $titel = ($row["titel"])? ", ".$row["titel"]  : "" ;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   265
                    $vname = ($row["vorname"])? ",". $row["vorname"] : "";
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   266
                    $name = $row["name"] . $titel . $vname;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   267
                    $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
   268
                    $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
   269
                    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
   270
                    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
   271
                    $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
   272
                    $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   273
                    $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
   274
                    $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
   275
                    $this->Ln();
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
                else
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   278
                {
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   279
                    $newline = 0;
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   280
                    $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
   281
                    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
   282
                    else $abt = '';    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   283
                    $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
   284
                    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
   285
                    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
   286
                    $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
   287
                    $this->SetTextColor(0);
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   288
                    $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
   289
                    $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
   290
                    $this->Ln();
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   291
                    
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   292
                }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   293
                $vpnr = $row["persknr"];
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   294
                $vabt = $row["abt_name"];
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   295
            }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   296
        }
34
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   297
        function Normal($data)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   298
        {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   299
            $this->fancy = 1;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   300
            $w = array(55,40,35,40);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   301
            $this->SetFillColor(249,249,249);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   302
            $fill = 0;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   303
            $fill = !$fill;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   304
            foreach ($data as $row)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   305
            { 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   306
    			if ($row->persknr != $vpnr)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   307
                {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   308
                    if ($vpnr)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   309
                    {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   310
                        // ausgeben vorheriges Objekt
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   311
                        $tel = implode(", ",$atel); 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   312
                        $this->SetFont('times','',9);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   313
                        $this->CellFitScale($w[0],$this->height,$name,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   314
                        $this->CellFitScale($w[1],$this->height,$tel,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   315
                        $this->CellFitScale($w[2],$this->height,$abtort,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   316
                        $this->CellFitScale($w[3],$this->height,$mail,0,0,'L',$fill);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   317
                        $this->Ln();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   318
                    }                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   319
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   320
                    $fill=!$fill;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   321
                    if (substr($row->name,0,1) != $vfirst)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   322
                    { 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   323
                        $this->SetFont('','B',11);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   324
                        $kap = strtoupper(substr($row->name,0,1));
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   325
                        $this->CellFitScale(170,$this->height,$kap,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   326
                        $this->Ln();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   327
                        $this->SetFont('','',9);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   328
                    }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   329
                    $atel = array();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   330
                    $titel = ($row->titel)? ", ".$row->titel  : "" ;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   331
                    $vname = ($row->vorname)? " ". $row->vorname : "";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   332
                    $name = $row->name . $titel . $vname;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   333
                    $raum = ($row->raum_nr)? ", ".$row->raum_nr : "";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   334
                    $abtort = $row->abt_name . "   " . $row->geb_ID . $raum;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   335
                    $mail = $row->email;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   336
                    $fax =($row->telefon_typ == 'fax')? " FAX" : "";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   337
                    $atel[] = $row->telefon_nr . $fax;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   338
                }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   339
                else
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   340
                {            
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   341
                    $fax =($row->telefon_typ == 'fax')? " FAX" : "";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   342
                    $atel[] = $row->telefon_nr . $fax;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   343
                }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   344
                $vfirst = substr($row->name,0,1);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   345
                $vpnr = $row->persknr;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   346
            }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   347
            // ausgeben letztes Objekt
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   348
            $tel = implode(";",$atel); 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   349
            $this->SetFont('times','',9);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   350
            $this->CellFitScale($w[0],$this->height,$name,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   351
            $this->CellFitScale($w[1],$this->height,$tel,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   352
            $this->CellFitScale($w[2],$this->height,$abtort,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   353
            $this->CellFitScale($w[3],$this->height,$mail,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   354
       }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   355
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   356
// mehrere Spalten        
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   357
        function SetCol($col,$width)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   358
        {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   359
            // Move position to a column
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   360
            $this->col = $col;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   361
            $this->width = $width;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   362
//                echo "1x = " . $this->GetX() . ", col = $this->col" . ", width = $this->width<br />\n";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   363
            if ($this->xa <= $this->lMargin || ($this->anzcol == 3 && $this->xa <= $this->lMargin + $this->width + 5*$this->col))
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   364
                $this->xa = $this->lMargin + 5*$this->col + ($this->col*$this->width);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   365
            else $this->xa = $this->lMargin;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   366
//            $this->SetLeftMargin(25);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   367
            $this->SetX($this->xa);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   368
//                echo "2x = " . $this->GetX() . ", col = $this->col" . ", width = $this->width<br />\n";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   369
        }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   370
        
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   371
        function AcceptPageBreak()
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   372
        {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   373
            if (!$this->fancy) // nur bei mehrspaltiger Darstellung
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   374
            {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   375
                if ($this->GetY()+$this->height > $this->PageBreakTrigger)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   376
                    if($this->col < $this->anzcol-1)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   377
                    {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   378
                        // Go to next column
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   379
                        $this->SetCol($this->col+1,$this->width);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   380
                        $this->SetY($this->y0);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   381
                        $this->y = $this->y0;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   382
    //                echo "apb_x = " . $this->GetX() . ", col = $this->col" . ", width = $this->width<br />\n";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   383
                        return false;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   384
                    }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   385
                    else
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   386
                    {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   387
                        // Go back to first column and issue page break
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   388
                        $this->AddPage($this->CurOrientation);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   389
                        $this->SetCol(0,$this->width);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   390
                        $this->SetY($this->y0);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   391
                        $this->y = $this->y0;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   392
                        return true;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   393
                    }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   394
                else
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   395
                    return false;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   396
            }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   397
            else
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   398
	           return $this->AutoPageBreak;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   399
        }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   400
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   401
        function Small($data,$colwidth,$height)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   402
        {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   403
            $this->fancy = 0;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   404
            $this->y0 = $this->GetY();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   405
            $this->y = $this->y0;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   406
            $this->width = $colwidth;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   407
            $this->height = $height;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   408
            $this->SetFillColor(249,249,249);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   409
            $fill = 0;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   410
            $fill = !$fill;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   411
            foreach ($data as $row)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   412
            { 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   413
//                echo "3x = " . $this->GetX() . ", y = " . $this->GetY() . ", width = $colwidth<br />\n";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   414
                $fill=!$fill;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   415
                if (substr($row->name,0,1) != $vfirst)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   416
                { 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   417
                    $this->SetFont('','B',11);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   418
                    $kap = strtoupper(substr($row->name,0,1));
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   419
                    $this->SetX($this->xa);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   420
                    $this->CellFitScale($colwidth,$height,$kap,0,0,'L',$fill);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   421
                    $this->y = $this->y+$height;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   422
                    $this->SetY($this->y);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   423
                    $this->AcceptPageBreak();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   424
                }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   425
                $zeil1 = $row->name . ", " . $row->titel . " " . $row->vorname . " ";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   426
                $zeil2 = $row->abt_name . "   " . $row->geb_ID. " ". $row->raum_nr;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   427
                $zeil3 = $row->telefon_nr;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   428
                $this->SetFont('times','',9);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   429
                $this->SetX($this->xa);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   430
                if ($this->anzcol == 2)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   431
                    $this->CellFitScale($colwidth/2,$height,$zeil1,0,0,'L',$fill);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   432
                else                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   433
                    $this->CellFitScale($colwidth*0.75,$height,$zeil1,0,0,'L',$fill);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   434
                if ($this->anzcol == 2)
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   435
                {
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   436
                    $this->SetFont('','',8);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   437
                    $this->CellFitScale($colwidth/4,$height,$zeil2,0,0,'L',$fill); 
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   438
                }                   
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   439
                $this->SetFont('','',9);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   440
                $this->CellFitScale($colwidth/4,$height,$zeil3,0,0,'R',$fill);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   441
                $this->y = $this->y+$height;
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   442
                $this->SetY($this->y);                    
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   443
            
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   444
                $vfirst = substr($row->name,0,1);
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   445
                $this->AcceptPageBreak();
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   446
//                echo "4x = " . $this->GetX() . ", y = " . $this->GetY() . ", width = $colwidth<br />\n";
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   447
            }
fc60ef80a7ad + Telefonliste pdf: 4 Varianten
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents: 33
diff changeset
   448
        }
33
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   449
    }
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   450
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   451
f1a8785434e4 + MA-Telefon-Liste, Edit MA, Telefon
Bettina Schwarzer <schwarzer@fhi-berlin.mpg.de>
parents:
diff changeset
   452
?>