From: Jan Büren <jan@lx-office-hosting.de>
Date: Tue, 28 Dec 2010 14:05:49 +0000 (+0100)
Subject: Vergessen is.pl für Commit 0e0ff15052f7cb7ed1a2b04235a8a217da97a183 (Standard-Umlaufv... 
X-Git-Tag: release-2.6.2beta1~42^2~12^2~1
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=c0249f11d53031726da0f26bb733a7e769cdff0c;p=kivitendo-erp.git

Vergessen is.pl für Commit 0e0ff15052f7cb7ed1a2b04235a8a217da97a183 (Standard-Umlaufvermögenskonto) hinzugefügt
---

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
index 9ec9becb8..a94a720f2 100644
--- a/bin/mozilla/is.pl
+++ b/bin/mozilla/is.pl
@@ -423,9 +423,17 @@ sub form_footer {
   $form->{paidaccounts}++ if ($form->{"paid_$form->{paidaccounts}"});
   $form->{paid_indices} = [ 1 .. $form->{paidaccounts} ];
 
+  # Standard Konto für Umlaufvermögen
+  my $accno_arap = IS->get_standard_accno_current_assets(\%myconfig, \%$form);
+
   for my $i (1 .. $form->{paidaccounts}) {
     $form->{"selectAR_paid_$i"} = $form->{selectAR_paid};
-    $form->{"selectAR_paid_$i"} =~ s/option>\Q$form->{"AR_paid_$i"}\E/option selected>$form->{"AR_paid_$i"}/;
+    if (!$form->{"AR_paid_$i"}) {
+      $form->{"selectAR_paid_$i"} =~ s/option>$accno_arap--(.*?)</option selected>$accno_arap--$1</;
+    } else {
+      $form->{"selectAR_paid_$i"} =~ s/option>\Q$form->{"AR_paid_$i"}\E/option selected>$form->{"AR_paid_$i"}/;
+    }
+
     $totalpaid += $form->{"paid_$i"};
   }