projects
/
kivitendo-erp.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
504db13
)
remove whitespace RP.pm
author
Jan Büren
<jan@kivitendo-premium.de>
Mon, 17 Feb 2014 12:23:39 +0000
(13:23 +0100)
committer
Jan Büren
<jan@kivitendo-premium.de>
Mon, 17 Feb 2014 12:23:39 +0000
(13:23 +0100)
SL/RP.pm
patch
|
blob
|
history
diff --git
a/SL/RP.pm
b/SL/RP.pm
index
dfb9bc6
..
da2e149
100644
(file)
--- a/
SL/RP.pm
+++ b/
SL/RP.pm
@@
-1,4
+1,4
@@
-
#
=====================================================================
+=====================================================================
# LX-Office ERP
# Copyright (C) 2004
# Based on SQL-Ledger Version 2.1.9
# LX-Office ERP
# Copyright (C) 2004
# Based on SQL-Ledger Version 2.1.9
@@
-91,11
+91,11
@@
sub get_balance_starting_date {
};
my ($query, $startdate, $last_ob, $mindate);
};
my ($query, $startdate, $last_ob, $mindate);
- $query = qq|select max(transdate) from acc_trans where ob_transaction is true and transdate <= ?|;
+ $query = qq|select max(transdate) from acc_trans where ob_transaction is true and transdate <= ?|;
($last_ob) = selectrow_query($::form, $dbh, $query, $::locale->format_date(\%::myconfig, $asofdate));
$last_ob = $::locale->parse_date_to_object(\%::myconfig, $last_ob) if $last_ob;
($last_ob) = selectrow_query($::form, $dbh, $query, $::locale->format_date(\%::myconfig, $asofdate));
$last_ob = $::locale->parse_date_to_object(\%::myconfig, $last_ob) if $last_ob;
-
- $query = qq|select min(transdate) from acc_trans|;
+
+ $query = qq|select min(transdate) from acc_trans|;
($mindate) = selectrow_query($::form, $dbh, $query);
$mindate = $::locale->parse_date_to_object(\%::myconfig, $mindate);
($mindate) = selectrow_query($::form, $dbh, $query);
$mindate = $::locale->parse_date_to_object(\%::myconfig, $mindate);
@@
-132,8
+132,8
@@
sub get_balance_starting_date {
return $::locale->format_date(\%::myconfig, $mindate);
};
return $::locale->format_date(\%::myconfig, $mindate);
};
-
-};
+
+};
sub balance_sheet {
$main::lxdebug->enter_sub();
sub balance_sheet {
$main::lxdebug->enter_sub();
@@
-150,7
+150,7
@@
sub balance_sheet {
$form->{period} = $form->{this_period} = conv_dateq($form->{asofdate});
}
$form->{period} = $form->{this_period} = conv_dateq($form->{asofdate});
}
- # get starting date for calculating balance
+ # get starting date for calculating balance
$form->{this_startdate} = get_balance_starting_date($form->{asofdate});
get_accounts($dbh, $last_period, $form->{this_startdate}, $form->{asofdate}, $form, \@categories);
$form->{this_startdate} = get_balance_starting_date($form->{asofdate});
get_accounts($dbh, $last_period, $form->{this_startdate}, $form->{asofdate}, $form, \@categories);