Bug 4817: g/l account inquiry can timeout due to slow sql. @Braath Waate.

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

diff --git a/reporting/rep501.php b/reporting/rep501.php
index 22c00c34855850075c00726ff2a5649d32decf3d..25b39fd6f354bd896f1e4078eea6f3aafbb4bb06 100644 (file)
--- a/reporting/rep501.php
+++ b/reporting/rep501.php
@@ -74,12 +74,14 @@ function print_dimension_summary()
     $todim = $_POST['PARAM_1'];
     $showbal = $_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");
        else
                include_once($path_to_root . "/reporting/includes/pdf_report.inc");
 
+       $orientation = ($orientation ? 'L' : 'P');
        $cols = array(0, 50, 210, 250, 320, 395, 465,   515);
 
        $headers = array(_('Reference'), _('Name'), _('Type'), _('Date'), _('Due Date'), _('Closed'), _('YTD'));
@@ -89,7 +91,9 @@ function print_dimension_summary()
     $params =   array(         0 => $comments,
                                    1 => array('text' => _('Dimension'), 'from' => get_dimension_string($fromdim), 'to' => get_dimension_string($todim)));
 
-    $rep = new FrontReport(_('Dimension Summary'), "DimensionSummary", user_pagesize());
+    $rep = new FrontReport(_('Dimension Summary'), "DimensionSummary", user_pagesize(), 9, $orientation);
+    if ($orientation == 'L')
+       recalculate_cols($cols);
 
     $rep->Font();
     $rep->Info($params, $cols, $headers, $aligns);
@@ -119,4 +123,3 @@ function print_dimension_summary()
     $rep->End();
 }
 
-?>
\ No newline at end of file