Modif de fond
This commit is contained in:
parent
2dfe115a0c
commit
e164ab954e
@ -539,7 +539,7 @@ function calcul($db, $ligne, $facture_id, &$total_cout_achat, &$total_cout_vente
|
|||||||
{
|
{
|
||||||
$comm = $comms[$ii];
|
$comm = $comms[$ii];
|
||||||
|
|
||||||
$error = $error + $comm->cout($tarif_achat, $tarif_vente, $ligne);
|
$error = $error + $comm->cout($tarif_achat, $tarif_vente, $ligne, $db);
|
||||||
|
|
||||||
$total_cout_fourn = $total_cout_fourn + $comm->montant;
|
$total_cout_fourn = $total_cout_fourn + $comm->montant;
|
||||||
$total_cout_achat = $total_cout_achat + $comm->cout_achat;
|
$total_cout_achat = $total_cout_achat + $comm->cout_achat;
|
||||||
|
|||||||
@ -23,14 +23,14 @@
|
|||||||
|
|
||||||
require ("../../master.inc.php");
|
require ("../../master.inc.php");
|
||||||
|
|
||||||
$opt = getopt("f:i:");
|
$opt = getopt("f:");
|
||||||
|
|
||||||
$file = $opt['f'];
|
$file = $opt['f'];
|
||||||
$id_fourn = $opt['i'];
|
$id_fourn = 2;
|
||||||
|
|
||||||
if (strlen($file) == 0 || strlen($id_fourn) == 0)
|
if (strlen($file) == 0)
|
||||||
{
|
{
|
||||||
print "Usage :\n php import-cdr-bt.php -f <filename> -i <id_fournisseur>\n";
|
print "Usage :\n php import-cdr-bt.php -f <filename>\n";
|
||||||
exit;
|
exit;
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -52,15 +52,18 @@ if (is_dir($file))
|
|||||||
|
|
||||||
while (($xfile = readdir($handle))!==false)
|
while (($xfile = readdir($handle))!==false)
|
||||||
{
|
{
|
||||||
if (is_file($file.$xfile) && substr($xfile, -4) == ".csv")
|
if (is_file($file.$xfile) )
|
||||||
{
|
{
|
||||||
$files[$i] = $file.$xfile;
|
if (substr($xfile, -4) == ".csv")
|
||||||
dolibarr_syslog($file.$xfile." ajouté");
|
{
|
||||||
$i++;
|
$files[$i] = $file.$xfile;
|
||||||
}
|
dolibarr_syslog($file.$xfile." ajouté");
|
||||||
else
|
$i++;
|
||||||
{
|
}
|
||||||
dolibarr_syslog($file.$xfile." ignoré");
|
else
|
||||||
|
{
|
||||||
|
dolibarr_syslog($file.$xfile." ignoré");
|
||||||
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
@ -82,7 +85,52 @@ else
|
|||||||
exit ;
|
exit ;
|
||||||
}
|
}
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Renommage des fichiers
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
$datetime = time();
|
||||||
|
$month = strftime("%m", $datetime);
|
||||||
|
$year = strftime("%y", $datetime);
|
||||||
|
|
||||||
|
if ($month == 1)
|
||||||
|
{
|
||||||
|
$month = "12";
|
||||||
|
$year = substr("00".($year - 1), -2) ;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
$month = substr("00".($month - 1), -2) ;
|
||||||
|
}
|
||||||
|
$newfiles = array();
|
||||||
|
$j = 0;
|
||||||
|
foreach ($files as $xfile)
|
||||||
|
{
|
||||||
|
if (is_readable($xfile))
|
||||||
|
{
|
||||||
|
dolibarr_syslog("Traitement de ".basename($xfile));
|
||||||
|
$newname = str_replace(".csv","-$month$year.csv",$xfile);
|
||||||
|
if (substr($xfile,-9) <> "-$month$year.csv")
|
||||||
|
{
|
||||||
|
if (rename($xfile, $newname))
|
||||||
|
{
|
||||||
|
dolibarr_syslog("Renomme en ".$newname);
|
||||||
|
$newfiles[$j] = $newname;
|
||||||
|
$j++;
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
print "Erreur de renommage de $xfile\n";
|
||||||
|
exit;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
else
|
||||||
|
{
|
||||||
|
$newfiles[$j] = $xfile;
|
||||||
|
$j++;
|
||||||
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
/*
|
/*
|
||||||
* Vérification du fournisseur
|
* Vérification du fournisseur
|
||||||
@ -148,12 +196,13 @@ else
|
|||||||
}
|
}
|
||||||
|
|
||||||
|
|
||||||
|
$line_inserted_total = 0;
|
||||||
foreach ($files as $xfile)
|
foreach ($newfiles as $xfile)
|
||||||
{
|
{
|
||||||
if (is_readable($xfile))
|
if (is_readable($xfile))
|
||||||
{
|
{
|
||||||
if ( _verif($db, $xfile) == 0)
|
// if ( _verif($db, $xfile) == 0)
|
||||||
|
if (true)
|
||||||
{
|
{
|
||||||
|
|
||||||
dolibarr_syslog("Lecture du fichier $xfile");
|
dolibarr_syslog("Lecture du fichier $xfile");
|
||||||
@ -244,6 +293,7 @@ foreach ($files as $xfile)
|
|||||||
if ($db->query($sql))
|
if ($db->query($sql))
|
||||||
{
|
{
|
||||||
$line_inserted++;
|
$line_inserted++;
|
||||||
|
$line_inserted_total++;
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
@ -258,14 +308,12 @@ foreach ($files as $xfile)
|
|||||||
print "Ligne : $cont ignorée\n";
|
print "Ligne : $cont ignorée\n";
|
||||||
$error++;
|
$error++;
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
dolibarr_syslog("Ligne : $ligne ignorée!");
|
dolibarr_syslog("Ligne : $ligne ignorée!");
|
||||||
$error++;
|
$error++;
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
@ -276,23 +324,21 @@ foreach ($files as $xfile)
|
|||||||
}
|
}
|
||||||
$line++;
|
$line++;
|
||||||
}
|
}
|
||||||
|
if ($line <> $line_inserted)
|
||||||
dolibarr_syslog($line." lignes traitées dans le fichier");
|
{
|
||||||
dolibarr_syslog($line_inserted." insert effectués");
|
dolibarr_syslog($line."/".$line_inserted." lignes traitées/insert effectués");
|
||||||
|
}
|
||||||
|
|
||||||
if ($error == 0)
|
if ($error == 0)
|
||||||
{
|
{
|
||||||
$db->query("COMMIT");
|
$db->query("COMMIT");
|
||||||
dolibarr_syslog("COMMIT");
|
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
{
|
{
|
||||||
$db->query("ROLLBACK");
|
$db->query("ROLLBACK");
|
||||||
dolibarr_syslog("ROLLBACK");
|
dolibarr_syslog("ROLLBACK");
|
||||||
}
|
}
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|
||||||
fclose($hf);
|
fclose($hf);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@ -303,6 +349,12 @@ foreach ($files as $xfile)
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
dolibarr_syslog($line_inserted_total." insert effectués total");
|
||||||
|
|
||||||
|
/*
|
||||||
|
* Fin
|
||||||
|
*
|
||||||
|
*/
|
||||||
|
|
||||||
function _verif($db, $file)
|
function _verif($db, $file)
|
||||||
{
|
{
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user