X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=SL%2FDev%2FRecord.pm;h=2f289d0b44ba99aea10c60c0dc2aa882685beb8c;hb=223b46212c15cd9b311e10d0b1e8258b491df28a;hp=e9bd0592951b5cf275ba383cc2505b7a42a0688b;hpb=023755f2d427126411c940fedee58bcc3a85f8eb;p=kivitendo-erp.git

diff --git a/SL/Dev/Record.pm b/SL/Dev/Record.pm
index e9bd05929..2f289d0b4 100644
--- a/SL/Dev/Record.pm
+++ b/SL/Dev/Record.pm
@@ -384,7 +384,8 @@ sub create_ap_transaction {
     type             => undef, # isn't set for ap
     employee_id      => SL::DB::Manager::Employee->current->id,
   );
-  # $ap_transaction->assign_attributes(%params) if %params;
+  # assign any parameters that weren't explicitly handled above, e.g. itime
+  $ap_transaction->assign_attributes(%params) if %params;
 
   foreach my $booking ( @{$bookings} ) {
     my $chart = delete $booking->{chart};
@@ -504,7 +505,8 @@ sub create_ar_transaction {
     type             => undef, # isn't set for ar
     employee_id      => SL::DB::Manager::Employee->current->id,
   );
-  # $ar_transaction->assign_attributes(%params) if %params;
+  # assign any parameters that weren't explicitly handled above, e.g. itime
+  $ar_transaction->assign_attributes(%params) if %params;
 
   foreach my $booking ( @{$bookings} ) {
     my $chart = delete $booking->{chart};
@@ -610,6 +612,8 @@ sub create_gl_transaction {
     storno_id      => undef,
     transactions   => [],
   );
+  # assign any parameters that weren't explicitly handled above, e.g. itime
+  $gl_transaction->assign_attributes(%params) if %params;
 
   my @acc_trans;
   if ( scalar @{$bookings} ) {