extranet/www/pages/carte.php

<?php
if (!$_SESSION['connected'])	die();

$tabInfo = $_SESSION['tabInfo'];

$siret=trim(preg_replace('/[^0-9]/', '', $_REQUEST['siret']));
if (strlen($siret)<>0 && strlen($siret)<>9 && strlen($siret)<>14)	die('Paramètres incorrects !');

$idEntreprise=trim(preg_replace('/[^0-9]/', '', $_REQUEST['idEntreprise']))*1;	// Si id=0 alors non communiqué
if (($siret*1)==0 && $idEntreprise==0) 										die('Paramètres incorrects !');
$siren=substr($siret,0,9);
$mil=false;

require_once 'partenaires/classMTva.php';
require_once 'partenaires/classMMap.php';
require_once 'common/dates.php';
require_once 'partenaires/GoogleMapAPI.class.php';
require_once 'cache/cache.php';

$map = new GoogleMapAPI('map');

//@TODO : Modifier les clés googlemap pour que cela fonctionne suivant les différentes environnement
/*
extranet.scores-decisions.com		ABQIAAAAuKBtUyFonYJBl1fqfc78tRSYaqxLwFTMDT_MtTSFor1bsUZ_ChTvuzyTINkPMlW88Ar9fofaphzN3w
extranet1.scores-decisions.com		ABQIAAAAuKBtUyFonYJBl1fqfc78tRQOO2vGTETHV7QVwUGHm2hlhcGOSxSyp3T9H0pL7ZUqzdkyJNILCsfwaw
extranet2.scores-decisions.com		ABQIAAAAuKBtUyFonYJBl1fqfc78tRSF_wplsSIpU9Nj-WZVmwUACZLyRBQbtojzIRj5K3y5IqV2kEhvBDiCzQ
extranet3.scores-decisions.com		ABQIAAAAuKBtUyFonYJBl1fqfc78tRSfrani-_akT7HnaZXzgMX5BPvb7xRCsFQbHbnjdZGjLEZVZMXcYY6cLg
extranet.sd.com 					ABQIAAAAuKBtUyFonYJBl1fqfc78tRQRonouPisAtAAjQnslnQYH0lUOzxRNVdoChLD2udGIhYegekRSgbjr5A
extranetrec.scores-decisions.com	ABQIAAAAuKBtUyFonYJBl1fqfc78tRQQcNgS-tLiAG-ic2CW9PypgC_xRhTjSL9-5iBPvj3GA1_AvZYQU_QR3Q
*/

$firephp->log($_SERVER['SERVER_NAME'], 'SERVER_NAME');
switch($_SERVER['SERVER_NAME'])
{
	case 'extranet.sd.com':
		$map->setAPIKey('ABQIAAAAuKBtUyFonYJBl1fqfc78tRQRonouPisAtAAjQnslnQYH0lUOzxRNVdoChLD2udGIhYegekRSgbjr5A');
		$urlimg = 'http://extranetrec.scores-decisions.com/';
		break;
	case 'extranetrec.scores-decisions.com':
		$map->setAPIKey('ABQIAAAAuKBtUyFonYJBl1fqfc78tRQQcNgS-tLiAG-ic2CW9PypgC_xRhTjSL9-5iBPvj3GA1_AvZYQU_QR3Q');
		$urlimg = EXTRANET_URL;
		break;
	case 'extranet.scores-decisions.com':
		$map->setAPIKey('ABQIAAAAuKBtUyFonYJBl1fqfc78tRSYaqxLwFTMDT_MtTSFor1bsUZ_ChTvuzyTINkPMlW88Ar9fofaphzN3w');
		$urlimg = EXTRANET_URL;
		break;
	default:
		//Impossible d'afficher la carte google maps
		exit;
		break;
}

if (($siret*1)==0 && ($siren*1)<100){
	$fileName = $page2.'-'.$idEntreprise;
}else{
	$fileName = $page2.'-'.$siret;
}
cache_filename($fileName);
if( cache_exist() && !( preg_match('/\bsaisie\b/i', $_SESSION['tabInfo']['droits']) || $_SESSION['tabInfo']['mode_edition']==1 ) ){
	$etabs = cache_get('etabs');
	//Affichage d'un message d'erreur
	if($etabs === FALSE) exit;
	$firephp->info('CACHE');
}else{
	try {
		$O = $client->getListeEtablissements($siren);
		$etabs = $O['result'];
	} catch (SoapFault $fault) {
		require_once 'soaperror.php';
		processSoapFault($client,$fault,$tabInfo);
	    die();
	}
}

$raisonSociale = $tabInfo['entrep']['raisonSociale'];

foreach ($etabs as $i=>$etab) {
	if ($etab['Siege']==1) {
		$type='Siège ';
	}
	else {
		$type='Etablissement ';
	}
	if ($etab['Actif']==1)	$type.='actif';
	else 					$type.='inactif';
	$type.=' - '.$etab['NafEtabLib'];

	$title ="$siren ".$etab['Nic']." : $type<br/>";
	//etab['Nic']
	if ($etab['Enseigne']<>'')
		$title.='Enseigne : '.$etab['Enseigne'].'<br/>';

	$texte =$etab['Adresse'].'<br/>';
	$adresse=$etab['Adresse'].' ';
	if ($etab['Adresse2']<>'') {
		$texte.=$etab['Adresse2'].'<br/>';
		if (strlen(trim($adresse))<7)
			$adresse=$etab['Adresse2'].' ';
	}
	$texte.='<b>'.$etab['CP'].' '.$etab['Ville'].'</b><br/>';
	$adresse.=$etab['CP'].' '.$etab['Ville'];

	$texte.='<i>'.$etab['NafEtab'].' : '.$etab['NafEtabLib'].'</i>';

    $map->addMarkerByAddress($adresse, $title, $texte, $type);
   	if ($etab['Siege']==1) {
		$map->addMarkerIcon($urlimg.'img/icones/siege'.$etab['Actif'].'.png');
	}
	else {
		switch (''.substr($etab['NafEtab'],0,2).'') {
		// A Agriculture, sylviculture et pêche
		case '01':// Culture et production animale, chasse et services annexes
		case '02':// Sylviculture et exploitation forestière
		case '03':// Pêche et aquaculture
			$map->addMarkerIcon($urlimg.'img/icones/tractor'.$etab['Actif'].'.png');
			break;

		// B Industries extractives
		case '05':// Extraction de houille et de lignite
		case '06':// Extraction d'hydrocarbures
		case '07':// Extraction de minerais métalliques
		case '08':// Aures industries extractives
		case '09':// Services de soutien aux industries extractives
		// C Industrie manufacturière
		case '10':// Industries alimentaires
		case '11':// Fabrication de boissons
		case '12':// Fabrication de produits à base de tabac
		case '13':// Fabrication de textiles
		case '14':// Industrie de l'habillement
		case '15':// Industrie du cuir et de la chaussure
		case '16':// Travail du bois et fabrication d'articles en bois et en liège, à l'exception des meubles ; fabrication d'articles en vannerie et sparterie
		case '17':// Industrie du papier et du carton
		case '18':// Imprimerie et reproduction d'enregistrements
		case '19':// Cokéfaction et raffinage
		case '20':// Industrie chimique
		case '21':// Industrie pharmaceutique
		case '22':// Fabrication de produits en caoutchouc et en plastique
		case '23':// Fabrication d'autres produits minéraux non métalliques
		case '24':// Métallurgie
		case '25':// Fabrication de produits métalliques, à l'exception des machines et des équipements
		case '26':// Fabrication de produits informatiques, électroniques et optiques
		case '27':// Fabrication d'équipements électriques
		case '28':// Fabrication de machines et équipements n.c.a.
		case '29':// Industrie automobile
		case '30':// Fabrication d'autres matériels de transport
		case '31':// Fabrication de meubles
		case '32':// Autres industries manufacturières
		case '33':// Réparation et installation de machines et d'équipements
		// D Production et distribution d'électricité, de gaz, de vapeur et d'air conditionné
		case '35':// Production et distribution d'électricité, de gaz, de vapeur et d'air conditionné
    	// E Production et distribution d'eau ; assainissement, gestion des déchets et dépollution
		case '36':// Captage, traitement et distribution d'eau
		case '37':// Collecte et traitement des eaux usées
    	case '38':// Collecte, traitement et élimination des déchets ; récupération
    	case '39':// Dépollution et autres services de gestion des déchets
    	// F Construction
    	case '41':// Construction de bâtiments
    	case '42':// Génie civil
    	case '43':// Travaux de construction spécialisés
    		$map->addMarkerIcon($urlimg.'img/icones/usine'.$etab['Actif'].'.png');
			break;

    	// G Commerce ; réparation d'automobiles et de motocycles
    	case '45':// Commerce et réparation d'automobiles et de motocycles
    	case '46':// Commerce de gros, à l'exception des automobiles et des motocycles
    	case '47':// Commerce de détail, à l'exception des automobiles et des motocycles
			$map->addMarkerIcon($urlimg.'img/icones/shop'.$etab['Actif'].'.png');
			break;

    	// H Transports et entreposage
    	case '49':// Transports terrestres et transport par conduites
    	case '50':// Transports par eau
    	case '51':// Transports aériens
    	case '53':// Activités de poste et de courrier
    		$map->addMarkerIcon($urlimg.'img/icones/etab'.$etab['Actif'].'.png');
			break;
    	case '52':// Entreposage et services auxiliaires des transports
    		$map->addMarkerIcon($urlimg.'img/icones/entrepot'.$etab['Actif'].'.png');
   			break;

   		// I Hébergement et restauration
    	case '55':// Hébergement
    	case '56':// Restauration
    	// J Information et communication
    	case '58':// Édition
    	case '59':// Production de films cinématographiques, de vidéo et de programmes de télévision ; enregistrement sonore et édition musicale
    	case '60':// Programmation et diffusion
    	case '61':// Télécommunications
    	case '62':// Programmation, conseil et autres activités informatiques
    	case '63':// Services d'information
    	// K Activités financières et d'assurance
    	case '64':// Activités des services financiers, hors assurance et caisses de retraite
    	case '65':// Assurance
    	case '66':// Activités auxiliaires de services financiers et d'assurance
    	// L Activités immobilières
    	case '68':// Activités immobilières
    	// M Activités spécialisées, scientifiques et techniques
    	case '69':// Activités juridiques et comptables
    	case '70':// Activités des sièges sociaux ; conseil de gestion
    	case '71':// Activités d'architecture et d'ingénierie ; activités de contrôle et analyses techniques
    	case '72':// Recherche-développement scientifique
    	case '73':// Publicité et études de marché
    	case '74':// Autres activités spécialisées, scientifiques et techniques
    	case '75':// Activités vétérinaires
    	// N Activités de services administratifs et de soutien
    	case '77':// Activités de location et location-bail
    	case '78':// Activités liées à l'emploi
    	case '79':// Activités des agences de voyage, voyagistes, services de réservation et activités connexes
    	case '80':// Enquêtes et sécurité
    	case '81':// Services relatifs aux bâtiments et aménagement paysager
    	case '82':// Activités administratives et autres activités de soutien aux entreprises
			$map->addMarkerIcon($urlimg.'img/icones/etab'.$etab['Actif'].'.png');
			break;

    	// O Administration publique
    	case '84':// Administration publique et défense ; sécurité sociale obligatoire
    	// P Enseignement
    	case '85':// Enseignement
			$map->addMarkerIcon($urlimg.'img/icones/admin'.$etab['Actif'].'.png');
			break;
    	// Q Santé humaine et action sociale
    	case '86':// Activités pour la santé humaine
    	case '87':// Hébergement médico-social et social
    	case '88':// Action sociale sans hébergement
    	// R Arts, spectacles et activités récréatives
    	case '90':// Activités créatives, artistiques et de spectacle
    	case '91':// Bibliothèques, archives, musées et autres activités culturelles
    	case '92':// Organisation de jeux de hasard et d'argent
    	case '93':// Activités sportives, récréatives et de loisirs
    	// S Autres activités de services
    	case '94':// Activités des organisations associatives
    	case '95':// Réparation d'ordinateurs et de biens personnels et domestiques
    	case '96':// Autres services personnels
    	// T Activités des ménages en tant qu'employeurs ; activités indifférenciées des ménages en tant que producteurs de biens et services pour usage propre
    	case '97':// Activités des ménages en tant qu'employeurs de personnel domestique
    	case '98':// Activités indifférenciées des ménages en tant que producteurs de biens et services pour usage propre
    	// U Activités extra-territoriales
    	case '99'://Activités des organisations et organismes extraterritoriaux
			$map->addMarkerIcon($urlimg.'img/icones/etab'.$etab['Actif'].'.png');
			break;
		}
	}
}
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xmlns:v="urn:schemas-microsoft-com:vml">
<head>
<?php $map->printHeaderJS(); ?>
<?php $map->printMapJS(); ?>
<!-- necessary for google maps polyline drawing in IE -->
<style type="text/css">
v\:* { behavior:url(#default#VML);}
</style>
<link rel="stylesheet" type="text/css" href="./css/main.css" />
</head>
<body onload="onLoad()">
<?php $map->printMap(); ?>
<?php $map->printSidebar(); ?>
</body>
</html>