Improved journal trans: added currency support, tax and source document date. Allowed...
[fa-stable.git] / reporting / includes / reporting.inc
index 15cfee6a07931c7e36c0c75a3840afbf05764d83..68c443ea45ba24b9cfe88d7fec3abf5842030aa7 100644 (file)
 <?php
-function printTransaction($link_text, $form_id, $form_type, $trans_type, $trans_no, $ref, $param1, $param2) {
-       $ar = array(
-                               'COMPANY'       => $_SESSION["wa_current_user"]->company,
-                               'FORMID'        => $form_id,
-                               'FORMTYPE'      => $form_type,
-                               'TRANSNO'       => $trans_no,
-                               'TRANSTYPE'     => $trans_type,
-                               'REF'           => $ref,
-                               'PARAM1'        => $param1,
-                               'PARAM2'        => $param2
-                               );      
-       $pdf_href =     getPDFOpenScript($link_text, $ar);
-       return "<a href=\"javascript:$pdf_href\">" . _($link_text) . "</a>";    
-}
+/**********************************************************************
+    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
+
+function print_document_link($doc_no, $link_text, $link=true, $type_no, 
+       $icon=false, $class='printlink', $id='', $email=0, $extra=0)
+{
+       global $path_to_root;
+       include_once($path_to_root . "/includes/types.inc");
 
-function getHiddenFieldScript() {
-       $ar = Array('COMPANY','LANG','FORMID','FORMTYPE','TRANSNO','TRANSTYPE','REF','PARAM1','PARAM2');
-       foreach ($ar as $value) $st.= "<input type='hidden' name='$value'>";
-       
-       $st .= "<input type='hidden' name='QTY_DEC'     value='" . user_qty_dec()        . "'>
-                       <input type='hidden' name='PRICE_DEC'   value='" . user_price_dec()      . "'>
-                       <input type='hidden' name='PER_DEC'     value='" . user_percent_dec(). "'>";    
-       
-       $st = "<form method='post' name='pdf_form'>" . $st . "</form>"; 
-       return $st;
+       $url = $path_to_root.'/reporting/prn_redirect.php?';
+       $def_orientation = (user_def_print_orientation() == 1 ? 1 : 0);
+
+       switch ($type_no)
+       {
+               case ST_SALESQUOTE :
+                       $rep = 111;
+                       // 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_SALESORDER :
+                       $rep = 109;
+                       // from, to, currency, email, quote, comments, orientation
+                       $ar = array(
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => '', 
+                               'PARAM_3' => $email, 
+                               'PARAM_4' => 0, 
+                               'PARAM_5' => '',
+                               'PARAM_6' => $def_orientation);
+                       break;
+               case ST_CUSTDELIVERY :
+                       $rep = 110;
+                       // from, to, email, packing slip, comments, orientation
+                       $ar = array(
+                               'PARAM_0' => $doc_no, 
+                               'PARAM_1' => $doc_no, 
+                               'PARAM_2' => $email,
+                               'PARAM_3' => $extra,
+                               'PARAM_4' => '',
+                               'PARAM_5' => $def_orientation);
+                       break;
+               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' => $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' => '',
+                               'PARAM_4' => $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;
+               default:
+                       return null;
+//             default: $ar = array();
+       }
+
+       return print_link($link_text, $rep, $ar, "", $icon, $class, $id);
 }
+//
+//     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;
 
-function getPDFOpenScript($link_text, $ar_params) {
-       $st = "document.pdf_form.LANG.value='" . $_SESSION['language']->code . "';";
-       foreach ($ar_params as $key => $value) {
-               $st .= "document.pdf_form.{$key}.value = '{$value}';";
+       $id = default_focus($id);
+       foreach($pars as $par => $val) {
+               $pars[$par] = "$par=".urlencode($val);
        }
-       $st.= "window.open('','REP_WINDOW','toolbar=no,scrollbar=no,resizable=yes,menubar=no');";       
-       $st.= "document.pdf_form.target='REP_WINDOW';";
-       $st.= "document.pdf_form.action= '" . C_JSP_ROOT . "/reporting/gen_pdf_form.jsp';";
-       $st.= "document.pdf_form.submit();";
-       
-       return $st;
+       $pars[] = 'REP_ID='.urlencode($rep);
+       $url .= implode ('&', $pars);
+
+       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>";
+}
+
+/*
+// 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);
+
+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