X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/9c63c1600059dca1ca295e264413e911da3d15bf..4aa4ec0d56f9c0760da15e27e7b6b739c25eaaed:/SL/OE.pm

diff --git a/SL/OE.pm b/SL/OE.pm
index d3b1313cc..9adbee2eb 100644
--- a/SL/OE.pm
+++ b/SL/OE.pm
@@ -83,7 +83,8 @@ sub transactions {
     qq|WHERE (o.quotation = ?) |;
   push(@values, $quotation);
 
-  my ($null, $department_id) = split /--/, $form->{department};
+  my ($null, $split_department_id) = split /--/, $form->{department};
+  my $department_id = $form->{department_id} || $split_department_id;
   if ($department_id) {
     $query .= qq| AND o.department_id = ?|;
     push(@values, $department_id);