X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fir.pl;h=58a1f2c7e63e982d257964fe3ab4c495da373e4a;hb=d3287e3265b566f110eb9734c8ab26b8036d22f4;hp=084c2a7db30c7fa072be0e8d6b9ce7483ef034cf;hpb=98764afac6fd1dc1b04d912079672aa90d0b21f8;p=kivitendo-erp.git diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index 084c2a7db..58a1f2c7e 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -354,6 +354,8 @@ sub form_header { qq|{duedate}>|; } + $form->{"javascript"} .= qq||; + $form->header; print qq| @@ -669,6 +671,7 @@ sub form_footer { |; + my @triggers = (); $form->{paidaccounts}++ if ($form->{"paid_$form->{paidaccounts}"}); for $i (1 .. $form->{paidaccounts}) { @@ -708,7 +711,8 @@ sub form_footer { $column_data{"AP_paid_$i"} = qq||; $column_data{"datepaid_$i"} = - qq|{"datepaid_$i"}>|; + qq|{"datepaid_$i"}> + |; $column_data{"source_$i"} = qq|{"source_$i"}>|; $column_data{"memo_$i"} = @@ -719,6 +723,7 @@ sub form_footer { print qq| |; + push(@triggers, "datepaid_$i", "BL", "trigger_datepaid_$i"); } print qq| @@ -754,21 +759,19 @@ sub form_footer { print qq| |; - } else { - if ($invdate > $closedto) { - print qq| - |; - } + } - if ($form->{menubar}) { - require "$form->{path}/menu.pl"; - &menubar; + print qq||; + + if (!$form->{id} && ($invdate > $closedto)) { + print qq| |; } - print qq| + print $form->write_trigger(\%myconfig, scalar(@triggers) / 3, @triggers) . + qq| {rowcount}> @@ -918,7 +921,6 @@ sub storno { $form->{storno} = 1; $form->{id} = ""; $form->{invnumber} = "Storno zu " . $form->{invnumber}; - $form->{rowcount}--; &post(); $lxdebug->leave_sub(); @@ -928,7 +930,7 @@ sub storno { sub use_as_template { $lxdebug->enter_sub(); - map { delete $form->{$_} } qw(printed emailed queued invnumber invdate deliverydate id datepaid_1 source_1 memo_1 paid_1 exchangerate_1 AP_paid_1); + map { delete $form->{$_} } qw(printed emailed queued invnumber invdate deliverydate id datepaid_1 source_1 memo_1 paid_1 exchangerate_1 AP_paid_1 storno); $form->{paidaccounts} = 1; $form->{rowcount}--; $form->{invdate} = $form->current_date(\%myconfig);