function print_balance_sheet()
{
- global $path_to_root;
+ global $path_to_root, $SysPrefs;
$dim = get_company_pref('use_dimension');
$dimension = $dimension2 = 0;
$decimals = $_POST['PARAM_5'];
$graphics = $_POST['PARAM_6'];
$comments = $_POST['PARAM_7'];
- $destination = $_POST['PARAM_8'];
+ $orientation = $_POST['PARAM_8'];
+ $destination = $_POST['PARAM_9'];
}
else if ($dim == 1)
{
$decimals = $_POST['PARAM_4'];
$graphics = $_POST['PARAM_5'];
$comments = $_POST['PARAM_6'];
- $destination = $_POST['PARAM_7'];
+ $orientation = $_POST['PARAM_7'];
+ $destination = $_POST['PARAM_8'];
}
else
{
$decimals = $_POST['PARAM_3'];
$graphics = $_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 ($graphics)
{
include_once($path_to_root . "/reporting/includes/class.graphic.inc");
2 => array('text' => _('Tags'), 'from' => get_tag_names($tags), 'to' => ''));
}
- $rep = new FrontReport(_('Balance Sheet'), "BalanceSheet", user_pagesize());
+ $rep = new FrontReport(_('Balance Sheet'), "BalanceSheet", user_pagesize(), 9, $orientation);
+ if ($orientation == 'L')
+ recalculate_cols($cols);
$rep->Font();
$rep->Info($params, $cols, $headers, $aligns);
$rep->NewPage();
$pg->x[] = _('Calculated Return');
$pg->y[] = abs($calc_open);
$pg->z[] = abs($calc_period);
- global $decseps, $graph_skin;
$pg->title = $rep->title;
$pg->axis_x = _("Group");
$pg->axis_y = _("Amount");
$pg->graphic_1 = $headers[2];
$pg->graphic_2 = $headers[3];
$pg->type = $graphics;
- $pg->skin = $graph_skin;
+ $pg->skin = $SysPrefs->graph_skin;
$pg->built_in = false;
- $pg->fontfile = $path_to_root . "/reporting/fonts/Vera.ttf";
- $pg->latin_notation = ($decseps[$_SESSION["wa_current_user"]->prefs->dec_sep()] != ".");
- $filename = company_path(). "/pdf_files/test.png";
+ $pg->latin_notation = ($SysPrefs->decseps[user_dec_sep()] != ".");
+ $filename = company_path(). "/pdf_files/". uniqid("").".png";
$pg->display($filename, true);
$w = $pg->width / 1.5;
$h = $pg->height / 1.5;
$rep->End();
}
-?>
\ No newline at end of file