X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/kivitendo-erp.git/blobdiff_plain/9b057fb953934c00c255acc2aaf2f1254beb6860..85422b200b3327de9a5c7b0d550d9afc6fb62286:/t/selenium/testscripts/system/begin/S003AddLanguage.t diff --git a/t/selenium/testscripts/system/begin/S003AddLanguage.t b/t/selenium/testscripts/system/begin/S003AddLanguage.t index 376b429c4..4d745b87b 100644 --- a/t/selenium/testscripts/system/begin/S003AddLanguage.t +++ b/t/selenium/testscripts/system/begin/S003AddLanguage.t @@ -1,28 +1,31 @@ -diag("Add languages"); - -if(!$sel->get_title("Lx-Office Version 2.4.3 - Selenium - " . $lxtest->{db})){ - require_ok("../../begin/B004Login.t"); +if(!defined $sel) { + require "t/selenium/AllTests.t"; + init_server("singlefileonly",$0); + exit(0); } - -$sel->select_frame_ok("relative=up"); -$sel->click_ok("link=Sprache hinzufügen"); -$sel->wait_for_page_to_load($lxtest->{timeout}); -$sel->select_frame_ok("main_window"); -$sel->type_ok("description", "elbisch"); -$sel->type_ok("template_code", "elb"); -$sel->type_ok("article_code", "elb"); -$sel->select_ok("output_numberformat", "label=1.000,00"); -$sel->select_ok("output_dateformat", "label=yyyy-mm-dd"); -$sel->click_ok("action"); -$sel->wait_for_page_to_load($lxtest->{timeout}); - -use DBI; -$lxtest->{dsn} = 'dbi:Pg:dbname=' . $lxtest->{db} . ';host=' . $lxtest->{dbhost} . ';port=' . $lxtest->{dbport}; -my $dbh = DBI->connect( $lxtest->{dsn}, $lxtest->{dbuser}, $lxtest->{dbpasswd} ) or die "Cannot connect to database!\n $DBI::errstr"; -my $sth = $dbh->prepare("SELECT id FROM language WHERE description ILIKE 'elbisch'") or die "Error while preparing sql statement!\n $DBI::errstr\n"; -$sth->execute() or die "Error while excecuting sql statement!\n $DBI::errstr"; -$lxtest->{lang_id} = $sth->fetchrow_array() or die "Nothing to fetch!\n$DBI::errstr"; -$sth->finish(); -$dbh->disconnect(); - +diag("Add languages"); +SKIP: { + start_login(); + + $sel->click_ok("link=Sprache hinzufügen"); + $sel->wait_for_page_to_load($lxtest->{timeout}); + $sel->select_frame_ok("main_window"); + $sel->type_ok("description", "elbisch"); + $sel->type_ok("template_code", "elb"); + $sel->type_ok("article_code", "elb"); + $sel->select_ok("output_numberformat", "label=1.000,00"); + $sel->select_ok("output_dateformat", "label=yyyy-mm-dd"); + $sel->click_ok("action"); + $sel->wait_for_page_to_load($lxtest->{timeout}); + + ### Folgende Zeilen sind notwendig , um später herausfinden zu können, welche Sprache gelöscht werden kann. + use DBI; + $lxtest->{dsn} = 'dbi:Pg:dbname=' . $lxtest->{db} . ';host=' . $lxtest->{dbhost} . ';port=' . $lxtest->{dbport}; + my $dbh = DBI->connect( $lxtest->{dsn}, $lxtest->{dbuser}, $lxtest->{dbpasswd} ) or die "Cannot connect to database!\n $DBI::errstr"; + my $sth = $dbh->prepare("SELECT id FROM language WHERE description ILIKE 'elbisch'") or die "Error while preparing sql statement!\n $DBI::errstr\n"; + $sth->execute() or die "Error while excecuting sql statement!\n $DBI::errstr"; + $lxtest->{lang_id} = $sth->fetchrow_array() or die "Nothing to fetch!\n$DBI::errstr"; + $sth->finish(); + $dbh->disconnect(); +}; 1; \ No newline at end of file