From 92daa1a66a9ff737c92df86da3c28d663c421032 Mon Sep 17 00:00:00 2001 From: Moritz Bunkus Date: Wed, 29 Nov 2006 15:19:01 +0000 Subject: [PATCH] Alu-Funktion aus Kundenprojekt entfernt. --- SL/IC.pm | 2 - SL/IR.pm | 2 +- SL/IS.pm | 4 +- SL/OE.pm | 2 +- bin/mozilla/common.pl | 49 ------------------- bin/mozilla/ic.pl | 12 +---- bin/mozilla/io.pl | 3 +- locale/de/all | 14 +----- locale/de/common | 2 - locale/de/ic | 3 +- .../Pg-upgrade-2.2.0.26-2.2.0.27.sql | 1 + 11 files changed, 9 insertions(+), 85 deletions(-) create mode 100644 sql/Pg-upgrade/Pg-upgrade-2.2.0.26-2.2.0.27.sql diff --git a/SL/IC.pm b/SL/IC.pm index 576340e75..7f076072a 100644 --- a/SL/IC.pm +++ b/SL/IC.pm @@ -370,7 +370,6 @@ sub save { $form->{onhand} *= 1; $form->{ve} *= 1; $form->{ge} *= 1; - $form->{alu} *= 1; $form->{buchungsgruppen_id} *= 1; $form->{not_discountable} *= 1; $form->{payment_id} *= 1; @@ -503,7 +502,6 @@ sub save { shop = '$form->{shop}', ve = '$form->{ve}', gv = '$form->{gv}', - alu = '$form->{alu}', not_discountable = '$form->{not_discountable}', microfiche = '$form->{microfiche}', partsgroup_id = $partsgroup_id diff --git a/SL/IR.pm b/SL/IR.pm index 69463ba49..702c9f5e9 100644 --- a/SL/IR.pm +++ b/SL/IR.pm @@ -1170,7 +1170,7 @@ sub retrieve_item { c2.accno AS income_accno, c2.new_chart_id AS income_new_chart, date($transdate) - c2.valid_from as income_valid, c3.accno AS expense_accno, c3.new_chart_id AS expense_new_chart, date($transdate) - c3.valid_from as expense_valid, p.unit, p.assembly, p.bin, p.onhand, p.notes AS partnotes, p.notes AS longdescription, p.not_discountable, - pg.partsgroup, p.formel, p.alu + pg.partsgroup, p.formel FROM parts p LEFT JOIN chart c1 ON ((select inventory_accno_id from buchungsgruppen where id=p.buchungsgruppen_id) = c1.id) LEFT JOIN chart c2 ON ((select income_accno_id_$form->{taxzone_id} from buchungsgruppen where id=p.buchungsgruppen_id) = c2.id) diff --git a/SL/IS.pm b/SL/IS.pm index 8e8b4781f..67a1fe5e2 100644 --- a/SL/IS.pm +++ b/SL/IS.pm @@ -1550,7 +1550,7 @@ sub retrieve_invoice { i.project_id, pr.projectnumber, i.serialnumber, p.partnumber, p.assembly, p.bin, p.notes AS partnotes, p.inventory_accno_id AS part_inventory_accno_id, i.id AS invoice_pos, pg.partsgroup, i.pricegroup_id, (SELECT pricegroup FROM pricegroup WHERE id=i.pricegroup_id) as pricegroup, - i.ordnumber, i.transdate, i.cusordnumber, p.alu, p.formel, i.subtotal + i.ordnumber, i.transdate, i.cusordnumber, p.formel, i.subtotal FROM invoice i JOIN parts p ON (i.parts_id = p.id) LEFT JOIN project pr ON (i.project_id = pr.id) @@ -1902,7 +1902,7 @@ sub retrieve_item { c2.accno AS income_accno, c2.new_chart_id AS income_new_chart, date($transdate) - c2.valid_from as income_valid, c3.accno AS expense_accno, c3.new_chart_id AS expense_new_chart, date($transdate) - c3.valid_from as expense_valid, p.unit, p.assembly, p.bin, p.onhand, p.notes AS partnotes, p.notes AS longdescription, p.not_discountable, - pg.partsgroup, p.formel, p.alu, p.payment_id AS part_payment_id + pg.partsgroup, p.formel, p.payment_id AS part_payment_id FROM parts p LEFT JOIN chart c1 ON ((select inventory_accno_id from buchungsgruppen where id=p.buchungsgruppen_id) = c1.id) LEFT JOIN chart c2 ON ((select income_accno_id_$form->{taxzone_id} from buchungsgruppen where id=p.buchungsgruppen_id) = c2.id) diff --git a/SL/OE.pm b/SL/OE.pm index 7813f3350..888f422be 100644 --- a/SL/OE.pm +++ b/SL/OE.pm @@ -806,7 +806,7 @@ sub retrieve { o.sellprice, o.parts_id AS id, o.unit, o.discount, p.bin, p.notes AS partnotes, p.inventory_accno_id AS part_inventory_accno_id, o.reqdate, o.project_id, o.serialnumber, o.ship, o.ordnumber, o.transdate, o.cusordnumber, o.subtotal, o.longdescription, - pr.projectnumber, p.alu, p.formel, + pr.projectnumber, p.formel, pg.partsgroup, o.pricegroup_id, (SELECT pricegroup FROM pricegroup WHERE id=o.pricegroup_id) as pricegroup FROM orderitems o JOIN parts p ON (o.parts_id = p.id) diff --git a/bin/mozilla/common.pl b/bin/mozilla/common.pl index fb98b70c0..c7dbfe5f2 100644 --- a/bin/mozilla/common.pl +++ b/bin/mozilla/common.pl @@ -400,55 +400,6 @@ sub calculate_qty { $lxdebug->leave_sub(); } -sub calculate_alu { - $lxdebug->enter_sub(); - - my ($length, $weight) = split /\r\n/,$form->{formel}; - - map({ $form->{$_} = "" } (qw(qty_alu price_alu total_alu qty_eloxal price_eloxal total_eloxal total))); - - if ($form->{description} =~ /.*Alupreisberechnung.*/) { - $form->{description} =~ /.*Alupreisberechnung:\n(.*)kg Aluminiumprofil Einzelpreis: (.*) Gesamt: (.*)\n(.*)m Eloxal Einzelpreis: (.*) Gesamt: (.*)/; - $form->{qty_alu} = $1; - $form->{price_alu} = $2; - $form->{total_alu} = $3; - $form->{qty_eloxal} = $4; - $form->{price_eloxal} = $5; - $form->{total_eloxal} = $6; - $form->{total} = $form->format_amount(\%myconfig, ($form->parse_amount(\%myconfig, $form->{total_alu}) + $form->parse_amount(\%myconfig, $form->{total_eloxal}))); - } - ($form->{description}, $null) = split /\nAlupreisberechnung/, $form->{description}; - - my $callback = "$form->{script}?action=vendor_selection&"; - map({ $callback .= "$_=" . $form->escape($form->{$_}) . "&" } - (qw(login path password name input_name input_id), grep({ /^[fl]_/ } keys %$form))); - - my @header_sort = qw(name customernumber address); - my %header_title = ( "name" => $locale->text("Name"), - "customernumber" => $locale->text("Customer Number"), - "address" => $locale->text("Address"), - ); - ($null, $form->{weight}) = split / /, $weight; - ($null, $form->{length}) = split / /, $length; - - $form->{calc_weight} = $form->parse_amount(\%myconfig, $form->{weight}); - $form->{calc_length} = $form->parse_amount(\%myconfig, $form->{length}); - - - my @header = - map(+{ "column_title" => $header_title{$_}, - "column" => $_, - }, - @header_sort); - - $form->{"title"} = $locale->text("Enter values for aluminium calculation"); - $form->header(); - print($form->parse_html_template("generic/calculate_alu")); - - $lxdebug->leave_sub(); -} - - sub set_longdescription { $lxdebug->enter_sub(); diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl index 80e0bbc55..1f45b3a34 100644 --- a/bin/mozilla/ic.pl +++ b/bin/mozilla/ic.pl @@ -2453,15 +2453,6 @@ sub form_header { {gv}> |; - $aluok = $form->{alu} == 1 ? "checked" : ""; - - $alu .= qq| - - | - . $locale->text('Aluartikel') . qq| - - |; - $notdiscountableok = ($form->{not_discountable}) == 1 ? "checked" : ""; $notdiscountable .= qq| @@ -2472,7 +2463,7 @@ sub form_header { |; $formel = - qq||; + qq||; $imagelinks = qq| @@ -2664,7 +2655,6 @@ sub form_header { $notdiscountable $vegv $shop - $alu $obsolete diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index e659a8a31..b8009c0f4 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -635,7 +635,6 @@ sub select_item { - @@ -701,7 +700,7 @@ sub item_selected { $sellprice = $form->parse_amount(\%myconfig, $form->{"sellprice_$i"}); map { $form->{"${_}_$i"} = $form->{"new_${_}_$j"} } - qw(id partnumber description sellprice listprice inventory_accno income_accno expense_accno bin unit weight assembly taxaccounts partsgroup formel alu longdescription not_discountable); + qw(id partnumber description sellprice listprice inventory_accno income_accno expense_accno bin unit weight assembly taxaccounts partsgroup formel longdescription not_discountable); if ($form->{"part_payment_id_$i"} ne "") { $form->{payment_id} = $form->{"part_payment_id_$i"}; } diff --git a/locale/de/all b/locale/de/all index 0ccd701ee..712faadf9 100644 --- a/locale/de/all +++ b/locale/de/all @@ -89,7 +89,6 @@ $self{texts} = { 'All Accounts' => 'Alle Konten', 'All Datasets up to date!' => 'Alle Datenbanken sind auf aktuellem Stand.', 'All changes in that file have been reverted.' => 'Alle Änderungen in dieser Datei wurden rückgängig gemacht.', - 'Aluartikel' => 'Aluartikel', 'Amount' => 'Betrag', 'Amount Due' => 'Betrag fällig', 'Angaben zum Finanzamt' => 'Angaben zum Finanzamt', @@ -402,7 +401,6 @@ gestartet', 'Enforce transaction reversal for all dates' => 'Gegenbuchungen für jeden Zeitraum aktualisieren', 'Enter longdescription' => 'Langtext eingeben', 'Enter up to 3 letters separated by a colon (i.e CAD:USD:EUR) for your native and foreign currencies' => 'Geben Sie Ihre und weitere Währungen mit bis zu drei Buchstaben pro Währung und Währungen durch Doppelpunkte getrennt ein (z.B. EUR:USD:CAD)', - 'Enter values for aluminium calculation' => 'Werte für Preisberechnung eingeben', 'Equity' => 'Passiva', 'Erlöse Ausland' => 'Erlöse Ausland', 'Erlöse EU m. UStId' => 'Erlöse EU m. UStId', @@ -494,7 +492,6 @@ gestartet', 'Individual Items' => 'Einzelteile', 'Information' => 'Information', 'Input Number Format' => 'Zahlenformat (Eingabe)', - 'Insert quantity and prices below.' => 'Menge und Preise unten eingeben', 'Interest Rate' => 'Zinssatz', 'Internal Notes' => 'interne Bemerkungen', 'Internet' => 'Internet', @@ -731,8 +728,6 @@ gestartet', 'Prepayment' => 'Vorauszahlung', 'Preview' => 'Druckvorschau', 'Price' => 'Preis', - 'Price Alu:' => 'Preis Alu:', - 'Price Eloxal:' => 'Preis Eloxal:', 'Pricegroup' => 'Preisgruppe', 'Pricegroup deleted!' => 'Preisgruppe gelöscht!', 'Pricegroup missing!' => 'Preisgruppe fehlt!', @@ -769,8 +764,6 @@ gestartet', 'Purchase Orders' => 'Lieferantenaufträge', 'Qty' => 'Menge', 'Quantity' => 'Menge', - 'Quantity Alu:' => 'Menge Alu:', - 'Quantity Article:' => 'Menge Artikel:', 'Quartal' => 'Quartal', 'Quarter' => 'Quartal', 'Quarterly' => 'quartalsweise', @@ -937,7 +930,7 @@ gestartet', 'The following Datasets need to be updated' => 'Folgende Datenbanken müssen aktualisiert werden', 'The following units are unknown.' => 'Die folgenden Einheiten sind unbekannt.', 'The following units exist already:' => 'Die folgenden Einheiten existieren bereits:', - 'The formula needs the following syntax:
For regular article:
Variablename= Variable Unit;
Variablename2= Variable2 Unit2;
...
###
Variable + ( Variable2 / Variable )
Please be beware of the spaces in the formula

For alu article:
Length:
Weight/m:
Length ist total length of article and weight/m ist the weight pro meter' => 'Die Formeln müssen in der folgenden Syntax eingegeben werden:
Bei normalen Artikeln:
Variablenname= Variable Einheit;
Variablenname2= Variable2 Einheit2;
...
###
Variable + Variable2 * ( Variable - Variable2 )
Bitte achten Sie auf die Leerzeichen in der Formel

Bei Aluminiumartikeln:
Länge: x
Gewicht/m: y
x ist die Gesamtlänge des Artikels in Meter und y das Gewicht pro Meter. Es muss jeweils die Gesamtezeile eingegeben werden', + 'The formula needs the following syntax:
For regular article:
Variablename= Variable Unit;
Variablename2= Variable2 Unit2;
...
###
Variable + ( Variable2 / Variable )
Please be beware of the spaces in the formula
' => 'Die Formeln müssen in der folgenden Syntax eingegeben werden:
Bei normalen Artikeln:
Variablenname= Variable Einheit;
Variablenname2= Variable2 Einheit2;
...
###
Variable + Variable2 * ( Variable - Variable2 )
Bitte achten Sie auf die Leerzeichen in der Formel
Es muss jeweils die Gesamte Zeile eingegeben werden', 'The licensing module has been deactivated in lx-erp.conf.' => 'Das Lizenzverwaltungsmodul wurde in lx-erp.conf deaktiviert.', 'The name in row %d has already been used before.' => 'Der Name in Zeile %d wurde vorher bereits benutzt.', 'The name is missing in row %d.' => 'Der Name fehlt in Zeile %d.', @@ -957,12 +950,8 @@ gestartet', 'Top 100 hinzufuegen' => 'Top 100 hinzufügen', 'Top Level' => 'Hauptartikelbezeichnung', 'Total' => 'Summe', - 'Total Alu:' => 'Gesamtpreis Alu:', - 'Total Eloxal:' => 'Gesamtpreis Eloxal:', 'Total Fees' => 'Kumulierte Gebühren', 'Total Interest' => 'Kumulierte Zinsen', - 'Total length' => 'Gesamtlänge des Artikels', - 'Total:' => 'Gesamtpreis:', 'Trade Discount' => 'Rabatt', 'Transaction Date missing!' => 'Buchungsdatum fehlt!', 'Transaction deleted!' => 'Buchung gelöscht!', @@ -1072,7 +1061,6 @@ gestartet', 'Warengruppensatz' => '', 'Weight' => 'Gewicht', 'Weight Unit' => 'Gewichtseinheit', - 'Weight/m' => 'Gewicht pro Meter', 'What type of item is this?' => 'Was ist dieser Artikel?', 'Workflow purchase_order' => 'Workflow Lieferantenauftrag', 'Workflow request_quotation' => 'Workflow Preisanfrage', diff --git a/locale/de/common b/locale/de/common index cf6465f1a..f485084ad 100644 --- a/locale/de/common +++ b/locale/de/common @@ -2,7 +2,6 @@ $self{texts} = { 'Address' => 'Adresse', 'Customer Number' => 'Kundennummer', 'Enter longdescription' => 'Langtext eingeben', - 'Enter values for aluminium calculation' => 'Werte für Preisberechnung eingeben', 'Name' => 'Name', 'No Customer was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein Endkunde gefunden', 'No Vendor was found matching the search parameters.' => 'Zu dem Suchbegriff wurde kein Händler gefunden', @@ -24,7 +23,6 @@ $self{texts} = { }; $self{subs} = { - 'calculate_alu' => 'calculate_alu', 'calculate_qty' => 'calculate_qty', 'delivery_customer_selection' => 'delivery_customer_selection', 'employee_selection_internal' => 'employee_selection_internal', diff --git a/locale/de/ic b/locale/de/ic index 945e13a36..e971f0710 100644 --- a/locale/de/ic +++ b/locale/de/ic @@ -13,7 +13,6 @@ $self{texts} = { 'Add Request for Quotation' => 'Anfrage erfassen', 'Add Sales Order' => 'Auftrag erfassen', 'Add Service' => 'Dienstleistung erfassen', - 'Aluartikel' => 'Aluartikel', 'Apr' => 'Apr', 'April' => 'April', 'Are you sure you want to update the prices' => 'Sind Sie sicher, dass Sie die Preise @@ -192,7 +191,7 @@ aktualisieren wollen?', 'Subject' => 'Betreff', 'Subtotal' => 'Zwischensumme', 'TOP100' => 'Top 100', - 'The formula needs the following syntax:
For regular article:
Variablename= Variable Unit;
Variablename2= Variable2 Unit2;
...
###
Variable + ( Variable2 / Variable )
Please be beware of the spaces in the formula

For alu article:
Length:
Weight/m:
Length ist total length of article and weight/m ist the weight pro meter' => 'Die Formeln müssen in der folgenden Syntax eingegeben werden:
Bei normalen Artikeln:
Variablenname= Variable Einheit;
Variablenname2= Variable2 Einheit2;
...
###
Variable + Variable2 * ( Variable - Variable2 )
Bitte achten Sie auf die Leerzeichen in der Formel

Bei Aluminiumartikeln:
Länge: x
Gewicht/m: y
x ist die Gesamtlänge des Artikels in Meter und y das Gewicht pro Meter. Es muss jeweils die Gesamtezeile eingegeben werden', + 'The formula needs the following syntax:
For regular article:
Variablename= Variable Unit;
Variablename2= Variable2 Unit2;
...
###
Variable + ( Variable2 / Variable )
Please be beware of the spaces in the formula
' => 'Die Formeln müssen in der folgenden Syntax eingegeben werden:
Bei normalen Artikeln:
Variablenname= Variable Einheit;
Variablenname2= Variable2 Einheit2;
...
###
Variable + Variable2 * ( Variable - Variable2 )
Bitte achten Sie auf die Leerzeichen in der Formel
Es muss jeweils die Gesamte Zeile eingegeben werden', 'To' => 'An', 'Top 100' => 'Top 100', 'Top 100 hinzufuegen' => 'Top 100 hinzufügen', diff --git a/sql/Pg-upgrade/Pg-upgrade-2.2.0.26-2.2.0.27.sql b/sql/Pg-upgrade/Pg-upgrade-2.2.0.26-2.2.0.27.sql new file mode 100644 index 000000000..aeb2b86da --- /dev/null +++ b/sql/Pg-upgrade/Pg-upgrade-2.2.0.26-2.2.0.27.sql @@ -0,0 +1 @@ +ALTER TABLE parts DROP COLUMN alu; -- 2.20.1