From: G. Richardson Date: Tue, 1 Mar 2016 16:21:27 +0000 (+0100) Subject: Neue Chart Methode new_chart_valid X-Git-Tag: release-3.4.1~376 X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=bdd97244a89851cafbd132757e5e184a1464ee1a;p=kivitendo-erp.git Neue Chart Methode new_chart_valid die prüft, ob es für das Konto ein Folgekonto gibt, und ob das aktuelle Tagesdatum >= dem Folgedatum ist, d.h. ob eigentlich das Folgekonto benutzt werden soll. Diese Abfrage war bisher allerdings kaputt und wird wahrscheinlich auch nirgends sinnvoll genutzt. --- diff --git a/SL/AM.pm b/SL/AM.pm index b991acf39..f13fcc7ee 100644 --- a/SL/AM.pm +++ b/SL/AM.pm @@ -181,17 +181,8 @@ sub get_account { $form->{orphaned} = $chart_obj->has_transaction ? 0 : 1; # check if new account is active - $form->{new_chart_valid} = 0; - if ($form->{new_chart_id}) { - $query = qq|SELECT current_date-valid_from FROM chart - WHERE id = ?|; - $main::lxdebug->message(LXDebug->QUERY(), "\$query=\n $query"); - my ($count) = selectrow_query($form, $dbh, $query, $form->{id}); - if ($count >=0) { - $form->{new_chart_valid} = 1; - } - $sth->finish; - } + # The old sql query was broken since at least 2006 and always returned 0 + $form->{new_chart_valid} = $chart_obj->new_chart_valid; $dbh->disconnect; diff --git a/SL/DB/Chart.pm b/SL/DB/Chart.pm index 0c8636c81..d51332f7d 100644 --- a/SL/DB/Chart.pm +++ b/SL/DB/Chart.pm @@ -87,6 +87,16 @@ sub has_transaction { $self->db->dbh->selectrow_array('select exists(select 1 from acc_trans where chart_id = ?)', {}, $self->id); } +sub new_chart_valid { + my ($self) = @_; + + if ( $self->valid_from && DateTime->today >= $self->valid_from ) { + return 1; + } else { + return 0; + }; +} + sub displayable_name { my ($self) = @_; @@ -170,6 +180,12 @@ or not. Returns the date of the last transaction of the chart in the database, which may lie in the future. +=item C + +Checks whether a follow-up chart is configured, and returns 1 or 0 depending on +whether the valid_from date is before or after the current date. +Is this even used anywhere? + =back =head1 BUGS