forum.lissyara.su

Код: Выделить всё

use Net::Telnet ();
use POSIX;
$dir = "/home/user/";
$host = '192.168.0.101';
$port = '2300';
$t = new Net::Telnet (Timeout => 10, Host => $host, Port => $port);
$t->waitfor(String=>'-');
$t->print("SMDR\n");
$t->waitfor(String=>'Enter Password:');
$t->print("PCCSMDR\n");
while (<$t>) {
if ($_ =~m/\n/){
$filename= strftime("smdr-%Y-%m", localtime(time));
$fileexpression = $dir.$filename;
open ($fh,'>>',$fileexpression);
print $fh $_;
close $fh;}
}

Код: Выделить всё

2014/08/07 18:46:54,00:00:00,0,7812740****,I,7812740****,7812740****,,0,1012990,0,T9200,Line 200.0,,,0,0,,,,,,,,,,,,,
2014/08/07 18:46:54,00:00:06,0,7812740****@ipoffice,I,#AA:Callcentr,7812740****,,0,1012991,0,T9018,Line 18.1,V9542,VM Channel 42,0,0,,,,,,,,,,,,,
2014/08/07 18:46:54,00:00:00,0,7812740****,I,7812740****,7812740****,,0,1012990,0,T9200,Line 200.0,,,0,0,,,,,,,,,,,,,
2014/08/07 18:46:54,00:00:06,0,7812740****@ipoffice,I,#AA:Callcentr,7812740****,,0,1012991,0,T9018,Line 18.1,V9542,VM Channel 42,0,0,,,,,,,,,,,,,

Код: Выделить всё

// Подзапрос для временной таблицы где выбираем все исходящие
                $qTemp="create temporary table cdr_otchet AS
                SELECT n.numbertodial,n.calltime,n.endtime-n.answertime AS Dur,
                pg_prefix(n.numbertodial) as prefix
                , pg_get_price(n.answertime,n.endtime,pg_prefix(n.numbertodial),'1') AS price
                ,createtrunk, numberfromdial,createstation,selectiontrunk
                from cdr AS n
                WHERE
                 n.calltime >='".$from_date."' AND n.calltime<='".$to_date."'
                 AND (callstatus='13' OR callstatus='6' OR  callstatus='24' )
                 AND n.numbertodial!='0'
                 AND character_length(n.numbertodial)>'5'
                 AND( createtrunk='0'OR createtrunk='11')";
                if($debug) echo $qTemp."<br>";

$conn->Execute($qTemp);

Код: Выделить всё

// Подзапрос для выяснения общего количества страниц
// ----------------------------------------------------------------------------
                $qP="SELECT COUNT(*) from cdr_otchet AS cd ";

                $limitsP = getLimits($qP);

$qDT="DROP TABLE cdr_otchet";  // запрос для удаления временной таблицы

//-----------------------------------------------------------------------------
// запрос к временной таблице чтобы не дергать весь объем данных
                $q="SELECT calltime,createstation,numbertodial
                ,Dur AS duration, destinations.name, price
                from cdr_otchet
                LEFT JOIN destinations ON cdr_otchet.prefix=destinations.prefix
                ORDER BY ".$sortBy." ".$order;

                if($debug) echo $q."<br>";
//              if($cacheflush) $res = $conn->CacheFlush($q);
//              $res = $conn->CacheExecute($q); //отключил временно кеширование запроса в приложении
//выгребаем данные из временной таблицы
$res = $conn->Execute($q);

//удаляем временную таблицу
$conn->Execute($qDT);

Код: Выделить всё

                    if(empty($export)){

                        print("<table cellspacing=0 cellpadding=1 border=0><tr ".$COLORS['BaseBorderTableBgcolor'].">
                            <td>
                                <table cellspacing=1 cellpadding=6 border=0>");
                        print ("<tr ".$COLORS['BaseTablesBgcolor']." align=center>
                        <td>");
                        AddTableHeader("1",$GUI_LANG['DateOfCall'],$toprint);
                        echo("</td>
                        <td>");
                        AddTableHeader("2",$GUI_LANG['InternalPhone'],$toprint);
                        echo("</td>
                        <td>");
                        AddTableHeader("3",$GUI_LANG['Number'],$toprint);
                        echo("</td>
                        <td>");
                        AddTableHeader("5",$GUI_LANG['Direction'],$toprint);
                        echo("</td>
                        <td>");
                        AddTableHeader("4",$GUI_LANG['Duration'],$toprint);
                        echo("</td>
                        <td>");
[b]                        AddTableHeader("6",$GUI_LANG['Price'],$toprint);
                        echo("</td>
                        </tr>");[/b]
 //в файл ../../include/lang/ru_CP1251.php нужно добавить переменную 
 //    'Direction'                         => 'Направление',
 //   'Directions'                        => 'Направления',
 //   'Price'                             => 'Стоимость',

                    }else{
// Да, это действительно экспорт!

Код: Выделить всё

               $anyDigit=1;
                $linha=0;
                while (!$res->EOF) {
                        $row = $res->fields;

                        $timeOfCall=$row[0];
                        $intPhone=$row[1];
                        $CallNumber=$row[2];
                        $Duration=$row[3];
                        $NDirection=$row[4];
                        $NPrice=$row[5];

                        setCollColor();

                        if(empty($export)){
                            echo"<tr ".$COLORS['BaseTrBgcolor']."
                onmouseover=\"setPointer(this, $anyDigit, 'over');
                \" onmouseout=\"setPointer(this, $anyDigit, 'out');
                \" onmousedown=\"setPointer(this, $anyDigit, 'click');\">";
                            echo"<td nowrap>${FontColor}$timeOfCall${FontColorEnd}</td>";
                            echo"<td>${FontColor}$CallNumber${FontColorEnd}</td>";
                            echo"<td>${FontColor}$intPhone${FontColorEnd}</td>";
                            echo"<td>
                            <table width=100%>
                                        <tr>
                                            <td width=1%>${FontColor}$NDirection${FontColorEnd}&nbsp;</td>
                                        </tr>
                                    </table>
                                </td>";
                            echo"<TD>${FontColor}".$Duration."${FontColorEnd}</TD>";
                            echo"<TD>${FontColor}".$NPrice."${FontColorEnd}</TD>";

                            echo "</TR>\n";

Код: Выделить всё

Warning! No lines transferred to SQL from a log file. This is possibly caused by parsing error.

Код: Выделить всё

Warning! No lines transferred to SQL from a log file. This is possibly caused by parsing error.