X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fap.pl;h=28fa8d2ede9616a8e4fc6a127d67af05219b5c87;hb=6768ddad54d2a675939e1167536f4943628de2bb;hp=25ee60262c0fbb37694458e442e1341226a8b62d;hpb=62726dfdf4f763efa65c25fcfe8658d98649c8a8;p=kivitendo-erp.git diff --git a/bin/mozilla/ap.pl b/bin/mozilla/ap.pl index 25ee60262..28fa8d2ed 100644 --- a/bin/mozilla/ap.pl +++ b/bin/mozilla/ap.pl @@ -146,6 +146,8 @@ sub create_links { if (!$params{dont_save}) { %saved = map { ($_ => $form->{$_}) } qw(direct_debit taxincluded); $saved{duedate} = $form->{duedate} if $form->{duedate}; + $saved{currency} = $form->{currency} if $form->{currency}; + $saved{taxincluded} = $form->{taxincluded} if $form->{taxincluded}; } IR->get_vendor(\%myconfig, \%$form); @@ -160,6 +162,7 @@ sub create_links { # currencies $form->{defaultcurrency} = $form->get_default_currency(\%myconfig); + $form->{selectcurrency} = ""; map { my $quoted = H($_); $form->{selectcurrency} .= "