]> wagnertech.de Git - kivitendo-erp.git/blobdiff - SL/OP.pm
Recommit von r1131 von sschoeling: Fix zu Bug362. Danke an Harry fuer die Hilfe.
[kivitendo-erp.git] / SL / OP.pm
index afd0deca150af89979aaf65c628072bed8eca4f9..1d2f3ffe2996ac3905dd1d25001fd4d55c293a4f 100644 (file)
--- a/SL/OP.pm
+++ b/SL/OP.pm
@@ -34,8 +34,6 @@
 
 package OP;
 
-
-
 sub overpayment {
   $main::lxdebug->enter_sub();
 
@@ -43,7 +41,7 @@ sub overpayment {
 
   my $fxamount = $form->round_amount($amount * $form->{exchangerate}, 2);
   my ($paymentaccno) = split /--/, $form->{account};
-  
+
   my $vc_id = "$form->{vc}_id";
 
   my $uid = time;
@@ -79,8 +77,8 @@ sub overpayment {
   $dbh->do($query) || $form->dberror($query);
 
   # add AR/AP
-  ($accno) = split /--/, $form->{$form->{ARAP}};
-  
+  ($accno) = split /--/, $form->{ $form->{ARAP} };
+
   $query = qq|INSERT INTO acc_trans (trans_id, chart_id, transdate, amount)
              VALUES ($uid, (SELECT c.id FROM chart c
                             WHERE c.accno = '$accno'),
@@ -106,10 +104,9 @@ sub overpayment {
              '1', '1')|;
     $dbh->do($query) || $form->dberror($query);
   }
-  
+
   $main::lxdebug->leave_sub();
 }
 
-
 1;