'Buchen auf' in EK/VK Rechnungen auch vorbelegen, wenn in Mandantenko…

…nfig leer Wird dann mit dem ersten Verbindlichkeitskonto/Forderungskonto vorbelegt, sowie bei der Kreditorenbuchung/Debitorenbuchung auch.
kivitendo · Oct 16, 2023 · 05082cf · 05082cf
1 parent 99d8b7c
commit 05082cf
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/bin/mozilla/ir.pl b/bin/mozilla/ir.pl
@@ -214,7 +214,7 @@ sub invoice_links {
   }
   $form->{AP} = $form->{AP_1} unless $form->{id};
   my ($chart_accno)      = split /--/, $form->{AP};
-  $form->{AP_chart_id} = $form->{id} ? SL::DB::Manager::Chart->find_by( accno => $chart_accno)->id : $::instance_conf->get_ap_chart_id ;
+  $form->{AP_chart_id} = $form->{id} ? SL::DB::Manager::Chart->find_by( accno => $chart_accno)->id : $::instance_conf->get_ap_chart_id || $form->{AP_links}->{AP}->[0]->{chart_id};
 
   $form->{locked} =
     ($form->datetonum($form->{invdate}, \%myconfig) <=

diff --git a/bin/mozilla/is.pl b/bin/mozilla/is.pl
@@ -270,7 +270,7 @@ sub invoice_links {
   }
   $form->{AR} = $form->{AR_1} unless $form->{id};
   my ($chart_accno)      = split /--/, $form->{AR};
-  $form->{AR_chart_id} = $form->{id} ? SL::DB::Manager::Chart->find_by( accno => $chart_accno)->id : $::instance_conf->get_ar_chart_id ;
+  $form->{AR_chart_id} = $form->{id} ? SL::DB::Manager::Chart->find_by( accno => $chart_accno)->id : $::instance_conf->get_ar_chart_id || $form->{AR_links}->{AR}->[0]->{chart_id};
 
   $form->{locked} = ($form->datetonum($form->{invdate},  \%myconfig)
                   <= $form->datetonum($form->{closedto}, \%myconfig));