<?php
$tbl = "el_billing";

$rs = mysql_query("select *,
    	least(
      	case when locate('0', flatno)>0 then locate('0', flatno) else length(flatno)+1 end,
      	case when locate('1', flatno)>0 then locate('1', flatno) else length(flatno)+1 end,
      	case when locate('2', flatno)>0 then locate('2', flatno) else length(flatno)+1 end,
      	case when locate('3', flatno)>0 then locate('3', flatno) else length(flatno)+1 end,
      	case when locate('4', flatno)>0 then locate('4', flatno) else length(flatno)+1 end,
      	case when locate('5', flatno)>0 then locate('5', flatno) else length(flatno)+1 end,
      	case when locate('6', flatno)>0 then locate('6', flatno) else length(flatno)+1 end,
      	case when locate('7', flatno)>0 then locate('7', flatno) else length(flatno)+1 end,
      	case when locate('8', flatno)>0 then locate('8', flatno) else length(flatno)+1 end,
      	case when locate('9', flatno)>0 then locate('9', flatno) else length(flatno)+1 end) pos
  	from $tbl where month='$month' and external='No' 
  	order by left(flatno, pos-1), mid(flatno, pos, length(flatno)-pos+1)+0");

while ($o = mysql_fetch_object($rs)) {
	$i++;
	$flatno = $o->flatno;
	$userfees = $o->userfees;
	$licensee = $o->licensee;
	$meterno = $o->meterno;
	$contactedload = $o->contactedload;
	$unitrate = $o->unitrate;
	$fixedrate = $o->fixedrate;
	$plrate = $o->plrate;
	$edrate = $o->edrate;
	$rscrate = $o->rscrate;
	$subsidymode = $o->subsidymode;
	$subsidy = $o->subsidy;
	
	$prevreading = $o->prevreading;
	$curreading = $o->curreading;
	$addunits = $o->addunits;
	$arrear = $o->arrear;

	$consumedunits = $curreading - $prevreading + $addunits;;
	$consumedcharge = $consumedunits * $unitrate;
	$paidamount = 0.00;
        $arrearamount = 0.00;
	$payable = 0.00;
	
	//calculate payable
        if (!$subsidy) $subsidy = 0.00;

        if ($subsidymode == 'Rupees') {
		$excessunits = $consumedcharge - $subsidy;
               	//$paidamount = $consumedcharge - $subsidy;
               	$paidamount = $arrear;
		$payable = $arrear;
        } else if ($subsidymode == 'Units' && $consumedunits > $subsidy) {
		$excessunits = $consumedunits - $subsidy;
		//$paidamount = ($consumedunits - $subsidy) * $unitrate;
		$paidamount = $consumedunits * .30;
		$payable = $arrear;
        } else if ($subsidymode == 'None') {
		//$paidamount = $consumedcharge;
               	$paidamount = $arrear;
		$payable = $arrear;
	}
       	//payable with userfees
	//$payable += $userfees;
	
	//summarized figures
	$tpayable += $payable;
	
	$data .= "<tr><td><a href='?pg=elreceipt&id=$o->id'>$i</a></td>
	<th>$flatno</th><td nowrap>$licensee</td><td>$meterno</td><td>$contactedload</td><td>$prevreading</td><td>$curreading</td>
	<td align='right'>".number_format($consumedunits,2)."</td>
	<td align='right'>Rs.".number_format($consumedcharge,2)."</td>
	<td align='right'>".($subsidymode == 'Rupees' ? 'Rs.' : '').number_format($subsidy,2)."</td>
	<td align='right'>".($subsidymode == 'Rupees' ? 'Rs.' : '').number_format($excessunits,2)."</td>
	<td align='right'>Rs.".number_format($paidamount,2)."</td>
	<td align='right'>Rs.".number_format($arrear,2)."</td>
	<td align='right'>Rs.".number_format($payable - $paidamount,2)."</td></tr>";
}

echo "<table width='100%' border='1' style='border-collapse: collapse'>
<thead>
<tr><th colspan='14'><h3>Electricity charges for the month of $month</h3>
(Unit rate: Rs. $unitrate/unit, Fixed rate: $fixedrate/KVA/month, P.Load rate: $plrate/KVA/month, ED rate: $edrate%, Reg. Surcharge: $rscrate%)</th></tr>
<tr><th rowspan='2'>No</th>
<th rowspan='2'>SiteNo</th>
<th rowspan='2'>Licensee</th>
<th rowspan='2'>MeterNo</th>
<th rowspan='2'>Contacted<br>Load</th>
<th colspan='2'>KWH Meter Reading</th>
<th colspan='2'>Consumption</th>
<th rowspan='2'>Admissibility<br>(Rs./Units)</th><th rowspan='2'>Excess<br>(Rs./Units)</th>
<th rowspan='2'>Deducted<br>Arrear</th>
<th rowspan='2'>Correct<br>Arrear</th>
<th rowspan='2'>Refund<br>Amount</th></tr>
<tr><th>Previous</th><th>Current</th><th>Units</th><th>Charges</th></tr>
</thead>
<tfoot>
<tr><th colspan='13'>Total</th><th>Rs.".number_format(round($tpayable),2)."</th></tr>
<tr><th colspan='14'>Above readings have been taken on the last dates of this and previous month.</th></tr>
</tfoot>
<tbody>$data</tbody>
</table>";

?>