|
| In NCDEX |
| Contract |
|
Last |
|
Chg |
|
//Top Gainers in NCDEX
$exch="34";
if($type == "p")
{
$order1 = "chgn";
$order2 = "volume";
}
else
{
$order1 = "volume";
$order2 = "perchgn";
}
$sql="select max(date_format(entrydate, '%Y-%m-%d')) as entrydate from LatestExchRates where exchangeid=$exch";
$q->query($sql);
$q->next_record();
$date=$q->f('entrydate');
$sql = "select exchvarid, exchvarietyname, LatestExchRates.exchangeid, exchangename, futureyear, futuremonth, projection, spottxt, last, buy, sell, last - settlementprice as changeval,last - settlementprice as chgn, settlementprice, open, high, low, volume, entrydate, entrytime, LatestExchRates.settleflag, (last - settlementprice)/settlementprice*100 as perchgn from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' and ((last - settlementprice)/settlementprice*100) > 0 " . $filter . " order by chgn desc, $order2 desc, exchangename desc, projection, futureyear, futuremonth limit 6";
//echo $sql." ";
$q->query($sql);
$ctr = 1;
while($q->next_record())
{
echo "| " . $q->f("exchvarietyname") . "-" . $m_month[$q->f("futuremonth")-1] . "'" . substr($q->f("futureyear"),2) . " | | " . number_format($q->f("last"),2,".","") . " | | " . number_format($q->f("chgn"),2,".","") . " | ";
$ctr++;
}
if($ctr == 1)
{
echo "| No gainers found | ";
}
?>
|
|
|
| In MCX |
| Contract |
|
Last |
|
Chg |
|
//Top Gainers in MCX
$exch="33";
$ctr =1;
if($type == "p")
{
$order1 = "chgn";
$order2 = "volume";
}
else
{
$order1 = "volume";
$order2 = "perchgn";
}
$sql="select max(date_format(entrydate, '%Y-%m-%d')) as entrydate from LatestExchRates where exchangeid=$exch";
$q->query($sql);
$q->next_record();
$date=$q->f('entrydate');
$sql = "select exchvarid, exchvarietyname, LatestExchRates.exchangeid, exchangename, futureyear, futuremonth, projection, spottxt, last, buy, sell, last - settlementprice as changeval,last - settlementprice as chgn, settlementprice, open, high, low, volume, entrydate, entrytime, LatestExchRates.settleflag, (last - settlementprice)/settlementprice*100 as perchgn from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' and ((last - settlementprice)/settlementprice*100) > 0 " . $filter . " order by chgn desc, $order2 desc, exchangename desc, projection, futureyear, futuremonth limit 6";
//echo $sql." ";
$q->query($sql);
$ctr = 1;
while($q->next_record())
{
echo "| " . $q->f("exchvarietyname") . "-" . $m_month[$q->f("futuremonth")-1] . "'" . substr($q->f("futureyear"),2) . " | | " . number_format($q->f("last"),2,".","") . " | | " . number_format($q->f("chgn"),2,".","") . " | ";
$ctr++;
}
if($ctr == 1)
{
echo "| No gainers found | ";
}
?>
|
|
|
|
| In NCDEX |
| Contract |
|
Last |
|
Chg |
|
//Top Losers in NCDEX
$type="p";
if($type == "p")
{
$order1 = "chgn";
$order2 = "volume";
}
else
{
$order1 = "volume";
$order2 = "perchgn";
}
$exch="34";
$ctr =1;
$sql="select max(date_format(entrydate, '%Y-%m-%d')) as entrydate from LatestExchRates where exchangeid=$exch";
$q->query($sql);
$q->next_record();
$date=$q->f('entrydate');
$sql="select count(exchvarid) as c from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' and ((last - settlementprice)/settlementprice*100) < 0 " . $filter . " order by $order1 asc";
$q->query($sql);
$q->next_record();
$coun=$q->f('c');
if($coun>6 || $coun==6){
$limit3=$coun-6;
}
else{
$limit3=0;
}
$sql = "select exchvarid, exchvarietyname, LatestExchRates.exchangeid, exchangename, futureyear, futuremonth, projection, spottxt, last, buy, sell, last - settlementprice as changeval,last - settlementprice as chgn, settlementprice, open, high, low, volume, entrydate, entrytime, LatestExchRates.settleflag, (last - settlementprice)/settlementprice*100 as perchgn from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' and ((last - settlementprice)/settlementprice*100) < 0 " . $filter . " order by $order1 desc limit $limit3, 6";
$q->query($sql);
$ctr = 1;
while($q->next_record())
{
$val=$q->f("exchvarietyname") . "-" . $m_month[$q->f("futuremonth")-1] . "'" . substr($q->f("futureyear"),2);
$val1=number_format($q->f("last"),2,".","");
$val2=number_format(abs($q->f("chgn")),2,".","");
${"display".$ctr}=(array($val,$val1,$val2,$val3));
$ctr++;
}
for($i=$ctr-1; $i>0; $i--){
echo "| " .${"display".$i}[0]. " | | " .${"display".$i}[1]. " | | " .${"display".$i}[2]. " | ";
}
if($ctr == 1)
{
echo "| No losers found | ";
}
?>
|
|
|
| In MCX |
| Contract |
|
Last |
|
Chg |
|
//Top Losers in MCX
if($type == "p")
{
$order1 = "chgn";
$order2 = "volume";
}
else
{
$order1 = "volume";
$order2 = "perchgn";
}
$exch="33";
$ctr =1;
$sql="select max(date_format(entrydate, '%Y-%m-%d')) as entrydate from LatestExchRates where exchangeid=$exch";
$q->query($sql);
$q->next_record();
$date=$q->f('entrydate');
$sql="select count(exchvarid) as c from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' and ((last - settlementprice)/settlementprice*100) < 0 " . $filter . " order by $order1 asc";
$q->query($sql);
$q->next_record();
$coun=$q->f('c');
if($coun>6 || $coun==6){
$limit3=$coun-6;
}
else{
$limit3=0;
}
$sql = "select exchvarid, exchvarietyname, LatestExchRates.exchangeid, exchangename, futureyear, futuremonth, projection, spottxt, last, buy, sell, last - settlementprice as changeval,last - settlementprice as chgn, settlementprice, open, high, low, volume, entrydate, entrytime, LatestExchRates.settleflag, (last - settlementprice)/settlementprice*100 as perchgn from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' and ((last - settlementprice)/settlementprice*100) < 0 " . $filter . " order by $order1 desc limit $limit3, 6";
$q->query($sql);
$ctr = 1;
while($q->next_record())
{
$val=$q->f("exchvarietyname") . "-" . $m_month[$q->f("futuremonth")-1] . "'" . substr($q->f("futureyear"),2);
$val1=number_format($q->f("last"),2,".","");
$val2=number_format(abs($q->f("chgn")),2,".","");
${"display".$ctr}=(array($val,$val1,$val2,$val3));
$ctr++;
}
for($i=$ctr-1; $i>0; $i--){
echo "| " .${"display".$i}[0]. " | | " .${"display".$i}[1]. " | | " .${"display".$i}[2]. " | ";
}
if($ctr == 1)
{
echo "| No losers found | ";
}
?>
|
|
|
|
|
|
| Contract |
Volume |
Last |
Chg |
%Chg |
|
|
// Volume Topper NCDEX
if($type == "p")
{
$order1 = "chgn";
$order2 = "volume";
}
else
{
$order1 = "volume";
$order2 = "perchgn";
}
$exch="34";
$ctr =1;
$sql="select max(date_format(entrydate, '%Y-%m-%d')) as entrydate from LatestExchRates where exchangeid=$exch";
$q->query($sql);
$q->next_record();
$date=$q->f('entrydate');
$sql = "select exchvarid, exchvarietyname, LatestExchRates.exchangeid, exchangename, futureyear, futuremonth, projection, spottxt, last, buy, sell, last - settlementprice as changeval, chgn, settlementprice, open, high, low, (last*volume) as value, volume, entrydate, entrytime, LatestExchRates.settleflag, (last - settlementprice)/settlementprice*100 as perchgn from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' " . $filter . " order by volume desc limit 6";
$q->query($sql);
while($q->next_record())
{
if($q->f("chgn")>0){
$change="".number_format(abs($q->f("changeval")),2)."";
}
else{
$change="".number_format(abs($q->f("changeval")),2)."";
}
echo "| " . $q->f("exchvarietyname") . "-" . $m_month[$q->f("futuremonth")-1] . "'" . substr($q->f("futureyear"),2) . " | " . $q->f("volume") . " | " . number_format(abs($q->f("last")),2,".","") . " | " .$change." | " . number_format(abs($q->f("perchgn")),2,".","") ." | ";
$ctr++;
}
if($ctr == 1)
{
echo "| No losers found | ";
}
?>
|
// Volume Topper NCDEX
if($type == "p")
{
$order1 = "chgn";
$order2 = "volume";
}
else
{
$order1 = "volume";
$order2 = "perchgn";
}
$exch="33";
$ctr =1;
$sql="select max(date_format(entrydate, '%Y-%m-%d')) as entrydate from LatestExchRates where exchangeid=$exch";
$q->query($sql);
$q->next_record();
$date=$q->f('entrydate');
$sql = "select exchvarid, exchvarietyname, LatestExchRates.exchangeid, exchangename, futureyear, futuremonth, projection, spottxt, last, buy, sell, last - settlementprice as changeval, chgn, settlementprice, open, high, low, (last*volume) as value, volume, entrydate, entrytime, LatestExchRates.settleflag, (last - settlementprice)/settlementprice*100 as perchgn from LatestExchRates, ExchangeMaster, ExchVarietyMast where LatestExchRates.exchangeid in ($exch) and LatestExchRates.exchangeid = ExchangeMaster.exchangeid and exchvarid = exchvarietyid and date_format(entrydate, '%Y-%m-%d') = '".$date."' " . $filter . " order by volume desc limit 6";
$q->query($sql);
while($q->next_record())
{
if($q->f("chgn")>0){
$change="".number_format(abs($q->f("changeval")),2)."";
}
else{
$change="".number_format(abs($q->f("changeval")),2)."";
}
echo "| " . $q->f("exchvarietyname") . "-" . $m_month[$q->f("futuremonth")-1] . "'" . substr($q->f("futureyear"),2) . " | " . $q->f("volume") . " | " . number_format(abs($q->f("last")),2,".","") . " | " .$change." | " . number_format(abs($q->f("perchgn")),2,".","") ." | ";
$ctr++;
}
if($ctr == 1)
{
echo "| No losers found | ";
}
?>
|
|