/[dolibarr]/dolibarr/htdocs/includes/modules/facture/pdf_crabe.modules.php
ViewVC logotype

Diff of /dolibarr/htdocs/includes/modules/facture/pdf_crabe.modules.php

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.67 by eldy, Fri Nov 11 20:11:58 2005 UTC revision 1.68 by eldy, Sun Nov 13 01:46:25 2005 UTC
# Line 105  class pdf_crabe extends ModelePDFFacture Line 105  class pdf_crabe extends ModelePDFFacture
105                  \return     int     1=ok, 0=ko                  \return     int     1=ok, 0=ko
106              \remarks    Variables utilisées              \remarks    Variables utilisées
107                  \remarks    MAIN_INFO_SOCIETE_NOM                  \remarks    MAIN_INFO_SOCIETE_NOM
108                    \remarks    MAIN_INFO_ADRESSE
109                    \remarks    MAIN_INFO_CP
110                    \remarks    MAIN_INFO_VILLE
111                    \remarks    MAIN_INFO_TEL
112                    \remarks    MAIN_INFO_FAX
113                    \remarks    MAIN_INFO_WEB
114                  \remarks    MAIN_INFO_SIRET                  \remarks    MAIN_INFO_SIRET
115                  \remarks    MAIN_INFO_SIREN                  \remarks    MAIN_INFO_SIREN
116                  \remarks    MAIN_INFO_RCS                  \remarks    MAIN_INFO_RCS
117                  \remarks    MAIN_INFO_CAPITAL                  \remarks    MAIN_INFO_CAPITAL
118                  \remarks    MAIN_INFO_TVAINTRA                  \remarks    MAIN_INFO_TVAINTRA
119              \remarks    FAC_PDF_LOGO              \remarks    MAIN_INFO_LOGO
120                  \remarks    FACTURE_CHQ_NUMBER                  \remarks    FACTURE_CHQ_NUMBER
121                  \remarks    FACTURE_RIB_NUMBER                  \remarks    FACTURE_RIB_NUMBER
                 \remarks    FAC_PDF_INTITULE  
                 \remarks    FAC_PDF_TEL  
                 \remarks    FAC_PDF_ADRESSE  
122      */      */
123      function write_pdf_file($id)      function write_pdf_file($id)
124      {      {
# Line 665  class pdf_crabe extends ModelePDFFacture Line 668  class pdf_crabe extends ModelePDFFacture
668       */       */
669      function _pagehead(&$pdf, $fac)      function _pagehead(&$pdf, $fac)
670      {      {
671          global $langs,$conf;          global $langs,$conf,$mysoc;
672            
673          $langs->load("main");          $langs->load("main");
674          $langs->load("bills");          $langs->load("bills");
675          $langs->load("propal");          $langs->load("propal");
# Line 679  class pdf_crabe extends ModelePDFFacture Line 683  class pdf_crabe extends ModelePDFFacture
683          $pdf->SetXY($this->marge_gauche,$posy);          $pdf->SetXY($this->marge_gauche,$posy);
684    
685                  // Logo                  // Logo
686          if (defined("FAC_PDF_LOGO") && FAC_PDF_LOGO)          $logo=$mysoc->logo;
687            if (defined("FAC_PDF_LOGO") && FAC_PDF_LOGO) $logo=FAC_PDF_LOGO;
688            if ($logo)
689          {          {
690              if (is_readable(FAC_PDF_LOGO))              if (is_readable($logo))
691                          {                          {
692                  $pdf->Image(FAC_PDF_LOGO, $this->marge_gauche, $posy, 0, 24);                  $pdf->Image($logo, $this->marge_gauche, $posy, 0, 24);
693              }              }
694              else              else
695                          {                          {
696                  $pdf->SetTextColor(200,0,0);                  $pdf->SetTextColor(200,0,0);
697                  $pdf->SetFont('Arial','B',8);                  $pdf->SetFont('Arial','B',8);
698                  $pdf->MultiCell(100, 3, $langs->trans("ErrorLogoFileNotFound",FAC_PDF_LOGO), 0, 'L');                  $pdf->MultiCell(100, 3, $langs->trans("ErrorLogoFileNotFound",$logo), 0, 'L');
699                  $pdf->MultiCell(100, 3, $langs->trans("ErrorGoToModuleSetup"), 0, 'L');                  $pdf->MultiCell(100, 3, $langs->trans("ErrorGoToModuleSetup"), 0, 'L');
700              }              }
701          }          }
# Line 721  class pdf_crabe extends ModelePDFFacture Line 727  class pdf_crabe extends ModelePDFFacture
727          $pdf->MultiCell(82, $hautcadre, "", 0, 'R', 1);          $pdf->MultiCell(82, $hautcadre, "", 0, 'R', 1);
728    
729    
730          $pdf->SetXY($this->marge_gauche,$posy+3);          $pdf->SetXY($this->marge_gauche+2,$posy+3);
731    
732          // Nom emetteur          // Nom emetteur
733          $pdf->SetTextColor(0,0,60);          $pdf->SetTextColor(0,0,60);
734          $pdf->SetFont('Arial','B',11);          $pdf->SetFont('Arial','B',11);
735          if (defined("FAC_PDF_SOCIETE_NOM") && FAC_PDF_SOCIETE_NOM)  // Prioritaire sur MAIN_INFO_SOCIETE_NOM          if (defined("FAC_PDF_SOCIETE_NOM") && FAC_PDF_SOCIETE_NOM) $pdf->MultiCell(80, 4, FAC_PDF_SOCIETE_NOM, 0, 'L');
736          {          else $pdf->MultiCell(80, 4, $mysoc->nom, 0, 'L');
             $pdf->MultiCell(80, 4, FAC_PDF_SOCIETE_NOM, 0, 'L');  
         }  
         else                                                        // Par defaut  
         {  
             $pdf->MultiCell(80, 4, MAIN_INFO_SOCIETE_NOM, 0, 'L');  
         }  
737    
738          // Caractéristiques emetteur          // Caractéristiques emetteur
739          $carac_emetteur = '';          $carac_emetteur = '';
740          if (defined("FAC_PDF_ADRESSE"))          if (defined("FAC_PDF_ADRESSE") && FAC_PDF_ADRESSE) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).FAC_PDF_ADRESSE;
741          {          else {
742              $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).FAC_PDF_ADRESSE;              $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$mysoc->adresse;
743                $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$mysoc->cp.' '.$mysoc->ville;
744          }          }
745          $carac_emetteur .= "\n";          $carac_emetteur .= "\n";
746          if (defined("FAC_PDF_TEL") && FAC_PDF_TEL)          // Tel
747          {          if (defined("FAC_PDF_TEL") && FAC_PDF_TEL) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Phone").": ".FAC_PDF_TEL;
748              $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Phone").": ".FAC_PDF_TEL;          elseif ($mysoc->tel) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Phone").": ".$mysoc->tel;
749          }          // Fax
750          if (defined("FAC_PDF_FAX") && FAC_PDF_FAX)          if (defined("FAC_PDF_FAX") && FAC_PDF_FAX) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Fax").": ".FAC_PDF_FAX;
751          {          elseif ($mysoc->fax) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Fax").": ".$mysoc->fax;
752              $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Fax").": ".FAC_PDF_FAX;          // EMail
753          }                  if (defined("FAC_PDF_MEL") && FAC_PDF_MEL) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Email").": ".FAC_PDF_MEL;
754                  if (defined("FAC_PDF_MEL") && FAC_PDF_MEL)          elseif ($mysoc->email) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Email").": ".$mysoc->email;
755                  {          // Web
756                          $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Email").": ".FAC_PDF_MEL;                  if (defined("FAC_PDF_WWW") && FAC_PDF_WWW) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Web").": ".FAC_PDF_WWW;
757                  }          elseif ($mysoc->url) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Web").": ".$mysoc->url;
758                  if (defined("FAC_PDF_WWW") && FAC_PDF_WWW)  
                 {  
                         $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Web").": ".FAC_PDF_WWW;  
                 }  
759          $pdf->SetFont('Arial','',9);          $pdf->SetFont('Arial','',9);
760          $pdf->SetXY($this->marge_gauche+2,$posy+8);          $pdf->SetXY($this->marge_gauche+2,$posy+8);
761          $pdf->MultiCell(80,4, $carac_emetteur);          $pdf->MultiCell(80,4, $carac_emetteur);
# Line 782  class pdf_crabe extends ModelePDFFacture Line 780  class pdf_crabe extends ModelePDFFacture
780          $carac_client.="\n".$fac->client->cp . " " . $fac->client->ville."\n";          $carac_client.="\n".$fac->client->cp . " " . $fac->client->ville."\n";
781          if ($fac->client->tva_intra) $carac_client.="\n".$langs->trans("VATIntraShort").': '.$fac->client->tva_intra;          if ($fac->client->tva_intra) $carac_client.="\n".$langs->trans("VATIntraShort").': '.$fac->client->tva_intra;
782          $pdf->SetFont('Arial','',9);          $pdf->SetFont('Arial','',9);
783          $pdf->SetXY(102,$posy+7);          $pdf->SetXY(102,$posy+8);
784          $pdf->MultiCell(86,4, $carac_client);          $pdf->MultiCell(86,4, $carac_client);
785    
786          // Montants exprimés en          // Montants exprimés en

Legend:
Removed from v.1.67  
changed lines
  Added in v.1.68

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26