t/selenium/testscripts/administration/begin/A003UpdateDatabase.t

   1 ### Update Database
   2
   3 # NOTEST: some preruns for initializing missing parameters
   4 $sel->open($lxtest->{lxadmin});
   5
   6 $sel->click("//input[(\@name=\"action\") and (\@value=\"Datenbankadministration\")]");
   7 $sel->wait_for_page_to_load($lxtest->{timeout});
   8 $sel->type("dbuser", $lxtest->{dbuser});
   9 $sel->type("dbpasswd", $lxtest->{dbpasswd});
  10 $sel->type("dbuser", $lxtest->{dbuser});
  11 $sel->type("dbhost", $lxtest->{dbhost});
  12 $sel->type("dbport", $lxtest->{dbport});
  13 $sel->type("dbdefault", $lxtest->{dbdefault});
  14 $sel->click("//input[(\@name=\"action\") and (\@value=\"Datenbank aktualisieren\")]");
  15 $sel->wait_for_page_to_load($lxtest->{timeoutlong});
  16 $sel->title_is("Lx-Office ERP Datenbankadministration / Datenbank aktualisieren -");
  17
  18 my $count =0;
  19
  20 while (){ # count the number of radiobuttons
  21   eval {  $sel->is_checked("//input[(\@id=\"$count\")]"); };
  22     if ( $@ ) { $count--; last; };
  23   $count++;
  24 }
  25
  26 #TEST: Now run the Tests
  27
  28 $sel->open_ok($lxtest->{lxadmin});
  29 $sel->title_is("Lx-Office ERP Administration -");
  30
  31 #diag('Lock the system');
  32 #$sel->click_ok("//input[(\@name=\"action\") and (\@value=\"System sperren\")]");
  33 #$sel->wait_for_page_to_load_ok($lxtest->{timeout});
  34
  35 diag('Update the database');
  36
  37 $sel->click_ok("//input[(\@name=\"action\") and (\@value=\"Datenbankadministration\")]");
  38 $sel->wait_for_page_to_load_ok($lxtest->{timeout});
  39 $sel->title_is("Lx-Office ERP / Datenbankadministration -");
  40 $sel->type_ok("dbuser", $lxtest->{dbuser});
  41 $sel->type_ok("dbpasswd", $lxtest->{dbpasswd});
  42 $sel->type_ok("dbuser", $lxtest->{dbuser});
  43 $sel->type_ok("dbhost", $lxtest->{dbhost});
  44 $sel->type_ok("dbport", $lxtest->{dbport});
  45 $sel->type_ok("dbdefault", $lxtest->{dbdefault});
  46 $sel->click_ok("//input[(\@name=\"action\") and (\@value=\"Datenbank aktualisieren\")]");
  47 $sel->wait_for_page_to_load_ok($lxtest->{timeoutlong});
  48 $sel->title_is("Lx-Office ERP Datenbankadministration / Datenbank aktualisieren -");
  49
  50 for (my $i=0; $i <= $count; $i++){
  51   $sel->uncheck_ok("//input[(\@id=\"$i\")]");
  52 }
  53
  54 #$sel->click_ok("//input[\@value=\"$lxtest->{db}\"]");
  55 #$sel->check_ok("//input[\@name=\"db$lxtest->{db}\"]");
  56 $sel->click_ok("//input[(\@name=\"action\") and (\@value=\"Weiter\")]");
  57 $sel->title_like( qr/Lx-Office ERP Datenbankadministration/ );
  58
  59 #diag('Unlock the system');
  60 #$sel->click_ok("//input[(\@name=\"action\") and (\@value=\"System entsperren\")]");
  61 #$sel->wait_for_page_to_load_ok($lxtest->{timeout});
  62 #$sel->title_is("Lx-Office ERP Administration -");
  63 1;