Revision d5c41a33
Von Jan Büren vor 2 Tagen hinzugefügt
- ID d5c41a33f86048ffb6ab4f74291b76b0aaa55bb4
- Vorgänger 916cd2bf
| t/wh/journal.t | ||
|---|---|---|
| 43 | 43 |
SL::DB::Inventory->new(%args, trans_type => $tt_assembled, qty => 1)->save; |
| 44 | 44 |
|
| 45 | 45 |
local $::instance_conf->data->{transfer_default_ignore_onhand} = 0;
|
| 46 |
$::locale = Locale->new('en');
|
|
| 46 | 47 |
my $die_message; |
| 47 | 48 |
eval {
|
| 48 | 49 |
SL::DB::Inventory->new(%args, trans_type => $tt_used, qty => -1)->save; |
| ... | ... | |
| 51 | 52 |
} or do {
|
| 52 | 53 |
$die_message = $@; |
| 53 | 54 |
}; |
| 54 |
ok($die_message =~ m/Menge von -1 .* Artikel 50 .* Test warehouse am Lagerplatz Test bin 1/, 'catch negative stock'); |
|
| 55 |
|
|
| 56 |
ok($die_message =~ m/Cannot transfer -1 qty.*/, 'catch negative stock'); |
|
| 55 | 57 |
|
| 56 | 58 |
qty => { type => 'numeric', precision => 25, scale => 5 },
|
| 57 | 59 |
shippingdate => { type => 'date', not_null => 1 },
|
Auch abrufbar als: Unified diff
Test: Fehlermeldung auf englisch abfangen und etwas flexibler