lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

On gre les lignes rejettes comme des lignes normales

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2005-04-06 08:36:41 +00:00
parent 81eb96f83f
commit 37af5847cf
1 changed files with 50 additions and 43 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
htdocs/telephonie/script/import-cdr.php
View File

@ -142,7 +142,6 @@ else
$sql = "SELECT ligne, rowid ";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_societe_ligne";
$sql .= " WHERE statut <> 7";
$resql = $db->query($sql);
@ -185,15 +184,13 @@ if (is_readable($file))
if ($db->query("BEGIN"))
{
while (!feof($hf) && $error == 0)
while (!feof($hf) )
{
$cont = fgets($hf, 1024);
$tabline = explode(";", $cont);
if ($ligneids[$ligne] > 0)
if (strlen(trim($cont)) > 0)
{
$tabline = explode(";", $cont);
if (sizeof($tabline) == 11)
{
$index = $tabline[0];
@ -207,6 +204,8 @@ if (is_readable($file))
$montant = $tabline[8];
$duree_secondes = ereg_replace('"','',$tabline[9]);
if ($ligneids[$ligne] > 0)
{
$sql = "INSERT INTO ".MAIN_DB_PREFIX."telephonie_import_cdr";
$sql .= "(idx,fk_ligne,ligne,date,heure,num,dest,dureetext,tarif,montant,duree";
@ -230,7 +229,11 @@ if (is_readable($file))
if(ereg("^[0-9]+$", $duree_secondes))
{
if (! $db->query($sql))
if ($db->query($sql))
{
$line_inserted++;
}
else
{
dolibarr_syslog("Erreur de traitement de ligne $index");
dolibarr_syslog($db->error());
@ -242,22 +245,26 @@ if (is_readable($file))
{
print "Ligne : $cont ignorée\n";
}
}
else
{
dolibarr_syslog("Ligne : $ligne ignorée!");
$error++;
}
}
else
{
dolibarr_syslog("Mauvais format de fichier ligne $line");
$error++;
}
}
else
{
dolibarr_syslog("Ligne $ligne ignorée !");
}
$line++;
}
dolibarr_syslog(($line -1 )." lignes traitées");
dolibarr_syslog(($line -1 )." lignes traitées dans le fichier");
dolibarr_syslog($line_inserted." insert effectués");
if ($error == 0)
{