Revision 6339df04
Von Thomas Kasulke vor mehr als 17 Jahren hinzugefügt
| SL/IR.pm | ||
|---|---|---|
| 646 | 646 |
$dbh->do($query) || $form->dberror($query); |
| 647 | 647 |
|
| 648 | 648 |
if ($form->{storno}) {
|
| 649 |
$query = qq| update ap set paid=paid+amount where id=$form->{storno_id}|;
|
|
| 649 |
$query = qq| UPDATE ap SET paid = paid+amount WHERE id = $form->{storno_id}|;
|
|
| 650 | 650 |
$dbh->do($query) || $form->dberror($query); |
| 651 |
$query = qq| update ap set storno='$form->{storno}' where id=$form->{storno_id}|;
|
|
| 651 |
$query = qq| UPDATE ap SET storno = '$form->{storno}' WHERE id = $form->{storno_id}|;
|
|
| 652 | 652 |
$dbh->do($query) || $form->dberror($query); |
| 653 |
$query = qq? update ap set intnotes='Rechnung storniert am $form->{invdate} ' || intnotes where id=$form->{storno_id}?;
|
|
| 653 |
$query = qq? UPDATE ap SET intnotes = 'Rechnung storniert am $form->{invdate} ' || intnotes WHERE id = $form->{storno_id}?;
|
|
| 654 | 654 |
$dbh->do($query) || $form->dberror($query); |
| 655 | 655 |
|
| 656 |
$query = qq| update ap set paid=amount where id=$form->{id}|;
|
|
| 656 |
$query = qq| UPDATE ap SET paid = amount WHERE id = $form->{id}|;
|
|
| 657 | 657 |
$dbh->do($query) || $form->dberror($query); |
| 658 | 658 |
} |
| 659 | 659 |
|
Auch abrufbar als: Unified diff
SQL-Syntax groß geschrieben / lesbarer gemacht : update -> UPDATE usw.