* Copyright (C) 2004-2008 Laurent Destailleur * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ /** * \file htdocs/oscommerce_ws/index.php * \ingroup oscommerce2 * \brief Page accueil zone boutique * \version $Id$ */ require("./pre.inc.php"); // Use pre.inc.php as menus not defined in module $langs->load("shop"); $langs->load("orders"); /* * View */ llxHeader("",$langs->trans("OSCommerceShop")); print_fiche_titre($langs->trans("OSCommerceShop")); if (! @ini_get('allow_url_fopen')) { $langs->load("errors"); print '

'.$langs->trans("WarningAllowUrlFopenMustBeOn").'

'; } print ''; print ''; /* * Derniers clients qui ont command� */ print '

'; //WebService Client. require_once(NUSOAP_PATH."nusoap.php"); require_once("./includes/configure.php"); // Set the parameters to send to the WebService $parameters = array(); // Set the WebService URL //print OSCWS_DIR."ws_orders.php"; exit; $client = new nusoap_client(OSCWS_DIR."ws_orders.php"); if ($client) { $client->soap_defencoding='UTF-8'; } /* /* Chiffre d'affaire */ print_titre($langs->trans('SalesTurnover')); print ''; print ''; print ''; print ''; //$client->setDebugLevel(9); // Call the WebService and store its result in $result. $result = $client->call("get_CAmensuel",$parameters ); if ($client->fault) { dol_print_error('',"Erreur de connexion "); print_r($client->faultstring); } elseif (!($err = $client->getError()) ) { $num=0; if ($result) $num = sizeof($result); $var=True; $i=0; if ($num > 0) { while ($i < $num) { $var=!$var; print ""; print ''; print ''; print ''; print "\n"; $i++; } } } else { print $client->getHTTPBody($client->response); } print "

'.$langs->trans("Year").'	'.$langs->trans("Month").'	'.$langs->trans("Total").'
'.$result[$i][an].'	'.$result[$i][mois].'	'.convert_price($result[$i][value]).'

"; print '

'; // partie commandes print_titre($langs->trans("Orders")); /* * 5 derni�res commandes re�ues */ print ''; print ''; print ''; // Call the WebService and store its result in $result. $parameters = array("limit"=>OSC_MAXNBCOM); $result = $client->call("get_orders",$parameters ); if ($client->fault) { dol_print_error('',"Erreur de connexion "); } elseif (!($err = $client->getError()) ) { $num=0; if ($result) $num = sizeof($result); $var=True; $i=0; if ($num > 0) { $num = min($num,OSC_MAXNBCOM); while ($i < $num) { $var=!$var; print ""; print ''; $i++; } } } else { print $client->getHTTPBody($client->response); } print "

'.$langs->trans("LastOrders").'
'.$result[$i][orders_id].'	'.$result[$i][customers_name].'	'.convert_price($result[$i][value]).'	'.$result[$i][payment_method].'

"; /* * 5 derni�res commandes en attente */ print ''; print ''; print ''; $parameters = array("limit"=>OSC_MAXNBCOM, "status"=>OSC_ORDWAIT); $result = $client->call("get_orders",$parameters ); if ($client->fault) { dol_print_error('',"Erreur webservice ".$client->faultstring); } elseif (!($err = $client->getError()) ) { $var=True; $i=0; $num=0; if ($result) $num = sizeof($result); $langs->load("orders"); if ($num > 0) { $num = min($num,OSC_MAXNBCOM); while ($i < $num) { $var=!$var; print ""; print ''; $i++; } } } else { print $client->getHTTPBody($client->response); } print "

'.$langs->trans("OnStandBy").'
'.$result[$i][orders_id].'	'.$result[$i][customers_name].'	'.convert_price($result[$i][value]).'	'.$result[$i][payment_method].'

"; /* * Commandes � traiter */ print ''; print ''; print ''; $parameters = array("limit"=>OSC_MAXNBCOM, "status"=>OSC_ORDPROCESS); $result = $client->call("get_orders",$parameters ); if ($client->fault) { dol_print_error('',"Erreur webservice ".$client->faultstring); } elseif (!($err = $client->getError()) ) { $var=True; $i=0; $num=0; if ($result) $num = sizeof($result); $langs->load("orders"); if ($num > 0) { $num = min($num,OSC_MAXNBCOM); while ($i < $num) { print ""; print ''; $i++; $var=!$var; } } } else { print $client->getHTTPBody($client->response); } print "

'.$langs->trans("TreatmentInProgress").'
'.$result[$i][orders_id].'	'.$result[$i][customers_name].'	'.convert_price($result[$i][value]).'	'.$result[$i][payment_method].'

"; print '

'; print ''; print ''; $parameters = array("limit"=>OSC_MAXNBCOM); $result = $client->call("get_lastOrderClients",$parameters ); if ($client->fault) { dol_print_error('',"Erreur webservice ".$client->faultstring); } elseif (!($err = $client->getError()) ) { $var=True; $i=0; $num=0; if ($result) $num = sizeof($result); $langs->load("orders"); if ($num > 0) { $num = min($num,OSC_MAXNBCOM); while ($i < $num) { print ""; print ""; $i++; $var=!$var; } print "

'.$langs->trans("LastCustomers").'
".$result[$i][date_purchased]."	".$result[$i][customers_name]."	".$result[$i][delivery_country]."	".convert_price($result[$i][value])."	".$result[$i][payment_method]."	".$result[$i][orders_id]."	".$result[$i][statut]."

"; } } else { print $client->getHTTPBody($client->response); } print ''; llxFooter('$Date$ - $Revision$'); ?>