Skip to content

Commit

Permalink
ZUGFeRD: nutze interne Bemerkungen für Zusatzinformationen
Browse files Browse the repository at this point in the history
  • Loading branch information
z4m1n0 committed Nov 24, 2023
1 parent b3f7eb4 commit d53c99a
Showing 1 changed file with 6 additions and 6 deletions.
12 changes: 6 additions & 6 deletions SL/Controller/ZUGFeRD.pm
Original file line number Diff line number Diff line change
Expand Up @@ -150,7 +150,7 @@ sub action_import_zugferd {
my %metadata = %{$parser->metadata};
my @items = @{$parser->items};

my $notes = t8("ZUGFeRD Import. Type: #1", $metadata{'type'});
my $intnotes = t8("ZUGFeRD Import. Type: #1", $metadata{'type'});
my $iban = $metadata{'iban'};
my $invnumber = $metadata{'invnumber'};

Expand All @@ -171,8 +171,8 @@ sub action_import_zugferd {
# Check IBAN specified on bill matches the one we've got in
# the database for this vendor.
if ($iban) {
$notes .= "\nIBAN: ";
$notes .= $iban ne $vendor->iban ?
$intnotes .= "\nIBAN: ";
$intnotes .= $iban ne $vendor->iban ?
t8("Record IBAN #1 doesn't match vendor IBAN #2", $iban, $vendor->iban)
: $iban
}
Expand Down Expand Up @@ -265,7 +265,7 @@ sub action_import_zugferd {
transdate => $metadata{'transdate'},
duedate => $metadata{'duedate'},
no_payment_bookings => 0,
notes => $notes,
intnotes => $intnotes,
taxincluded => 0,
direct_debit => $metadata{'direct_debit'},
currency => $currency->name,
Expand Down Expand Up @@ -342,8 +342,8 @@ extracts the invoice's items.
If the invoice has a IBAN also, it will be be compared to the
IBAN saved for the vendor (if any). If they don't match a
warning will be writte in ap.notes. Furthermore the ZUGFeRD
type code will be written to ap.notes. No callback
warning will be writte in ap.intnotes. Furthermore the ZUGFeRD
type code will be written to ap.intnotes. No callback
implemented.
=back
Expand Down

0 comments on commit d53c99a

Please sign in to comment.