Welcome Visitor, Please Login or Register Now |
|
Monday, April 29, 2024 07:49 PM |
|
poldy |
Registered Member |
Posts: 90 |
Joined: 04-29-24 07:49 PM |
|
|
|
|
|
|
|
|
|
Final Value Fees as % |
Edit Delete Quote |
First Post Posted on: 09-28-08 11:46 AM |
|
|
|
Hi at mewsoft.\
I found this piece of script in:\
FeesMaster.pm\
\
Is this the only place fees are calculated. It does not look to difficult to change it to a percentage calculation.\
\
Can you do it for a reasonable price, or let me know where else I have to look to find fees calculations.\
\
Using Verion 8\
\
Best regards\
\
Poldy\
\
\
------\
#==========================================================\
sub Calculate_Closed_Auction_Fee{\
my($Quantity, $Reserve, $Current_Bid, $Increment, $Bids) = @_;\
my($Final_Price, $Reserve_Fee, $Final_Value_Fee);\
\
$Reserve_Fee = 0;\
$Final_Value_Fee = 0;\
\
if (($Reserve) && ($Quantity == 1)) {\
if ($Current_Bid >= $Reserve){\
for $x(0..$#Reserve_Fees_From) {\
if ($Reserve > $Reserve_Fees_From[$x] && $Reserve < $Reserve_Fees_To[$x]) {\
$Reserve_Fee = $Reserve_Fees_Fee[$x];\
last;\
}\
}\
}\
}\
\
if ($Bids > 0) {\
$Final_Price = $Current_Bid - $Increment;\
for $x(0..$#Final_Fees_From){\
if ($Final_Price > $Final_Fees_From[$x] && $Final_Price < $Final_Fees_To[$x]) {\
$Temp = (($Final_Fees_Fee[$x]/100) * $Final_Price)* $Quantity;\
$Final_Value_Fee = $Temp;\
last;\
}\
}\
}\
\
#if ($Global{Charge_For_Submitting} eq "YES"){$Final_Value_Fee = 0; $Reserve_Fee = 0;}\
\
return ($Final_Value_Fee, $Reserve_Fee);\
\
}\
#========================================================== |
|
|
|
|
|
|
mewsoft |
Administrator Team Member |
Posts: 5381 |
Joined: 04-29-24 07:49 PM |
Location: knxoville, TN, USA |
|
|
|
|
|
|
|
|
|
|
|
Mewsoft and Mewsoft Logos are registered trademarks.
® Corporation. All Rights Reserved.
Copyright -
Privacy -
Terms of Use
| Page Load: 0.0631 Seconds |
|