X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/7b15c3418a109b49a1f0fe64393b3d266adb7881..45f8b16a355e9b61bd8e0af2ba185009af8e9006:/bin/mozilla/ir.pl diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl index 744e0c558..a91f8a4b0 100644 --- a/bin/mozilla/ir.pl +++ b/bin/mozilla/ir.pl @@ -116,7 +116,7 @@ sub invoice_links { } } - my ($payment_id, $language_id, $taxzone_id, $currency, $delivery_term_id); + my ($payment_id, $language_id, $taxzone_id, $currency, $delivery_term_id, $intnotes); if ($form->{payment_id}) { $payment_id = $form->{payment_id}; } @@ -132,6 +132,9 @@ sub invoice_links { if ($form->{delivery_term_id}) { $delivery_term_id = $form->{delivery_term_id}; } + if (exists $form->{intnotes}) { + $intnotes = $form->{intnotes}; + } my $cp_id = $form->{cp_id}; IR->get_vendor(\%myconfig, \%$form); @@ -153,6 +156,9 @@ sub invoice_links { if ($delivery_term_id) { $form->{delivery_term_id} = $delivery_term_id; } + if (defined $intnotes) { + $form->{intnotes} = $intnotes; + } my @curr = $form->get_all_currencies(); map { $form->{selectcurrency} .= "