Bugfix für 1398:

Ruft man sich das Lagerjournal auf, in dem ja eine Spalte fuer Projektnummern
vorgesehen ist, bleibt diese Spalte jedoch immer leer, auch wenn in dem
jeweiligen Lieferschein zur Auslagerung eine Projektnummer stand.

Hintergrund: project_id oder globalproject_id wurde nicht an $request und $transfer übergeben.
Falls project_id_$i definiert ist, nimm die, ansonsten globalproject_id

diff --git a/SL/DO.pm b/SL/DO.pm
index d657cca5c2380f10389b79a15cf978836864d4f4..fe2318cc823ca3173252951228813c6b15335e85 100644 (file)
--- a/SL/DO.pm
+++ b/SL/DO.pm
@@ -1053,6 +1053,7 @@ sub transfer_in_out {
       'oe_id'                  => $form->{id},
       'shippingdate'           => 'current_date',
       'transfer_type'          => $params{direction} eq 'in' ? 'stock' : 'shipped',
+      'project_id'             => $request->{project_id},
     };
   }
 

diff --git a/bin/mozilla/do.pl b/bin/mozilla/do.pl
index 8299a1abf8c499bd0e308691c18417b96d96492b..796118a120d60f9cee60a4b5544f58f79266eca5 100644 (file)
--- a/bin/mozilla/do.pl
+++ b/bin/mozilla/do.pl
@@ -1310,6 +1310,7 @@ sub transfer_out {
       foreach my $request (@{ DO->unpack_stock_information('packed' => $form->{"stock_out_$i"}) }) {
         $request->{parts_id} = $form->{"id_$i"};
         $request->{base_qty} = $request->{qty} * $units->{$request->{unit}}->{factor} / $base_unit_factor;
+        $request->{project_id} = $form->{"project_id_$i"} ? $form->{"project_id_$i"} : $form->{globalproject_id}; 
 
         my $map_key          = join '--', ($form->{"id_$i"}, @{$request}{qw(warehouse_id bin_id chargenumber bestbefore)});
 
@@ -1383,7 +1384,6 @@ sub transfer_out {
       ::end_of_request();
     }
   }
-
   DO->transfer_in_out('direction' => 'out',
                       'requests'  => \@all_requests);