X-Git-Url: http://wagnertech.de/git?a=blobdiff_plain;f=sql%2FPg-upgrade2%2Fauth_enable_sales_all_edit.pl;h=e77fbee65382a2f3c41007dde45551d2da4538f5;hb=738c240ad3a167dd3013ef01f0892b5589fd7d9a;hp=e223cd859e5942c76690cba092de63e150eb1623;hpb=c9e93ded8a5ca6f8a9212c5e64a99616889b5aac;p=kivitendo-erp.git diff --git a/sql/Pg-upgrade2/auth_enable_sales_all_edit.pl b/sql/Pg-upgrade2/auth_enable_sales_all_edit.pl index e223cd859..e77fbee65 100644 --- a/sql/Pg-upgrade2/auth_enable_sales_all_edit.pl +++ b/sql/Pg-upgrade2/auth_enable_sales_all_edit.pl @@ -13,38 +13,35 @@ sub mydberror { "
$msg
" . $DBI::errstr); } -sub do_query { - my ($query, $may_fail) = @_; +sub do_update { + my $dbh = $main::auth->dbconnect(); + my $query = <do($query)) { - mydberror($query) unless ($may_fail); - $dbh->rollback(); - $dbh->begin_work(); + $sth->finish(); + $dbh->commit(); } -} -sub do_update { - my @queries; - -# do_query("ALTER TABLE project ADD PRIMARY KEY (id);", 1); -# map({ do_query($_, 0); } @queries); -# print "hieryy"; -# print (Dumper($main::form)); - my $dbh = $main::auth->dbconnect(); - my $query = qq|SELECT distinct group_id from auth.user_group|; - my $sth_all_groups = prepare_execute_query($form, $dbh, $query); - while (my $hash_ref = $sth_all_groups->fetchrow_hashref()) { # Schleife - push @queries, "INSERT INTO auth.group_rights (group_id, \"right\", granted) VALUES (" . $hash_ref->{group_id} . ", 'sales_all_edit', 't')"; -} -# if in doubt use brute force ;-) jb - foreach my $query (@queries){ -# print "hier:" . $query; - my $dbh = $main::auth->dbconnect(); - my $sth = prepare_query($form, $dbh, $query); - do_statement($form,$sth,$query); - $sth->finish(); - $dbh ->commit(); -} return 1; }