Revision ecdb1064
Von Moritz Bunkus vor etwa 12 Jahren hinzugefügt
| SL/FU.pm | ||
|---|---|---|
| 426 | 426 |
|
| 427 | 427 |
my ($id) = selectrow_query($form, $dbh, qq|SELECT id FROM employee WHERE login = ?|, $form->{login});
|
| 428 | 428 |
|
| 429 |
do_query($form, $dbh, qq|DELETE FROM follow_up_access WHERE what = ?|, $id); |
|
| 430 |
|
|
| 429 | 431 |
my $query = qq|INSERT INTO follow_up_access (who, what) VALUES (?, ?)|; |
| 430 | 432 |
my $sth = prepare_query($form, $dbh, $query); |
| 431 | 433 |
|
| 432 |
do_query($form, $dbh, qq|DELETE FROM follow_up_access WHERE what = ?|, $id); |
|
| 433 |
|
|
| 434 | 434 |
while (my ($who, $access_allowed) = each %{ $params{access} }) {
|
| 435 | 435 |
next unless ($access_allowed); |
| 436 | 436 |
|
Auch abrufbar als: Unified diff
Zuerst löschen, dann Statement für INSERT preparen
Betrifft #2063.