X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/58e4b8099a5969b105f86e07de50a44a6aa04c84..d72d64b57bba72ef971519beaea00d5c2d245a8d:/bin/mozilla/drafts.pl

diff --git a/bin/mozilla/drafts.pl b/bin/mozilla/drafts.pl
index d754a693b..c471d009b 100644
--- a/bin/mozilla/drafts.pl
+++ b/bin/mozilla/drafts.pl
@@ -13,6 +13,8 @@ use SL::Drafts;
 
 require "bin/mozilla/common.pl";
 
+use strict;
+
 sub save_draft {
   $main::lxdebug->enter_sub();
 
@@ -127,7 +129,10 @@ sub load_draft {
     $form->{draft_description}     = $description;
     $form->{remove_draft}          = 'checked';
   }
-
+  # Ich vergesse bei Rechnungsentwürfe das Rechnungsdatum zu ändern. Dadurch entstehen 
+  # ungültige Belege. Vielleicht geht es anderen ähnlich jan 19.2.2011
+  $form->{invdate} = $form->current_date(\%myconfig); # Aktuelles Rechnungsdatum  ...
+  $form->{duedate} = $form->current_date(\%myconfig); # Aktuelles Fälligkeitsdatum  ...
   update();
 
   $main::lxdebug->leave_sub();