From 5ceca8916435c9c48197790821027f866541e1a3 Mon Sep 17 00:00:00 2001
From: Rodolphe Quiedeville <rodolphe@quiedeville.org>
Date: Mon, 28 Feb 2005 11:54:28 +0000
Subject: [PATCH] Ajout email
---
htdocs/telephonie/script/recap-commande.php | 107 +++++++++++++++++---
1 file changed, 94 insertions(+), 13 deletions(-)
diff --git a/htdocs/telephonie/script/recap-commande.php b/htdocs/telephonie/script/recap-commande.php
index 7dff1e5c84d..252ffdf1c98 100644
--- a/htdocs/telephonie/script/recap-commande.php
+++ b/htdocs/telephonie/script/recap-commande.php
@@ -31,15 +31,25 @@ require_once DOL_DOCUMENT_ROOT."/lib/dolibarrmail.class.php";
define ('COMMANDETABLEUR_NOEMAIL', -3);
+$opt = getopt("e:");
+
+$email = $opt['e'];
+
+if (strlen($email) == 0)
+{
+ print "Usage :\n php recap-commande.php -e EMAIL\n";
+}
+
+
$date = time();
$date_now = $date;
-Generate($date, $db, $date_now);
+Generate($date, $db, $date_now, $email);
if (strftime("%d", $date_now) < 7)
{
$date_prev = $date - (86400 * 9);
- Generate($date_prev, $db, $date_now);
+ Generate($date_prev, $db, $date_now, $email);
}
/*
@@ -47,12 +57,12 @@ if (strftime("%d", $date_now) < 7)
*
*/
-function Generate($date_gen, $db, $date_now)
+function Generate($date_gen, $db, $date_now, $email)
{
-
$datef = strftime("%Y-%m", $date_gen);
- $fname = DOL_DATA_ROOT ."/telephonie/ligne/commande/recap-".$datef.".xls";
+ $shortname = "recap-".$datef.".xls";
+ $fname = DOL_DATA_ROOT ."/telephonie/ligne/commande/".$shortname;
$ligne = new LigneTel($db);
@@ -62,8 +72,8 @@ function Generate($date_gen, $db, $date_now)
$worksheet->write(0, 0, "R�capitulation des commandes du mois de ".strftime("%B %Y",$date_gen)." (g�n�r� le ".strftime("%d %B %Y %HH%M", $date_now) . ")");
- $worksheet->set_column('A:A', 24);
- $worksheet->set_column('B:B', 40);
+ $worksheet->set_column('A:A', 12);
+ $worksheet->set_column('B:B', 42);
$worksheet->set_column('C:C', 15);
$worksheet->set_column('D:D', 14);
$worksheet->set_column('E:E', 28);
@@ -72,6 +82,36 @@ function Generate($date_gen, $db, $date_now)
$formatcc->set_align('center');
$formatcc->set_align('vcenter');
+ $format[2] =& $workbook->addformat();
+ $format[2]->set_align('center');
+ $format[2]->set_align('vcenter');
+ $format[2]->set_color('blue');
+
+ $format[3] =& $workbook->addformat();
+ $format[3]->set_align('center');
+ $format[3]->set_align('vcenter');
+ $format[3]->set_color('green');
+
+ $format[4] =& $workbook->addformat();
+ $format[4]->set_align('center');
+ $format[4]->set_align('vcenter');
+ $format[4]->set_color('pink');
+
+ $format[5] =& $workbook->addformat();
+ $format[5]->set_align('center');
+ $format[5]->set_align('vcenter');
+ $format[5]->set_color('orange');
+
+ $format[6] =& $workbook->addformat();
+ $format[6]->set_align('center');
+ $format[6]->set_align('vcenter');
+ $format[6]->set_color('red');
+
+ $format[7] =& $workbook->addformat();
+ $format[7]->set_align('center');
+ $format[7]->set_align('vcenter');
+ $format[7]->set_color('red');
+
$formatccb =& $workbook->addformat();
$formatccb->set_align('center');
$formatccb->set_align('vcenter');
@@ -94,7 +134,7 @@ function Generate($date_gen, $db, $date_now)
$ligneids = array();
- $sqlall = "SELECT s.nom, s.idp as socid, l.ligne, f.nom as fournisseur, l.statut, l.rowid";
+ $sqlall = "SELECT s.code_client, s.nom, s.idp as socid, l.ligne, f.nom as fournisseur, l.statut, l.rowid";
$sqlall .= " , comm.name, comm.firstname, l.remise";
$sqlall .= " , ".$db->pdate("l.date_commande")." as date_commande";
$sqlall .= " FROM ".MAIN_DB_PREFIX."societe as s";
@@ -120,8 +160,8 @@ function Generate($date_gen, $db, $date_now)
{
$num = $db->num_rows();
- $worksheet->write(1, 0, "Clients", $formatc);
- $worksheet->write(1, 1, "Adresses", $formatc);
+ $worksheet->write(1, 0, "Code", $formatc);
+ $worksheet->write(1, 1, "Client", $formatc);
$worksheet->write(1, 2, "Num�ro", $formatcc);
$worksheet->write(1, 3, "Date commande", $formatcc);
$worksheet->write(1, 4, "Statut actuel", $formatcc);
@@ -135,13 +175,14 @@ function Generate($date_gen, $db, $date_now)
$soc = new Societe($db);
$soc->fetch($obj->socid);
- $worksheet->write($j, 0, $obj->nom, $formatc);
- $worksheet->write($j, 1, $soc->adresse. " " . $soc->cp . " " . $soc->ville, $formatc);
+ $worksheet->write($j, 0, $obj->code_client, $formatc);
+ $worksheet->write($j, 1, $obj->nom, $formatc);
$worksheet->write_string($j, 2, "$obj->ligne", $formatcc);
$worksheet->write($j, 3, strftime("%d/%m/%y",$obj->date_commande), $formatcc);
- $worksheet->write($j, 4, $ligne->statuts[$obj->statut], $formatcc);
+
+ $worksheet->write($j, 4, $ligne->statuts[$obj->statut], $format[3]);
$i++;
}
@@ -159,4 +200,44 @@ function Generate($date_gen, $db, $date_now)
*/
$workbook->close();
+ /*
+ *
+ */
+ if ($date_gen == $date_now)
+ {
+ MailFile($fname, $shortname, $email);
+ }
+
+}
+
+
+
+function MailFile($filename, $shortname, $to)
+{
+ $subject = "Recapitulatif des commandes";
+
+ $sendto = $to;
+
+ $from = TELEPHONIE_LIGNE_COMMANDE_EMAIL_BCC;
+
+ $message = "Bonjour,\n\nVeuillez trouver ci-joint le dernier r�capitulatif des commandes.\n\n";
+ $message .= "\n\nCordialement,\n\n";
+
+ $message .= "-- \n";
+
+ $mailfile = new DolibarrMail($subject,
+ $sendto,
+ $from,
+ $message);
+
+ $mailfile->addr_bcc = TELEPHONIE_LIGNE_COMMANDE_EMAIL_BCC;
+
+ $mailfile->PrepareFile(array($filename),
+ array("application/msexcel"),
+ array($shortname));
+
+ if ( $mailfile->sendfile() )
+ {
+ return 0;
+ }
}
--
GitLab