Revision ddf1c00a
Von Moritz Bunkus vor etwa 12 Jahren hinzugefügt
| SL/OE.pm | ||
|---|---|---|
|
qq|WHERE trans_id = ?|;
|
||
|
do_query($form, $dbh, $query, @values);
|
||
|
|
||
|
# delete OE record
|
||
|
$query = qq|DELETE FROM oe | .
|
||
|
qq|WHERE id = ?|;
|
||
|
do_query($form, $dbh, $query, @values);
|
||
|
|
||
|
# delete individual entries
|
||
|
$query = qq|DELETE FROM orderitems | .
|
||
|
qq|WHERE trans_id = ?|;
|
||
| ... | ... | |
|
qq|WHERE trans_id = ? AND module = 'OE'|;
|
||
|
do_query($form, $dbh, $query, @values);
|
||
|
|
||
|
# delete OE record
|
||
|
$query = qq|DELETE FROM oe | .
|
||
|
qq|WHERE id = ?|;
|
||
|
do_query($form, $dbh, $query, @values);
|
||
|
|
||
|
my $rc = $dbh->commit;
|
||
|
|
||
|
if ($rc) {
|
||
Auch abrufbar als: Unified diff
Aufträge etc: Beleg nach Zeilen löschen
Behebt #2207.