From e6346d3f9b5d3e24727def67274f39c02b2ed12b Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Thu, 11 Jan 2007 10:15:48 +0000 Subject: [PATCH] =?utf8?q?Beim=20Rechnungsbericht=20eine=20Spalte=20"Typ"?= =?utf8?q?=20anzeigen,=20in=20der=20R=20f=C3=BCr=20Rechnung,=20S=20f=C3=BC?= =?utf8?q?r=20Stornorechnung=20und=20G=20f=C3=BCr=20Gutschrift=20steht.?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit --- SL/AR.pm | 2 +- bin/mozilla/ar.pl | 11 ++++++++++- locale/de/all | 5 ++++- locale/de/ar | 4 ++++ 4 files changed, 19 insertions(+), 3 deletions(-) diff --git a/SL/AR.pm b/SL/AR.pm index b4c0ae14d..3240fb77c 100644 --- a/SL/AR.pm +++ b/SL/AR.pm @@ -411,7 +411,7 @@ sub ar_transactions { my $query = qq|SELECT a.id, a.invnumber, a.ordnumber, a.transdate, a.duedate, a.netamount, a.amount, a.paid, c.name, a.invoice, a.datepaid, a.terms, a.notes, a.shipvia, - a.shippingpoint, + a.shippingpoint, a.storno, e.name AS employee FROM ar a JOIN customer c ON (a.customer_id = c.id) diff --git a/bin/mozilla/ar.pl b/bin/mozilla/ar.pl index 540a4f12e..3b4540457 100644 --- a/bin/mozilla/ar.pl +++ b/bin/mozilla/ar.pl @@ -1296,9 +1296,11 @@ sub ar_transactions { } @columns = $form->sort_columns( - qw(transdate id invnumber ordnumber name netamount tax amount paid datepaid due duedate notes employee shippingpoint shipvia) + qw(transdate id type invnumber ordnumber name netamount tax amount paid datepaid due duedate notes employee shippingpoint shipvia) ); + $form->{"l_type"} = "Y"; + foreach $item (@columns) { if ($form->{"l_$item"} eq "Y") { push @column_index, $item; @@ -1326,6 +1328,8 @@ sub ar_transactions { "" . $locale->text('Due Date') . ""; + $column_header{type} = + "" . $locale->text('Type') . ""; $column_header{invnumber} = "" . $locale->text('Invoice') @@ -1452,6 +1456,11 @@ sub ar_transactions { $column_data{invnumber} = "{id}&path=$form->{path}&login=$form->{login}&password=$form->{password}&callback=$callback>$ar->{invnumber}"; + $column_data{type} = "" . + ($ar->{storno} ? $locale->text("Storno (one letter abbreviation)") : + $ar->{amount} < 0 ? + $locale->text("Credit note (one letter abbreviation)") : + $locale->text("Invoice (one letter abbreviation)")) . ""; $column_data{ordnumber} = "$ar->{ordnumber} "; $column_data{name} = "$ar->{name}"; $ar->{notes} =~ s/\r\n/
/g; diff --git a/locale/de/all b/locale/de/all index 64dd52c10..9b9ef4528 100644 --- a/locale/de/all +++ b/locale/de/all @@ -264,6 +264,7 @@ aktualisieren wollen?', 'Credit Note Number' => 'Gutschriftnummer', 'Credit Tax' => 'Umsatzsteuer', 'Credit Tax Account' => 'Umsatzsteuerkonto', + 'Credit note (one letter abbreviation)' => 'G', 'Curr' => 'Währung', 'Currency' => 'Währung', 'Current' => 'Betrag', @@ -526,6 +527,7 @@ gestartet', 'Invno.' => 'Rg. Nr.', 'Invnumber' => 'Rechnungsnummer', 'Invoice' => 'Rechnung', + 'Invoice (one letter abbreviation)' => 'R', 'Invoice Date' => 'Rechnungsdatum', 'Invoice Date missing!' => 'Rechnungsdatum fehlt!', 'Invoice Duedate' => 'Fälligkeitsdatum', @@ -924,6 +926,7 @@ gestartet', 'Stock' => 'einlagern', 'Stock Assembly' => 'Erzeugnis einlagern', 'Storno' => 'Storno', + 'Storno (one letter abbreviation)' => 'S', 'Storno Invoice' => 'Stornorechnung', 'Storno Packing List' => 'Stornolieferschein', 'Straße' => 'Straße', @@ -962,7 +965,6 @@ gestartet', 'The database update/creation did not succeed. The file contained the following error:' => 'Die Datenbankaktualisierung/erstellung schlug fehl. Die Datei enthielt den folgenden Fehler:', 'The database upgrade for the introduction of Buchungsgruppen is now complete.' => 'Das Datenbankupgrade für die Einführung von Buchungsgruppen ist jetzt beendet.', 'The database upgrade for the introduction of units is now complete.' => 'Das Datenbankupgrade zwecks Einführung von Einheiten ist nun beendet.', - 'The dunning process is started' => '', 'The dunning process started' => 'Der Mahnprozess ist gestartet.', 'The factor is missing in row %d.' => 'Der Faktor fehlt in Zeile %d.', 'The factor is missing.' => 'Der Faktor fehlt.', @@ -1009,6 +1011,7 @@ gestartet', 'Transfer Inventory' => 'Ware umlagern', 'Transfer to' => 'umlagern nach', 'Trial Balance' => 'Saldenbilanz', + 'Type' => 'Typ', 'Type of Business' => 'Kundentyp', 'USTVA-Hint: Method' => 'Wenn Sie Ist-Versteuert sind, wählen Sie die Einnahmen-/Überschuß-Rechnung aus. Sind Sie Soll-Versteuert und bilanzverpflichtet, dann wählen Sie Bilanz aus.', 'USTVA-Hint: Tax Authoritys' => 'Bitte das Bundesland UND die Stadt bzw. den Einzugsbereich Ihres zuständigen Finanzamts auswählen.', diff --git a/locale/de/ar b/locale/de/ar index 06ba33a28..03434d103 100644 --- a/locale/de/ar +++ b/locale/de/ar @@ -21,6 +21,7 @@ $self->{texts} = { 'Confirm!' => 'Bestätigen Sie!', 'Continue' => 'Weiter', 'Credit Limit' => 'Kreditlimit', + 'Credit note (one letter abbreviation)' => 'G', 'Currency' => 'Währung', 'Customer' => 'Kunde', 'Customer missing!' => 'Kundenname fehlt!', @@ -46,6 +47,7 @@ $self->{texts} = { 'Include in Report' => 'In Bericht aufnehmen', 'Incoming Payments' => 'Zahlungseingänge', 'Invoice' => 'Rechnung', + 'Invoice (one letter abbreviation)' => 'R', 'Invoice Date' => 'Rechnungsdatum', 'Invoice Date missing!' => 'Rechnungsdatum fehlt!', 'Invoice Number' => 'Rechnungsnummer', @@ -85,6 +87,7 @@ $self->{texts} = { 'Ship via' => 'Transportmittel', 'Shipping Point' => 'Versandort', 'Source' => 'Beleg', + 'Storno (one letter abbreviation)' => 'S', 'Subtotal' => 'Zwischensumme', 'Tax' => 'Steuer', 'Tax Included' => 'Steuer im Preis inbegriffen', @@ -92,6 +95,7 @@ $self->{texts} = { 'Total' => 'Summe', 'Transaction deleted!' => 'Buchung gelöscht!', 'Transaction posted!' => 'Buchung verbucht!', + 'Type' => 'Typ', 'Update' => 'Erneuern', 'Use As Template' => 'Als Vorlage verwenden', 'Vendor not on file!' => 'Lieferant ist nicht in der Datenbank!', -- 2.20.1