php 8. cannot generate recurring invoices after upgrade to 2.4.12. Fixed.
[fa-stable.git] / reporting / includes / reporting.inc
index 183b59740c76056ab4fc6a8c3944369b28ae20e1..4bcdad8397257c95ac4e3b6eeaf6f9d32839fcb5 100644 (file)
 <?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>.
+***********************************************************************/
+// Link to printing single document with bulk report template file.
+// Ex. label_cell(print_document_link($myrow['order_no'], _("Print")), $type);
+// or display_note(print_document_link($order_no, _("Print this order")));
+// You only need full parameter list for invoices/credit notes
 
-// Put this on the page only once, e.g. print_hidden_script(systypes::sales_order());
-
-function print_hidden_script($type_no)
+function print_document_link($doc_no, $link_text, $link, $type_no, 
+       $icon=false, $class='printlink', $id='', $email=0, $extra=0)
 {
        global $path_to_root;
        include_once($path_to_root . "/includes/types.inc");
-       $action = "";
+
+       $url = $path_to_root.'/reporting/prn_redirect.php?';
+       $def_orientation = (user_def_print_orientation() == 1 ? 1 : 0);
 
        switch ($type_no)
        {
-               case systypes::sales_order() :
-                       $action = "$path_to_root/reporting/rep109.php";
+               case ST_SALESQUOTE :
+                       $rep = 111;
+                       // from, to, currency, email, comments, orientation
                        $ar = array(
-                               'PARAM_0' => 0,         // from - these values are updated in print_document_link()
-                               'PARAM_1' => 0,         // to
-                               'PARAM_2' => "",        // currency
-                               'PARAM_3' => "",        // bank account
-                               'PARAM_4' => 0,         // email
-                               'PARAM_5' => 0,         // quote
-                               'PARAM_6' => "");       // comments
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => '', 
+                               'PARAM_3' => $email, 
+                               'PARAM_4' => '',
+                               'PARAM_5' => $def_orientation);
                        break;
-               case systypes::cust_dispatch() :
-                       $action = "$path_to_root/reporting/rep110.php";
+               case ST_SALESORDER :
+                       $rep = 109;
+                       // from, to, currency, email, quote, comments, orientation
                        $ar = array(
-                               'PARAM_0' => 0,         // from - these values are updated in print_document_link()
-                               'PARAM_1' => 0,         // to
-                               'PARAM_2' => 0,         // email
-                               'PARAM_3' => "");       // comments
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => '', 
+                               'PARAM_3' => $email, 
+                               'PARAM_4' => 0, 
+                               'PARAM_5' => '',
+                               'PARAM_6' => $def_orientation);
                        break;
-               case 10 : // Sales Invoice
-               case 11 : // Customer Credit Note
-                       $action = "$path_to_root/reporting/rep107.php";
+               case ST_CUSTDELIVERY :
+                       $rep = 110;
+                       // from, to, email, packing slip, comments, orientation
                        $ar = array(
-                               'PARAM_0' => 0,         // from - these values are updated in print_document_link()
-                               'PARAM_1' => 0,         // to
-                               'PARAM_2' => "",        // currency
-                               'PARAM_3' => "",        // bank account
-                               'PARAM_4' => 0,         // email
-                               'PARAM_5' => "",        // paylink
-                               'PARAM_6' => "");       // comments
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => $email,
+                               'PARAM_3' => $extra,
+                               'PARAM_4' => '',
+                               'PARAM_5' => $def_orientation);
                        break;
-               case systypes::po() :
-                       $action = "$path_to_root/reporting/rep209.php";
+               case ST_SALESINVOICE : // Sales Invoice
+               case ST_CUSTCREDIT : // Customer Credit Note
+                       $rep = $type_no==ST_CUSTCREDIT ? 113 : 107;
+                       // from, to, currency, email, paylink, comments, orientation
                        $ar = array(
-                               'PARAM_0' => 0,         // from - these values are updated in print_document_link()
-                               'PARAM_1' => 0,         // to
-                               'PARAM_2' => "",        // currency
-                               'PARAM_3' => "",        // bank account
-                               'PARAM_4' => 0,         // email
-                               'PARAM_5' => "");       // comments
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => '', 
+                               'PARAM_3' => $email, 
+                               'PARAM_4' => '',
+                               'PARAM_5' => '', 
+                               'PARAM_6' => $rep == 107 ? '' : $def_orientation);
+                       if ($rep == 107)
+                               $ar['PARAM_7'] = $def_orientation;
                        break;
+               case ST_PURCHORDER :
+                       $rep = 209;
+                       // from, to, currency, email, comments, orientation
+                       $ar = array(
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => '', 
+                               'PARAM_3' => $email, 
+                               'PARAM_4' => '',
+                               'PARAM_5' => $def_orientation);
+                       break;
+               case ST_CUSTPAYMENT :
+                       $rep = 112;
+                       // from, to, currency, comments, orientation
+                       $ar = array(
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => '', 
+                               'PARAM_3' => $email,
+                               'PARAM_4' => '',
+                               'PARAM_5' => $def_orientation);
+                       break;
+               case ST_SUPPAYMENT :
+                       $rep = 210;
+                       // from, to, currency, email, comments, orientation
+                       $ar = array(
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => '', 
+                               'PARAM_3' => $email, 
+                               'PARAM_4' => '',
+                               'PARAM_5' => $def_orientation);
+                       break;
+               case ST_WORKORDER :
+                       $rep = 409;
+                       // from, to, email, comments, orientation
+                       $ar = array(
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => $email, 
+                               'PARAM_3' => '', 
+                               'PARAM_4' => $def_orientation);
+                       break;
+               case ST_DIMENSION :
+                       $rep = 501;
+                       // from, to, email, comments, orientation
+                       $ar = array(
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => 1, 
+                               'PARAM_3' => '', 
+                               'PARAM_4' => $def_orientation);
+                       break;
+               default:
+                       return null;
        }
-       $st = "<form method='post' name='pdf_form' action='$action'>";
-       foreach ($ar as $key => $value)
-       {
-               $st .= "<input type='hidden' name='$key' value='$value' />";
-       }
-       $st .= "</form>\n";
-       $st .= "<script type='text/javascript'>
-<!--
-function printDocument(docno) {
-  document.pdf_form.PARAM_0.value = document.pdf_form.PARAM_1.value = docno;
-  window.open('','REP_WINDOW','toolbar=no,scrollbar=no,resizable=yes,menubar=no');
-  document.pdf_form.target='REP_WINDOW';
-  document.pdf_form.submit();
+
+       return print_link($link_text, $rep, $ar, "", $icon, $class, $id);
 }
--->
-</script>\n";
+//
+//     Universal link to any kind of report.
+//
+function print_link($link_text, $rep, $pars = array(), $dir = '', 
+       $icon=false, $class='printlink', $id='')
+{
+       global $path_to_root, $SysPrefs;
+       $url = $dir == '' ?  $path_to_root.'/reporting/prn_redirect.php?' : $dir;
 
-       echo $st;
+       $id = default_focus($id);
+       $parm = array();
+       foreach($pars as $par => $val) {
+               if ($val != "")
+                       $parm[] = "$par=".urlencode($val);
+       }
+       $parm[] = 'REP_ID='.urlencode($rep);
+       $url .= implode ('&', $parm);
+       if ($class != '')
+               $class = $SysPrefs->pdf_debug ? '' : " class='$class'";
+       if ($id != '')
+               $id = " id='$id'";
+       $pars = access_string($link_text);
+       if (user_graphic_links() && $icon)
+               $pars[0] = set_icon($icon, $pars[0]);
+       return "<a target='_blank' href='$url'$id$class $pars[1]>$pars[0]</a>";
 }
 
-// Ex. label_cell(print_document_link($myrow['order_no'], _("Print")));
-// or display_note(print_document_link($order_no, _("Print this order")));
-// or if a button
-// button("button", _("Print this order"), print_document_link($order_no, "", false))";
-// or if a button inside a TD
-// button_cell("button", _("Print this order"), print_document_link($order_no, "", false))";
+/*
+// Purpose: Function to parse a string into parameters
+// Release Date: 2014-12-26
+// Author: ApMuthu <apmuthu@usa.net>
+// Usage:
+$str = "PPFrt#2000 CID#6378465 TaxEx#2345-038 abcde ertrgdert COD#4253 jdegtd PIN#6473654";
+$p = parse_notes_params($str);
+echo print_r($p, true);
 
-function print_document_link($doc_no, $link_text, $link=true)
-{
-       if ($link)
-               return "<a href=\"javascript:printDocument('$doc_no');\">$link_text</a>";
-       else
-               return "javascript:printDocument('$doc_no');";
+An example of usage will be in the reporting/rep110.php file at near the end just before the last $rep-Font(); statement: 
+
+
+    $notes_params = parse_notes_params($branch['notes']);
+    if ($packing_slip == 0 && array_key_exists('CID', $notes_params)) {
+        $rep->NewLine(1);
+        $rep->TextCol(1, 7, "Old Customer# : " . $notes_params['CID'], - 2);
+    }
+*/
+
+function parse_notes_params($str, $sep=" ", $delim="#") {
+    $str_params = explode($sep, $str);
+    $param_array=Array('notes' => '');
+    foreach ($str_params AS $str_param) {
+        $param_set=explode($delim, trim($str_param));
+        $key = (array_key_exists(0, $param_set) ? trim($param_set[0]) : '');
+        $val = (array_key_exists(1, $param_set) ? trim($param_set[1]) : '');
+        if (strlen($key) > 0 && strlen($val) > 0) {
+            $param_array[$key]=$val;
+        } else {
+            // stop at first missing parameter set
+            // break;
+            // Collect the rest into notes
+            $param_array['notes'] .= (" " .  $str_param);
+        }
+    }
+    $param_array['notes'] = trim($param_array['notes']);
+    return $param_array;
 }
-?>
\ No newline at end of file
+