X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=reporting%2Frep707.php;h=2acafb07fcd787461a65a6abc6f87f5805f1d379;hb=017f59aff3a7c74d7eb32cb93d343d5d6eb7cd20;hp=55bf0aa95f93805fe63f8c897d2cc7f93b849723;hpb=d23b97ed26bc0608c9ba1037b66058c709e83765;p=fa-stable.git diff --git a/reporting/rep707.php b/reporting/rep707.php index 55bf0aa9..2acafb07 100644 --- a/reporting/rep707.php +++ b/reporting/rep707.php @@ -22,16 +22,16 @@ include_once($path_to_root . "/includes/session.inc"); include_once($path_to_root . "/includes/date_functions.inc"); include_once($path_to_root . "/includes/data_checks.inc"); include_once($path_to_root . "/gl/includes/gl_db.inc"); +include_once($path_to_root . "/admin/db/tags_db.inc"); //---------------------------------------------------------------------------------------------------- -function display_type ($type, $typename, $from, $to, $begin, $end, $compare, $convert, &$dec, &$pdec, &$rep, $dimension, $dimension2, &$pg, $graphics) +function display_type ($type, $typename, $from, $to, $begin, $end, $compare, $convert, &$dec, &$pdec, &$rep, $dimension, $dimension2, $tags, &$pg, $graphics, &$labels, &$serie1, &$serie2) { $code_per_balance = 0; $code_acc_balance = 0; $per_balance_total = 0; $acc_balance_total = 0; - unset($totals_arr); $totals_arr = array(); $printtitle = 0; //Flag for printing type name @@ -40,6 +40,11 @@ function display_type ($type, $typename, $from, $to, $begin, $end, $compare, $co $result = get_gl_accounts(null, null, $type); while ($account=db_fetch($result)) { + if ($tags != -1 && is_array($tags) && $tags[0] != false) + { + if (!is_record_in_tags($tags, TAG_ACCOUNT, $account['account_code'])) + continue; + } $per_balance = get_gl_trans_from_to($from, $to, $account["account_code"], $dimension, $dimension2); if ($compare == 2) @@ -95,7 +100,7 @@ function display_type ($type, $typename, $from, $to, $begin, $end, $compare, $co } $totals_arr = display_type($accounttype["id"], $accounttype["name"], $from, $to, $begin, $end, $compare, $convert, $dec, - $pdec, $rep, $dimension, $dimension2, $pg, $graphics); + $pdec, $rep, $dimension, $dimension2, $tags, $pg, $graphics, $labels, $serie1, $serie2); $per_balance_total += $totals_arr[0]; $acc_balance_total += $totals_arr[1]; } @@ -112,9 +117,9 @@ function display_type ($type, $typename, $from, $to, $begin, $end, $compare, $co $rep->AmountCol(4, 5, Achieve(($code_per_balance + $per_balance_total), ($code_acc_balance + $acc_balance_total)), $pdec); if ($graphics) { - $pg->x[] = $typename; - $pg->y[] = abs($code_per_balance + $per_balance_total); - $pg->z[] = abs($code_acc_balance + $acc_balance_total); + $labels[] = $typename; + $serie1[] = abs($code_per_balance + $per_balance_total); + $serie2[] = abs($code_acc_balance + $acc_balance_total); } $rep->NewLine(); } @@ -144,7 +149,7 @@ function Achieve($d1, $d2) function print_profit_and_loss_statement() { - global $path_to_root; + global $path_to_root, $SysPrefs; $dim = get_company_pref('use_dimension'); $dimension = $dimension2 = 0; @@ -156,34 +161,44 @@ function print_profit_and_loss_statement() { $dimension = $_POST['PARAM_3']; $dimension2 = $_POST['PARAM_4']; + $tags = (isset($_POST['PARAM_5']) ? $_POST['PARAM_5'] : -1); + $decimals = $_POST['PARAM_6']; + $graphics = $_POST['PARAM_7']; + $comments = $_POST['PARAM_8']; + $orientation = $_POST['PARAM_9']; + $destination = $_POST['PARAM_10']; + } + elseif ($dim == 1) + { + $dimension = $_POST['PARAM_3']; + $tags = (isset($_POST['PARAM_4']) ? $_POST['PARAM_4'] : -1); $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) + else { - $dimension = $_POST['PARAM_3']; + $tags = (isset($_POST['PARAM_3']) ? $_POST['PARAM_3'] : -1); $decimals = $_POST['PARAM_4']; $graphics = $_POST['PARAM_5']; $comments = $_POST['PARAM_6']; - $destination = $_POST['PARAM_7']; - } - else - { - $decimals = $_POST['PARAM_3']; - $graphics = $_POST['PARAM_4']; - $comments = $_POST['PARAM_5']; - $destination = $_POST['PARAM_6']; + $orientation = $_POST['PARAM_7']; + $destination = $_POST['PARAM_8']; } 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'); + $labels = array(); + $serie1 = array(); + $serie2 = array(); if ($graphics) { include_once($path_to_root . "/reporting/includes/class.graphic.inc"); - $pg = new graph(); + $pg = new Chart($graphics); } if (!$decimals) $dec = 0; @@ -191,7 +206,7 @@ function print_profit_and_loss_statement() $dec = user_price_dec(); $pdec = user_percent_dec(); - $cols = array(0, 50, 200, 350, 425, 500); + $cols = array(0, 60, 200, 350, 425, 500); //------------0--1---2----3----4----5-- $headers = array(_('Account'), _('Account Name'), _('Period'), _('Accumulated'), _('Achieved %')); @@ -205,19 +220,22 @@ function print_profit_and_loss_statement() 2 => array('text' => _('Dimension')." 1", 'from' => get_dimension_string($dimension), 'to' => ''), 3 => array('text' => _('Dimension')." 2", - 'from' => get_dimension_string($dimension2), 'to' => '')); + 'from' => get_dimension_string($dimension2), 'to' => ''), + 4 => array('text' => _('Tags'), 'from' => get_tag_names($tags), 'to' => '')); } - else if ($dim == 1) + elseif ($dim == 1) { $params = array( 0 => $comments, 1 => array('text' => _('Period'),'from' => $from, 'to' => $to), 2 => array('text' => _('Dimension'), - 'from' => get_dimension_string($dimension), 'to' => '')); + 'from' => get_dimension_string($dimension), 'to' => ''), + 3 => array('text' => _('Tags'), 'from' => get_tag_names($tags), 'to' => '')); } else { $params = array( 0 => $comments, - 1 => array('text' => _('Period'),'from' => $from, 'to' => $to)); + 1 => array('text' => _('Period'),'from' => $from, 'to' => $to), + 2 => array('text' => _('Tags'), 'from' => get_tag_names($tags), 'to' => '')); } @@ -236,17 +254,19 @@ function print_profit_and_loss_statement() { $begin = add_months($from, -12); $end = add_months($to, -12); + if (date_comp($to, end_month($to)) == 0) // compensate for leap years. If to-date equal end month + $end = end_month($end); // then the year-1 should also be end month $headers[3] = _('Period Y-1'); } - $rep = new FrontReport(_('Profit and Loss Statement'), "ProfitAndLoss", user_pagesize()); + $rep = new FrontReport(_('Profit and Loss Statement'), "ProfitAndLoss", user_pagesize(), 9, $orientation); + if ($orientation == 'L') + recalculate_cols($cols); $rep->Font(); $rep->Info($params, $cols, $headers, $aligns); $rep->NewPage(); - $classper = 0.0; - $classacc = 0.0; $salesper = 0.0; $salesacc = 0.0; @@ -267,8 +287,7 @@ function print_profit_and_loss_statement() $typeresult = get_account_types(false, $class['cid'], -1); while ($accounttype=db_fetch($typeresult)) { - $classtotal = display_type($accounttype["id"], $accounttype["name"], $from, $to, $begin, $end, $compare, $convert, $dec, - $pdec, $rep, $dimension, $dimension2, $pg, $graphics); + $classtotal = display_type($accounttype["id"], $accounttype["name"], $from, $to, $begin, $end, $compare, $convert, $dec, $pdec, $rep, $dimension, $dimension2, $tags, $pg, $graphics, $labels, $serie1, $serie2); $class_per_total += $classtotal[0]; $class_acc_total += $classtotal[1]; } @@ -294,29 +313,25 @@ function print_profit_and_loss_statement() $rep->AmountCol(2, 3, $salesper *-1, $dec); // always convert $rep->AmountCol(3, 4, $salesacc * -1, $dec); $rep->AmountCol(4, 5, Achieve($salesper, $salesacc), $pdec); - if ($graphics) - { - $pg->x[] = _('Calculated Return'); - $pg->y[] = abs($salesper); - $pg->z[] = abs($salesacc); - } $rep->Font(); $rep->NewLine(); $rep->Line($rep->row); if ($graphics) { - 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->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"; + $labels[] = _('Calculated Return'); + $serie1[] = abs($salesper); + $serie2[] = abs($salesacc); + $pg->setStream('png'); + $pg->setLabels($labels); + $pg->addSerie($headers[2], $serie1); + $pg->addSerie($headers[3], $serie2); + $pg->setTitle($rep->title); + $pg->setXTitle(_("Group")); + $pg->setYTitle(_("Amount")); + $pg->setDTitle(number_format2(abs($salesper))); + $pg->setValues(true); + $pg->latin_notation = ($SysPrefs->decseps[user_dec_sep()] != "."); + $filename = company_path(). "/pdf_files/". random_id().".png"; $pg->display($filename, true); $w = $pg->width / 1.5; $h = $pg->height / 1.5; @@ -330,4 +345,3 @@ function print_profit_and_loss_statement() $rep->End(); } -?> \ No newline at end of file