<?php/* This program is for adding in Jumi module It will show the cooperative account of login user which store in CSV file on the server*/defined('_JEXEC')ORdie("Restricted access");// Prevent direct Access to the program$user=&JFactory::getUser();// get userif($user->guest){echo"<h3>Please log in to see your report ! </h3>";// Show this message if user not yet log in}else{// If user log in $id=strtoupper($user->username);// Get user and store in $id$fd=fopen("http://btc-intranet.ap.bayer.cnb/coop/COOPBAL.csv","r");// Open CSV file$found=0;while(!feof($fd)){$buffer=fgetcsv($fd,4096);// Get one recordif(strtoupper($buffer[1])==$id){$found=1;// if $id = login name then set flag $foundbreak;// exit loop}}fclose($fd);if($found){// Display account detailecho"<h3> Report of ".$buffer[4]." For the month".$buffer[5]."</h3><br/>";echo"<h4> Deposit Account of member no ".$buffer[3]."</h4>";echo"<table>";echo"<tr><td>Last month :</td><td align=\"right\">".$buffer[6]."</td><td> Baht </td></tr>";echo"<tr><td>This month :</td><td align=\"right\">".$buffer[7]."</td><td> Baht </td></tr>";echo"<tr><td>Next month :</td><td align=\"right\">".$buffer[8]."</td><td> Baht </td></tr>";echo"</table>";if(!($buffer[9]=="")||!($buffer[13])){echo"<h4>Loan account</h4>";echo"<table>";echo"<tr><td>Last month :</td><td align=\"right\"> ".$buffer[9]."</td><td> Baht </td></tr>";echo"<tr><td>Pay this month :</td><td align=\"right\"> ".$buffer[10]."</td><td> Baht </td></tr>";echo"<tr><td>Actual Payment :</td><td align=\"right\"> ".$buffer[11]."</td><td> Baht </td></tr>";echo"<tr><td>Interest :</td><td align=\"right\"> ".$buffer[12]."</td><td> Baht </td></tr>";echo"<tr><td>Next Month begin :</td><td align=\"right\"> ".$buffer[13]."</td><td> Baht </td></tr>";echo"</table>";}echo"<br/>Please check your account <br/>";}else{// if check to end of file but not foundecho"<h3>No Account for you, Please let us know if you are member of the Cooperation fund </h3>";}}?>