X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/e9c2de7f8b54ba0dc7b8aafba99a7de66d71ceef..57528e5b09f2fea9708d06ec99c3fb0200275534:/SL/User.pm diff --git a/SL/User.pm b/SL/User.pm index e984dbf0f..2159d9243 100644 --- a/SL/User.pm +++ b/SL/User.pm @@ -614,11 +614,11 @@ sub create_employee_entry { ($can_delete) = selectrow_query($form, $dbh, qq|SELECT tag FROM schema_info WHERE tag = ?|, 'employee_deleted') if $good_db; if (!$id) { - my $query = qq|INSERT INTO employee (login, name, workphone, role) VALUES (?, ?, ?, ?)|; - do_query($form, $dbh, $query, ($self->{login}, $myconfig->{name}, $myconfig->{tel}, "user")); + my $query = qq|INSERT INTO employee (login, name, workphone) VALUES (?, ?, ?)|; + do_query($form, $dbh, $query, ($self->{login}, $myconfig->{name}, $myconfig->{tel})); } elsif ($update_existing && $can_delete) { - my $query = qq|UPDATE employee SET name = ?, workphone = ?, role = 'user', deleted = 'f' WHERE id = ?|; + my $query = qq|UPDATE employee SET name = ?, workphone = ?, deleted = 'f' WHERE id = ?|; do_query($form, $dbh, $query, $myconfig->{name}, $myconfig->{tel}, $id); }