Anpassung Rose-Funktionen auf Umstellung currencies

[kivitendo-erp.git] / SL / RC.pm

diff --git a/SL/RC.pm b/SL/RC.pm
index 3c91195..9493f0f 100644 (file)
--- a/SL/RC.pm
+++ b/SL/RC.pm
@@ -36,6 +36,8 @@ package RC;
 
 use SL::DBUtils;
 
+use strict;
+
 sub paymentaccounts {
   $main::lxdebug->enter_sub();
 
@@ -74,7 +76,7 @@ sub payment_transactions {
       qq|   WHERE c2.accno = ?) AS category | .
       qq|FROM acc_trans a | .
       qq|JOIN chart c ON (c.id = a.chart_id) | .
-      qq|WHERE a.transdate < date ? AND a.cleared = '1' AND c.accno = ?|;
+      qq|WHERE a.transdate < ? AND a.cleared = '1' AND c.accno = ?|;
     @values = ($form->{accno}, conv_date($form->{fromdate}), $form->{accno});
 
   } else {
@@ -91,7 +93,7 @@ sub payment_transactions {
   ($form->{beginningbalance}, $form->{category}) =
     selectrow_query($form, $dbh, $query, @values);
 
-  my %oid = ('Pg'     => 'ac.oid',
+  my %oid = ('Pg'     => 'ac.acc_trans_id',
              'Oracle' => 'ac.rowid');
   @values = ();
   $query =
@@ -184,7 +186,7 @@ sub reconcile {
   my $dbh = $form->dbconnect($myconfig);
 
   my ($query, $i);
-  my %oid = ('Pg'     => 'oid',
+  my %oid = ('Pg'     => 'acc_trans_id',
              'Oracle' => 'rowid');
 
   # clear flags