Implemented Selectable Print Orientation (Portrait, Landscape) for all reports in...

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

diff --git a/reporting/rep101.php b/reporting/rep101.php
index 3f1ece787898c3784891b58ce565764c19c7afbe..3fee1e8f00c59deefcce79ac951c44d8d697c02c 100644 (file)
--- a/reporting/rep101.php
+++ b/reporting/rep101.php
@@ -102,12 +102,15 @@ function print_customer_balances()
        $currency = $_POST['PARAM_3'];
        $no_zeros = $_POST['PARAM_4'];
        $comments = $_POST['PARAM_5'];
-       $destination = $_POST['PARAM_6'];
+       $orientation = $_POST['PARAM_6'];
+       $destination = $_POST['PARAM_7'];
        if ($destination)
                include_once($path_to_root . "/reporting/includes/excel_report.inc");
        else
                include_once($path_to_root . "/reporting/includes/pdf_report.inc");
 
+       $orientation = ($orientation ? 'L' : 'P');
+
        if ($fromcust == ALL_TEXT)
                $cust = _('All');
        else
@@ -138,7 +141,9 @@ function print_customer_balances()
                                    3 => array('text' => _('Currency'), 'from' => $currency, 'to' => ''),
                                                4 => array('text' => _('Suppress Zeros'), 'from' => $nozeros, 'to' => ''));
 
-    $rep = new FrontReport(_('Customer Balances'), "CustomerBalances", user_pagesize());
+    $rep = new FrontReport(_('Customer Balances'), "CustomerBalances", user_pagesize(), 9, $orientation);
+    if ($orientation == 'L')
+       $rep->recalculate_cols($cols);
     $rep->Font();
     $rep->Info($params, $cols, $headers, $aligns);
     $rep->NewPage();
@@ -189,7 +194,7 @@ function print_customer_balances()
                $rep->Line($rep->row + 4);
                while ($trans = db_fetch($res))
                {
-                       if ($no_zeros && $trans['TotalAmount'] == 0 && $trans['Allocated'] == 0) continue;
+                       if ($no_zeros && floatcmp($trans['TotalAmount'], $trans['Allocated']) == 0) continue;
                        $rep->NewLine(1, 2);
                        $rep->TextCol(0, 1, $systypes_array[$trans['type']]);
                        $rep->TextCol(1, 2,     $trans['reference']);