update_exchangerate prüft in Abhängigkeit des Skript

Entsprechend script am Anfang der Routine setzen, damit alle Aufrufe von update_exchangerate vom richtigen "caller" ausgehen
kivitendo · Mar 5, 2024 · 78ec52f · 78ec52f
1 parent 1166b3f
commit 78ec52f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/SL/AP.pm b/SL/AP.pm
@@ -84,6 +84,7 @@ sub _post_transaction {
 
   $form->{defaultcurrency} = $form->get_default_currency($myconfig);
   $form->{taxincluded} = 0 unless $form->{taxincluded};
+  $form->{script}      = 'ap.pl' unless $form->{script};
 
   # make sure to have a id
   my ($query, $sth, @values);
@@ -412,7 +413,6 @@ sub _post_transaction {
 
       # update exchange rate record
       if (($form->{currency} ne $form->{defaultcurrency}) && !$exchangerate) {
-        $form->{script} = 'ap.pl';
         $form->update_exchangerate($dbh, $form->{currency},
                                    $form->{"datepaid_$i"},
                                    0, $form->{"exchangerate_$i"});