X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fdrafts.pl;h=c471d009bcca0a9f61210a8bfafe94f145fc4af2;hb=02cb7e02771247f3106001076366d119277a7d30;hp=d754a693b43977b3b596d5daf18f2fadbe75871a;hpb=58e4b8099a5969b105f86e07de50a44a6aa04c84;p=kivitendo-erp.git 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();