[ Index ]
 

Code source de Dolibarr 2.0.1

Accédez au Source d'autres logiciels libres

Classes | Fonctions | Variables | Constantes | Tables

title

Body

[fermer]

/htdocs/includes/modules/facture/ -> pdf_huitre.modules.php (source)

   1  <?php
   2  /* Copyright (C) 2003      Rodolphe Quiedeville <rodolphe@quiedeville.org>
   3   * Copyright (C) 2004-2005 Laurent Destailleur  <eldy@users.sourceforge.net>
   4   *
   5   * This program is free software; you can redistribute it and/or modify
   6   * it under the terms of the GNU General Public License as published by
   7   * the Free Software Foundation; either version 2 of the License, or
   8   * (at your option) any later version.
   9   *
  10   * This program is distributed in the hope that it will be useful,
  11   * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12   * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13   * GNU General Public License for more details.
  14   *
  15   * You should have received a copy of the GNU General Public License
  16   * along with this program; if not, write to the Free Software
  17   * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18   * or see http://www.gnu.org/
  19   *
  20   * $Id: pdf_huitre.modules.php,v 1.4 2005/12/18 13:26:00 hregis Exp $
  21   * $Source: /cvsroot/dolibarr/dolibarr/htdocs/includes/modules/facture/pdf_huitre.modules.php,v $
  22   */
  23  
  24  /**
  25          \file       htdocs/includes/modules/facture/pdf_huitre.modules.php
  26          \ingroup    facture
  27          \brief      Fichier de la classe permettant de générer les factures au modèle Huitre
  28          \author        Laurent Destailleur
  29          \version    $Revision: 1.4 $
  30  */
  31  
  32  require_once (DOL_DOCUMENT_ROOT ."/includes/modules/facture/modules_facture.php");
  33  
  34  
  35  /**
  36          \class      pdf_huitre
  37          \brief      Classe permettant de générer les factures au modèle Huitre
  38  */
  39  
  40  class pdf_huitre extends ModelePDFFactures {
  41  
  42      /**        \brief  Constructeur
  43              \param    db        handler accès base de donnée
  44      */
  45      function pdf_huitre($db)
  46      {
  47          $this->db = $db;
  48          $this->description = "Modèle de facture avec remise et infos réglement";
  49  
  50          // Dimension page pour format A4
  51          $this->page_largeur = 210;
  52          $this->page_hauteur = 297;
  53          $this->format = array($this->page_largeur,$this->page_hauteur);
  54      }
  55  
  56     function write_pdf_file($facid)
  57      {
  58        global $user,$langs,$conf;
  59        
  60          $langs->load("main");
  61          $langs->load("bills");
  62          $langs->load("products");
  63  
  64          if ($conf->facture->dir_output)
  65          {
  66        $fac = new Facture($this->db,"",$facid);
  67        $fac->fetch($facid);
  68  
  69              $facref = sanitize_string($fac->ref);
  70              $dir = $conf->facture->dir_output . "/" . $facref;
  71              $file = $dir . "/" . $facref . ".pdf";
  72  
  73        if (! file_exists($dir))
  74          {
  75              if (create_exdir($dir) < 0)
  76              {
  77                  $this->error=$langs->trans("ErrorCanNotCreateDir",$dir);
  78                  return 0;
  79              }
  80          }
  81  
  82        if (file_exists($dir))
  83          {
  84            // Initialisation facture vierge
  85            $pdf=new FPDF('P','mm','A4');
  86            $pdf->Open();
  87            $pdf->AddPage();
  88  
  89            $this->_pagehead($pdf, $fac);
  90  
  91            $pdf->SetTitle($fac->ref);
  92            $pdf->SetSubject($langs->trans("Bill"));
  93            $pdf->SetCreator("Dolibarr (By ADYTEK)".DOL_VERSION);
  94            $pdf->SetAuthor($user->fullname);
  95            $pdf->SetMargins(10, 10, 10);
  96            $pdf->SetAutoPageBreak(1,0);
  97            $tab_top = 100;
  98            $tab_height = 110;
  99  
 100            $pdf->SetFillColor(242,239,119);
 101  
 102            $pdf->SetFont('Arial','', 9);
 103  
 104            $pdf->SetXY (10, $tab_top + 10 );
 105  
 106            $iniY = $pdf->GetY();
 107            $curY = $pdf->GetY();
 108            $nexY = $pdf->GetY();
 109            $nblignes = sizeof($fac->lignes);
 110  
 111                  // Boucle sur les lignes de factures
 112            for ($i = 0 ; $i < $nblignes ; $i++)
 113          {
 114            $curY = $nexY;
 115  
 116            $pdf->SetXY (11, $curY );
 117            $pdf->MultiCell(118, 5, $fac->lignes[$i]->desc, 0, 'J');
 118  
 119            $nexY = $pdf->GetY();
 120  
 121            $pdf->SetXY (133, $curY);
 122            $pdf->MultiCell(10, 5, $fac->lignes[$i]->tva_taux, 0, 'C');
 123  
 124            $pdf->SetXY (145, $curY);
 125            $pdf->MultiCell(10, 5, $fac->lignes[$i]->qty, 0, 'C');
 126  
 127            $pdf->SetXY (156, $curY);
 128            $pdf->MultiCell(18, 5, price($fac->lignes[$i]->price), 0, 'R', 0);
 129  
 130            $pdf->SetXY (174, $curY);
 131            $total = price($fac->lignes[$i]->price * $fac->lignes[$i]->qty);
 132            $pdf->MultiCell(26, 5, $total, 0, 'R', 0);
 133  
 134            if ($nexY > 200 && $i < $nblignes - 1)
 135              {
 136                $this->_tableau($pdf, $tab_top, $tab_height, $nexY);
 137                $pdf->AddPage();
 138                $nexY = $iniY;
 139                $this->_pagehead($pdf, $fac);
 140                $pdf->SetTextColor(0,0,0);
 141                $pdf->SetFont('Arial','', 10);
 142              }
 143  
 144          }
 145            $this->_tableau($pdf, $tab_top, $tab_height, $nexY);
 146  
 147            $this->_tableau_tot($pdf, $fac);
 148  
 149            $this->_tableau_compl($pdf, $fac);
 150  
 151            /*
 152             *
 153             */
 154            if (defined("FACTURE_RIB_NUMBER"))
 155          {
 156            if (FACTURE_RIB_NUMBER > 0)
 157              {
 158                $account = new Account($this->db);
 159                $account->fetch(FACTURE_RIB_NUMBER);
 160  
 161                $pdf->SetXY (10, 40);
 162                $pdf->SetFont('Arial','U',8);
 163                $pdf->MultiCell(40, 4, "Coordonnées bancaire", 0, 'L', 0);
 164                $pdf->SetFont('Arial','',8);
 165                $pdf->MultiCell(40, 4, "Code banque : " . $account->code_banque, 0, 'L', 0);
 166                $pdf->MultiCell(40, 4, "Code guichet : " . $account->code_guichet, 0, 'L', 0);
 167                $pdf->MultiCell(50, 4, "Numéro compte : " . $account->number, 0, 'L', 0);
 168                $pdf->MultiCell(40, 4, "Clé RIB : " . $account->cle_rib, 0, 'L', 0);
 169                $pdf->MultiCell(40, 4, "Domiciliation : " . $account->domiciliation, 0, 'L', 0);
 170                $pdf->MultiCell(40, 4, "Prefix IBAN : " . $account->iban_prefix, 0, 'L', 0);
 171                $pdf->MultiCell(40, 4, "BIC : " . $account->bic, 0, 'L', 0);
 172              }
 173          }
 174  
 175            /*
 176             *
 177             *
 178             */
 179  
 180  //        if ( $fac->note >0 )
 181  //        {
 182          $pdf->SetFont('Arial','',7);
 183            $pdf->SetXY(10, 211);
 184                   $note = "Note : ".$fac->note;
 185                   $pdf->MultiCell(110, 3, $note, 0, 'J');
 186  //     }
 187  
 188            $pdf->SetFont('Arial','U',11);
 189            $pdf->SetXY(10, 225);
 190            $titre = "Conditions de réglement : ".$fac->cond_reglement_facture;
 191            $pdf->MultiCell(190, 5, $titre, 0, 'J');
 192  
 193            $pdf->SetFont('Arial','',6);
 194            $pdf->SetXY(10, 265);
 195            $pdf->MultiCell(90, 2, "Par application de la loi 80.335 du 12/05/80", 0, 'J');
 196            $pdf->SetXY(10, 267);
 197            $pdf->MultiCell(90, 2, "les marchandises demeurent la propriété du", 0, 'J');
 198            $pdf->SetXY(10, 269);
 199            $pdf->MultiCell(90, 2, "vendeur jusqu'à complet encaissement de ", 0, 'J');
 200            $pdf->SetXY(10, 271);
 201            $pdf->MultiCell(90, 2, "leurs prix.", 0, 'J');
 202  
 203            $pdf->SetFont('Arial','',7);
 204            $pdf->SetXY(85, 271);
 205            $pdf->MultiCell(90, 3, "TVA acquittée sur les débits.", 0, 'J');
 206  
 207                $this->_pagefoot($pdf, $fac);
 208                $pdf->AliasNbPages();
 209      //----
 210        $pdf->SetTextColor(0,0,0);
 211        $pdf->SetFillColor(242,239,119);
 212      
 213        $pdf->SetLineWidth(0.5);
 214  
 215  
 216  
 217  
 218  
 219            $pdf->Close();
 220  
 221            $pdf->Output($file);
 222  
 223                  return 1;   // Pas d'erreur
 224          }
 225        else
 226          {
 227                  $this->error=$langs->trans("ErrorCanNotCreateDir",$dir);
 228                      return 0;
 229          }
 230      }
 231        else
 232      {
 233              $this->error=$langs->trans("ErrorConstantNotDefined","FAC_OUTPUTDIR");
 234              return 0;
 235      }
 236          $this->error=$langs->trans("ErrorUnknown");
 237          return 0;   // Erreur par defaut
 238      }
 239    /*
 240     *
 241     *
 242     *
 243     */
 244      function RoundedRect($x, $y, $w, $h,$r, $style = '')
 245      {
 246          $k = $this->k;
 247          $hp = $this->h;
 248          if($style=='F')
 249              $op='f';
 250          elseif($style=='FD' or $style=='DF')
 251              $op='B';
 252          else
 253              $op='S';
 254          $MyArc = 4/3 * (sqrt(2) - 1);
 255          $this->_out(sprintf('%.2f %.2f m',($x+$r)*$k,($hp-$y)*$k ));
 256          $xc = $x+$w-$r ;
 257          $yc = $y+$r;
 258          $this->_out(sprintf('%.2f %.2f l', $xc*$k,($hp-$y)*$k ));
 259  
 260          $this->_Arc($xc + $r*$MyArc, $yc - $r, $xc + $r, $yc - $r*$MyArc, $xc + $r, $yc);
 261          $xc = $x+$w-$r ;
 262          $yc = $y+$h-$r;
 263          $this->_out(sprintf('%.2f %.2f l',($x+$w)*$k,($hp-$yc)*$k));
 264          $this->_Arc($xc + $r, $yc + $r*$MyArc, $xc + $r*$MyArc, $yc + $r, $xc, $yc + $r);
 265          $xc = $x+$r ;
 266          $yc = $y+$h-$r;
 267          $this->_out(sprintf('%.2f %.2f l',$xc*$k,($hp-($y+$h))*$k));
 268          $this->_Arc($xc - $r*$MyArc, $yc + $r, $xc - $r, $yc + $r*$MyArc, $xc - $r, $yc);
 269          $xc = $x+$r ;
 270          $yc = $y+$r;
 271          $this->_out(sprintf('%.2f %.2f l',($x)*$k,($hp-$yc)*$k ));
 272          $this->_Arc($xc - $r, $yc - $r*$MyArc, $xc - $r*$MyArc, $yc - $r, $xc, $yc - $r);
 273          $this->_out($op);
 274      }
 275  
 276      function _Arc($x1, $y1, $x2, $y2, $x3, $y3)
 277      {
 278          $h = $this->h;
 279          $this->_out(sprintf('%.2f %.2f %.2f %.2f %.2f %.2f c ', $x1*$this->k, ($h-$y1)*$this->k,
 280              $x2*$this->k, ($h-$y2)*$this->k, $x3*$this->k, ($h-$y3)*$this->k));
 281      }
 282  ///////////////////////////////
 283    function _tableau_compl(&$pdf, $fac)
 284      {
 285        $tab3_top = 240;
 286        $tab3_height = 18;
 287        $tab3_width = 60;
 288        
 289        $pdf->Rect(10, $tab3_top, $tab3_width, $tab3_height);
 290  
 291        $pdf->line(10, $tab3_top + 6, $tab3_width+10, $tab3_top + 6 );
 292        $pdf->line(10, $tab3_top + 12, $tab3_width+10, $tab3_top + 12 );
 293        
 294        $pdf->line(40, $tab3_top, 40, $tab3_top + $tab3_height );
 295        
 296        $pdf->SetFont('Arial','',8);
 297        $pdf->SetXY (10, $tab3_top - 6);
 298        $pdf->MultiCell(60, 6, "Informations complémentaires", 0, 'L', 0);
 299        $pdf->SetXY (10, $tab3_top );
 300        $pdf->MultiCell(20, 6, "Réglé le", 0, 'L', 0);
 301        $pdf->SetXY (10, $tab3_top + 6);
 302        $pdf->MultiCell(60, 6, "Chèque/Virement N°", 0, 'L', 0);
 303        $pdf->SetXY (10, $tab3_top + 12);
 304        $pdf->MultiCell(20, 6, "Banque", 0, 'L', 0);
 305      }
 306  
 307      /*
 308      *   \brief      Affiche le total à payer
 309      *   \param      pdf         objet PDF
 310      *   \param      fac         objet facture
 311      */
 312      function _tableau_tot(&$pdf, $fac)
 313      {
 314          global $langs;
 315          $langs->load("main");
 316          $langs->load("bills");
 317          
 318        $tab2_top = 212;
 319        $tab2_hl = 5;
 320        $tab2_height = $tab2_hl * 4;
 321        $pdf->SetFont('Arial','', 9);
 322        
 323        //          $pdf->Rect(132, $tab2_top, 68, $tab2_height);
 324        //          $pdf->line(174, $tab2_top, 174, $tab2_top + $tab2_height);
 325        
 326        //          $pdf->line(132, $tab2_top + $tab2_height - 21, 200, $tab2_top + $tab2_height - 21 );
 327        //          $pdf->line(132, $tab2_top + $tab2_height - 14, 200, $tab2_top + $tab2_height - 14 );
 328        //          $pdf->line(132, $tab2_top + $tab2_height - 7, 200, $tab2_top + $tab2_height - 7 );
 329  
 330        $pdf->SetXY (132, $tab2_top + 0);
 331        $pdf->MultiCell(42, $tab2_hl, $langs->trans("TotalHT"), 0, 'R', 0);
 332  
 333        $pdf->SetXY (174, $tab2_top + 0);
 334        $pdf->MultiCell(26, $tab2_hl, price($fac->total_ht + $fac->remise), 0, 'R', 0);
 335  
 336        if ($fac->remise > 0)
 337      {
 338        $pdf->SetXY (132, $tab2_top + $tab2_hl);
 339        $pdf->MultiCell(42, $tab2_hl, $langs->trans("GlobalDiscount"), 0, 'R', 0);
 340  
 341        $pdf->SetXY (174, $tab2_top + $tab2_hl);
 342        $pdf->MultiCell(26, $tab2_hl, price($fac->remise), 0, 'R', 0);
 343  
 344        $pdf->SetXY (132, $tab2_top + $tab2_hl * 2);
 345        $pdf->MultiCell(42, $tab2_hl, "Total HT aprés remise", 0, 'R', 0);
 346  
 347        $pdf->SetXY (174, $tab2_top + $tab2_hl * 2);
 348        $pdf->MultiCell(26, $tab2_hl, price($fac->total_ht), 0, 'R', 0);
 349  
 350        $index = 3;
 351      }
 352        else
 353      {
 354        $index = 1;
 355      }
 356  
 357        $pdf->SetXY (132, $tab2_top + $tab2_hl * $index);
 358        $pdf->MultiCell(42, $tab2_hl, $langs->trans("TotalVAT"), 0, 'R', 0);
 359  
 360        $pdf->SetXY (174, $tab2_top + $tab2_hl * $index);
 361        $pdf->MultiCell(26, $tab2_hl, price($fac->total_tva), 0, 'R', 0);
 362              
 363        $pdf->SetXY (132, $tab2_top + $tab2_hl * ($index+1));
 364        $pdf->MultiCell(42, $tab2_hl, $langs->trans("TotalTTC"), 0, 'R', 1);
 365        
 366        $pdf->SetXY (174, $tab2_top + $tab2_hl * ($index+1));
 367        $pdf->MultiCell(26, $tab2_hl, price($fac->total_ttc), 0, 'R', 1);
 368  
 369        $deja_regle = $fac->getSommePaiement();
 370  
 371        if ($deja_regle > 0)
 372      {
 373        $pdf->SetXY (132, $tab2_top + $tab2_hl * ($index+2));
 374        $pdf->MultiCell(42, $tab2_hl, $langs->trans("AlreadyPayed"), 0, 'R', 0);
 375  
 376        $pdf->SetXY (174, $tab2_top + $tab2_hl * ($index+2));
 377        $pdf->MultiCell(26, $tab2_hl, price($deja_regle), 0, 'R', 0);
 378  
 379        $pdf->SetXY (132, $tab2_top + $tab2_hl * ($index+3));
 380        $pdf->MultiCell(42, $tab2_hl, $langs->trans("RemainderToPay"), 0, 'R', 1);
 381  
 382        $pdf->SetXY (174, $tab2_top + $tab2_hl * ($index+3));
 383        $pdf->MultiCell(26, $tab2_hl, price($fac->total_ttc - $deja_regle), 0, 'R', 1);
 384      }
 385      }
 386    /*
 387      *   \brief      Affiche la grille des lignes de factures
 388      *   \param      pdf     objet PDF
 389     */
 390    function _tableau(&$pdf, $tab_top, $tab_height, $nexY)
 391      {
 392          global $langs;
 393          $langs->load("main");
 394          $langs->load("bills");
 395        
 396        $pdf->SetFont('Arial','',10);
 397        
 398        $pdf->Text(11,$tab_top + 5,$langs->trans("Designation"));
 399  
 400        $pdf->line(132, $tab_top, 132, $tab_top + $tab_height);
 401        $pdf->Text(134,$tab_top + 5,$langs->trans("VAT"));
 402        
 403        $pdf->line(144, $tab_top, 144, $tab_top + $tab_height);
 404        $pdf->Text(147,$tab_top + 5,$langs->trans("Qty"));
 405  
 406        $pdf->line(156, $tab_top, 156, $tab_top + $tab_height);
 407        $pdf->Text(160,$tab_top + 5,$langs->trans("PriceU"));
 408  
 409        $pdf->line(174, $tab_top, 174, $tab_top + $tab_height);
 410        $pdf->Text(187,$tab_top + 5,$langs->trans("Total"));
 411        
 412        $pdf->Rect(10, $tab_top, 190, $tab_height);
 413        $pdf->line(10, $tab_top + 10, 200, $tab_top + 10 );
 414      }
 415  
 416      /*
 417      *   \brief      Affiche en-tête facture
 418      *   \param      pdf     objet PDF
 419      *   \param      fac     objet facture
 420      */
 421    function _pagehead(&$pdf, $fac)
 422      {
 423          global $langs,$conf;
 424          $langs->load("main");
 425          $langs->load("bills");
 426          $langs->load("companies");
 427  
 428        $tab4_top = 60;
 429        $tab4_hl = 6;
 430        $tab4_sl = 4;
 431        $ligne = 2;
 432  
 433          // Logo
 434          if (defined("FAC_PDF_LOGO") && FAC_PDF_LOGO) $logo=DOL_DATA_ROOT.FAC_PDF_LOGO;
 435          if ($logo)
 436          {
 437              if (is_readable($logo))
 438              {
 439                  $pdf->SetXY(10,5);
 440                  $pdf->Image($logo, 10, 5,45.0, 25.0);
 441              }
 442              else {
 443                  $pdf->SetTextColor(200,0,0);
 444                  $pdf->SetFont('Arial','B',8);
 445                  $pdf->MultiCell(80, 3, $langs->trans("ErrorLogoFileNotFound",$logo), 0, 'L');
 446                  $pdf->MultiCell(80, 3, $langs->trans("ErrorGoToModuleSetup"), 0, 'L');
 447              }
 448          }
 449          else if (defined("FAC_PDF_INTITULE"))
 450          {
 451              $pdf->MultiCell(80, 6, FAC_PDF_INTITULE, 0, 'L');
 452          }
 453  
 454        $pdf->SetDrawColor(192,192,192);
 455        $pdf->line(9, 5, 200, 5 );
 456        $pdf->line(9, 30, 200, 30 );
 457  
 458        $pdf->SetFont('Arial','B',7);
 459        $pdf->SetTextColor(128,128,128);
 460  
 461        if (defined("FAC_PDF_ADRESSE"))
 462        {
 463            $pdf->SetXY( $tab4_top , $tab4_hl );
 464          $pdf->MultiCell(80, 3, FAC_PDF_ADRESSE, '' , 'L');
 465        }
 466        $pdf->SetFont('Arial','',7);
 467        if (defined("FAC_PDF_TEL"))
 468        {
 469            $pdf->SetXY( $tab4_top , $tab4_hl + 2*$tab4_sl );
 470          $pdf->MultiCell(80, 3, "Téléphone : " . FAC_PDF_TEL, '' , 'L');
 471        }
 472        if (defined("FAC_PDF_FAX"))
 473        {
 474            $pdf->SetXY( $tab4_top , $tab4_hl + 3*$tab4_sl );
 475          $pdf->MultiCell(80, 3, "Télécopie : " . FAC_PDF_FAX, '' , 'L');
 476        }
 477        if (defined("FAC_PDF_MEL"))
 478        {
 479            $pdf->SetXY( $tab4_top , $tab4_hl + 4*$tab4_sl );
 480          $pdf->MultiCell(80, 3, "E-mail : " . FAC_PDF_MEL, '' , 'L');
 481        }
 482        if (defined("FAC_PDF_WWW"))
 483        {
 484            $pdf->SetXY( $tab4_top , $tab4_hl + 5*$tab4_sl );
 485          $pdf->MultiCell(80, 3, "Internet : " . FAC_PDF_WWW, '' , 'L');
 486        }
 487        $pdf->SetTextColor(70,70,170);
 488  
 489  
 490         /*
 491         * Definition du document
 492         */
 493        $pdf->SetXY(10,50);
 494        $pdf->SetFont('Arial','B',16);
 495        $pdf->SetTextColor(0,0,200);
 496        $pdf->MultiCell(50, 8, "FACTURE", '' , 'C');
 497       /*
 498         * Adresse Client
 499         */
 500        $pdf->SetTextColor(0,0,0);
 501        $pdf->SetFillColor(242,239,119);
 502      
 503  //      $this->RoundedRect(100, 40, 100, 40, 3, 'F');
 504        $pdf->rect(100, 40, 100, 40, 'F');
 505        $pdf->SetFont('Arial','B',12);
 506        $fac->fetch_client();
 507        $pdf->SetXY(102,42);
 508        $pdf->MultiCell(96,5, $fac->client->nom, 0, 'C');
 509        $pdf->SetFont('Arial','B',11);
 510        $pdf->SetXY(102,50);
 511        $pdf->MultiCell(96,5, $fac->client->adresse . "\n\n" . $fac->client->cp . " " . $fac->client->ville ,  0, 'C');
 512  
 513  
 514  
 515  
 516        $pdf->SetTextColor(200,0,0);
 517        $pdf->SetFont('Arial','B',14);
 518        $pdf->Text(11, 88, "Date");
 519        $pdf->Text(35, 88, ": " . strftime("%d %b %Y", $fac->date));
 520        $pdf->Text(11, 94, "Numéro");
 521        $pdf->Text(35, 94, ": ".$fac->ref);
 522        /*
 523         */
 524        $pdf->line(200, 94, 205, 94 );
 525        $pdf->SetTextColor(0,0,0);
 526        $pdf->SetFont('Arial','',10);
 527          $titre = $langs->trans("AmountInCurrency",$langs->trans("Currency".$conf->monnaie));
 528          $pdf->Text(200 - $pdf->GetStringWidth($titre), 94, $titre);
 529        /*
 530         */
 531  
 532      }
 533  
 534    /*
 535      *   \brief      Affiche le pied de page de la facture
 536      *   \param      pdf     objet PDF
 537      *   \param      fac     objet facture
 538     */
 539     function _pagefoot(&$pdf, $fac)
 540  {
 541          global $langs, $conf;
 542          $langs->load("main");
 543          $langs->load("bills");
 544          $langs->load("companies");
 545  
 546          $footy=13;
 547          $pdf->SetFont('Arial','',8);
 548  
 549          $ligne="";
 550          if (defined('MAIN_INFO_CAPITAL') && MAIN_INFO_CAPITAL) {
 551              $ligne="SARL au Capital de " . MAIN_INFO_CAPITAL." ".$langs->trans("Currency".$conf->monnaie);
 552          }
 553          if (defined('MAIN_INFO_SIREN') && MAIN_INFO_SIREN) {
 554              $ligne.=($ligne?" - ":"").$langs->transcountry("ProfId1",$this->code_pays).": ".MAIN_INFO_SIREN;
 555          }
 556          if (defined('MAIN_INFO_SIRET') && MAIN_INFO_SIRET) {
 557              $ligne.=($ligne?" - ":"").$langs->transcountry("ProfId2",$this->code_pays).": ".MAIN_INFO_SIRET;
 558          }
 559          if (defined('MAIN_INFO_RCS') && MAIN_INFO_RCS) {
 560              $ligne.=($ligne?" - ":"").$langs->transcountry("ProfId4",$this->code_pays).": ".MAIN_INFO_RCS;
 561          }
 562          if ($ligne) {
 563              $pdf->SetY(-$footy);
 564              $pdf->MultiCell(190, 3, $ligne, 0, 'C');
 565              $footy-=3;
 566          }
 567  
 568          // Affiche le numéro de TVA intracommunautaire
 569          if (MAIN_INFO_TVAINTRA == 'MAIN_INFO_TVAINTRA') {
 570              $pdf->SetY(-$footy);
 571              $pdf->SetTextColor(200,0,0);
 572              $pdf->SetFont('Arial','B',8);
 573              $pdf->MultiCell(190, 3, $langs->trans("ErrorVATIntraNotConfigured"),0,'L',0);
 574              $pdf->MultiCell(190, 3, $langs->trans("ErrorGoToGlobalSetup"),0,'L',0);
 575              $pdf->SetTextColor(0,0,0);
 576          }
 577          elseif (MAIN_INFO_TVAINTRA != '') {
 578              $pdf->SetY(-$footy);
 579              $pdf->MultiCell(190, 3,  $langs->trans("TVAIntra")." : ".MAIN_INFO_TVAINTRA, 0, 'C');
 580          }
 581  
 582      $pdf->SetXY(-10,-10);
 583      $pdf->MultiCell(10, 3, $pdf->PageNo().'/{nb}', 0, 'R');
 584  
 585  }
 586  
 587  }
 588  
 589  ?>


Généré le : Mon Nov 26 12:29:37 2007 par Balluche grâce à PHPXref 0.7
  Clicky Web Analytics