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