1/2 Sterne vergeben

[dobra]

Aufgabe:
die Anzeige der durchschnittlichen Sterne eines Artikels soll "genauer" = auf ,5 statt nur auf Ganzahlen erfolgen.


Lösung:

1) ein Image "note3.gif"    anlegen.
    note3.gif im Anhang - in den Ordner "review_modul" und in "Dateinen hinzufüen" eintragen.

2) in reviewuser.ipl
sub review_grade{ ... }
ergänzen mit

Code [Auswählen] Expand


my $ins3 = qq|<img style="border: 1px solid #fff !important;" src="$ssp::catalog_abs/review_modul/note3.gif" alt="">|;

elsif ($pic == 1.5){
$tmp = $ins . $ins3. $ins2 . $ins2 . $ins2;
}
elsif ($pic == 2.5){
$tmp = $ins . $ins .$ins3 . $ins2 . $ins2 ;
}
elsif ($pic == 3.5){
$tmp = $ins . $ins . $ins . $ins3 . $ins2 ;
}
elsif ($pic == 4.5){
$tmp = $ins . $ins . $ins . $ins . $ins3 ;
}


suchen nach
## Berechnung der Durchschnittlichen Bewertungen pro Artikel
sub average{ ...

hier unter

Code [Auswählen] Expand

$gesamt = sprintf("%.0f", $gesamt/$count);
ersetzen mit

Code [Auswählen] Expand

$gesamt = sprintf("%.1f", $gesamt/$count);
$gesamt = runden($gesamt*2)/2;

unterhalb von sub average{ .... } einfügen

Code [Auswählen] Expand


sub runden {
    my $val = shift || 0;
    my $r =  ( $val < 0 ) ? -1 : 1;
    $r *= 0.5;   
    return int($val + $r);
}