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

Ajout test de doublons

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2005-03-16 14:31:52 +00:00
parent 1781125f5a
commit 54e40ef826
1 changed files with 63 additions and 37 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
htdocs/telephonie/script/affect-id-ligne.php
View File

@ -26,9 +26,33 @@
require ("../../master.inc.php"); require ("../../master.inc.php");
$error = 0; $error = 0;
$stop = 0 ;
for ($i = 0 ; $i < 50 ; $i++) $sql = "SELECT distinct(ligne) as l, count(*)";
$sql .= " FROM llx_telephonie_societe_ligne";
$sql .= " GROUP by l DESC ";
if ($db->query($sql))
{ {
$num = $db->num_rows();
if ($num)
{
$row = $db->fetch_row();
if ( $row[1] > 1)
{
print "Doublons ligne $row[0]\n";
$stop = 1;
}
}
$db->free();
}
if ($stop == 0)
{
for ($i = 0 ; $i < 5000 ; $i++)
{
$sql = "SELECT fk_ligne, ligne"; $sql = "SELECT fk_ligne, ligne";
$sql .= " FROM ".MAIN_DB_PREFIX."telephonie_communications_details"; $sql .= " FROM ".MAIN_DB_PREFIX."telephonie_communications_details";
@ -72,5 +96,7 @@ for ($i = 0 ; $i < 50 ; $i++)
print "$ligne -> $id -> "; print "$ligne -> $id -> ";
print $db->affected_rows()."\n"; print $db->affected_rows()."\n";
} }
}
} }
?> ?>