Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision fa9d160c

Von Tamino Steinert vor 10 Monaten hinzugefügt

  • ID fa9d160c06f357b899a832260a7e63d87b1f8aa8
  • Vorgänger 0464ffdb
  • Nachfolger adc4b5e5

kuw: CSV-Import-Script: Option für Testdurchlauf hinzugefügt

Unterschiede anzeigen:

scripts/import_variant_csv.pl
44 44
my (
45 45
  $opt_user, $opt_client,
46 46
  $opt_warengruppen_csv_file, $opt_farben_folder,
47
  $opt_part_csv_file, $opt_groessen_staffeln_csv_file
47
  $opt_part_csv_file, $opt_groessen_staffeln_csv_file,
48
  $opt_test_run,
48 49
);
49 50
our (%myconfig, $form, $user, $employee, $auth, $locale);
50 51

  
......
56 57
$opt_farben_folder = "kuw/Farben";
57 58
$opt_part_csv_file = "kuw/Export_bearbeitet.csv";
58 59

  
60
$opt_test_run = 1;
59 61

  
60 62
$locale = Locale->new;
61 63
$form   = Form->new;
......
471 473
      my @variant_properties = values %property_name_to_variant_property;
472 474
      $parent_variant->variant_properties(@variant_properties);
473 475

  
474
      next; # TODO: remove after testing
476
      next if ($opt_test_run);
477

  
475 478
      next if $count_errors_at_start != scalar @errors;
476 479
      $parent_variant->save();
477 480

  
......
529 532
  if (scalar @errors) {
530 533
    say join("\n", @errors);
531 534
    die join("\n", @errors);
532
  } else {
533
    die "Keine Fehler"; # TODO: remove after testing
534
    return 1;
535
  }
536
  if ($opt_test_run) {
537
    die "Test Durchlauf Erfolgereich: Keine Fehler in den Daten";
535 538
  }
536 539
}) or do {
537 540
  if (SL::DB->client->error) {

Auch abrufbar als: Unified diff