Frage:
Ferner haben wir nicht gefunden, wie man generell festlegen kann,
daß man für mindestens 25 Euro bestellen kann,
also NICHT eine MindestbestellMENGE für einzelne Artikel,
sondern der Zwang so viele Artikel zu bestellen, daß dieser
MindestbestellWERT erreicht wird.
Ein Mindermengenzuschlag ist auch nicht gewünscht.

Lösung:


<!--spmacro:module(mw)

$mindestwert = 25;

sub bestellen {
my $sum = ssp::get_wkprodsum();
if ($sum < $mindestwert) {
main::mprint("<b>ACHTUNG Mindesbestellwert von " . $mindestwert . " EUR noch nicht erreicht</b>");
} else {
main::mprint("__bestellen__");
}
}

-->


An die Stelle, wo __bestellen__ steht schreibt man __mw::bestellen__ und erhält die gewünschte Funktion.

Es geht natürlich auch mit __sbestellen__ und der Funktion mw::sbestellen analog.



sub sbestellen {
my $sum = ssp::get_wkprodsum();
if ($sum < $mindestwert) {
main::mprint("<b>ACHTUNG Mindesbestellwert von " . $mindestwert . " EUR noch nicht erreicht</b>");
} else {
main::mprint("__sbestellen__");
}
}