X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Finvoice_io.pl;h=a4e50ff0cf7b15260a66fc40e04f26944de9e2c7;hb=a38193700a542081a1962820889f19c07c31baaf;hp=7ff034702805b0e6ec17aad77db1be8b1cddf50b;hpb=bae2eaa5780fcb8ade0e5d0cb9e160f095499203;p=kivitendo-erp.git diff --git a/bin/mozilla/invoice_io.pl b/bin/mozilla/invoice_io.pl index 7ff034702..a4e50ff0c 100644 --- a/bin/mozilla/invoice_io.pl +++ b/bin/mozilla/invoice_io.pl @@ -48,8 +48,8 @@ use strict; if (-f "bin/mozilla/custom_invoice_io.pl") { eval { require "bin/mozilla/custom_invoice_io.pl"; }; } -if (-f "bin/mozilla/$main::form->{login}_invoice_io.pl") { - eval { require "bin/mozilla/$main::form->{login}_invoice_io.pl"; }; +if (-f "bin/mozilla/$::myconfig{login}_invoice_io.pl") { + eval { require "bin/mozilla/$::myconfig{login}_invoice_io.pl"; }; } 1; @@ -88,56 +88,6 @@ use SL::PE; use SL::AM; use Data::Dumper; -sub set_pricegroup { - $main::lxdebug->enter_sub(); - - my $form = $main::form; - my %myconfig = %main::myconfig; - my $locale = $main::locale; - - my $rowcount = shift; - for my $j (1 .. $rowcount) { - my $pricegroup_old = $form->{"pricegroup_old_$j"}; - if ($form->{PRICES}{$j}) { - my $len = 0; - my $prices = ''; - my $price = 0; - foreach my $item (@{ $form->{PRICES}{$j} }) { - - #$price = $form->round_amount($myconfig, $item->{price}, 5); - #$price = $form->format_amount($myconfig, $item->{price}, 2); - my $price = $item->{price}; - my $pricegroup_id = $item->{pricegroup_id}; - my $pricegroup = $item->{pricegroup}; - - # build drop down list for pricegroups - $prices .= - qq|\n|; - - $len += 1; - - # map { - # $form->{"${_}_$j"} = - # $form->format_amount(\%myconfig, $form->{"${_}_$j"}) - # } qw(sellprice price_new price_old); - - # set new selectedpricegroup_id and prices for "Preis" - if ($item->{selected} && ($pricegroup_id != 0)) { - $form->{"pricegroup_old_$j"} = $pricegroup_id; - $form->{"price_new_$j"} = $price; - # edit: don't change the sellprice here - # $form->{"sellprice_$j"} = $price; # this must only be updated for existing articles, not new ones - } - if ($pricegroup_id == 0) { - $form->{"price_new_$j"} = $form->{"sellprice_$j"}; - } - } - $form->{"prices_$j"} = $prices; - } - } - $main::lxdebug->leave_sub(); -} - sub display_form { $main::lxdebug->enter_sub(); @@ -188,12 +138,6 @@ sub display_form { # $form->{rowcount}--; # my $rowcount = $form->{rowcount}; # - # # get pricegroups for parts - # IS->get_pricegroups_for_parts(\%myconfig, \%$form); - # - # # build up html code for prices_$i - # set_pricegroup($rowcount); - # # $form->{resubmit} = 1; # # }