Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 839ed59d

Von Moritz Bunkus vor mehr als 11 Jahren hinzugefügt

  • ID 839ed59d0b22d6c011dc5f3df59c6b4e6357ba02
  • Vorgänger 02e22ba7
  • Nachfolger 44d893c2

Zusammenfassung einzelner UPDATE-Queries auf defaults zu einem einzigen

Unterschiede anzeigen:

SL/User.pm
286 286
  # load chart of accounts
287 287
  $dbupdater->process_query($dbh, "sql/$form->{chart}-chart.sql", undef, $db_charset);
288 288

  
289
  $query = "UPDATE defaults SET coa = ?";
290
  do_query($form, $dbh, $query, $form->{chart});
291
  $query = "UPDATE defaults SET accounting_method = ?";
292
  do_query($form, $dbh, $query, $form->{accounting_method});
293
  $query = "UPDATE defaults SET profit_determination = ?";
294
  do_query($form, $dbh, $query, $form->{profit_determination});
295
  $query = "UPDATE defaults SET inventory_system = ?";
296
  do_query($form, $dbh, $query, $form->{inventory_system});
297
  $query = "UPDATE defaults SET curr = ?";
298
  do_query($form, $dbh, $query, $form->{defaultcurrency});
289
  my $query = qq|UPDATE defaults SET coa = ?, accounting_method = ?, profit_determination = ?, inventory_system = ?, curr = ?|;
290
  do_query($form, $dbh, $query, map { $form->{$_} } qw(chart accounting_method profit_determination inventory_system defaultcurrency));
299 291

  
300 292
  $dbh->disconnect;
301 293

  

Auch abrufbar als: Unified diff