Summe bestellter Artikelvarianten

[dobra]

Hallo,

kann mir bitte mal jemand bei diesem Problem helfen?

Ich brauche ein 10 + 1 gratis für die Summe aller bestellten Artikelvarianten im WK
nachdem es ja (noch) nicht möglich ist, das mit Gutschein zu realisieren, da dieser bei nachträglicher Reduktion der Menge im WK nicht mehr entfernt werden kann, versuche ich da etwas zu improvisieren, komme aber mit der Abfrage nicht klar 

Code: [Auswählen]

<!--spmacro:module(test)
sub test {
my $index = $_[0];
my $anzahl = $_[1];
   if ($index <= $anzahl) {
for ($i=0;$i<=$anzahl;$i++) {
my $anzahl = ssp::get_var_cart('anzahl',$index);
my $artnr = ssp::get_var_cart('ARTNR',$index);
my $Aartnr = ssp::get_var_merch('AKTIARTNR');
if ( $artnr =~ /^$Aartnr/) {
my $summe = "???";  ## hier brauche ich die Summer der bestellten Artikel(varianten) bei denen das ARTNR-Feld mit "xxx." beginnt
}
}
if ($summe > 10) { main::mprint " ..."; }
}
}
-->
Beispiel:


Im Händlerfeld AKTIARTNR steht "18."
es soll also die Summe der bestellten Varianten bei denen die Artikelnummer mit "18." beginnt addiert werden.
Ist die Summe größer als 10, wird ein Zeile mit "Aktionrabatt - Artikel - Preis - Gutschrift" eingeblendet.
Mit ($summe > 10) wird so diese Gutschrift automatisch wieder entfern, wenn die Menge auf weniger als 10 geändert wird.

Diese Gutschrift muß dann natürlich vom Warenwert abgezogen werden (denke da an sub invoice_addpos ?).

Aber zuerst mal brauche ich die Summenberechnung im WK....

P.S.: die Händler-Artikelnummern sind bei mir NICHT die Shop-Artikelnummern sondern stehen in einem ben.def. Artikelfeld!

Linkback: https://www.shoppilot.net/pf/index.php?topic=1123.0

[cru]

Hallo dobra,

Code: [Auswählen]


<!--spmacro:module(test)
my $summe = 0;
sub test {
my $index = $_[0];
my $anzahl = $_[1];
   if ($index <= $anzahl) {
for ($i=0;$i<=$anzahl;$i++) {
my $anzahl = ssp::get_var_cart('anzahl',$index);
my $artnr = ssp::get_var_cart('ARTNR',$index);
my $Aartnr = ssp::get_var_merch('AKTIARTNR');
if ( $artnr =~ /^$Aartnr/) {
 
if($artnr =~ /xxx\..*/){
                             $summe = $summe + $anzahl;
                       }  ## hier brauche ich die Summer der bestellten Artikel(varianten) bei denen das ARTNR-Feld mit "xxx." beginnt
}
}
if ($summe > 10) { main::mprint " ..."; }
}
}
-->



Wollten Sie das erreichen???
Ich weiß nicht genau ob ich richtig verstanden habe was Sie vor haben...

mfg
cru

[dobra]

Hallo cru,

Vielen Dank für die Hilfe
(und die WE-Rettung  )
hat ein wenig gedauert bis ich das Prinzip begriffen und alles angepasst hatte aber jetzt funktioniert's so, wie ich wollte