X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/111276a18a6edd391c7d653f77003fe24ae00d8f..9b057fb953934c00c255acc2aaf2f1254beb6860:/t/selenium/testscripts/administration/begin/B004Login.t

diff --git a/t/selenium/testscripts/administration/begin/B004Login.t b/t/selenium/testscripts/administration/begin/B004Login.t
new file mode 100644
index 000000000..3125c77c8
--- /dev/null
+++ b/t/selenium/testscripts/administration/begin/B004Login.t
@@ -0,0 +1,21 @@
+### Login
+
+diag("Login");
+
+$sel->open_ok($lxtest->{lxbaseurl}."/login.pl");
+
+$sel->wait_for_page_to_load_ok($lxtest->{timeout}); 
+$sel->title_is("Lx-Office Version ".$lxtest->{version});
+$sel->type_ok("login", $lxtest->{testuserlogin});
+$sel->type_ok("password", $lxtest->{testuserpasswd});
+$sel->click_ok("//input[(\@name=\"action\") and (\@value=\"Anmeldung\")]");
+
+$sel->wait_for_page_to_load_ok($lxtest->{timeout});
+if($sel->title_is("Datenbankaktualisierung - Lx-Office Version 2.4.3 - -")) {
+  $sel->click_ok("//input[(\@name=\"dummy\") and (\@value=\"Weiter\")]");
+  $sel->wait_for_page_to_load_ok($lxtest->{timeoutlong}); 
+  $sel->click_ok("//input[(\@type=\"submit\") and (\@value=\"Weiter\")]");
+  $sel->wait_for_page_to_load_ok($lxtest->{timeout}); 
+}
+
+$sel->title_is("Lx-Office Version 2.4.3 - Selenium - " . $lxtest->{db});