Trennung zwischen Dienstleistungs- und Wareneinheiten aufgehoben.

diff --git a/SL/AM.pm b/SL/AM.pm
index 22eab8bd0042962e145913e6887061fd6a563677..fa22706eec2773ec10a2cb5385025b1b3d24b5cc 100644 (file)
--- a/SL/AM.pm
+++ b/SL/AM.pm
@@ -1776,19 +1776,13 @@ sub get_base_unit {
 sub retrieve_units {
   $main::lxdebug->enter_sub();
 
 sub retrieve_units {
   $main::lxdebug->enter_sub();
 

-  my ($self, $myconfig, $form, $type, $prefix) = @_;
+  my ($self, $myconfig, $form, $prefix) = @_;

 
   my $dbh = $form->dbconnect($myconfig);
 
   my $query = "SELECT *, base_unit AS original_base_unit FROM units";
 
   my $dbh = $form->dbconnect($myconfig);
 
   my $query = "SELECT *, base_unit AS original_base_unit FROM units";

-  my @values;
-  if ($type) {
-    $query .= " WHERE (type = ?)";
-    @values = ($type);
-  }

 
 

-  my $sth = $dbh->prepare($query);
-  $sth->execute(@values) || $form->dberror($query . " (" . join(", ", @values) . ")");
+  my $sth = prepare_execute_query($form, $dbh, $query);

 
   my $units = {};
   while (my $ref = $sth->fetchrow_hashref()) {
 
   my $units = {};
   while (my $ref = $sth->fetchrow_hashref()) {


@@ -2037,16 +2031,16 @@ sub sum_with_unit {
 sub add_unit {
   $main::lxdebug->enter_sub();
 
 sub add_unit {
   $main::lxdebug->enter_sub();
 

-  my ($self, $myconfig, $form, $name, $base_unit, $factor, $type, $languages) = @_;
+  my ($self, $myconfig, $form, $name, $base_unit, $factor, $languages) = @_;

 
   my $dbh = $form->dbconnect_noauto($myconfig);
 
   my $query = qq|SELECT COALESCE(MAX(sortkey), 0) + 1 FROM units|;
   my ($sortkey) = selectrow_query($form, $dbh, $query);
 
 
   my $dbh = $form->dbconnect_noauto($myconfig);
 
   my $query = qq|SELECT COALESCE(MAX(sortkey), 0) + 1 FROM units|;
   my ($sortkey) = selectrow_query($form, $dbh, $query);
 

-  $query = "INSERT INTO units (name, base_unit, factor, type, sortkey) " .
-    "VALUES (?, ?, ?, ?, ?)";
-  do_query($form, $dbh, $query, $name, $base_unit, $factor, $type, $sortkey);
+  $query = "INSERT INTO units (name, base_unit, factor, sortkey) " .
+    "VALUES (?, ?, ?, ?)";
+  do_query($form, $dbh, $query, $name, $base_unit, $factor, $sortkey);

 
   if ($languages) {
     $query = "INSERT INTO units_language (unit, language_id, localized, localized_plural) VALUES (?, ?, ?, ?)";
 
   if ($languages) {
     $query = "INSERT INTO units_language (unit, language_id, localized, localized_plural) VALUES (?, ?, ?, ?)";


@@ -2067,7 +2061,7 @@ sub add_unit {
 sub save_units {
   $main::lxdebug->enter_sub();
 
 sub save_units {
   $main::lxdebug->enter_sub();
 

-  my ($self, $myconfig, $form, $type, $units, $delete_units) = @_;
+  my ($self, $myconfig, $form, $units, $delete_units) = @_;

 
   my $dbh = $form->dbconnect_noauto($myconfig);
 
 
   my $dbh = $form->dbconnect_noauto($myconfig);
 


@@ -2125,7 +2119,7 @@ sub save_units {
 sub swap_units {
   $main::lxdebug->enter_sub();
 
 sub swap_units {
   $main::lxdebug->enter_sub();
 

-  my ($self, $myconfig, $form, $dir, $name_1, $unit_type) = @_;
+  my ($self, $myconfig, $form, $dir, $name_1) = @_;

 
   my $dbh = $form->dbconnect_noauto($myconfig);
 
 
   my $dbh = $form->dbconnect_noauto($myconfig);
 


@@ -2136,9 +2130,9 @@ sub swap_units {
 
   $query =
     qq|SELECT sortkey FROM units | .
 
   $query =
     qq|SELECT sortkey FROM units | .

-    qq|WHERE sortkey | . ($dir eq "down" ? ">" : "<") . qq| ? AND type = ? | .
+    qq|WHERE sortkey | . ($dir eq "down" ? ">" : "<") . qq| ? | .

     qq|ORDER BY sortkey | . ($dir eq "down" ? "ASC" : "DESC") . qq| LIMIT 1|;
     qq|ORDER BY sortkey | . ($dir eq "down" ? "ASC" : "DESC") . qq| LIMIT 1|;

-  my ($sortkey_2) = selectrow_query($form, $dbh, $query, $sortkey_1, $unit_type);
+  my ($sortkey_2) = selectrow_query($form, $dbh, $query, $sortkey_1);

 
   if (defined($sortkey_1)) {
     $query = qq|SELECT name FROM units WHERE sortkey = ${sortkey_2}|;
 
   if (defined($sortkey_1)) {
     $query = qq|SELECT name FROM units WHERE sortkey = ${sortkey_2}|;

diff --git a/SL/DO.pm b/SL/DO.pm
index 79dc341dfecb10926be84c234f48644e3a3075a1..3be64f819d69741f3a701a7eda9d754ab517fafe 100644 (file)
--- a/SL/DO.pm
+++ b/SL/DO.pm
@@ -813,7 +813,7 @@ sub check_stock_availability {
 
   my $dbh         = $form->get_standard_dbh($myconfig);
 
 
   my $dbh         = $form->get_standard_dbh($myconfig);
 

-  my $units       = AM->retrieve_units($myconfig, $form, "dimension");
+  my $units       = AM->retrieve_units($myconfig, $form);

 
   my ($partunit)  = selectrow_query($form, $dbh, qq|SELECT unit FROM parts WHERE id = ?|, conv_i($params{parts_id}));
   my $unit_factor = $units->{$partunit}->{factor} || 1;
 
   my ($partunit)  = selectrow_query($form, $dbh, qq|SELECT unit FROM parts WHERE id = ?|, conv_i($params{parts_id}));
   my $unit_factor = $units->{$partunit}->{factor} || 1;

diff --git a/SL/IS.pm b/SL/IS.pm
index 961746ff6d35bf3c053b656f2435409bc220659e..a7e3fa6c7535ee268bcc2a5ba46842ec269cc01b 100644 (file)
--- a/SL/IS.pm
+++ b/SL/IS.pm
@@ -1828,8 +1828,6 @@ sub get_pricegroups_for_parts {
 
   my $i  = 1;
   my $id = 0;
 
   my $i  = 1;
   my $id = 0;

-  my $dimension_units = AM->retrieve_units($myconfig, $form, "dimension");
-  my $service_units = AM->retrieve_units($myconfig, $form, "service");

   my $all_units = AM->retrieve_units($myconfig, $form);
   while (($form->{"id_$i"}) or ($form->{"new_id_$i"})) {
     $form->{"PRICES"}{$i} = [];
   my $all_units = AM->retrieve_units($myconfig, $form);
   while (($form->{"id_$i"}) or ($form->{"new_id_$i"})) {
     $form->{"PRICES"}{$i} = [];


@@ -1862,9 +1860,8 @@ sub get_pricegroups_for_parts {
     # vergleichen und bei Unterschied den Preis entsprechend umrechnen.
     $form->{"selected_unit_$i"} = $form->{"unit_$i"} unless ($form->{"selected_unit_$i"});
 
     # vergleichen und bei Unterschied den Preis entsprechend umrechnen.
     $form->{"selected_unit_$i"} = $form->{"unit_$i"} unless ($form->{"selected_unit_$i"});
 

-    my $check_units = $form->{"inventory_accno_$i"} ? $dimension_units : $service_units;
-    if (!$check_units->{$form->{"selected_unit_$i"}} ||
-        ($check_units->{$form->{"selected_unit_$i"}}->{"base_unit"} ne
+    if (!$all_units->{$form->{"selected_unit_$i"}} ||
+        ($all_units->{$form->{"selected_unit_$i"}}->{"base_unit"} ne

          $all_units->{$form->{"unit_old_$i"}}->{"base_unit"})) {
       # Die ausgewaehlte Einheit ist fuer diesen Artikel nicht gueltig
       # (z.B. Dimensionseinheit war ausgewaehlt, es handelt sich aber
          $all_units->{$form->{"unit_old_$i"}}->{"base_unit"})) {
       # Die ausgewaehlte Einheit ist fuer diesen Artikel nicht gueltig
       # (z.B. Dimensionseinheit war ausgewaehlt, es handelt sich aber

diff --git a/bin/mozilla/am.pl b/bin/mozilla/am.pl
index 537151561c6081f7ed509043428678ce2fd097c2..45333c1cd895b44c2d4e2a6509189ac4919cbeb3 100644 (file)
--- a/bin/mozilla/am.pl
+++ b/bin/mozilla/am.pl
@@ -2586,7 +2586,7 @@ sub edit_units {
 
   $auth->assert('config');
 
 
   $auth->assert('config');
 

-  $units = AM->retrieve_units(\%myconfig, $form, $form->{"unit_type"}, "resolved_");
+  $units = AM->retrieve_units(\%myconfig, $form, "resolved_");

   AM->units_in_use(\%myconfig, $form, $units);
   map({ $units->{$_}->{"BASE_UNIT_DDBOX"} = AM->unit_select_data($units, $units->{$_}->{"base_unit"}, 1); } keys(%{$units}));
 
   AM->units_in_use(\%myconfig, $form, $units);
   map({ $units->{$_}->{"BASE_UNIT_DDBOX"} = AM->unit_select_data($units, $units->{$_}->{"base_unit"}, 1); } keys(%{$units}));
 


@@ -2610,12 +2610,12 @@ sub edit_units {
     $i++;
   }
 
     $i++;
   }
 

-  $units = AM->retrieve_units(\%myconfig, $form, $form->{"unit_type"});
+  $units = AM->retrieve_units(\%myconfig, $form);

   $ddbox = AM->unit_select_data($units, undef, 1);
 
   $ddbox = AM->unit_select_data($units, undef, 1);
 

-  my $updownlink = build_std_url("action=swap_units", "unit_type");
+  my $updownlink = build_std_url("action=swap_units");

 
 

-  $form->{"title"} = sprintf($locale->text("Add and edit %s"), $form->{"unit_type"} eq "dimension" ? $locale->text("dimension units") : $locale->text("service units"));
+  $form->{"title"} = $locale->text("Add and edit units");

   $form->header();
   print($form->parse_html_template("am/edit_units",
                                    { "UNITS"               => \@unit_list,
   $form->header();
   print($form->parse_html_template("am/edit_units",
                                    { "UNITS"               => \@unit_list,


@@ -2632,7 +2632,7 @@ sub add_unit {
   $auth->assert('config');
 
   $form->isblank("new_name", $locale->text("The name is missing."));
   $auth->assert('config');
 
   $form->isblank("new_name", $locale->text("The name is missing."));

-  $units = AM->retrieve_units(\%myconfig, $form, $form->{"unit_type"});
+  $units = AM->retrieve_units(\%myconfig, $form);

   $all_units = AM->retrieve_units(\%myconfig, $form);
   $form->show_generic_error($locale->text("A unit with this name does already exist.")) if ($all_units->{$form->{"new_name"}});
 
   $all_units = AM->retrieve_units(\%myconfig, $form);
   $form->show_generic_error($locale->text("A unit with this name does already exist.")) if ($all_units->{$form->{"new_name"}});
 


@@ -2655,7 +2655,7 @@ sub add_unit {
          });
   }
 
          });
   }
 

-  AM->add_unit(\%myconfig, $form, $form->{"new_name"}, $base_unit, $factor, $form->{"unit_type"}, \@languages);
+  AM->add_unit(\%myconfig, $form, $form->{"new_name"}, $base_unit, $factor, \@languages);

 
   $form->{"saved_message"} = $locale->text("The unit has been saved.");
 
 
   $form->{"saved_message"} = $locale->text("The unit has been saved.");
 


@@ -2689,7 +2689,7 @@ sub save_unit {
 
   $auth->assert('config');
 
 
   $auth->assert('config');
 

-  $old_units = AM->retrieve_units(\%myconfig, $form, $form->{"unit_type"}, "resolved_");
+  $old_units = AM->retrieve_units(\%myconfig, $form, "resolved_");

   AM->units_in_use(\%myconfig, $form, $old_units);
 
   @languages = AM->language(\%myconfig, $form, 1);
   AM->units_in_use(\%myconfig, $form, $old_units);
 
   @languages = AM->language(\%myconfig, $form, 1);


@@ -2755,7 +2755,7 @@ sub save_unit {
     }
   }
 
     }
   }
 

-  AM->save_units(\%myconfig, $form, $form->{"unit_type"}, $new_units, \@delete_units);
+  AM->save_units(\%myconfig, $form, $new_units, \@delete_units);

 
   $form->{"saved_message"} = $locale->text("The units have been saved.");
 
 
   $form->{"saved_message"} = $locale->text("The units have been saved.");
 


@@ -2885,9 +2885,7 @@ sub swap_units {
   $auth->assert('config');
 
   my $dir = $form->{"dir"} eq "down" ? "down" : "up";
   $auth->assert('config');
 
   my $dir = $form->{"dir"} eq "down" ? "down" : "up";

-  my $unit_type = $form->{"unit_type"} eq "dimension" ?
-    "dimension" : "service";
-  AM->swap_units(\%myconfig, $form, $dir, $form->{"name"}, $unit_type);
+  AM->swap_units(\%myconfig, $form, $dir, $form->{"name"});

 
   edit_units();
 
 
   edit_units();
 

diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl
index 5baa36a0c0653926fbc5f71b8a04f00b05fd7055..79d8172e37c5e58d368e70a34384608ee55e0b82 100644 (file)
--- a/bin/mozilla/do.pl
+++ b/bin/mozilla/do.pl
@@ -933,7 +933,7 @@ sub display_stock_in_form {
 
   my $part_info  = IC->get_basic_part_info('id' => $form->{parts_id});
 
 
   my $part_info  = IC->get_basic_part_info('id' => $form->{parts_id});
 

-  my $units      = AM->retrieve_units(\%myconfig, $form, "dimension");
+  my $units      = AM->retrieve_units(\%myconfig, $form);

   my $units_data = AM->unit_select_data($units, undef, undef, $part_info->{unit});
 
   $form->get_lists('warehouses' => { 'key'    => 'WAREHOUSES',
   my $units_data = AM->unit_select_data($units, undef, undef, $part_info->{unit});
 
   $form->get_lists('warehouses' => { 'key'    => 'WAREHOUSES',


@@ -979,7 +979,7 @@ sub stock_out_form {
 
   my $part_info  = IC->get_basic_part_info('id' => $form->{parts_id});
 
 
   my $part_info  = IC->get_basic_part_info('id' => $form->{parts_id});
 

-  my $units      = AM->retrieve_units(\%myconfig, $form, "dimension");
+  my $units      = AM->retrieve_units(\%myconfig, $form);

   my $units_data = AM->unit_select_data($units, undef, undef, $part_info->{unit});
 
   my @contents   = DO->get_item_availability('parts_id' => $form->{parts_id});
   my $units_data = AM->unit_select_data($units, undef, undef, $part_info->{unit});
 
   my @contents   = DO->get_item_availability('parts_id' => $form->{parts_id});


@@ -1063,7 +1063,7 @@ sub transfer_in_and_close {
   my @all_requests;
 
   if (@part_ids) {
   my @all_requests;
 
   if (@part_ids) {

-    my $units         = AM->retrieve_units(\%myconfig, $form, "dimension");
+    my $units         = AM->retrieve_units(\%myconfig, $form);

     my %part_info_map = IC->get_basic_part_info('id' => \@part_ids);
     my %request_map;
 
     my %part_info_map = IC->get_basic_part_info('id' => \@part_ids);
     my %request_map;
 


@@ -1120,7 +1120,7 @@ sub transfer_out_and_close {
   my @all_requests;
 
   if (@part_ids) {
   my @all_requests;
 
   if (@part_ids) {

-    my $units         = AM->retrieve_units(\%myconfig, $form, "dimension");
+    my $units         = AM->retrieve_units(\%myconfig, $form);

     my %part_info_map = IC->get_basic_part_info('id' => \@part_ids);
     my %request_map;
 
     my %part_info_map = IC->get_basic_part_info('id' => \@part_ids);
     my %request_map;
 

diff --git a/bin/mozilla/ic.pl b/bin/mozilla/ic.pl
index bd02fa761eeacc8f52bfcb5f50c65bde905482a8..3501adc5b6d9ac2e592fab1070bf448d6262df62 100644 (file)
--- a/bin/mozilla/ic.pl
+++ b/bin/mozilla/ic.pl
@@ -1477,7 +1477,7 @@ sub form_header {
   # use JavaScript Calendar or not (yes!)
   $form->{jsscript} = 1;
 
   # use JavaScript Calendar or not (yes!)
   $form->{jsscript} = 1;
 

-  $units = AM->retrieve_units(\%myconfig, $form, $form->{"item"} eq "service" ? "service" : "dimension");
+  $units = AM->retrieve_units(\%myconfig, $form);

   $form->{ALL_UNITS} = [ map +{ name => $_ }, sort { $units->{$a}{sortkey} <=> $units->{$b}{sortkey} } keys %$units ];
 
   $form->{fokus} = "ic.partnumber";
   $form->{ALL_UNITS} = [ map +{ name => $_ }, sort { $units->{$a}{sortkey} <=> $units->{$b}{sortkey} } keys %$units ];
 
   $form->{fokus} = "ic.partnumber";

diff --git a/bin/mozilla/invoice_io.pl b/bin/mozilla/invoice_io.pl
index 229927220fb4ca803cf991c31da7ef7a9854b7bd..2f0f8be508a6cd3847b4916949c0473f0a2c7df0 100644 (file)
--- a/bin/mozilla/invoice_io.pl
+++ b/bin/mozilla/invoice_io.pl
@@ -117,9 +117,9 @@ use Data::Dumper;
 #  }
 ############### ENDE Neueintrag ##################
 #
 #  }
 ############### ENDE Neueintrag ##################
 #

-#  my $dimension_units = AM->retrieve_units(\%myconfig, $form, "dimension");
-#  my $service_units = AM->retrieve_units(\%myconfig, $form, "service");

 #  my $all_units = AM->retrieve_units(\%myconfig, $form);
 #  my $all_units = AM->retrieve_units(\%myconfig, $form);

+#  my $dimension_units = $all_units;
+#  my $service_units = $all_units;

 #
 #  my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };
 #
 #
 #  my %price_factors = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };
 #

diff --git a/bin/mozilla/io.pl b/bin/mozilla/io.pl
index a87e684f85282336a936e3ead80ebe01c112af5a..93c2668c7295b0fec64bad963e3f7c9b3eabc088 100644 (file)
--- a/bin/mozilla/io.pl
+++ b/bin/mozilla/io.pl
@@ -150,8 +150,6 @@ sub display_row {
   my @column_index = map { $_->{id} } grep { $_->{display} } @HEADER;
 
   # cache units
   my @column_index = map { $_->{id} } grep { $_->{display} } @HEADER;
 
   # cache units

-  my $dimension_units = AM->retrieve_units(\%myconfig, $form, "dimension");
-  my $service_units   = AM->retrieve_units(\%myconfig, $form, "service");

   my $all_units       = AM->retrieve_units(\%myconfig, $form);
 
   my %price_factors   = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };
   my $all_units       = AM->retrieve_units(\%myconfig, $form);
 
   my %price_factors   = map { $_->{id} => $_->{factor} } @{ $form->{ALL_PRICE_FACTORS} };


@@ -200,10 +198,7 @@ sub display_row {
     $form->{"unit_old_$i"}      ||= $form->{"unit_$i"};
     $form->{"selected_unit_$i"} ||= $form->{"unit_$i"};
 
     $form->{"unit_old_$i"}      ||= $form->{"unit_$i"};
     $form->{"selected_unit_$i"} ||= $form->{"unit_$i"};
 

-    my $local_units = $form->{"inventory_accno_$i"} || $form->{"assembly_$i"} ? $dimension_units 
-                    : $form->{"id_$i"}                                        ? $service_units 
-                    :                                                           $all_units;
-    if (   !$local_units->{$form->{"selected_unit_$i"}}                                          # Die ausgewaehlte Einheit ist fuer diesen Artikel nicht gueltig
+    if (   !$all_units->{$form->{"selected_unit_$i"}}                                            # Die ausgewaehlte Einheit ist fuer diesen Artikel nicht gueltig

         || !AM->convert_unit($form->{"selected_unit_$i"}, $form->{"unit_old_$i"}, $all_units)) { # (z.B. Dimensionseinheit war ausgewaehlt, es handelt sich aber
       $form->{"unit_old_$i"} = $form->{"selected_unit_$i"} = $form->{"unit_$i"};                 # um eine Dienstleistung). Dann keinerlei Umrechnung vornehmen.
     }
         || !AM->convert_unit($form->{"selected_unit_$i"}, $form->{"unit_old_$i"}, $all_units)) { # (z.B. Dimensionseinheit war ausgewaehlt, es handelt sich aber
       $form->{"unit_old_$i"} = $form->{"selected_unit_$i"} = $form->{"unit_$i"};                 # um eine Dienstleistung). Dann keinerlei Umrechnung vornehmen.
     }


@@ -230,7 +225,7 @@ sub display_row {
       $column_data{price_factor} = ' ';
     }
 
       $column_data{price_factor} = ' ';
     }
 

-    $column_data{"unit"} = AM->unit_select_html($local_units, "unit_$i", $this_unit, $form->{"id_$i"} ? $form->{"unit_$i"} : undef);
+    $column_data{"unit"} = AM->unit_select_html($all_units, "unit_$i", $this_unit, $form->{"id_$i"} ? $form->{"unit_$i"} : undef);

 # / unit ending
 
     $form->{"sellprice_$i"} =~ /\.(\d+)/;
 # / unit ending
 
     $form->{"sellprice_$i"} =~ /\.(\d+)/;

diff --git a/bin/mozilla/wh.pl b/bin/mozilla/wh.pl
index 92b28894fee3f8fddefa4a538e426a50a06cd0e3..a853c8a21df6fe176c8d78b9415408bc382c346b 100644 (file)
--- a/bin/mozilla/wh.pl
+++ b/bin/mozilla/wh.pl
@@ -78,7 +78,7 @@ sub transfer_warehouse_selection {
 
   show_no_warehouses_error() if (!scalar @{ $form->{WAREHOUSES} });
 
 
   show_no_warehouses_error() if (!scalar @{ $form->{WAREHOUSES} });
 

-  my $units      = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $units      = AM->retrieve_units(\%myconfig, $form);

   $form->{UNITS} = AM->unit_select_data($units, $form->{unit}, 0, $form->{partunit});
 
   if (scalar @{ $form->{WAREHOUSES} }) {
   $form->{UNITS} = AM->unit_select_data($units, $form->{unit}, 0, $form->{partunit});
 
   if (scalar @{ $form->{WAREHOUSES} }) {


@@ -158,7 +158,7 @@ sub transfer_or_removal_prepare_contents {
 
   $form->show_generic_error($locale->text("The selected warehouse is empty.")) if (0 == scalar(@contents));
 
 
   $form->show_generic_error($locale->text("The selected warehouse is empty.")) if (0 == scalar(@contents));
 

-  my $all_units = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $all_units = AM->retrieve_units(\%myconfig, $form);

 
   foreach (@contents) {
     $_->{qty} = $form->format_amount_units('amount'     => $_->{qty},
 
   foreach (@contents) {
     $_->{qty} = $form->format_amount_units('amount'     => $_->{qty},


@@ -201,7 +201,7 @@ sub transfer_parts {
 
   $form->{sort} = 'bindescription';
   my @contents  = WH->get_warehouse_report("warehouse_id" => $form->{warehouse_id});
 
   $form->{sort} = 'bindescription';
   my @contents  = WH->get_warehouse_report("warehouse_id" => $form->{warehouse_id});

-  my $all_units = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $all_units = AM->retrieve_units(\%myconfig, $form);

 
   my @transfers;
 
 
   my @transfers;
 


@@ -402,7 +402,7 @@ sub remove_parts {
 
   $form->{sort} = 'bindescription';
   my @contents  = WH->get_warehouse_report("warehouse_id" => $form->{warehouse_id});
 
   $form->{sort} = 'bindescription';
   my @contents  = WH->get_warehouse_report("warehouse_id" => $form->{warehouse_id});

-  my $all_units = AM->retrieve_units(\%myconfig, $form, 'dimension');
+  my $all_units = AM->retrieve_units(\%myconfig, $form);

 
   my @transfers;
 
 
   my @transfers;
 

diff --git a/locale/de/all b/locale/de/all
index 0162bce33ebe6958fce25cdb7a5060a792c399a6..8621cbfe6ddd19e878792a5576244a725d38c26e 100644 (file)
--- a/locale/de/all
+++ b/locale/de/all
@@ -137,7 +137,7 @@ $self->{texts} = {
   'Add Vendor Invoice'          => 'Einkaufsrechnung erfassen',
   'Add Warehouse'               => 'Lager erfassen',
   'Add a new group'             => 'Neue Gruppe erfassen',
   'Add Vendor Invoice'          => 'Einkaufsrechnung erfassen',
   'Add Warehouse'               => 'Lager erfassen',
   'Add a new group'             => 'Neue Gruppe erfassen',

-  'Add and edit %s'             => '%s hinzufügen und bearbeiten',
+  'Add and edit units'          => 'Einheiten erfassen und bearbeiten',

   'Add custom variable'         => 'Benutzerdefinierte Variable erfassen',
   'Add note'                    => 'Notiz erfassen',
   'Add to group'                => 'Zu Gruppe hinzufügen',
   'Add custom variable'         => 'Benutzerdefinierte Variable erfassen',
   'Add note'                    => 'Notiz erfassen',
   'Add to group'                => 'Zu Gruppe hinzufügen',


@@ -471,7 +471,6 @@ aktualisieren wollen?',
   'Destination warehouse and bin' => 'Ziellager und -lagerplatz',
   'Difference'                  => 'Differenz',
   'Dimension unit'              => 'Maßeinheit',
   'Destination warehouse and bin' => 'Ziellager und -lagerplatz',
   'Difference'                  => 'Differenz',
   'Dimension unit'              => 'Maßeinheit',

-  'Dimension units'             => 'Maßeinheiten',

   'Directory'                   => 'Verzeichnis',
   'Discount'                    => 'Rabatt',
   'Display'                     => 'Anzeigen',
   'Directory'                   => 'Verzeichnis',
   'Discount'                    => 'Rabatt',
   'Display'                     => 'Anzeigen',


@@ -1238,7 +1237,6 @@ aktualisieren wollen?',
   'Service Items'               => 'Dienstleistungen',
   'Service Number missing!'     => 'Dienstleistungsnummer fehlt!',
   'Service unit'                => 'Dienstleistungseinheit',
   'Service Items'               => 'Dienstleistungen',
   'Service Number missing!'     => 'Dienstleistungsnummer fehlt!',
   'Service unit'                => 'Dienstleistungseinheit',

-  'Service units'               => 'Dienstleistungseinheiten',

   'Services'                    => 'Dienstleistungen',
   'Set Language Values'         => 'Spracheinstellungen',
   'Set eMail text'              => 'eMail Text eingeben',
   'Services'                    => 'Dienstleistungen',
   'Set Language Values'         => 'Spracheinstellungen',
   'Set eMail text'              => 'eMail Text eingeben',


@@ -1517,7 +1515,8 @@ aktualisieren wollen?',
   'Unit'                        => 'Einheit',
   'Unit missing.'               => 'Die Einheit fehlt.',
   'Unit of measure'             => 'Maßeinheit',
   'Unit'                        => 'Einheit',
   'Unit missing.'               => 'Die Einheit fehlt.',
   'Unit of measure'             => 'Maßeinheit',

-  'Units'                       => 'Einheiten',
+  'Units marked for deletion will be deleted upon saving.' => 'Einheiten, die zum Löschen markiert sind, werden beim Speichern gelöscht.',
+  'Units that have already been used (e.g. for parts and services or in invoices or warehouse transactions) cannot be changed.' => 'Einheiten, die bereits in Benutzung sind (z.B. bei einer Warendefinition, einer Rechnung oder bei einer Lagerbuchung) können nachträglich nicht mehr verändert werden.',

   'Unknown Category'            => 'Unbekannte Kategorie',
   'Unknown Link'                => 'Unbekannte Verknüpfung',
   'Unknown chart of accounts'   => 'Unbekannter Kontenrahmen',
   'Unknown Category'            => 'Unbekannte Kategorie',
   'Unknown Link'                => 'Unbekannte Verknüpfung',
   'Unknown chart of accounts'   => 'Unbekannter Kontenrahmen',


@@ -1599,6 +1598,7 @@ aktualisieren wollen?',
   'You can also create new units now.' => 'Sie können jetzt auch neue Einheiten anlegen.',
   'You can create a missing dataset by going back and chosing "Create Dataset".' => 'Sie können eine fehlende Datenbank erstellen, indem Sie jetzt zuück gehen und den Punkt "Datenbank anlegen" wählen.',
   'You can create warehouses and bins via the menu "System -> Warehouses".' => 'Sie können Lager und Lagerplätze über das Menü "System -> Lager" anlegen.',
   'You can also create new units now.' => 'Sie können jetzt auch neue Einheiten anlegen.',
   'You can create a missing dataset by going back and chosing "Create Dataset".' => 'Sie können eine fehlende Datenbank erstellen, indem Sie jetzt zuück gehen und den Punkt "Datenbank anlegen" wählen.',
   'You can create warehouses and bins via the menu "System -> Warehouses".' => 'Sie können Lager und Lagerplätze über das Menü "System -> Lager" anlegen.',

+  'You can declare different translations for singular and plural for each unit (e.g. "day" and "days).' => 'Bei den Übersetzungen können Sie unterschiedliche Varianten für singular und plural angeben (z.B. "day" und "days").',

   'You can only delete datasets that are not in use.' => 'Sie können nur Datenbanken löschen, die momentan nicht in Benutzung sind.',
   'You can use the following strings in the long description and all translations. They will be replaced by their actual values by Lx-Office before they\'re output.' => 'Sie können im Langtext und allen Übersetzungen die folgenden Variablen benutzen, die vor der Ausgabe von Lx-Office automatisch ersetzt werden:',
   'You cannot continue before all required modules are installed.' => 'Sie können nicht fortfahren, bevor alle benötigten Pakete installiert sind.',
   'You can only delete datasets that are not in use.' => 'Sie können nur Datenbanken löschen, die momentan nicht in Benutzung sind.',
   'You can use the following strings in the long description and all translations. They will be replaced by their actual values by Lx-Office before they\'re output.' => 'Sie können im Langtext und allen Übersetzungen die folgenden Variablen benutzen, die vor der Ausgabe von Lx-Office automatisch ersetzt werden:',
   'You cannot continue before all required modules are installed.' => 'Sie können nicht fortfahren, bevor alle benötigten Pakete installiert sind.',


@@ -1653,7 +1653,6 @@ aktualisieren wollen?',
   'debug'                       => 'Debug',
   'delete'                      => 'Löschen',
   'deliverydate'                => 'Lieferdatum',
   'debug'                       => 'Debug',
   'delete'                      => 'Löschen',
   'deliverydate'                => 'Lieferdatum',

-  'dimension units'             => 'Maßeinheiten',

   'disposed'                    => 'Entsorgung',
   'done'                        => 'erledigt',
   'down'                        => 'runter',
   'disposed'                    => 'Entsorgung',
   'done'                        => 'erledigt',
   'down'                        => 'runter',


@@ -1723,7 +1722,6 @@ aktualisieren wollen?',
   'saved!'                      => 'gespeichert',
   'sent'                        => 'gesendet',
   'sent to printer'             => 'an Drucker geschickt',
   'saved!'                      => 'gespeichert',
   'sent'                        => 'gesendet',
   'sent to printer'             => 'an Drucker geschickt',

-  'service units'               => 'Dienstleistungseinheiten',

   'service_list'                => 'dienstleistungsliste',
   'shipped'                     => 'verschickt',
   'singular first char'         => 'S',
   'service_list'                => 'dienstleistungsliste',
   'shipped'                     => 'verschickt',
   'singular first char'         => 'S',

diff --git a/locale/de/am b/locale/de/am
index e28e3251c9eb19e00f190933b117f4a6d2c617d9..e26e7dc3b629c600c054f2db93c1a31eddbe16b8 100644 (file)
--- a/locale/de/am
+++ b/locale/de/am
@@ -60,7 +60,7 @@ $self->{texts} = {
   'Add Price Factor'            => 'Preisfaktor erfassen',
   'Add Printer'                 => 'Drucker hinzufügen',
   'Add Warehouse'               => 'Lager erfassen',
   'Add Price Factor'            => 'Preisfaktor erfassen',
   'Add Printer'                 => 'Drucker hinzufügen',
   'Add Warehouse'               => 'Lager erfassen',

-  'Add and edit %s'             => '%s hinzufügen und bearbeiten',
+  'Add and edit units'          => 'Einheiten erfassen und bearbeiten',

   'Address'                     => 'Adresse',
   'Advance turnover tax return' => 'Umsatzsteuervoranmeldung',
   'All reports'                 => 'Alle Berichte (Kontenübersicht, Summen- u. Saldenliste, GuV, BWA, Bilanz, Projektbuchungen)',
   'Address'                     => 'Adresse',
   'Advance turnover tax return' => 'Umsatzsteuervoranmeldung',
   'All reports'                 => 'Alle Berichte (Kontenübersicht, Summen- u. Saldenliste, GuV, BWA, Bilanz, Projektbuchungen)',


@@ -304,7 +304,6 @@ $self->{texts} = {
   'config/authentication.pl: Missing parameters in "DB_config". Required parameters are "host", "db" and "user".' => 'config/authentication.pl: Fehlende Parameter in "DB_config". Benötigte Parameter sind "host", "db" und "user".',
   'config/authentication.pl: Missing parameters in "LDAP_config". Required parameters are "host", "attribute" and "base_dn".' => 'config/authentication.pl: Fehlende Parameter in "LDAP_config". Benötigt werden "host", "attribute" und "base_dn".',
   'customer'                    => 'Kunde',
   'config/authentication.pl: Missing parameters in "DB_config". Required parameters are "host", "db" and "user".' => 'config/authentication.pl: Fehlende Parameter in "DB_config". Benötigte Parameter sind "host", "db" und "user".',
   'config/authentication.pl: Missing parameters in "LDAP_config". Required parameters are "host", "attribute" and "base_dn".' => 'config/authentication.pl: Fehlende Parameter in "LDAP_config". Benötigt werden "host", "attribute" und "base_dn".',
   'customer'                    => 'Kunde',

-  'dimension units'             => 'Maßeinheiten',

   'down'                        => 'runter',
   'invoice'                     => 'Rechnung',
   'lead deleted!'               => 'Kundenquelle gelöscht',
   'down'                        => 'runter',
   'invoice'                     => 'Rechnung',
   'lead deleted!'               => 'Kundenquelle gelöscht',


@@ -317,7 +316,6 @@ $self->{texts} = {
   'request_quotation'           => 'Angebotsanforderung',
   'sales_order'                 => 'Kundenauftrag',
   'sales_quotation'             => 'Verkaufsangebot',
   'request_quotation'           => 'Angebotsanforderung',
   'sales_order'                 => 'Kundenauftrag',
   'sales_quotation'             => 'Verkaufsangebot',

-  'service units'               => 'Dienstleistungseinheiten',

   'up'                          => 'hoch',
   'use program settings'        => 'benutze Programmeinstellungen',
   'vendor'                      => 'Lieferant',
   'up'                          => 'hoch',
   'use program settings'        => 'benutze Programmeinstellungen',
   'vendor'                      => 'Lieferant',

diff --git a/locale/de/ca b/locale/de/ca
index a8c0493fc45163f04b89616313e6c60a426c6e5d..135b3eec87ae5f652ec3087e8c2f4e47f07dfde2 100644 (file)
--- a/locale/de/ca
+++ b/locale/de/ca
@@ -5,7 +5,6 @@ $self->{texts} = {
   'AP'                          => 'Einkauf',
   'AR'                          => 'Verkauf',
   'Account'                     => 'Konto',
   'AP'                          => 'Einkauf',
   'AR'                          => 'Verkauf',
   'Account'                     => 'Konto',

-  'Accrual'                     => 'Bilanzierung',

   'Advance turnover tax return' => 'Umsatzsteuervoranmeldung',
   'All reports'                 => 'Alle Berichte (Kontenübersicht, Summen- u. Saldenliste, GuV, BWA, Bilanz, Projektbuchungen)',
   'Apr'                         => 'Apr',
   'Advance turnover tax return' => 'Umsatzsteuervoranmeldung',
   'All reports'                 => 'Alle Berichte (Kontenübersicht, Summen- u. Saldenliste, GuV, BWA, Bilanz, Projektbuchungen)',
   'Apr'                         => 'Apr',


@@ -16,7 +15,6 @@ $self->{texts} = {
   'Bcc'                         => 'Bcc',
   'Bin List'                    => 'Lagerliste',
   'Binding to the LDAP server as "#1" failed. Please check config/authentication.pl.' => 'Die Anmeldung am LDAP-Server als "#1" schlug fehl. Bitte überprüfen Sie die Angaben in config/authentication.pl.',
   'Bcc'                         => 'Bcc',
   'Bin List'                    => 'Lagerliste',
   'Binding to the LDAP server as "#1" failed. Please check config/authentication.pl.' => 'Die Anmeldung am LDAP-Server als "#1" schlug fehl. Bitte überprüfen Sie die Angaben in config/authentication.pl.',

-  'Bis'                         => 'bis',

   'CANCELED'                    => 'Storniert',
   'CSV export -- options'       => 'CSV-Export -- Optionen',
   'Cc'                          => 'Cc',
   'CANCELED'                    => 'Storniert',
   'CSV export -- options'       => 'CSV-Export -- Optionen',
   'Cc'                          => 'Cc',


@@ -41,7 +39,6 @@ $self->{texts} = {
   'Create and edit vendor invoices' => 'Eingangsrechnungen erfassen und bearbeiten',
   'Credit'                      => 'Haben',
   'Credit Note'                 => 'Gutschrift',
   'Create and edit vendor invoices' => 'Eingangsrechnungen erfassen und bearbeiten',
   'Credit'                      => 'Haben',
   'Credit Note'                 => 'Gutschrift',

-  'Customized Report'           => 'Vorgewählte Zeiträume',

   'DATEV Export'                => 'DATEV-Export',
   'DELETED'                     => 'Gelöscht',
   'DUNNING STARTED'             => 'Mahnprozess gestartet',
   'DATEV Export'                => 'DATEV-Export',
   'DELETED'                     => 'Gelöscht',
   'DUNNING STARTED'             => 'Mahnprozess gestartet',


@@ -50,22 +47,19 @@ $self->{texts} = {
   'Debit'                       => 'Soll',
   'Dec'                         => 'Dez',
   'December'                    => 'Dezember',
   'Debit'                       => 'Soll',
   'Dec'                         => 'Dez',
   'December'                    => 'Dezember',

-  'Decimalplaces'               => 'Dezimalstellen',

   'Delivery Order'              => 'Lieferschein',
   'Department'                  => 'Abteilung',
   'Dependency loop detected:'   => 'Schleife in den Abhängigkeiten entdeckt:',
   'Description'                 => 'Beschreibung',
   'Directory'                   => 'Verzeichnis',
   'ELSE'                        => 'Zusatz',
   'Delivery Order'              => 'Lieferschein',
   'Department'                  => 'Abteilung',
   'Dependency loop detected:'   => 'Schleife in den Abhängigkeiten entdeckt:',
   'Description'                 => 'Beschreibung',
   'Directory'                   => 'Verzeichnis',
   'ELSE'                        => 'Zusatz',

-  'EUR'                         => 'E/Ü-Rechnung',

   'Error in database control file \'%s\': %s' => 'Fehler in Datenbankupgradekontrolldatei \'%s\': %s',
   'Error in database control file \'%s\': %s' => 'Fehler in Datenbankupgradekontrolldatei \'%s\': %s',

-  'Falsches Datumsformat!'      => 'Falsches Datumsformat!',

   'Feb'                         => 'Feb',
   'February'                    => 'Februar',
   'File'                        => 'Datei',
   'Feb'                         => 'Feb',
   'February'                    => 'Februar',
   'File'                        => 'Datei',

-  'Free report period'          => 'Freier Zeitraum',

   'From'                        => 'Von',
   'General ledger and cash'     => 'Finanzbuchhaltung und Zahlungsverkehr',
   'From'                        => 'Von',
   'General ledger and cash'     => 'Finanzbuchhaltung und Zahlungsverkehr',

+  'Include in Report'           => 'In Bericht aufnehmen',

   'Invoice'                     => 'Rechnung',
   'Jan'                         => 'Jan',
   'January'                     => 'Januar',
   'Invoice'                     => 'Rechnung',
   'Jan'                         => 'Jan',
   'January'                     => 'Januar',


@@ -83,11 +77,9 @@ $self->{texts} = {
   'May '                        => 'Mai',
   'May set the BCC field when sending emails' => 'Beim Verschicken von Emails das Feld \'BCC\' setzen',
   'Message'                     => 'Nachricht',
   'May '                        => 'Mai',
   'May set the BCC field when sending emails' => 'Beim Verschicken von Emails das Feld \'BCC\' setzen',
   'Message'                     => 'Nachricht',

-  'Method'                      => 'Verfahren',

   'Missing \'description\' field.' => 'Fehlendes Feld \'description\'.',
   'Missing \'tag\' field.'      => 'Fehlendes Feld \'tag\'.',
   'Missing parameter #1 in call to sub #2.' => 'Fehlernder Parameter \'#1\' in Funktionsaufruf \'#2\'.',
   'Missing \'description\' field.' => 'Fehlendes Feld \'description\'.',
   'Missing \'tag\' field.'      => 'Fehlendes Feld \'tag\'.',
   'Missing parameter #1 in call to sub #2.' => 'Fehlernder Parameter \'#1\' in Funktionsaufruf \'#2\'.',

-  'Monthly'                     => 'monatlich',

   'More than one control file with the tag \'%s\' exist.' => 'Es gibt mehr als eine Kontrolldatei mit dem Tag \'%s\'.',
   'No or an unknown authenticantion module specified in "config/authentication.pl".' => 'Es wurde kein oder ein unbekanntes Authentifizierungsmodul in "config/authentication.pl" angegeben.',
   'Nov'                         => 'Nov',
   'More than one control file with the tag \'%s\' exist.' => 'Es gibt mehr als eine Kontrolldatei mit dem Tag \'%s\'.',
   'No or an unknown authenticantion module specified in "config/authentication.pl".' => 'Es wurde kein oder ein unbekanntes Authentifizierungsmodul in "config/authentication.pl" angegeben.',
   'Nov'                         => 'Nov',


@@ -106,8 +98,6 @@ $self->{texts} = {
   'Proforma Invoice'            => 'Proformarechnung',
   'Project Number'              => 'Projektnummer',
   'Purchase Order'              => 'Lieferantenauftrag',
   'Proforma Invoice'            => 'Proformarechnung',
   'Project Number'              => 'Projektnummer',
   'Purchase Order'              => 'Lieferantenauftrag',

-  'Quarter'                     => 'Quartal',
-  'Quarterly'                   => 'quartalsweise',

   'Quotation'                   => 'Angebot',
   'RFQ'                         => 'Anfrage',
   'Receipt, payment, reconciliation' => 'Zahlungseingang, Zahlungsausgang, Kontenabgleich',
   'Quotation'                   => 'Angebot',
   'RFQ'                         => 'Anfrage',
   'Receipt, payment, reconciliation' => 'Zahlungseingang, Zahlungsausgang, Kontenabgleich',


@@ -121,6 +111,7 @@ $self->{texts} = {
   'Storno Invoice'              => 'Stornorechnung',
   'Storno Packing List'         => 'Stornolieferschein',
   'Subject'                     => 'Betreff',
   'Storno Invoice'              => 'Stornorechnung',
   'Storno Packing List'         => 'Stornolieferschein',
   'Subject'                     => 'Betreff',

+  'Subtotal'                    => 'Zwischensumme',

   'The \'tag\' field must only consist of alphanumeric characters or the carachters - _ ( )' => 'Das Feld \'tag\' darf nur aus alphanumerischen Zeichen und den Zeichen - _ ( ) bestehen.',
   'The LDAP server "#1:#2" is unreachable. Please check config/authentication.pl.' => 'Der LDAP-Server "#1:#2" ist nicht erreichbar. Bitte überprüfen Sie die Angaben in config/authentication.pl.',
   'The config file "config/authentication.pl" contained invalid Perl code:' => 'Die Konfigurationsdatei "config/authentication.pl" enthielt ungütigen Perl-Code:',
   'The \'tag\' field must only consist of alphanumeric characters or the carachters - _ ( )' => 'Das Feld \'tag\' darf nur aus alphanumerischen Zeichen und den Zeichen - _ ( ) bestehen.',
   'The LDAP server "#1:#2" is unreachable. Please check config/authentication.pl.' => 'Der LDAP-Server "#1:#2" ist nicht erreichbar. Bitte überprüfen Sie die Angaben in config/authentication.pl.',
   'The config file "config/authentication.pl" contained invalid Perl code:' => 'Die Konfigurationsdatei "config/authentication.pl" enthielt ungütigen Perl-Code:',


@@ -130,18 +121,15 @@ $self->{texts} = {
   'The connection to the template database failed:' => 'Die Verbindung zur Vorlagendatenbank schlug fehl:',
   'The creation of the authentication database failed:' => 'Das Anlegen der Authentifizierungsdatenbank schlug fehl:',
   'The list has been printed.'  => 'Die Liste wurde ausgedruckt.',
   'The connection to the template database failed:' => 'Die Verbindung zur Vorlagendatenbank schlug fehl:',
   'The creation of the authentication database failed:' => 'Das Anlegen der Authentifizierungsdatenbank schlug fehl:',
   'The list has been printed.'  => 'Die Liste wurde ausgedruckt.',

+  'To'                          => 'An',

   'To (email)'                  => 'An',
   'Transactions, AR transactions, AP transactions' => 'Dialogbuchen, Debitorenrechnungen, Kreditorenrechnungen',
   'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',
   'View warehouse content'      => 'Lagerbestand ansehen',
   'Warehouse management'        => 'Lagerverwaltung/Bestandsveränderung',
   'To (email)'                  => 'An',
   'Transactions, AR transactions, AP transactions' => 'Dialogbuchen, Debitorenrechnungen, Kreditorenrechnungen',
   'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',
   'View warehouse content'      => 'Lagerbestand ansehen',
   'Warehouse management'        => 'Lagerverwaltung/Bestandsveränderung',

-  'YYYY'                        => 'JJJJ',
-  'Year'                        => 'Jahr',
-  'Yearly'                      => 'jährlich',

   'You do not have the permissions to access this function.' => 'Sie verfügen nicht über die notwendigen Rechte, um auf diese Funktion zuzugreifen.',
   '[email]'                     => '[email]',
   'bin_list'                    => 'Lagerliste',
   'You do not have the permissions to access this function.' => 'Sie verfügen nicht über die notwendigen Rechte, um auf diese Funktion zuzugreifen.',
   '[email]'                     => '[email]',
   'bin_list'                    => 'Lagerliste',

-  'button'                      => '?',

   'chart_of_accounts'           => 'kontenuebersicht',
   'config/authentication.pl: Key "DB_config" is missing.' => 'config/authentication.pl: Das Schlüsselwort "DB_config" fehlt.',
   'config/authentication.pl: Key "LDAP_config" is missing.' => 'config/authentication.pl: Der Schlüssel "LDAP_config" fehlt.',
   'chart_of_accounts'           => 'kontenuebersicht',
   'config/authentication.pl: Key "DB_config" is missing.' => 'config/authentication.pl: Das Schlüsselwort "DB_config" fehlt.',
   'config/authentication.pl: Key "LDAP_config" is missing.' => 'config/authentication.pl: Der Schlüssel "LDAP_config" fehlt.',


@@ -158,7 +146,6 @@ $self->{texts} = {
   'request_quotation'           => 'Angebotsanforderung',
   'sales_order'                 => 'Kundenauftrag',
   'sales_quotation'             => 'Verkaufsangebot',
   'request_quotation'           => 'Angebotsanforderung',
   'sales_order'                 => 'Kundenauftrag',
   'sales_quotation'             => 'Verkaufsangebot',

-  'wrongformat'                 => 'Falsches Format',

 };
 
 $self->{subs} = {
 };
 
 $self->{subs} = {

diff --git a/locale/de/menu b/locale/de/menu
index bbbdb2497e9a8bd321b8573df1b76d824e430da4..b30ffcdf46b0b761c524f468ba40af47f7aa150b 100644 (file)
--- a/locale/de/menu
+++ b/locale/de/menu
@@ -78,11 +78,11 @@ $self->{texts} = {
   'Delivery Orders'             => 'Lieferscheine',
   'Departments'                 => 'Abteilungen',
   'Dependency loop detected:'   => 'Schleife in den Abhängigkeiten entdeckt:',
   'Delivery Orders'             => 'Lieferscheine',
   'Departments'                 => 'Abteilungen',
   'Dependency loop detected:'   => 'Schleife in den Abhängigkeiten entdeckt:',

-  'Dimension units'             => 'Maßeinheiten',

   'Directory'                   => 'Verzeichnis',
   'Dunnings'                    => 'Mahnungen',
   'Edit Access Rights'          => 'Zugriffsrechte bearbeiten',
   'Edit Dunning'                => 'Mahnungen konfigurieren',
   'Directory'                   => 'Verzeichnis',
   'Dunnings'                    => 'Mahnungen',
   'Edit Access Rights'          => 'Zugriffsrechte bearbeiten',
   'Edit Dunning'                => 'Mahnungen konfigurieren',

+  'Edit units'                  => 'Einheiten bearbeiten',

   'Error in database control file \'%s\': %s' => 'Fehler in Datenbankupgradekontrolldatei \'%s\': %s',
   'File'                        => 'Datei',
   'Follow-Ups'                  => 'Wiedervorlagen',
   'Error in database control file \'%s\': %s' => 'Fehler in Datenbankupgradekontrolldatei \'%s\': %s',
   'File'                        => 'Datei',
   'Follow-Ups'                  => 'Wiedervorlagen',


@@ -149,7 +149,6 @@ $self->{texts} = {
   'Reports'                     => 'Berichte',
   'Sales Invoices'              => 'Kundenrechnung',
   'Sales Orders'                => 'Aufträge',
   'Reports'                     => 'Berichte',
   'Sales Invoices'              => 'Kundenrechnung',
   'Sales Orders'                => 'Aufträge',

-  'Service units'               => 'Dienstleistungseinheiten',

   'Services'                    => 'Dienstleistungen',
   'Shipto'                      => 'Lieferanschriften',
   'Show TODO list'              => 'Aufgabenliste anzeigen',
   'Services'                    => 'Dienstleistungen',
   'Shipto'                      => 'Lieferanschriften',
   'Show TODO list'              => 'Aufgabenliste anzeigen',


@@ -174,7 +173,6 @@ $self->{texts} = {
   'Type of Business'            => 'Kunden-/Lieferantentyp',
   'UStVa'                       => 'UStVa',
   'UStVa Einstellungen'         => 'UStVa Einstellungen',
   'Type of Business'            => 'Kunden-/Lieferantentyp',
   'UStVa'                       => 'UStVa',
   'UStVa Einstellungen'         => 'UStVa Einstellungen',

-  'Units'                       => 'Einheiten',

   'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',
   'Update Prices'               => 'Preise aktualisieren',
   'Vendor Invoices'             => 'Einkaufsrechnungen',
   'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',
   'Update Prices'               => 'Preise aktualisieren',
   'Vendor Invoices'             => 'Einkaufsrechnungen',

diff --git a/locale/de/menunew b/locale/de/menunew
index 6bacb6147681ad41ed8fe70a32e2ae66d8c85cf7..923b93c9f7debd34c96bd1628257181bdc398e99 100644 (file)
--- a/locale/de/menunew
+++ b/locale/de/menunew
@@ -77,11 +77,11 @@ $self->{texts} = {
   'Delivery Orders'             => 'Lieferscheine',
   'Departments'                 => 'Abteilungen',
   'Dependency loop detected:'   => 'Schleife in den Abhängigkeiten entdeckt:',
   'Delivery Orders'             => 'Lieferscheine',
   'Departments'                 => 'Abteilungen',
   'Dependency loop detected:'   => 'Schleife in den Abhängigkeiten entdeckt:',

-  'Dimension units'             => 'Maßeinheiten',

   'Directory'                   => 'Verzeichnis',
   'Dunnings'                    => 'Mahnungen',
   'Edit Access Rights'          => 'Zugriffsrechte bearbeiten',
   'Edit Dunning'                => 'Mahnungen konfigurieren',
   'Directory'                   => 'Verzeichnis',
   'Dunnings'                    => 'Mahnungen',
   'Edit Access Rights'          => 'Zugriffsrechte bearbeiten',
   'Edit Dunning'                => 'Mahnungen konfigurieren',

+  'Edit units'                  => 'Einheiten bearbeiten',

   'Error in database control file \'%s\': %s' => 'Fehler in Datenbankupgradekontrolldatei \'%s\': %s',
   'File'                        => 'Datei',
   'Follow-Ups'                  => 'Wiedervorlagen',
   'Error in database control file \'%s\': %s' => 'Fehler in Datenbankupgradekontrolldatei \'%s\': %s',
   'File'                        => 'Datei',
   'Follow-Ups'                  => 'Wiedervorlagen',


@@ -148,7 +148,6 @@ $self->{texts} = {
   'Reports'                     => 'Berichte',
   'Sales Invoices'              => 'Kundenrechnung',
   'Sales Orders'                => 'Aufträge',
   'Reports'                     => 'Berichte',
   'Sales Invoices'              => 'Kundenrechnung',
   'Sales Orders'                => 'Aufträge',

-  'Service units'               => 'Dienstleistungseinheiten',

   'Services'                    => 'Dienstleistungen',
   'Shipto'                      => 'Lieferanschriften',
   'Show TODO list'              => 'Aufgabenliste anzeigen',
   'Services'                    => 'Dienstleistungen',
   'Shipto'                      => 'Lieferanschriften',
   'Show TODO list'              => 'Aufgabenliste anzeigen',


@@ -173,7 +172,6 @@ $self->{texts} = {
   'Type of Business'            => 'Kunden-/Lieferantentyp',
   'UStVa'                       => 'UStVa',
   'UStVa Einstellungen'         => 'UStVa Einstellungen',
   'Type of Business'            => 'Kunden-/Lieferantentyp',
   'UStVa'                       => 'UStVa',
   'UStVa Einstellungen'         => 'UStVa Einstellungen',

-  'Units'                       => 'Einheiten',

   'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',
   'Update Prices'               => 'Preise aktualisieren',
   'Vendor Invoices'             => 'Einkaufsrechnungen',
   'Unknown dependency \'%s\'.'  => 'Unbekannte Abhängigkeit \'%s\'.',
   'Update Prices'               => 'Preise aktualisieren',
   'Vendor Invoices'             => 'Einkaufsrechnungen',

diff --git a/menu.ini b/menu.ini
index 3c338cb59b9474feaa5973b2da4aebcef97e8df9..b52a6b1207ded395e8e80d04e00264ce69a0b55a 100644 (file)
--- a/menu.ini
+++ b/menu.ini
@@ -561,21 +561,9 @@ module=pe.pl
 action=search
 type=pricegroup
 
 action=search
 type=pricegroup
 

-[System--Units]
-module=menu.pl
-action=acc_menu
-target=acc_menu
-submenu=1
-
-[System--Units--Dimension units]
-module=am.pl
-action=edit_units
-unit_type=dimension
-
-[System--Units--Service units]
+[System--Edit units]

 module=am.pl
 action=edit_units
 module=am.pl
 action=edit_units

-unit_type=service

 
 [System--Price Factors]
 module=menu.pl
 
 [System--Price Factors]
 module=menu.pl

diff --git a/sql/Pg-upgrade2/units_no_type_distinction.sql b/sql/Pg-upgrade2/units_no_type_distinction.sql
new file mode 100644 (file)
index 0000000..aec35e0
--- /dev/null
+++ b/sql/Pg-upgrade2/units_no_type_distinction.sql
@@ -0,0 +1,5 @@
+-- @tag: units_no_type_distinction
+-- @description: Aufhebung der Typenunterscheidung bei Einheiten
+-- @depends: release_2_4_3
+ALTER TABLE units ALTER COLUMN type DROP NOT NULL;
+

diff --git a/templates/webpages/am/edit_units_de.html b/templates/webpages/am/edit_units_de.html
index 10b3046bb7052822d022f20db87d50922d0a1204..c40ed4041a9f0251a1adee926394f9747d476108 100644 (file)
--- a/templates/webpages/am/edit_units_de.html
+++ b/templates/webpages/am/edit_units_de.html
@@ -9,7 +9,6 @@
  <form method="post" action="[% HTML.escape(script) %]">
 
  <input type="hidden" name="type" value="unit">
  <form method="post" action="[% HTML.escape(script) %]">
 
  <input type="hidden" name="type" value="unit">

- <input type="hidden" name="unit_type" value="[% HTML.escape(unit_type) %]">

 
  <table width="100%">
   <tr>
 
  <table width="100%">
   <tr>


@@ -72,20 +71,15 @@
  </table>
 
  <p>
  </table>
 
  <p>

-  Einheiten, die bereits in Benutzung sind (z.B. bei einer
-  Warendefinition, einer Rechnung oder bei einer Lagerbuchung)
-  k&ouml;nnen nachtr&auml;glich nicht mehr ver&auml;ndert werden.
+  Einheiten, die bereits in Benutzung sind (z.B. bei einer Warendefinition, einer Rechnung oder bei einer Lagerbuchung) k&ouml;nnen nachtr&auml;glich nicht mehr ver&auml;ndert werden.

  </p>
 
  <p>
  </p>
 
  <p>

-  Einheiten, die zum L&ouml;schen markiert sind, werden beim Speichern
-  gel&ouml;scht.
+  Einheiten, die zum L&ouml;schen markiert sind, werden beim Speichern gel&ouml;scht.

  </p>
 
  <p>
  </p>
 
  <p>

-  Bei den &Uuml;bersetzungen k&ouml;nnen Sie unterschiedliche
-  Varianten f&uuml;r singular und plural angeben (z.B. &quot;day&quot;
-  und &quot;days&quot;).
+  Bei den &Uuml;bersetzungen k&ouml;nnen Sie unterschiedliche Varianten f&uuml;r singular und plural angeben (z.B. &quot;day&quot; und &quot;days&quot;).

  </p>
 
  <table>
  </p>
 
  <table>

diff --git a/templates/webpages/am/edit_units_master.html b/templates/webpages/am/edit_units_master.html
index 0d11216725547001a1ac39eac3cfb9249566fabb..a9e68805f6f5b42f7554e944900b5b4987a93633 100644 (file)
--- a/templates/webpages/am/edit_units_master.html
+++ b/templates/webpages/am/edit_units_master.html
@@ -9,7 +9,6 @@
  <form method="post" action="[% HTML.escape(script) %]">
 
  <input type="hidden" name="type" value="unit">
  <form method="post" action="[% HTML.escape(script) %]">
 
  <input type="hidden" name="type" value="unit">

- <input type="hidden" name="unit_type" value="[% HTML.escape(unit_type) %]">

 
  <table width="100%">
   <tr>
 
  <table width="100%">
   <tr>


@@ -72,20 +71,20 @@
  </table>
 
  <p>
  </table>
 
  <p>

-  Einheiten, die bereits in Benutzung sind (z.B. bei einer
-  Warendefinition, einer Rechnung oder bei einer Lagerbuchung)
-  k&ouml;nnen nachtr&auml;glich nicht mehr ver&auml;ndert werden.
+  <translate>Units that have already been used (e.g. for parts and
+   services or in invoices or warehouse transactions) cannot be
+   changed.</translate>

  </p>
 
  <p>
  </p>
 
  <p>

-  Einheiten, die zum L&ouml;schen markiert sind, werden beim Speichern
-  gel&ouml;scht.
+  <translate>Units marked for deletion will be deleted upon
+   saving.</translate>

  </p>
 
  <p>
  </p>
 
  <p>

-  Bei den &Uuml;bersetzungen k&ouml;nnen Sie unterschiedliche
-  Varianten f&uuml;r singular und plural angeben (z.B. &quot;day&quot;
-  und &quot;days&quot;).
+  <translate>You can declare different translations for singular and
+   plural for each unit (e.g. &quot;day&quot; and
+   &quot;days).</translate>

  </p>
 
  <table>
  </p>
 
  <table>