dolibarr-dev
[Top][All Lists]
Advanced
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Dolibarr-dev] bug propal azur

From: Laurent Destailleur (Eldy)
Subject: Re: [Dolibarr-dev] bug propal azur
Date: Mon, 22 Aug 2005 02:16:37 +0200
User-agent: Mozilla Thunderbird 1.0.5 (Windows/20050711) 
Christophe wrote:


Le dimanche 21 août 2005 à 18:22 -0400, Christophe a écrit :

je joins en patch les modifs que j'ai apportées.

Elles comprennent :


J'ai oublié d'y inclure le marquage des lignes de tva non perçue
récupérable pour affichage différent.
Patch de remplacement joint.


Patch appliqué.


Désolé.


------------------------------------------------------------------------

--- dolibarrcvs/htdocs/includes/modules/propale/pdf_propale_azur.modules.php    
2005-08-21 16:54:54.000000000 -0400
+++ dolibarr/htdocs/includes/modules/propale/pdf_propale_azur.modules.php       
2005-08-21 18:26:56.000000000 -0400
@@ -205,7 +205,7 @@

                    // TVA
                    $pdf->SetXY ($this->posxtva, $curY);
-                    $pdf->MultiCell(10, 5, $prop->lignes[$i]->tva_tx, 0, 'C');
+                    $pdf->MultiCell(10, 5, ($prop->lignes[$i]->tva_tx < 0 ? 
'*':'').abs($prop->lignes[$i]->tva_tx), 0, 'C');

                    // Prix unitaire HT avant remise
                    $pdf->SetXY ($this->posxup, $curY);
@@ -231,7 +231,7 @@
                    // dans le tableau tva["taux"]=total_tva
                                        $tvaligne=$prop->lignes[$i]->price * 
$prop->lignes[$i]->qty;
                                        if ($prop->remise_percent) 
$tvaligne-=($tvaligne*$prop->remise_percent)/100;
-                                       $this->tva[ 
(string)$prop->lignes[$i]->tva_taux ] += $tvaligne;
+                                       $this->tva[ 
(string)$prop->lignes[$i]->tva_tx ] += $tvaligne;

                    if ($nexY > 200 && $i < $nblignes - 1)
                    {
@@ -403,7 +403,7 @@
        }

        // Tableau total
-        $col1x=120; $col2x=174;
+        $lltot = 200; $col1x = 120; $col2x = 182; $largcol2 = $lltot - $col2x;

        // Total HT
        $pdf->SetFillColor(256,256,256);
@@ -411,7 +411,7 @@
        $pdf->MultiCell($col2x-$col1x, $tab2_hl, $langs->trans("TotalHT"), 0, 
'L', 1);

        $pdf->SetXY ($col2x, $tab2_top + 0);
-        $pdf->MultiCell(26, $tab2_hl, price($prop->total_ht + $prop->remise), 
0, 'R', 1);
+        $pdf->MultiCell($largcol2, $tab2_hl, price($prop->total_ht + 
$prop->remise), 0, 'R', 1);

        // Remise globale
        if ($prop->remise > 0)
@@ -420,13 +420,13 @@
            $pdf->MultiCell($col2x-$col1x, $tab2_hl, 
$langs->trans("GlobalDiscount"), 0, 'L', 1);

            $pdf->SetXY ($col2x, $tab2_top + $tab2_hl);
-            $pdf->MultiCell(26, $tab2_hl, "-".$prop->remise_percent."%", 0, 
'R', 1);
+            $pdf->MultiCell($largcol2, $tab2_hl, 
"-".$prop->remise_percent."%", 0, 'R', 1);

            $pdf->SetXY ($col1x, $tab2_top + $tab2_hl * 2);
            $pdf->MultiCell($col2x-$col1x, $tab2_hl, "Total HT après remise", 
0, 'L', 1);

            $pdf->SetXY ($col2x, $tab2_top + $tab2_hl * 2);
-            $pdf->MultiCell(26, $tab2_hl, price($prop->total_ht), 0, 'R', 1);
+            $pdf->MultiCell($largcol2, $tab2_hl, price($prop->total_ht), 0, 
'R', 0);

            $index = 2;
        }
@@ -446,10 +446,11 @@
$index++; 
                $pdf->SetXY ($col1x, $tab2_top + $tab2_hl * $index);
-                $pdf->MultiCell($col2x-$col1x, $tab2_hl, 
$langs->trans("TotalVAT").' '.$tvakey.'%', 0, 'L', 1);
+ $tvacompl = ( (float)$tvakey < 0 ) ? " (".$langs->trans("NonPercuRecuperable").")" : '' ; + $pdf->MultiCell($col2x-$col1x, $tab2_hl, $langs->trans("TotalVAT").' '.abs($tvakey).'%'.$tvacompl, 0, 'L', 1); $pdf->SetXY ($col2x, $tab2_top + $tab2_hl * $index); 
-                $pdf->MultiCell(26, $tab2_hl, price($tvaval * (float)$tvakey / 
100 ), 0, 'R', 1);
+                $pdf->MultiCell($largcol2, $tab2_hl, price($tvaval * 
abs((float)$tvakey) / 100 ), 0, 'R', 1);
            }
        }
        if (! $atleastoneratenotnull)
@@ -459,7 +460,7 @@
            $pdf->MultiCell($col2x-$col1x, $tab2_hl, $langs->trans("TotalVAT"), 
0, 'L', 1);
$pdf->SetXY ($col2x, $tab2_top + $tab2_hl * $index); 
-            $pdf->MultiCell(26, $tab2_hl, price($prop->total_tva), 0, 'R', 1);
+            $pdf->MultiCell($largcol2, $tab2_hl, price($prop->total_tva), 0, 
'R', 1);
        }
$useborder=0; 
@@ -471,7 +472,7 @@
        $pdf->MultiCell($col2x-$col1x, $tab2_hl, $langs->trans("TotalTTC"), 
$useborder, 'L', 1);

        $pdf->SetXY ($col2x, $tab2_top + $tab2_hl * $index);
-        $pdf->MultiCell(26, $tab2_hl, price($prop->total_ttc), $useborder, 
'R', 1);
+        $pdf->MultiCell($largcol2, $tab2_hl, price($prop->total_ttc), 
$useborder, 'R', 1);
        $pdf->SetFont('Arial','', 9);
        $pdf->SetTextColor(0,0,0);

@@ -483,7 +484,7 @@
            $pdf->MultiCell($col2x-$col1x, $tab2_hl, 
$langs->trans("AlreadyPayed"), 0, 'L', 0);

            $pdf->SetXY ($col2x, $tab2_top + $tab2_hl * $index);
-            $pdf->MultiCell(26, $tab2_hl, price($deja_regle), 0, 'R', 0);
+            $pdf->MultiCell($largcol2, $tab2_hl, price($deja_regle), 0, 'R', 
0);

            $index++;
            $pdf->SetTextColor(0,0,60);
@@ -492,7 +493,7 @@
            $pdf->MultiCell($col2x-$col1x, $tab2_hl, 
$langs->trans("RemainderToPay"), $useborder, 'L', 1);

            $pdf->SetXY ($col2x, $tab2_top + $tab2_hl * $index);
-            $pdf->MultiCell(26, $tab2_hl, price($prop->total_ttc - 
$deja_regle), $useborder, 'R', 1);
+            $pdf->MultiCell($largcol2, $tab2_hl, price($prop->total_ttc - 
$deja_regle), $useborder, 'R', 1);
            $pdf->SetFont('Arial','', 9);
            $pdf->SetTextColor(0,0,0);
        }
@@ -591,6 +592,7 @@

        // Emetteur
        $posy=42;
+        $hautcadre=40;
        $pdf->SetTextColor(0,0,0);
        $pdf->SetFont('Arial','',8);
        $pdf->SetXY(10,$posy-5);
@@ -599,7 +601,7 @@

        $pdf->SetXY(10,$posy);
        $pdf->SetFillColor(230,230,230);
-        $pdf->MultiCell(82, 34, "", 0, 'R', 1);
+        $pdf->MultiCell(82, $hautcadre, "", 0, 'R', 1);


        $pdf->SetXY(10,$posy+3);
@@ -647,6 +649,10 @@
        $pdf->SetXY(102,$posy-5);
        $pdf->MultiCell(80,5, $langs->trans("BillTo").":");
                $prop->fetch_client();
+
+        // Cadre client destinataire
+        $pdf->rect(100, $posy, 100, $hautcadre);
+
                // Nom client
        $pdf->SetXY(102,$posy+3);
        $pdf->SetFont('Arial','B',11);
@@ -660,9 +666,6 @@
        $pdf->SetXY(102,$posy+7);
        $pdf->MultiCell(86,4, $carac_client);

-        // Cadre client destinataire
-        $pdf->rect(100, $posy, 100, 34);
-
        // Montants exprimés en
        $pdf->SetTextColor(0,0,0);
        $pdf->SetFont('Arial','',10);

------------------------------------------------------------------------

_______________________________________________
Dolibarr-dev mailing list
address@hidden
http://lists.nongnu.org/mailman/listinfo/dolibarr-dev



--
Laurent Destailleur.
---------------------------------------------------------------
EMail: address@hidden
Web: http://destailleur.fr
IM: IRC=Eldy, Jabber=Eldy

AWStats (Author) : http://awstats.sourceforge.net
Dolibarr (Contributor) : http//dolibarr.com
CVSChangeLogBuilder (Author) : http://cvschangelogb.sourceforge.net
AWBot (Author) : http://awbot.sourceforge.net
reply via email to
[Prev in Thread] Current Thread [Next in Thread]