X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/fb7fdc29172d26911de001f9a4a5daf3b8fa080b..2ef21b8f2aaae439a9408977458bdeb9b0fd9e25:/bin/mozilla/ct.pl

diff --git a/bin/mozilla/ct.pl b/bin/mozilla/ct.pl
index bf2724ca0..4d06662e2 100644
--- a/bin/mozilla/ct.pl
+++ b/bin/mozilla/ct.pl
@@ -1153,7 +1153,8 @@ sub get_delivery {
                         transdate,
                         description,
                         qty,
-                        unit);
+                        unit,
+                        sellprice);
 
 
 
@@ -1171,6 +1172,8 @@ sub get_delivery {
     qq|<th class=listheading>| . $locale->text('Qty') . qq|</th>|;
   $column_header{unit} =
     qq|<th class=listheading>| . $locale->text('Unit') . qq|</th>|;
+  $column_header{sellprice} =
+    qq|<th class=listheading>| . $locale->text('Sell Price') . qq|</th>|;
   $result .= qq|
 
 <table width=100%>
@@ -1195,7 +1198,7 @@ sub get_delivery {
     } else {
       map { $column_data{$_} = "<td>$ref->{$_}&nbsp;</td>" } @column_index;
     }
-
+    $column_data{sellprice} = "<td>". $form->format_amount(\%myconfig,$ref->{sellprice},2)."&nbsp;</td>";
     $i++;
     $i %= 2;
     $result .= "