PEEL Shopping
Open source ecommerce : PEEL Shopping
export_kekoli.php
Go to the documentation of this file.
1 <?php
2 // This file should be in UTF8 without BOM - Accents examples: éèê
3 // +----------------------------------------------------------------------+
4 // | Copyright (c) 2004-2015 Advisto SAS, service PEEL - contact@peel.fr |
5 // +----------------------------------------------------------------------+
6 // | This file is part of PEEL Shopping 8.0.0, which is subject to an |
7 // | opensource GPL license: you are allowed to customize the code |
8 // | for your own needs, but must keep your changes under GPL |
9 // | More information: https://www.peel.fr/lire/licence-gpl-70.html |
10 // +----------------------------------------------------------------------+
11 // | Author: Advisto SAS, RCS 479 205 452, France, https://www.peel.fr/ |
12 // +----------------------------------------------------------------------+
13 // $Id: export_kekoli.php 46935 2015-09-18 08:49:48Z gboussin $
14 
15 define('IN_PEEL_ADMIN', true);
16 include("../../../configuration.inc.php");
17 include("fonctions.php");
19 necessite_priv("admin_sales,admin_webmastering");
20 
21 
22 
23 if(!empty($_GET['encoding'])){
24  $page_encoding=$_GET['encoding'];
25 }elseif(!empty($GLOBALS['site_parameters']['export_encoding'])){
26  $page_encoding=$GLOBALS['site_parameters']['export_encoding'];
27 }else{
28  $page_encoding='utf-8';
29 }
30 $output = '';
31 $filename="export_kekoli_" . str_replace('/','-',date($GLOBALS['date_basic_format_short'])) . ".csv";
32 // On ne veut pas polluer le fichier exporté par un quelconque message d'erreur
33 @ini_set('display_errors', 0);
35 
36 if (empty($_GET["dateadded1"]) || empty($_GET["dateadded2"])) {
37  die();
38 }
39 if (isset($_GET['id_statut_livraison']) && is_numeric($_GET['id_statut_livraison'])) {
40  $extra1_sql = "AND id_statut_livraison = '" . intval($_GET["id_statut_livraison"]) . "'";
41 } else {
42  $extra1_sql = "";
43 }
44 if (isset($_GET['id_statut_paiement']) && is_numeric($_GET['id_statut_paiement'])) {
45  $extra2_sql = "AND id_statut_paiement = '" . intval($_GET["id_statut_paiement"]) . "'";
46 } else {
47  $extra2_sql = "";
48 }
49 $sqlC = "SELECT *
50  FROM peel_commandes c
51  WHERE " . get_filter_site_cond('commandes', 'c', true) . " AND type != '4' AND o_timestamp>='" . nohtml_real_escape_string($_GET["dateadded1"]) . "' AND o_timestamp<='" . nohtml_real_escape_string($_GET["dateadded2"]) . "' " . $extra1_sql . " " . $extra2_sql . "
52  ORDER BY o_timestamp";
53 
54 $output .= "NumeroColis;ReferenceExpedition;NomDestinataire;Commune;CodePostal;CodePays;EmailDestinataire;DateClotureBordereau;Adresse1;Adresse2;Adresse3;Adresse4\r\n";
55 
57 
58 while ($C = fetch_assoc($resC)) {
59  $i = 0;
60  $numero = $C['id'];
61  $date_vente = get_formatted_date($C['o_timestamp'], 'short', 'long');
62  $nom_acheteur = $C['nom_ship'];
63  $prenom_acheteur = $C['prenom_ship'];
64  $societe = $C['societe_ship'];
65  $adresse = $C['adresse_ship'];
66  $ville = $C['ville_ship'];
67  $pays = $C['pays_ship'];
68 
69  $code_postal = $C['zip_ship'];
70  $etage = $C['commentaires'];
71 
72 
73  //On va chercher le nom du transport
74  $sql_cond_types = '';
75  $sql_cond_pays = '';
76  foreach ($GLOBALS['admin_lang_codes'] as $lng) {
77  $sql_cond_types .= ' OR nom_'.$lng.' = "' . nohtml_real_escape_string($C['type']) . '" ';
78  $sql_cond_pays .= ' OR pays_'.$lng.' = "' . nohtml_real_escape_string($C['pays_bill']) . '" ';
79  }
80  $resType = query("SELECT nom_".$_SESSION['session_langue']." AS nom
81  FROM peel_types
82  WHERE (id='" . intval($C['type'])."' ". $sql_cond_types .") AND " . get_filter_site_cond('types'));
83  $type = fetch_assoc($resType);
84 
85  //On va chercher le code iso du pays
86  $resPays = query("SELECT iso
87  FROM peel_pays
88  WHERE " . get_filter_site_cond('pays') . " AND (1 ".$sql_cond_pays.")");
89  $pays = fetch_assoc($resPays);
90 
91  $NumeroColis = $C['id'];
92  $ReferenceExpedition = $GLOBALS['site_parameters']['nom_'.$_SESSION['session_langue']].$type['nom'];
93  $NomDestinataire = $C['nom_ship'];
94  $Commune = $C['ville_ship'];
95  $CodePostal = $C['zip_ship'];
96  $CodePays = $pays['iso'];
97  $EmailDestinataire = $C['email_ship'];
98  $DateClotureBordereau = convertToDateClotureBordereau($C['o_timestamp'], $GLOBALS['site_parameters']['availability_of_carrier']);
99  $Adresse1 = $C['adresse_ship'];
100  $Adresse2 = "";
101  $Adresse3 = "";
102  $Adresse4 = "";
103  $Transporteur = $type['nom'];
104 
105  $output .= filtre_csv($NumeroColis) . ";";
106  $output .= filtre_csv($ReferenceExpedition) . ";";
107  $output .= filtre_csv($NomDestinataire) . ";";
108  $output .= filtre_csv($Commune) . ";";
109  $output .= filtre_csv($CodePostal) . ";";
110  $output .= filtre_csv($CodePays) . ";";
111  $output .= filtre_csv($EmailDestinataire) . ";";
112  $output .= filtre_csv($DateClotureBordereau) . ";";
113  $output .= filtre_csv($Adresse1) . ";";
114  $output .= filtre_csv($Adresse2) . ";";
115  $output .= filtre_csv($Adresse3) . ";";
116  $output .= filtre_csv($Adresse4) . ";";
117 
118  $output .= "\r\n";
119 }
120 
121 echo String::convert_encoding($output, $page_encoding, GENERAL_ENCODING);
122 
static convert_encoding($string, $new_encoding, $original_encoding=null)
Converts the character encoding of string $string to $new_encoding from optionally $original_encoding...
Definition: String.php:375
$output
$sqlC
nohtml_real_escape_string($value, $allowed_tags=null)
Protège les données pour insertion dans MySQL ET supprime les tags HTML pour protéger de toute sorte ...
Definition: database.php:400
convertToDateClotureBordereau($cmd_date, $availability_of_carrier)
Conversion de valeur de availability_of_carrier pour le champ DateClotureBordereau.
Definition: fonctions.php:37
necessite_priv($priv, $demo_allowed=true, $configuration_modification=false)
Cette fonction vérifie si l'utilisateur a les privilèges de $priv.
Definition: fonctions.php:1575
get_filter_site_cond($table_technical_code, $table_alias=null, $use_strict_rights_if_in_admin=false, $specific_site_id=null, $exclude_public_items=false, $admin_force_multisite_if_allowed=false)
Retourne la condition SQL permettant de filtrer les données pour une table.
Definition: fonctions.php:4643
query($query, $die_if_error=false, $database_object=null, $silent_if_error=false, $security_sql_filter=true)
The query() function is meant to be called anywhere you want to make a query.
Definition: database.php:158
if(strlen($date2)== '10') if($type== 'users-by-age'&&a_priv('admin_users', true)) elseif($type== 'forums-count'&&a_priv('admin_content', true)) elseif($type== 'forums-categories'&&a_priv('admin_content', true)) elseif($type== 'users-count'&&a_priv('admin_users', true)) elseif($type== 'product-categories'&&a_priv('admin_products', true)) elseif($type== 'users-by-sex'&&a_priv('admin_users', true)) elseif($type== 'users-by-country'&&a_priv('admin_users', true)) elseif($type== 'sales'&&a_priv('admin_sales', true))
Definition: chart-data.php:160
necessite_identification()
Si l'utilisateur n'est pas connecté à un compte, on affiche une page d'identification et arrête le sc...
Definition: fonctions.php:1596
filtre_csv($string, $separator="\t")
Formatte une chaine de caractère pour insertion dans du CSV.
Definition: format.php:277
fetch_assoc($query_result)
fetch_assoc()
Definition: database.php:283
get_formatted_date($datetime_or_timestamp=null, $mode= 'short', $hour_minute=false)
Afficher une date formatée, en évitant les problèmes liés aux noms de mois sur les serveurs qui ne so...
Definition: format.php:440
$GLOBALS['page_columns_count']
$resC
if(!check_if_module_active('search')) $page_encoding
Definition: produit.php:23
output_csv_http_export_header($filename, $type= 'excel', $page_encoding)
Génère les entêtes HTTP pour un fichier CSV.
Definition: format.php:802
if(defined('IN_PEEL_ADMIN')||IN_INSTALLATION) $_SESSION['session_langue']
$filename

This documentation for Open ecommerce PEEL Shopping and PEEL.fr has been generated by Doxygen on Thu Oct 15 2015 14:41:31 - Peel ecommerce is a product of Agence web Advisto SAS. All rights reserved.