Feature 5388: Print Invoices (documents) list gets too long. Fixed by default 180...

[fa-stable.git] / reporting / rep106.php

diff --git a/reporting/rep106.php b/reporting/rep106.php
index 1b891f4535f85cc099dcfb67bf7fae5fb055a916..1274a8df9cb94b4018c63e7f1940b2cafbb9ef3b 100644 (file)
--- a/reporting/rep106.php
+++ b/reporting/rep106.php
@@ -9,12 +9,12 @@
     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  
     See the License here <http://www.gnu.org/licenses/gpl-3.0.html>.
 ***********************************************************************/
-$page_security = 2;
+$page_security = 'SA_SALESMANREP';
 // ----------------------------------------------------------------
 // $ Revision: 2.0 $
 // Creator:    Joe Hunt
 // date_:      2005-05-19
-// Title:      Order Status List
+// Title:      Salesman Report
 // ----------------------------------------------------------------
 $path_to_root="..";
 
@@ -26,7 +26,6 @@ include_once($path_to_root . "/inventory/includes/db/items_category_db.inc");
 
 //----------------------------------------------------------------------------------------------------
 
-// trial_inquiry_controls();
 print_salesman_list();
 
 //----------------------------------------------------------------------------------------------------
@@ -36,20 +35,27 @@ function GetSalesmanTrans($from, $to)
        $fromdate = date2sql($from);
        $todate = date2sql($to);
 
-       $sql = "SELECT DISTINCT ".TB_PREF."debtor_trans.*,
-               ov_amount+ov_discount AS InvoiceTotal,
-               ".TB_PREF."debtors_master.name AS DebtorName, ".TB_PREF."debtors_master.curr_code, ".TB_PREF."cust_branch.br_name,
-               ".TB_PREF."cust_branch.contact_name, ".TB_PREF."salesman.*
-               FROM ".TB_PREF."debtor_trans, ".TB_PREF."debtors_master, ".TB_PREF."sales_orders, ".TB_PREF."cust_branch,
-                       ".TB_PREF."salesman
-               WHERE ".TB_PREF."sales_orders.order_no=".TB_PREF."debtor_trans.order_
-                   AND ".TB_PREF."sales_orders.branch_code=".TB_PREF."cust_branch.branch_code
-                   AND ".TB_PREF."cust_branch.salesman=".TB_PREF."salesman.salesman_code
-                   AND ".TB_PREF."debtor_trans.debtor_no=".TB_PREF."debtors_master.debtor_no
-                   AND (".TB_PREF."debtor_trans.type=10 OR ".TB_PREF."debtor_trans.type=11)
-                   AND ".TB_PREF."debtor_trans.tran_date>='$fromdate'
-                   AND ".TB_PREF."debtor_trans.tran_date<='$todate'
-               ORDER BY ".TB_PREF."salesman.salesman_code, ".TB_PREF."debtor_trans.tran_date";
+       $sql = "SELECT DISTINCT trans.*,
+                       ov_amount+ov_discount AS InvoiceTotal,
+                       cust.name AS DebtorName,
+                       cust.curr_code,
+                       branch.br_name,
+                       sorder.customer_ref,
+                       salesman.*
+               FROM ".TB_PREF."debtor_trans trans,
+                        ".TB_PREF."debtors_master cust,
+                        ".TB_PREF."sales_orders sorder,
+                        ".TB_PREF."cust_branch branch,
+                       ".TB_PREF."salesman salesman
+               WHERE sorder.order_no=trans.order_
+                   AND sorder.branch_code=branch.branch_code
+                   AND sorder.trans_type = ".ST_SALESORDER."
+                   AND branch.salesman=salesman.salesman_code
+                   AND trans.debtor_no=cust.debtor_no
+                   AND (trans.type=".ST_SALESINVOICE." OR trans.type=".ST_CUSTCREDIT.")
+                   AND trans.tran_date>='$fromdate'
+                   AND trans.tran_date<='$todate'
+               ORDER BY salesman.salesman_code, trans.tran_date";
 
        return db_query($sql, "Error getting order details");
 }
@@ -64,24 +70,20 @@ function print_salesman_list()
        $to = $_POST['PARAM_1'];
        $summary = $_POST['PARAM_2'];
        $comments = $_POST['PARAM_3'];
-       $destination = $_POST['PARAM_4'];
+       $orientation = $_POST['PARAM_4'];
+       $destination = $_POST['PARAM_5'];
        if ($destination)
-       {
                include_once($path_to_root . "/reporting/includes/excel_report.inc");
-               $filename = "SalesmanListing.xml";
-       }       
        else
-       {
                include_once($path_to_root . "/reporting/includes/pdf_report.inc");
-               $filename = "SalesmanListing.pdf";
-       }
+       $orientation = ($orientation ? 'L' : 'P');
 
        if ($summary == 0)
                $sum = _("No");
        else
                $sum = _("Yes");
 
-       $dec = user_qty_dec();
+       $dec = user_price_dec();
 
        $cols = array(0, 60, 150, 220, 325,     385, 450, 515);
 
@@ -97,14 +99,16 @@ function print_salesman_list()
                                        1 => array(  'text' => _('Period'), 'from' => $from, 'to' => $to),
                                        2 => array(  'text' => _('Summary Only'),'from' => $sum,'to' => ''));
 
-       $cols2 = $cols;
        $aligns2 = $aligns;
 
-       $rep = new FrontReport(_('Salesman Listing'), $filename, user_pagesize());
+       $rep = new FrontReport(_('Salesman Listing'), "SalesmanListing", user_pagesize(), 9, $orientation);
+    if ($orientation == 'L')
+       recalculate_cols($cols);
+       $cols2 = $cols;
        $rep->Font();
        $rep->Info($params, $cols, $headers, $aligns, $cols2, $headers2, $aligns2);
 
-       $rep->Header();
+       $rep->NewPage();
        $salesman = 0;
        $subtotal = $total = $subprov = $provtotal = 0;
 
@@ -112,11 +116,6 @@ function print_salesman_list()
 
        while ($myrow=db_fetch($result))
        {
-               if ($rep->row < $rep->bottomMargin + (2 * $rep->lineHeight))
-               {
-                       $salesman = 0;
-                       $rep->Header();
-               }
                $rep->NewLine(0, 2, false, $salesman);
                if ($salesman != $myrow['salesman_code'])
                {
@@ -145,25 +144,24 @@ function print_salesman_list()
                }
                $rate = $myrow['rate'];
                $amt = $myrow['InvoiceTotal'] * $rate;
-               if ($subprov > $myrow['break_pt'] && $myrow['provision2'] != 0)
-                       $prov = $myrow['provision2'] * $amt / 100;
-               else
+               if ($myrow['provision2'] == 0)
                        $prov = $myrow['provision'] * $amt / 100;
+               else {
+                       $amt1 = min($amt, max(0, $myrow['break_pt']-$subtotal));
+                       $amt2 = $amt - $amt1;
+
+                       $prov = $amt1*$myrow['provision']/100 + $amt2*$myrow['provision2']/100;
+               }
                if (!$summary)
                {
                        $rep->TextCol(0, 1,     $myrow['trans_no']);
                        $rep->TextCol(1, 2,     $myrow['DebtorName']);
                        $rep->TextCol(2, 3,     $myrow['br_name']);
-                       $rep->TextCol(3, 4,     $myrow['contact_name']);
+                       $rep->TextCol(3, 4,     $myrow['customer_ref']);
                        $rep->DateCol(4, 5,     $myrow['tran_date'], true);
                        $rep->AmountCol(5, 6, $amt, $dec);
                        $rep->AmountCol(6, 7, $prov, $dec);
                        $rep->NewLine();
-                       if ($rep->row < $rep->bottomMargin + (2 * $rep->lineHeight))
-                       {
-                               $salesman = 0;
-                               $rep->Header();
-                       }
                }
                $subtotal += $amt;
                $subprov += $prov;
@@ -190,4 +188,3 @@ function print_salesman_list()
        $rep->End();
 }
 
-?>
\ No newline at end of file