X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=bin%2Fmozilla%2Fio.pl;h=63d6b454d4401bbcc8d74708eef5a3f3c3713dc8;hb=d3a590db90ed6dcd1092c9e1f911f504235c0fdc;hp=850db5febe68094fad8802eaab3a28bc8ba59d1e;hpb=a325f1b7554914418f885c43211099baa0ce083c;p=kivitendo-erp.git diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl index 850db5feb..63d6b454d 100644 --- a/bin/mozilla/io.pl +++ b/bin/mozilla/io.pl @@ -137,14 +137,14 @@ sub display_row { { id => 'partnumber', width => 8, value => $locale->text('Number'), display => 1, }, { id => 'description', width => 30, value => $locale->text('Part Description'), display => 1, }, { id => 'ship', width => 5, value => $locale->text('Delivered'), display => $is_s_p_order, }, - { id => 'qty', width => 5, value => $locale->text('Wo bin ich'), display => 1, }, + { id => 'qty', width => 5, value => $locale->text('Qty'), display => 1, }, { id => 'price_factor', width => 5, value => $locale->text('Price Factor'), display => !$is_delivery_order, }, { id => 'unit', width => 5, value => $locale->text('Unit'), display => 1, }, { id => 'license', width => 10, value => $locale->text('License'), display => 0, }, { id => 'serialnr', width => 10, value => $locale->text('Serial No.'), display => 0, }, { id => 'projectnr', width => 10, value => $locale->text('Project'), display => 0, }, { id => 'sellprice', width => 15, value => $locale->text('Price'), display => !$is_delivery_order, }, - { id => 'sellprice_pg', width => 8, value => $locale->text('Pricegroup'), display => ($form->{type} =~ /^sales_/) && !$is_delivery_order, }, + { id => 'sellprice_pg', width => 8, value => $locale->text('Pricegroup'), display => ($form->{type} =~ /^sales_/) && !$is_delivery_order, }, { id => 'discount', width => 5, value => $locale->text('Discount'), display => !$is_delivery_order, }, { id => 'linetotal', width => 10, value => $locale->text('Extended'), display => !$is_delivery_order, }, { id => 'bin', width => 10, value => $locale->text('Bin'), display => 0, }, @@ -689,13 +689,14 @@ sub check_form { } elsif ($form->{item} eq 'assembly') { - $form->{sellprice} = 0; + # fuer assemblies auskommentiert. seiteneffekte? ;-) wird die woanders benoetigt? + #$form->{sellprice} = 0; $form->{weight} = 0; map { $form->{$_} = $form->parse_amount(\%myconfig, $form->{$_}) } qw(listprice rop stock); @flds = - qw(id qty unit bom partnumber description sellprice weight runningnumber partsgroup); + qw(id qty unit bom partnumber description sellprice weight runningnumber partsgroup lastcost); for my $i (1 .. ($form->{assembly_rows} - 1)) { if ($form->{"qty_$i"}) { @@ -708,12 +709,13 @@ sub check_form { #($form->{"sellprice_$i"},$form->{"$pricegroup_old_$i"}) = split /--/, $form->{"sellprice_$i"}; - $form->{sellprice} += ($form->{"qty_$i"} * $form->{"sellprice_$i"}); - $form->{weight} += ($form->{"qty_$i"} * $form->{"weight_$i"}); + # fuer assemblies auskommentiert. siehe oben + # $form->{sellprice} += ($form->{"qty_$i"} * $form->{"sellprice_$i"} / ($form->{"price_factor_$i"} || 1)); + $form->{weight} += ($form->{"qty_$i"} * $form->{"weight_$i"} / ($form->{"price_factor_$i"} || 1)); $count++; } } - + # kann das hier auch weg? s.o. jb $form->{sellprice} = $form->round_amount($form->{sellprice}, 2); $form->redo_rows(\@flds, \@a, $count, $form->{assembly_rows}); @@ -1387,7 +1389,7 @@ sub print_form { $form->get_shipto(\%myconfig); } - @a = qw(name street zipcode city country); + @a = qw(name street zipcode city country contact); $shipto = 1;