31 |
require_once (DOL_DOCUMENT_ROOT."/includes/php_writeexcel/class.writeexcel_workbook.inc.php"); |
require_once (DOL_DOCUMENT_ROOT."/includes/php_writeexcel/class.writeexcel_workbook.inc.php"); |
32 |
require_once (DOL_DOCUMENT_ROOT."/includes/php_writeexcel/class.writeexcel_worksheet.inc.php"); |
require_once (DOL_DOCUMENT_ROOT."/includes/php_writeexcel/class.writeexcel_worksheet.inc.php"); |
33 |
|
|
|
|
|
34 |
$error = 0; |
$error = 0; |
35 |
|
|
36 |
$datetime = time(); |
$datetime = time(); |
37 |
|
|
38 |
$date = strftime("%d%h%Y%Hh%Mm%S",$datetime); |
$date = strftime("%d%h%Y%Hh%Mm%S",$datetime); |
39 |
|
|
|
|
|
|
|
|
40 |
$sql = "SELECT c.rowid, sl.ligne, sl.code_analytique"; |
$sql = "SELECT c.rowid, sl.ligne, sl.code_analytique"; |
41 |
|
|
42 |
$sql .= ", s.nom, c.ref, s.code_client, s.address, s.cp, s.ville"; |
$sql .= ", s.nom, c.ref, s.code_client, s.address, s.cp, s.ville"; |
44 |
$sql .=" FROM ".MAIN_DB_PREFIX."telephonie_societe_ligne as sl"; |
$sql .=" FROM ".MAIN_DB_PREFIX."telephonie_societe_ligne as sl"; |
45 |
$sql .=" , ".MAIN_DB_PREFIX."telephonie_contrat as c"; |
$sql .=" , ".MAIN_DB_PREFIX."telephonie_contrat as c"; |
46 |
$sql .=" , ".MAIN_DB_PREFIX."societe as s"; |
$sql .=" , ".MAIN_DB_PREFIX."societe as s"; |
|
|
|
47 |
$sql .= " WHERE sl.fk_contrat = c.rowid"; |
$sql .= " WHERE sl.fk_contrat = c.rowid"; |
48 |
$sql .= " AND c.fk_client_comm = 52"; |
$sql .= " AND c.fk_client_comm = 52"; |
49 |
$sql .= " AND sl.statut <> 7"; |
$sql .= " AND sl.statut <> 7"; |
50 |
$sql .= " AND c.fk_soc_facture = s.idp"; |
$sql .= " AND c.fk_soc_facture = s.idp"; |
|
|
|
51 |
$sql .= " ORDER BY c.rowid ASC, sl.code_analytique ASC"; |
$sql .= " ORDER BY c.rowid ASC, sl.code_analytique ASC"; |
52 |
|
|
|
|
|
|
print $sql."\n"; |
|
|
|
|
53 |
$resql = $db->query($sql); |
$resql = $db->query($sql); |
54 |
|
|
55 |
if ($resql) |
if ($resql) |
66 |
} |
} |
67 |
} |
} |
68 |
|
|
69 |
|
$fname = "/tmp/plan-facturation-".strftime("%d-%m-%Y",$datetime).".xls"; |
|
$fname = "/tmp/plan-facturation.xls"; |
|
70 |
|
|
71 |
print "Open $fname\n"; |
print "Open $fname\n"; |
72 |
|
|