Moved payment terms in documents for better view. Increased space for legal text.
[fa-stable.git] / reporting / includes / pdf_report.inc
index ffd0fe6bc371baf3a953787314e8abdf2299494e..944b4c28509d38ba5078e93ddbbd7a26e6d57d13 100644 (file)
@@ -1,9 +1,20 @@
 <?php
-/* $Revision$ */
-$page_security = 8;
-include_once($path_to_root . "reporting/includes/class.pdf.inc");
-include_once($path_to_root . "admin/db/company_db.inc");
-include_once($path_to_root . "config.php");
+/**********************************************************************
+    Copyright (C) FrontAccounting, LLC.
+       Released under the terms of the GNU General Public License, GPL, 
+       as published by the Free Software Foundation, either version 3 
+       of the License, or (at your option) any later version.
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
+    See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
+***********************************************************************/
+//include_once($path_to_root . "reporting/includes/class.pdf.inc");
+include_once(dirname(__FILE__)."/class.pdf.inc");
+include_once(dirname(__FILE__)."/printer_class.inc");
+include_once($path_to_root . "/admin/db/company_db.inc");
+include_once($path_to_root . "/admin/db/printers_db.inc");
+include_once($path_to_root . "/config.php");
 class FrontReport extends Cpdf
 {
        var $size;
@@ -21,7 +32,7 @@ class FrontReport extends Cpdf
        var $rightMargin;
        var $endLine;
        var $lineHeight;
-       var $rtl;
+       //var $rtl;
 
        var $cols;
        var $params;
@@ -34,13 +45,21 @@ class FrontReport extends Cpdf
        var $titleCol;
        var $pageNumber;
        var $fontSize;
+       var $oldFontSize;
        var $currency;
 
        function FrontReport($title, $filename, $size = 'A4', $fontsize = 9)
        {
+               global $page_security;
+               if (!$_SESSION["wa_current_user"]->can_access_page($page_security))
+               {
+                       display_error(_("The security settings on your account do not permit you to print this report"));
+                       end_page();
+                       exit;
+               }
                switch ($size)
                {
-
+                       default:
                  case 'A4':
                  case 'a4':
                          $this->pageWidth=595;
@@ -110,46 +129,33 @@ class FrontReport extends Cpdf
                }
                $this->size = array(0, 0, $this->pageWidth, $this->pageHeight);
                $this->title = $title;
-               $this->filename = $filename;
+               $this->filename = $filename.".pdf";
                $this->pageNumber = 0;
                $this->endLine = $this->pageWidth - $this->rightMargin;
                $this->companyCol = $this->endLine - 150;
                $this->titleCol = $this->leftMargin + 100;
                $this->lineHeight = 12;
                $this->fontSize = $fontsize;
+               $this->oldFontSize = 0;
+               $this->row = $this->pageHeight - $this->topMargin;
                $this->currency = '';
-               $this->rtl = ($_SESSION['language']->dir == 'rtl');
-               // for quick testing
-               //$this->rtl = true;
-               $this->Cpdf($this->size);
+               $rtl = ($_SESSION['language']->dir === 'rtl' ? 'rtl' : 'ltr');
+               $code = $_SESSION['language']->code;
+               $enc = strtoupper($_SESSION['language']->encoding);
+               // for the language array in class.pdf.inc
+               $l = array('a_meta_charset' => $enc, 'a_meta_dir' => $rtl, 'a_meta_language' => $code, 'w_page' => 'page');
+               $this->Cpdf($size, $l);
        }
 
        function Font($style = 'normal')
        {
-               global $path_to_root;
-               $own = false;
-               $locale = $path_to_root . "lang/" . $_SESSION['language']->code . "/locale.inc";
-               if (file_exists($locale))
-               {
-                       $fontinclude = true;
-                       include($locale);
-               }
-               if (!$own)
-               {
-                       if ($style == 'italic')
-                               $path = $path_to_root . 'reporting/fonts/Helvetica-Oblique.afm';
-                       elseif ($style == 'bold')
-                               $path = $path_to_root . 'reporting/fonts/Helvetica-Bold.afm';
-                       else // even take misspelled styles
-                               $path = $path_to_root . 'reporting/fonts/Helvetica.afm';
-               }
-               $this->selectFont($path, 'WinAnsiEncoding');
+               $this->selectFont("", $style);
        }
 
        function Info($params, $cols, $headers, $aligns,
                $cols2 = null, $headers2 = null, $aligns2 = null)
        {
-               global $app_title, $version, $power_by, $power_url, $path_to_root,      $db_connections;
+               global $app_title, $version, $power_by, $power_url;
 
                $this->addinfo('Title', $this->title);
                $this->addinfo('Subject', $this->title);
@@ -163,7 +169,6 @@ class FrontReport extends Cpdf
                $this->fiscal_year = sql2date($year['begin']) . " - " . sql2date($year['end']) . "  " . "(" . $how . ")";
                $this->company = get_company_prefs();
                $this->user = $_SESSION["wa_current_user"]->name;
-               //$this->host = $db_connections[$_SESSION["wa_current_user"]->company]["host"];
                $this->host = $_SERVER['SERVER_NAME'];
                $this->params = $params;
                $this->cols = $cols;
@@ -204,6 +209,8 @@ class FrontReport extends Cpdf
                $str = _("Print Out Date") . ':';
                $this->Text($this->leftMargin, $str, $this->titleCol);
                $str = Today() . '   ' . Now();
+               if ($this->company['time_zone'])
+                       $str .= ' ' . date('O') . ' GMT';
                $this->Text($this->titleCol, $str, $this->companyCol);
                $this->Text($this->companyCol, $this->host);
 
@@ -236,7 +243,7 @@ class FrontReport extends Cpdf
                        $this->Font();
                }
                $str = _("Page") . ' ' . $this->pageNumber;
-               $this->Text($this->endLine - 35, $str);
+               $this->Text($this->endLine - 38, $str);
                $this->Line($this->row - 5, 1);
 
                $this->row -= ($this->lineHeight + 6);
@@ -259,30 +266,28 @@ class FrontReport extends Cpdf
 
        function Header2($myrow, $branch, $sales_order, $bankaccount, $doctype)
        {
-               global $comp_path, $path_to_root, $print_as_quote, $print_invoice_no;
+               global $comp_path, $path_to_root, $print_as_quote, $print_invoice_no, $packing_slip;
 
                $this->pageNumber++;
                if ($this->pageNumber > 1)
                        $this->newPage();
                $header2type = true;
-               if ($this->currency != $myrow['curr_code'])
+               if (isset($myrow['curr_code']) && $this->currency != $myrow['curr_code'])
                {
-                       include($path_to_root . "reporting/includes/doctext2.inc");
+                       include($path_to_root . "/reporting/includes/doctext2.inc");
                }
                else
                {
-                       include($path_to_root . "reporting/includes/doctext.inc");
+                       include($path_to_root . "/reporting/includes/doctext.inc");
                }
 
-               include($path_to_root . "reporting/includes/header2.inc");
+               include($path_to_root . "/reporting/includes/header2.inc");
 
                $this->row = $temp;
        }
 
        function AddImage($logo, $x, $y, $w, $h)
        {
-               if ($this->rtl)
-                       $x = $this->pageWidth - $x - $w;
                if (strpos($logo, ".png") || strpos($logo, ".PNG"))
                        $this->addPngFromFile($logo, $x, $y, $w, $h);
                else
@@ -291,12 +296,12 @@ class FrontReport extends Cpdf
 
        function SetDrawColor($r, $g, $b)
        {
-               $this->setStrokeColor($r / 255, $g / 255, $b / 255);
+               $this->setStrokeColor($r, $g, $b);
        }
 
        function SetTextColor($r, $g, $b)
        {
-               $this->setColor($r / 255, $g / 255, $b / 255);
+               TCPDF::SetTextColor($r, $g, $b);
        }
 
        function Text($c, $txt, $n=0, $corr=0, $r=0)
@@ -309,14 +314,10 @@ class FrontReport extends Cpdf
 
        function TextWrap($xpos, $ypos, $len, $str, $align = 'left')
        {
-               if ($this->rtl)
+               if ($this->fontSize != $this->oldFontSize)
                {
-                       $str = strrev($str);
-                       $xpos = $this->pageWidth - $xpos - $len;
-                       if ($align == 'left')
-                               $align = 'right';
-                       elseif ($align == 'right')
-                               $align = 'left';
+                       $this->SetFontSize($this->fontSize);
+                       $this->oldFontSize = $this->fontSize;
                }
                return $this->addTextWrap($xpos, $ypos, $len, $this->fontSize, $str, $align);
        }
@@ -325,13 +326,31 @@ class FrontReport extends Cpdf
        {
                return $this->TextWrap($this->cols[$c], $this->row - $r, $this->cols[$n] - $this->cols[$c] + $corr, $txt, $this->aligns[$c]);
        }
+       
+       function AmountCol($c, $n, $txt, $dec=0, $corr=0, $r=0)
+       {
+               return $this->TextCol($c, $n, number_format2($txt, $dec), $corr, $r);
+       }
+
+       function DateCol($c, $n, $txt, $conv=false, $corr=0, $r=0)
+       {
+               if ($conv)
+                       $txt = sql2date($txt);
+               return $this->TextCol($c, $n, $txt, $corr, $r);
+       }
 
        function TextCol2($c, $n, $txt, $corr=0, $r=0)
        {
                return $this->TextWrap($this->cols2[$c], $this->row - $r, $this->cols2[$n] - $this->cols2[$c] + $corr, $txt, $this->aligns2[$c]);
        }
 
-       function TextColLines($c, $n, $txt, $corr=0)
+       function TextColLines($c, $n, $txt, $corr=0, $r=0)
+       {
+               $this->row -= $r;
+               $this->TextWrapLines($this->cols[$c], $this->cols[$n] - $this->cols[$c] + $corr, $txt, $this->aligns[$c]);
+       }
+
+       function TextWrapLines($c, $width, $txt, $align='left')
        {
                $str = Explode("\n", $txt);
                for ($i = 0; $i < count($str); $i++)
@@ -339,8 +358,8 @@ class FrontReport extends Cpdf
                        $l = $str[$i];
                        do
                        {
-                               $l = $this->TextCol($c, $n, $l, $corr);
-                               $this->NewLine();
+                               $l = $this->TextWrap($c, $this->row , $width, $l, $align);
+                               $this->row -= $this->lineHeight;
                        }
                        while ($l != '');
                }
@@ -360,23 +379,17 @@ class FrontReport extends Cpdf
        function NewLine($l=1, $np=0)
        {
                $this->row -= ($l * $this->lineHeight);
-               if ($np > 0 &&  $this->row < $this->bottomMargin + ($np * $this->lineHeight))
+               if ($this->row < $this->bottomMargin + ($np * $this->lineHeight))
                        $this->Header();
        }
 
        function End($email=0, $subject=null, $myrow=null, $doctype = 0)
        {
-               global $go_debug, $path_to_root, $comp_path;
-
-               // this is no good in IE so has been replaced, see down under
-               // but good for debugging purposes in IE
-               //session_write_close();
+               global $pdf_debug, $path_to_root, $comp_path;
 
-               if ($go_debug == 1)
+               if ($pdf_debug == 1)
                {
-                       $buf = $this->output(1);
-                       $len = strlen($buf);
-                       $pdfcode = $buf;
+                       $pdfcode = $this->Output('','S');
                        $pdfcode = str_replace("\n", "\n<br>", htmlspecialchars($pdfcode));
                        echo '<html><body>';
                        echo trim($pdfcode);
@@ -391,18 +404,20 @@ class FrontReport extends Cpdf
                }
                else
                {
-                       $buf = $this->output();
-                       $len = strlen($buf);
+
                        $dir =  $comp_path.'/'.user_company(). '/pdf_files';
                        //save the file
                        if (!file_exists($dir))
                        {
                                mkdir ($dir,0777);
                        }
-                       $fname = $dir . '/' . $this->filename;
-                       $fp = fopen($fname,'w');
-                       fwrite($fp,$buf);
-                       fclose($fp);
+                       // do not use standard filenames or your sensitive company data 
+                       // are world readable
+                       if ($email == 1)
+                               $fname = $dir.'/'.$this->filename;
+                       else    
+                               $fname = $dir.'/'.uniqid('').'.pdf';
+                       $this->Output($fname, 'F');
                        if ($email == 1)
                        {
                                $emailtype = true;
@@ -414,13 +429,14 @@ class FrontReport extends Cpdf
                                {
                                        include("doctext.inc");
                                }
-                               require_once($path_to_root . "reporting/includes/class.mail.inc");
+                               require_once($path_to_root . "/reporting/includes/class.mail.inc");
                        $mail = new email($this->company['coy_name'], $this->company['email']);
-                       $from = $this->company['coy_name'] . " <" . $this->company['email'] . ">";
+                               if (!isset($myrow['email']) || $myrow['email'] == '') 
+                                       $myrow['email'] = isset($myrow['contact_email']) ? $myrow['contact_email'] : '';
                        $to = $myrow['DebtorName'] . " <" . $myrow['email'] . ">";
-                       $msg = $doc_Dear_Sirs . ",\n\n" . $doc_AttachedFile . " " . $subject .
+                       $msg = $doc_Dear_Sirs . " " . $myrow['DebtorName'] . ",\n\n" . $doc_AttachedFile . " " . $subject .
                                "\n\n";
-                               if ($myrow['dimension_id'] > 0 && $doctype == 10) // helper for payment links
+                               if (isset($myrow['dimension_id']) && $myrow['dimension_id'] > 0 && $doctype == 10) // helper for payment links
                                {
                                        if ($myrow['dimension_id'] == 1)
                                        {
@@ -433,66 +449,73 @@ class FrontReport extends Cpdf
                                        }
                                }
                        $msg .= $doc_Kindest_regards . "\n\n";
-                       $sender = $this->user . "\n" . $this->company['coy_name'];
+                       $sender = $this->user . "\n" . $this->company['coy_name'] . "\n" . $this->company['postal_address'] . "\n" . $this->company['email'] . "\n" . $this->company['phone'];
                        $mail->to($to);
                        $mail->subject($subject);
                        $mail->text($msg . $sender);
                        $mail->attachment($fname);
                        $ret = $mail->send();
-                       if (1 == 1) // just for fun and for debugging purposes!!
-                       {
-                               $from = str_replace("<", "(", $from);
-                               $from = str_replace(">", ")", $from);
-                               $to = str_replace("<", "(", $to);
-                               $to = str_replace(">", ")", $to);
-                               $msg2 = "<br>From: " . $from;
-                               $msg2 .= "<br>To: " . $to;
-                               $msg2 .= "<br>Subject: " . $subject;
-                               $msg2 .= "<br>Msg: " . nl2br($msg);
-                               $msg2 .= nl2br($sender) . "<br>";
-                               $msg2 .= "<br>Filepath: " . $fname . "<br>Filename: " . $this->filename . "<br>";
-                       }
-                       if ($ret)
-                               $str = "<br>" . $this->title . " " . $myrow['reference'] . " " . _("sent to") . " ";
-                       else
-                               $str = "<br>" . $this->title . " " . $myrow['reference'] . " " . _("NOT sent to") . " ";
-                       $msg2 .= $str . $myrow['DebtorName'] . " - " . $myrow['email'];
-                       echo "<html><body>";
-                       echo $msg2;
-                       echo "</body></html>";
+                               if (!$ret)
+                                       display_error(_("Sending document by email failed"));
+                               else
+                                       display_notification($this->title . " " . $myrow['reference'] . " " 
+                                               . _("has been sent by email."));
+                               unlink($fname);         
                        }
                        else
                        {
-                               //echo '<html>
-                               //              <head>
-                               //                <SCRIPT LANGUAGE="JavaScript"><!--
-                               //            function go_now () { window.location.href = "'.$fname.'"; }
-                               //            //--></SCRIPT>
-                               //        </head>
-                               //        <body onLoad="go_now()"; >
-                               //          <a href="'.$fname.'">click here</a> if you are not re-directed.
-                               //        </body>
-                               //    </html>';
-                header('Content-type: application/pdf');
-                header("Content-Disposition: inline; filename=$this->filename");
-                header('Expires: 0');
-                header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
-                header('Pragma: public');
-                $this->stream();
-
+                               $printer = get_report_printer(user_print_profile(), $_POST['REP_ID']);
+                               if ($printer == false) {
+                                       if(in_ajax()) {
+                                               global $Ajax;
+
+                                               if (user_rep_popup()) 
+                                                       $Ajax->popup($fname); // when embeded pdf viewer used
+                                               else
+                                                       $Ajax->redirect($fname); // otherwise use faster method
+                                       } else {
+                                       //echo '<html>
+                                       //              <head>
+                                       //                <SCRIPT LANGUAGE="JavaScript"><!--
+                                       //            function go_now () { window.location.href = "'.$fname.'"; }
+                                       //            //--></SCRIPT>
+                                       //        </head>
+                                       //        <body onLoad="go_now()"; >
+                                       //          <a href="'.$fname.'">click here</a> if you are not re-directed.
+                                       //        </body>
+                                       //    </html>';
+                       header('Content-type: application/pdf');
+                   header("Content-Disposition: inline; filename=$this->filename");
+                       header('Expires: 0');
+                   header('Cache-Control: must-revalidate, post-check=0, pre-check=0');
+                       header('Pragma: public');
+
+                       $this->Stream();
+                                       }
+                               } else { // send report to network printer
+                                       $prn = new remote_printer($printer['queue'],$printer['host'],
+                                               $printer['port'], $printer['timeout']);
+                                       $error = $prn->print_file($fname);
+                                       if ($error)
+                                               display_error($error);
+                                       else
+                                               display_notification(_('Report has been sent to network printer ').$printer['name']);
+                               }
                        }
-                       // also have a look through the directory, and remove the files that are older than a week
-                       // rather want to save 'em
-                       /*if ($d = @opendir($dir)) {
+                       // first have a look through the directory, 
+                       // and remove old temporary pdfs
+                       if ($d = @opendir($dir)) {
                                while (($file = readdir($d)) !== false) {
-                                       // then check to see if this one is too old
+                                       if (!is_file($dir.'/'.$file) || $file == 'index.php') continue;
+                               // then check to see if this one is too old
                                        $ftime = filemtime($dir.'/'.$file);
-                                       if (time()-$ftime > 3600*24*7){
+                                // seems 3 min is enough for any report download, isn't it?
+                                       if (time()-$ftime > 180){
                                                unlink($dir.'/'.$file);
                                        }
                                }
                                closedir($d);
-                       }*/
+                       }
                }
        }
 }