|
Lines 296-302
if ($count>$resultsperpage){
Link Here
|
| 296 |
|
296 |
|
| 297 |
#$totalfreight=$freight; |
297 |
#$totalfreight=$freight; |
| 298 |
$tototal = $tototal + $freight; |
298 |
$tototal = $tototal + $freight; |
| 299 |
|
299 |
my $gstreg = $bookseller->{gstreg}; |
|
|
300 |
my $gstpart = ($gstreg)? $tototal - ($tototal / ($gst + 1)) : $tototal * $gst; |
| 301 |
my $grandtot = ($gstreg)? sprintf($cfstr, $tototal) : sprintf($cfstr, $tototal + $gstpart); |
| 300 |
$template->param( |
302 |
$template->param( |
| 301 |
invoice => $invoice, |
303 |
invoice => $invoice, |
| 302 |
datereceived => $datereceived->output('iso'), |
304 |
datereceived => $datereceived->output('iso'), |
|
Lines 316-323
$template->param(
Link Here
|
| 316 |
totalquantity => $totalquantity, |
318 |
totalquantity => $totalquantity, |
| 317 |
tototal => sprintf($cfstr, $tototal), |
319 |
tototal => sprintf($cfstr, $tototal), |
| 318 |
ordergrandtotal => sprintf($cfstr, $ordergrandtotal), |
320 |
ordergrandtotal => sprintf($cfstr, $ordergrandtotal), |
| 319 |
gst => $gst, |
321 |
gstpercent => sprintf( "%.2f", $gst * 100 ) . '%', |
| 320 |
grandtot => sprintf($cfstr, $tototal + $gst), |
322 |
gstpart => sprintf($cfstr,$gstpart), |
|
|
323 |
gstreg => $gstreg, |
| 324 |
grandtot => $grandtot, |
| 321 |
totalPunitprice => sprintf("%.2f", $totalPunitprice), |
325 |
totalPunitprice => sprintf("%.2f", $totalPunitprice), |
| 322 |
totalPquantity => $totalPquantity, |
326 |
totalPquantity => $totalPquantity, |
| 323 |
totalPqtyrcvd => $totalPqtyrcvd, |
327 |
totalPqtyrcvd => $totalPqtyrcvd, |