\n";
# Display Summary Totals
if ($totalqnty > 1) {$pd = "Items"} else {$pd = "Item"}
$totalprice = sprintf "%.2f", $totalprice;
$totalprice = CommifyMoney ($totalprice);
$totalqnty = CommifyNumbers ($totalqnty);
print "| ";
if ($linkHaveCouponsIMG && !$use_ARES && scalar(@use_coupons) && $Computations{'Coupon_Discount'}==0) {
print "$linkHaveCouponsIMG";
}
print "$totaltext Subtotal \n";
print "$totalqnty $pd : | \n";
print " ";
print "$totalcolor $currency $totalprice |
\n";
# Totals from %Computations ------------------>
# CommifyMoney here, keep computations free of formatting
# Display First Discount
if ($Computations{'Primary_Discount'} > 0 || $Computations{'Primary_Discount_Line_Override'}) {
$DiscountOne = CommifyMoney ($Computations{'Primary_Discount'});
print "| $totaltext \n";
print "$Computations{'Primary_Discount_Status'} : \n";
print " | $totalcolor ";
if ($Computations{'Primary_Discount'} == 0 && $Computations{'Primary_Discount_Amt_Override'}) {
print "$Computations{'Primary_Discount_Amt_Override'} ";
} else {
print "- $currency $DiscountOne ";
}
print " |
\n";
}
# Display Coupon Discount
if ($Computations{'Coupon_Discount'} > 0) {
$DiscountTwo = CommifyMoney ($Computations{'Coupon_Discount'});
print "| $totaltext \n";
print "$linkCouponIMG" if ($linkCouponIMG && !$use_ARES);
print "" if ($linkCouponLine && !$use_ARES);
print "Discount $Computations{'Coupon_Discount_Status'}";
print "" if ($linkCouponLine && !$use_ARES);
print " : \n";
print " | - $totalcolor $currency ";
print "$DiscountTwo |
\n";
}
# Display Subtotal if discounts
if ($Computations{'Combined_Discount'} > 0 ) {
$SubDiscount = CommifyMoney ($Computations{'Sub_Final_Discount'});
$CombinedDiscount = CommifyMoney ($Computations{'Combined_Discount'});
print "| $totaltext \n";
print "Sub Total After $currency $CombinedDiscount Total Discount : \n";
print " | ";
print "$totalcolor $currency $SubDiscount |
\n";
}
# Tax Before
if ($Computations{'Tax_Rule'} eq "BEFORE") {
if ($Computations{'Tax_Amount'} > 0 || $NewInfo{'Tax_Exempt_Status'}) {
$TaxRate = ($Computations{'Tax_Rate'} * 100);
$AdjustedTax = CommifyMoney ($Computations{'Adjusted_Tax_Amount_Before'});
$Tax = CommifyMoney ($Computations{'Tax_Amount'});
print "| $totaltext \n";
print "$linkTaxIMG" if ($linkTaxIMG);
print "" if ($linkTaxLine);
if ($NewInfo{'Tax_Exempt_Status'}) {
print "Tax exempt ($NewInfo{'Tax_Exempt_Status'}) ";}
else {
print "Sales tax $TaxRate\% ";}
print "\(on $currency $AdjustedTax taxable\)";
print "" if ($linkTaxLine);
print " : \n";
print " | ";
print "$totalcolor $currency $Tax |
\n";
}}
# Handling Charges
if ($Computations{'Handling'} > 0 || $Computations{'Handling_Line_Override'}) {
$HandlingCharges = CommifyMoney ($Computations{'Handling'});
print "| $totaltext \n";
print "$Computations{'Handling_Status'} : \n";
print " | $totalcolor ";
if ($Computations{'Handling'} == 0 && $Computations{'Handling_Amt_Override'}) {
print "$Computations{'Handling_Amt_Override'} ";
} else {
print "$currency $HandlingCharges ";
}
print " |
\n";
}
# Insurance Charges
if ($Computations{'Insurance'} > 0 || $Computations{'Insurance_Line_Override'}) {
$InsuranceCharges = CommifyMoney ($Computations{'Insurance'});
print "| $totaltext \n";
print "$linkInsuranceIMG" if ($linkInsuranceIMG);
print "" if ($linkInsuranceLine);
print "$Computations{'Insurance_Status'}";
print "" if ($linkInsuranceLine);
print " : \n";
print " | $totalcolor ";
if ($Computations{'Insurance'} == 0 && $Computations{'Insurance_Amt_Override'}) {
print "$Computations{'Insurance_Amt_Override'} ";
} else {
print "$currency $InsuranceCharges ";
}
print " |
\n";
}
# Shipping Charges
if ($Computations{'Shipping_Amount'} > 0 || $Computations{'Shipping_Line_Override'}) {
$ShippingCharges = CommifyMoney ($Computations{'Shipping_Amount'});
print "| $totaltext \n";
print "$linkShippingIMG" if ($linkShippingIMG);
print "" if ($linkShippingLine);
print "$Computations{'Shipping_Message'}";
print "" if ($linkShippingLine);
print " : \n";
print " | $totalcolor ";
if ($Computations{'Shipping_Amount'} == 0 && $Computations{'Shipping_Amt_Override'}) {
print "$Computations{'Shipping_Amt_Override'} ";
} else {
print "$currency $ShippingCharges ";
}
print " |
\n";
}
# Tax After
if ($Computations{'Tax_Rule'} eq "AFTER") {
if ($Computations{'Tax_Amount'} > 0 || $NewInfo{'Tax_Exempt_Status'}) {
$TaxRate = ($Computations{'Tax_Rate'} * 100);
$AdjustedTax = CommifyMoney ($Computations{'Adjusted_Tax_Amount_After'});
$Tax = CommifyMoney ($Computations{'Tax_Amount'});
print "| $totaltext \n";
print "$linkTaxIMG" if ($linkTaxIMG);
print "" if ($linkTaxLine);
if ($NewInfo{'Tax_Exempt_Status'}) {
print "Tax exempt ($NewInfo{'Tax_Exempt_Status'}) ";}
else {
print "Sales tax $TaxRate\% ";}
print "\(on $currency $AdjustedTax taxable\)";
print "" if ($linkTaxLine);
print " : \n";
print " | ";
print "$totalcolor $currency $Tax |
\n";
}}
# Final Total
print "| $totaltext \n";
print "Total Order Amount : \n";
print " | ";
print "$totalcolor $currency $FinalAmount |
\n";
print "
\n";
# Bottom Navigation Menu
print "