<?php

/* $Id$*/

/* $Revision: 1.13 $ */

include('includes/SQL_CommonFunctions.inc');

include ('includes/session.inc');

$InputError=0;

if (isset($_POST['FromDate']) AND !Is_Date($_POST['FromDate'])){

$msg = _('The date from must be specified in the format') . ' ' . $_SESSION['DefaultDateFormat'];

$InputError=1;

unset($_POST['FromDate']);

}

if (isset($_POST['ToDate']) and !Is_Date($_POST['ToDate'])){

$msg = _('The date to must be specified in the format') . ' ' . $_SESSION['DefaultDateFormat'];

$InputError=1;

unset($_POST['ToDate']);

}

if (!isset($_POST['FromDate']) OR !isset($_POST['ToDate'])){

$title = _('Payment Listing');

include ('includes/header.inc');

echo '<p class="page_title_text"><img src="'.$rootpath.'/css/'.$theme.'/images/money_add.png" title="' . $title . '" alt="" />' . ' ' . $title . '</p>';

if ($InputError==1){

prnMsg($msg,'error');

}

echo '<form method="post" action="' . htmlspecialchars($_SERVER['PHP_SELF'], ENT_QUOTES, 'UTF-8') . '">';

echo '<input type="hidden" name="FormID" value="' . $_SESSION['FormID'] . '" />';

echo '<table class="selection">

<tr>

<td>' . _('Enter the date from which cheques are to be listed') . ':</td>

<td><input type="text" name="FromDate" maxlength="10" size="10" class="date" alt="'.$_SESSION['DefaultDateFormat'].'" value="' . Date($_SESSION['DefaultDateFormat']) . '" /></td>

</tr>';

echo '<tr><td>' . _('Enter the date to which cheques are to be listed') . ':</td>

<td><input type="text" name="ToDate" maxlength="10" size="10" class="date" alt="'.$_SESSION['DefaultDateFormat'].'" value="' . Date($_SESSION['DefaultDateFormat']) . '" /></td>

</tr>';

echo '<tr><td>' . _('Bank Account') . '</td><td>';

$sql = "SELECT bankaccountname, accountcode FROM bankaccounts";

$result = DB_query($sql,$db);

echo '<select name="BankAccount">';

while ($myrow=DB_fetch_array($result)){

echo '<option value="' . $myrow['accountcode'] . '">' . $myrow['bankaccountname'] . '</option>';

}

echo '</select></td></tr>';

echo '<tr><td>' . _('Email the report off') . ':</td><td><select name="Email">';

echo '<option selected="True" value="No">' . _('No') . '</option>';

echo '<option value="Yes">' . _('Yes') . '</option>';

echo '</select></td></tr></table><br /><div class="centre"><button type="submit" name="Go">' . _('Create PDF') . '</button></div><br />';

include('includes/footer.inc');

exit;

} else {

include('includes/ConnectDB.inc');

}

$Currency=$_SESSION['CompanyRecord']['currencydefault'];

$SQL = "SELECT bankaccountname

FROM bankaccounts

WHERE accountcode = '" .$_POST['BankAccount'] . "'";

$BankActResult = DB_query($SQL,$db);

$myrow = DB_fetch_row($BankActResult);

$BankAccountName = $myrow[0];

$SQL= "SELECT amount,

ref,

transdate,

banktranstype,

type,

transno

FROM banktrans

WHERE banktrans.bankact='" . $_POST['BankAccount'] . "'

AND (banktrans.type=1 or banktrans.type=22)

AND transdate >='" . FormatDateForSQL($_POST['FromDate']) . "'

AND transdate <='" . FormatDateForSQL($_POST['ToDate']) . "'";

$Result=DB_query($SQL,$db,'','',false,false);

if (DB_error_no($db)!=0){

$title = _('Payment Listing');

include('includes/header.inc');

prnMsg(_('An error occurred getting the payments'),'error');

if ($Debug==1){

prnMsg(_('The SQL used to get the receipt header information that failed was') . ':<br />' . $SQL,'error');

}

include('includes/footer.inc');

exit;

} elseif (DB_num_rows($Result) == 0){

$title = _('Payment Listing');

include('includes/header.inc');

prnMsg (_('There were no bank transactions found in the database within the period from') . ' ' . $_POST['FromDate'] . ' ' . _('to') . ' ' . $_POST['ToDate'] . '. ' ._('Please try again selecting a different date range or account'), 'error');

include('includes/footer.inc');

exit;

}

include('includes/PDFStarter.php');

/*PDFStarter.php has all the variables for page size and width set up depending on the users default preferences for paper size */

$pdf->addInfo('Title',_('Cheque Listing'));

$pdf->addInfo('Subject',_('Cheque listing from') . ' ' . $_POST['FromDate'] . ' ' . _('to') . ' ' . $_POST['ToDate']);

$line_height=12;

$PageNumber = 1;

$TotalCheques = 0;

include ('includes/PDFChequeListingPageHeader.inc');

while ($myrow=DB_fetch_array($Result)){

$LeftOvers = $pdf->addTextWrap($Left_Margin,$YPos,60,$FontSize,locale_money_format(-$myrow['amount'],$Currency), 'right');

$LeftOvers = $pdf->addTextWrap($Left_Margin+65,$YPos,90,$FontSize,$myrow['ref'], 'left');

$sql = "SELECT accountname,

amount,

narrative

FROM gltrans,

chartmaster

WHERE chartmaster.accountcode=gltrans.account

AND gltrans.typeno ='" . $myrow['transno'] . "'

AND gltrans.type='" . $myrow['type'] . "'";

$GLTransResult = DB_query($sql,$db,'','',false,false);

if (DB_error_no($db)!=0){

$title = _('Payment Listing');

include('includes/header.inc');

prnMsg(_('An error occurred getting the GL transactions'),'error');

if ($debug==1){

prnMsg( _('The SQL used to get the receipt header information that failed was') . ':<br />' . $sql, 'error');

}

include('includes/footer.inc');

exit;

}

while ($GLRow=DB_fetch_array($GLTransResult)){

$LeftOvers = $pdf->addTextWrap($Left_Margin+150,$YPos,90,$FontSize,$GLRow['accountname'], 'left');

$LeftOvers = $pdf->addTextWrap($Left_Margin+245,$YPos,60,$FontSize,locale_money_format($GLRow['amount'],$Currency), 'right');

$LeftOvers = $pdf->addTextWrap($Left_Margin+310,$YPos,120,$FontSize,$GLRow['narrative'], 'left');

$YPos -= ($line_height);

if ($YPos - (2 *$line_height) < $Bottom_Margin){

/*Then set up a new page */

$PageNumber++;

include ('includes/PDFChequeListingPageHeader.inc');

} /*end of new page header */

}

DB_free_result($GLTransResult);

$YPos -= ($line_height);

$TotalCheques = $TotalCheques - $myrow['amount'];

if ($YPos - (2 *$line_height) < $Bottom_Margin){

/*Then set up a new page */

$PageNumber++;

include ('includes/PDFChequeListingPageHeader.inc');

} /*end of new page header */

} /* end of while there are customer receipts in the batch to print */

$YPos-=$line_height;

$LeftOvers = $pdf->addTextWrap($Left_Margin,$YPos,60,$FontSize,locale_money_format($TotalCheques,$Currency), 'right');

$LeftOvers = $pdf->addTextWrap($Left_Margin+65,$YPos,300,$FontSize,_('TOTAL') . ' ' . $Currency . ' ' . _('CHEQUES'), 'left');

$ReportFileName = $_SESSION['DatabaseName'] . '_ChequeListing_' . date('Y-m-d').'.pdf';

$pdf->OutputD($ReportFileName);//UldisN

$pdf->__destruct(); //UldisN

if ($_POST['Email']=='Yes'){

if (file_exists($_SESSION['reports_dir'] . '/'.$ReportFileName)){

unlink($_SESSION['reports_dir'] . '/'.$ReportFileName);

}

$fp = fopen( $_SESSION['reports_dir'] . '/'.$ReportFileName,'wb');

fwrite ($fp, $pdfcode);

fclose ($fp);

include('includes/htmlMimeMail.php');

$mail = new htmlMimeMail();

$attachment = $mail->getFile($_SESSION['reports_dir'] . '/'.$ReportFileName);

$mail->setText(_('Please find herewith payments listing from') . ' ' . $_POST['FromDate'] . ' ' . _('to') . ' ' . $_POST['ToDate']);

$mail->addAttachment($attachment, 'PaymentListing.pdf', 'application/pdf');

$mail->setFrom(array('"' . $_SESSION['CompanyRecord']['coyname'] . '" <' . $_SESSION['CompanyRecord']['email'] . '>'));

/* $ChkListingRecipients defined in config.php */

$result = $mail->send($ChkListingRecipients);

}

?>