Revision 0845ca9d
Von Martin Helmling martin.helmling@octosoft.eu vor etwa 4 Jahren hinzugefügt
| SL/Helper/Inventory.pm | ||
|---|---|---|
| 167 | 167 |
sub allocate {
|
| 168 | 168 |
my (%params) = @_; |
| 169 | 169 |
|
| 170 |
my $part = $params{part} or Carp::croak('allocate needs a part');
|
|
| 171 |
my $qty = $params{qty} or Carp::croak('allocate needs a qty');
|
|
| 170 |
die SL::X::Inventory::Allocation->new( |
|
| 171 |
error => 'allocate needs a part', |
|
| 172 |
msg => t8("Method allocate needs the parameter 'part'"),
|
|
| 173 |
) unless $params{part};
|
|
| 174 |
die SL::X::Inventory::Allocation->new( |
|
| 175 |
error => 'allocate needs a qty', |
|
| 176 |
msg => t8("Method allocate needs the parameter 'qty'"),
|
|
| 177 |
) unless $params{qty};
|
|
| 178 |
|
|
| 179 |
my $part = $params{part};
|
|
| 180 |
my $qty = $params{qty};
|
|
| 172 | 181 |
|
| 173 | 182 |
return () if $qty <= 0; |
| 174 | 183 |
|
| locale/de/all | ||
|---|---|---|
| 1963 | 1963 |
'Meta tag keywords' => 'Metatag Keywords', |
| 1964 | 1964 |
'Meta tag title' => 'Metatag Titel', |
| 1965 | 1965 |
'Method' => 'Verfahren', |
| 1966 |
'Method allocate needs the parameter \'part\'' => 'Es fehlt der Parameter \'part\'', |
|
| 1967 |
'Method allocate needs the parameter \'qty\'' => 'Es fehlt der Parameter \'qty\' oder die Menge ist 0', |
|
| 1966 | 1968 |
'Microfiche' => 'Mikrofilm', |
| 1967 | 1969 |
'Minimum Amount' => 'Mindestbetrag', |
| 1968 | 1970 |
'Miscellaneous' => 'Verschiedenes', |
Auch abrufbar als: Unified diff
Inventory Helper: Bessere Fehlermeldung bei fehlenden Parametern
Alle Fehler im allocate() des Inventory-Helpers werden nun per
SL::X::Inventory::Allocation Fehlermethode erzeugt,
damit es eine einheitliche Prüfung geben kann.
verbessert egw 12413