Revision 9be660e8
Von Sven Schöling vor mehr als 8 Jahren hinzugefügt
| t/db_helper/convert_invoice.t | ||
|---|---|---|
| 30 | 30 |
my $VISUAL_TEST = 0; # just a sleep to click around |
| 31 | 31 |
|
| 32 | 32 |
sub clear_up {
|
| 33 |
foreach (qw(DeliveryOrderItem DeliveryOrder InvoiceItem Invoice Part Customer Vendor Department PaymentTerm)) {
|
|
| 33 |
foreach (qw(DeliveryOrderItem DeliveryOrder InvoiceItem PurchaseInvoice Invoice Part Customer Vendor Department PaymentTerm)) {
|
|
| 34 | 34 |
"SL::DB::Manager::${_}"->delete_all(all => 1);
|
| 35 | 35 |
} |
| 36 | 36 |
SL::DB::Manager::Employee->delete_all(where => [ id => 31915 ]); |
Auch abrufbar als: Unified diff
convert_invoice.t: purchase invoices vor parts aufräumen