X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;ds=sidebyside;f=bin%2Fmozilla%2Fir.pl;h=bad6e4fff249eec92f7b7c6615e77960142f3fc1;hb=21509ce4ec090f27e9dfac4c0259037b7e70bdb0;hp=3d498856cd5cbb8806e572b4b6e71a4b34bfa295;hpb=9a578c8b55b857e41dffbaf844023efcbdd22ace;p=kivitendo-erp.git diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index 3d498856c..bad6e4fff 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -102,7 +102,6 @@ sub invoice_links { # create links $form->{webdav} = $::instance_conf->get_webdav; - $form->{jsscript} = 1; $form->create_links("AP", \%myconfig, "vendor"); @@ -117,37 +116,14 @@ sub invoice_links { } } - my ($payment_id, $language_id, $taxzone_id, $currency); - if ($form->{payment_id}) { - $payment_id = $form->{payment_id}; - } - if ($form->{language_id}) { - $language_id = $form->{language_id}; - } - if ($form->{taxzone_id}) { - $taxzone_id = $form->{taxzone_id}; - } - if ($form->{currency}) { - $currency = $form->{currency}; - } + $form->backup_vars(qw(payment_id language_id taxzone_id + currency delivery_term_id intnotes cp_id)); - my $cp_id = $form->{cp_id}; IR->get_vendor(\%myconfig, \%$form); IR->retrieve_invoice(\%myconfig, \%$form); - $form->{cp_id} = $cp_id; - if ($payment_id) { - $form->{payment_id} = $payment_id; - } - if ($language_id) { - $form->{language_id} = $language_id; - } - if ($taxzone_id) { - $form->{taxzone_id} = $taxzone_id; - } - if ($currency) { - $form->{currency} = $currency; - } + $form->restore_vars(qw(payment_id language_id taxzone_id + currency delivery_term_id intnotes cp_id)); my @curr = $form->get_all_currencies(); map { $form->{selectcurrency} .= "