Bugfix zu 1569: Zahlungseingang löschen bei Rechnung

   Falls $date = '' - Fehlermeldung aus der Datenbank ab postgres 8.4.
   Ich denke, es ist sicher ein conv_date vorher IMMER auszuführen.

   Testfälle ohne definiertes closedto:
     Leere Datumseingabe i.O.
       SELECT 1 FROM defaults WHERE '' < closedto
     normale Zahlungsbuchung über Rechnungsmaske i.O.
       SELECT 1 FROM defaults WHERE '10.05.2011' < closedto.
   Testfälle mit definiertem closedto (30.04.2011):
    Leere Datumseingabe i.O.
     SELECT 1 FROM defaults WHERE '' < closedto
   normale Buchung im geschloßenem Zeitraum i.O.
     SELECT 1 FROM defaults WHERE '21.04.2011' < closedto
       Fehlermeldung: Es können keine Zahlungen für abgeschlossene Bücher gebucht werden!
   normale Buchung in aktiver Buchungsperiode i.O.
     SELECT 1 FROM defaults WHERE '01.05.2011' < closedto

diff --git a/SL/Form.pm b/SL/Form.pm
index 4c90304..97ae0d4 100644 (file)
--- a/SL/Form.pm
+++ b/SL/Form.pm
@@ -1637,7 +1637,24 @@ sub date_closed {
   my $dbh = $self->dbconnect($myconfig);
 
   my $query = "SELECT 1 FROM defaults WHERE ? < closedto";
-  my $sth = prepare_execute_query($self, $dbh, $query, $date);
+  my $sth = prepare_execute_query($self, $dbh, $query, conv_date($date));
+
+  # Falls $date = '' - Fehlermeldung aus der Datenbank. Ich denke,
+  # es ist sicher ein conv_date vorher IMMER auszuführen.
+  # Testfälle ohne definiertes closedto:
+  #   Leere Datumseingabe i.O.
+  #     SELECT 1 FROM defaults WHERE '' < closedto
+  #   normale Zahlungsbuchung über Rechnungsmaske i.O.
+  #     SELECT 1 FROM defaults WHERE '10.05.2011' < closedto 
+  # Testfälle mit definiertem closedto (30.04.2011):
+  #  Leere Datumseingabe i.O.
+  #   SELECT 1 FROM defaults WHERE '' < closedto
+  # normale Buchung im geschloßenem Zeitraum i.O.
+  #   SELECT 1 FROM defaults WHERE '21.04.2011' < closedto
+  #     Fehlermeldung: Es können keine Zahlungen für abgeschlossene Bücher gebucht werden!
+  # normale Buchung in aktiver Buchungsperiode i.O.
+  #   SELECT 1 FROM defaults WHERE '01.05.2011' < closedto
+
   my ($closed) = $sth->fetchrow_array;
 
   $main::lxdebug->leave_sub();

diff --git a/doc/changelog b/doc/changelog
index 9e3db8b..9b13a3e 100644 (file)
--- a/doc/changelog
+++ b/doc/changelog
@@ -26,6 +26,7 @@
   - Bugfix 1626: Beim Festlegen der Standardkonten kann beim Warenbestand eine Überschrift ausgewählt werden.
   - Bugfix 1584: Summen und Saldenliste: Export to PDF/CSV in EÜR Modus falsch
   - Bugfix 1597: Report Lagerbestand wirft Fehler, wenn Artikelnummer ausgeblendet werden soll
+  - Bugfix 1569: Zahlungseingang löschen bei Rechnung  
 
 2011-02-02 - Release 2.6.2