103 |
*/ |
*/ |
104 |
function pdferror() |
function pdferror() |
105 |
{ |
{ |
106 |
return $this->error; |
return $this->error; |
107 |
} |
} |
108 |
|
|
109 |
/** |
/** |
112 |
\return int 1=ok, 0=ko |
\return int 1=ok, 0=ko |
113 |
\remarks Variables utilisées |
\remarks Variables utilisées |
114 |
\remarks MAIN_INFO_SOCIETE_NOM |
\remarks MAIN_INFO_SOCIETE_NOM |
115 |
|
\remarks MAIN_INFO_ADRESSE |
116 |
|
\remarks MAIN_INFO_CP |
117 |
|
\remarks MAIN_INFO_VILLE |
118 |
|
\remarks MAIN_INFO_TEL |
119 |
|
\remarks MAIN_INFO_FAX |
120 |
|
\remarks MAIN_INFO_WEB |
121 |
\remarks MAIN_INFO_SIRET |
\remarks MAIN_INFO_SIRET |
122 |
\remarks MAIN_INFO_SIREN |
\remarks MAIN_INFO_SIREN |
123 |
\remarks MAIN_INFO_RCS |
\remarks MAIN_INFO_RCS |
124 |
\remarks MAIN_INFO_CAPITAL |
\remarks MAIN_INFO_CAPITAL |
125 |
\remarks MAIN_INFO_TVAINTRA |
\remarks MAIN_INFO_TVAINTRA |
126 |
\remarks FAC_PDF_LOGO |
\remarks MAIN_INFO_LOGO |
|
\remarks FACTURE_CHQ_NUMBER |
|
|
\remarks FACTURE_RIB_NUMBER |
|
|
\remarks FAC_PDF_INTITULE |
|
|
\remarks FAC_PDF_TEL |
|
|
\remarks FAC_PDF_ADRESSE |
|
127 |
*/ |
*/ |
128 |
function write_pdf_file($id) |
function write_pdf_file($id) |
129 |
{ |
{ |
571 |
*/ |
*/ |
572 |
function _pagehead(&$pdf, $prop) |
function _pagehead(&$pdf, $prop) |
573 |
{ |
{ |
574 |
global $langs,$conf; |
global $langs,$conf,$mysoc; |
575 |
|
|
576 |
$langs->load("main"); |
$langs->load("main"); |
577 |
$langs->load("bills"); |
$langs->load("bills"); |
586 |
$pdf->SetXY($this->marge_gauche,$posy); |
$pdf->SetXY($this->marge_gauche,$posy); |
587 |
|
|
588 |
// Logo |
// Logo |
589 |
if (defined("FAC_PDF_LOGO") && FAC_PDF_LOGO) |
$logo=$mysoc->logo; |
590 |
|
if (defined("FAC_PDF_LOGO") && FAC_PDF_LOGO) $logo=FAC_PDF_LOGO; |
591 |
|
if ($logo) |
592 |
{ |
{ |
593 |
if (is_readable(FAC_PDF_LOGO)) |
if (is_readable($logo)) |
594 |
{ |
{ |
595 |
$pdf->Image(FAC_PDF_LOGO, $this->marge_gauche, $posy, 0, 24); |
$pdf->Image($logo, $this->marge_gauche, $posy, 0, 24); |
596 |
} |
} |
597 |
else |
else |
598 |
{ |
{ |
599 |
$pdf->SetTextColor(200,0,0); |
$pdf->SetTextColor(200,0,0); |
600 |
$pdf->SetFont('Arial','B',8); |
$pdf->SetFont('Arial','B',8); |
601 |
$pdf->MultiCell(100, 3, $langs->trans("ErrorLogoFileNotFound",FAC_PDF_LOGO), 0, 'L'); |
$pdf->MultiCell(100, 3, $langs->trans("ErrorLogoFileNotFound",$logo), 0, 'L'); |
602 |
$pdf->MultiCell(100, 3, $langs->trans("ErrorGoToModuleSetup"), 0, 'L'); |
$pdf->MultiCell(100, 3, $langs->trans("ErrorGoToModuleSetup"), 0, 'L'); |
603 |
} |
} |
604 |
} |
} |
630 |
$pdf->MultiCell(82, $hautcadre, "", 0, 'R', 1); |
$pdf->MultiCell(82, $hautcadre, "", 0, 'R', 1); |
631 |
|
|
632 |
|
|
633 |
$pdf->SetXY($this->marge_gauche,$posy+3); |
$pdf->SetXY($this->marge_gauche+2,$posy+3); |
634 |
|
|
635 |
// Nom emetteur |
// Nom emetteur |
636 |
$pdf->SetTextColor(0,0,60); |
$pdf->SetTextColor(0,0,60); |
637 |
$pdf->SetFont('Arial','B',11); |
$pdf->SetFont('Arial','B',11); |
638 |
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'); |
639 |
{ |
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'); |
|
|
} |
|
640 |
|
|
641 |
// Caractéristiques emetteur |
// Caractéristiques emetteur |
642 |
$carac_emetteur = ''; |
$carac_emetteur = ''; |
643 |
if (defined("FAC_PDF_ADRESSE")) |
if (defined("FAC_PDF_ADRESSE") && FAC_PDF_ADRESSE) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).FAC_PDF_ADRESSE; |
644 |
{ |
else { |
645 |
$carac_emetteur .= ($carac_emetteur ? "\n" : '' ).FAC_PDF_ADRESSE; |
$carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$mysoc->adresse; |
646 |
|
$carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$mysoc->cp.' '.$mysoc->ville; |
647 |
} |
} |
648 |
$carac_emetteur .= "\n"; |
$carac_emetteur .= "\n"; |
649 |
if (defined("FAC_PDF_TEL") && FAC_PDF_TEL) |
// Tel |
650 |
{ |
if (defined("FAC_PDF_TEL") && FAC_PDF_TEL) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Phone").": ".FAC_PDF_TEL; |
651 |
$carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Phone").": ".FAC_PDF_TEL; |
elseif ($mysoc->tel) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Phone").": ".$mysoc->tel; |
652 |
} |
// Fax |
653 |
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; |
654 |
{ |
elseif ($mysoc->fax) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Fax").": ".$mysoc->fax; |
655 |
$carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Fax").": ".FAC_PDF_FAX; |
// EMail |
656 |
} |
if (defined("FAC_PDF_MEL") && FAC_PDF_MEL) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Email").": ".FAC_PDF_MEL; |
657 |
if (defined("FAC_PDF_MEL") && FAC_PDF_MEL) |
elseif ($mysoc->email) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Email").": ".$mysoc->email; |
658 |
{ |
// Web |
659 |
$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; |
660 |
} |
elseif ($mysoc->url) $carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Web").": ".$mysoc->url; |
661 |
if (defined("FAC_PDF_WWW") && FAC_PDF_WWW) |
|
|
{ |
|
|
$carac_emetteur .= ($carac_emetteur ? "\n" : '' ).$langs->trans("Web").": ".FAC_PDF_WWW; |
|
|
} |
|
662 |
$pdf->SetFont('Arial','',9); |
$pdf->SetFont('Arial','',9); |
663 |
$pdf->SetXY($this->marge_gauche+2,$posy+8); |
$pdf->SetXY($this->marge_gauche+2,$posy+8); |
664 |
$pdf->MultiCell(80,4, $carac_emetteur); |
$pdf->MultiCell(80,4, $carac_emetteur); |
684 |
$carac_client.="\n".$prop->client->cp . " " . $prop->client->ville."\n"; |
$carac_client.="\n".$prop->client->cp . " " . $prop->client->ville."\n"; |
685 |
if ($prop->client->tva_intra) $carac_client.="\n".$langs->trans("VATIntraShort").': '.$prop->client->tva_intra; |
if ($prop->client->tva_intra) $carac_client.="\n".$langs->trans("VATIntraShort").': '.$prop->client->tva_intra; |
686 |
$pdf->SetFont('Arial','',9); |
$pdf->SetFont('Arial','',9); |
687 |
$pdf->SetXY(102,$posy+7); |
$pdf->SetXY(102,$posy+8); |
688 |
$pdf->MultiCell(86,4, $carac_client); |
$pdf->MultiCell(86,4, $carac_client); |
689 |
|
|
690 |
// Montants exprimés en |
// Montants exprimés en |