X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=reporting%2Frep601.php;h=1d47bc78a1510ca4e201862ab6cdff147e2709bb;hb=4d3a86a9286de3f4d5552ad2aa237a91df6aa689;hp=893c8d9d29daae54f64af6ab9c263d1c469d1382;hpb=80dd97a37f674cc3691fa04af4c29607067566b2;p=fa-stable.git diff --git a/reporting/rep601.php b/reporting/rep601.php index 893c8d9d..1d47bc78 100644 --- a/reporting/rep601.php +++ b/reporting/rep601.php @@ -84,7 +84,7 @@ function print_bank_transactions() $rep->Font(); $rep->Info($params, $cols, $headers, $aligns); - $rep->Header(); + $rep->NewPage(); $prev_balance = get_bank_balance_to($from, $account["id"]); @@ -104,8 +104,12 @@ function print_bank_transactions() $rep->Font(); $total = $prev_balance; $rep->NewLine(2); + $total_debit = $total_credit = 0; if ($rows > 0) { + // Keep a running total as we loop through + // the transactions. + while ($myrow=db_fetch($trans)) { $total += $myrow['amount']; @@ -116,19 +120,32 @@ function print_bank_transactions() $rep->DateCol(3, 4, $myrow["trans_date"], true); $rep->TextCol(4, 5, payment_person_name($myrow["person_type_id"],$myrow["person_id"], false)); if ($myrow['amount'] > 0.0) + { $rep->AmountCol(5, 6, abs($myrow['amount']), $dec); + $total_debit += abs($myrow['amount']); + } else + { $rep->AmountCol(6, 7, abs($myrow['amount']), $dec); + $total_credit += abs($myrow['amount']); + } $rep->AmountCol(7, 8, $total, $dec); $rep->NewLine(); if ($rep->row < $rep->bottomMargin + $rep->lineHeight) { $rep->Line($rep->row - 2); - $rep->Header(); + $rep->NewPage(); } } $rep->NewLine(); } + + // Print totals for the debit and credit columns. + $rep->TextCol(3, 5, _("Total Debit / Credit")); + $rep->AmountCol(5, 6, $total_debit, $dec); + $rep->AmountCol(6, 7, $total_credit, $dec); + $rep->NewLine(2); + $rep->Font('bold'); $rep->TextCol(3, 5, _("Ending Balance")); if ($total > 0.0) @@ -138,6 +155,14 @@ function print_bank_transactions() $rep->Font(); $rep->Line($rep->row - $rep->lineHeight + 4); $rep->NewLine(2, 1); + + // Print the difference between starting and ending balances. + $net_change = ($total - $prev_balance); + $rep->TextCol(3, 5, _("Net Change")); + if ($total > 0.0) + $rep->AmountCol(5, 6, $net_change, $dec, 0, 0, 0, 0, null, 1, True); + else + $rep->AmountCol(6, 7, $net_change, $dec, 0, 0, 0, 0, null, 1, True); } $rep->End(); }