X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Far.pl;h=7f670582c958dd88a3d19a7a7207b3d8f7f6ef2c;hb=644c68bae03521cec693800af0a19b9ab4e0ed9c;hp=9f003d32401c2bd965bef0995af4da7c7a5e7d26;hpb=6aefd19def6a7d2f205e5401451e4c0bf3cebc46;p=kivitendo-erp.git diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl index 9f003d324..7f670582c 100644 --- a/bin/mozilla/ar.pl +++ b/bin/mozilla/ar.pl @@ -89,8 +89,10 @@ sub add { "$form->{script}?action=add&path=$form->{path}&login=$form->{login}&password=$form->{password}" unless $form->{callback}; - &create_links; AR->get_transdate(\%myconfig, $form); + $form->{initial_transdate} = $form->{transdate}; + &create_links; + $form->{transdate} = $form->{initial_transdate}; &display_form; $lxdebug->leave_sub(); } @@ -134,6 +136,9 @@ sub create_links { $form->{oldcustomer} = "$form->{customer}--$form->{customer_id}"; $form->{rowcount} = 1; + # notes + $form->{notes} = $form->{intnotes} unless $form->{notes}; + # currencies @curr = split(/:/, $form->{currencies}); chomp $curr[0]; @@ -257,8 +262,6 @@ sub create_links { } } - $lxdebug->message(0, "1 ARselected $form->{ARselected}"); - $form->{taxincluded} = $taxincluded if ($form->{id}); $form->{paidaccounts} = 1 if not defined $form->{paidaccounts}; @@ -359,8 +362,6 @@ sub form_header { } } - $taxincluded = ""; - $taxincluded = qq| {taxincluded}> @@ -627,7 +628,6 @@ $jsscript if ($previous_accno && ($previous_accno eq $selected_accno) && ($previous_tax_id ne $selected_tax_id)) { - $lxdebug->message(0, "yeah"); my $item = $taxcharts{$selected_tax_id}; $selected_taxchart = "$item->{id}--$item->{rate}"; } @@ -849,6 +849,15 @@ sub form_footer {
|; + if (!$form->{id} && $form->{draft_id}) { + print(NTI($cgi->checkbox('-name' => 'remove_draft', '-id' => 'remove_draft', + '-value' => 1, '-checked' => $form->{remove_draft}, + '-label' => '')) . + qq| 
|); + } + $transdate = $form->datetonum($form->{transdate}, \%myconfig); $closedto = $form->datetonum($form->{closedto}, \%myconfig);