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<61>tres incorrects !');

$idEntreprise=trim(preg_replace('/[^0-9]/', '', $_REQUEST['idEntreprise']))*1;	// Si id=0 alors non communiqu<71>
if (($siret*1)==0 && $idEntreprise==0) 										die('Param<61>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<63>s googlemap pour que cela fonctionne suivant les diff<66>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('/saisie/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<53>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<EFBFBD>re
		case '03':// P<EFBFBD>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<EFBFBD>talliques
		case '08':// Aures industries extractives
		case '09':// Services de soutien aux industries extractives
		// C Industrie manufacturi<72>re
		case '10':// Industries alimentaires
		case '11':// Fabrication de boissons
		case '12':// Fabrication de produits <EFBFBD> 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<6C>ge, <20> 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<EFBFBD>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<EFBFBD>raux non m<EFBFBD>talliques
		case '24':// M<EFBFBD>tallurgie
		case '25':// Fabrication de produits m<EFBFBD>talliques, <EFBFBD> l'exception des machines et des <EFBFBD>quipements
		case '26':// Fabrication de produits informatiques, <EFBFBD>lectroniques et optiques
		case '27':// Fabrication d'<EFBFBD>quipements <EFBFBD>lectriques
		case '28':// Fabrication de machines et <EFBFBD>quipements n.c.a.
		case '29':// Industrie automobile
		case '30':// Fabrication d'autres mat<EFBFBD>riels de transport
		case '31':// Fabrication de meubles
		case '32':// Autres industries manufacturi<EFBFBD>res
		case '33':// R<EFBFBD>paration et installation de machines et d'<EFBFBD>quipements
		// D Production et distribution d'<27>lectricit<69>, de gaz, de vapeur et d'air conditionn<6E>
		case '35':// Production et distribution d'<27>lectricit<69>, de gaz, de vapeur et d'air conditionn<EFBFBD>
    	// 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<EFBFBD>es
    	case '38':// Collecte, traitement et <EFBFBD>limination des d<EFBFBD>chets ; r<EFBFBD>cup<EFBFBD>ration
    	case '39':// D<EFBFBD>pollution et autres services de gestion des d<EFBFBD>chets
    	// F Construction
    	case '41':// Construction de b<EFBFBD>timents
    	case '42':// G<EFBFBD>nie civil
    	case '43':// Travaux de construction sp<EFBFBD>cialis<EFBFBD>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<EFBFBD>paration d'automobiles et de motocycles
    	case '46':// Commerce de gros, <EFBFBD> l'exception des automobiles et des motocycles
    	case '47':// Commerce de d<EFBFBD>tail, <EFBFBD> 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<EFBFBD>riens
    	case '53':// Activit<EFBFBD>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<EFBFBD>bergement
    	case '56':// Restauration
    	// J Information et communication
    	case '58':// <EFBFBD>dition
    	case '59':// Production de films cin<EFBFBD>matographiques, de vid<EFBFBD>o et de programmes de t<EFBFBD>l<EFBFBD>vision ; enregistrement sonore et <EFBFBD>dition musicale
    	case '60':// Programmation et diffusion
    	case '61':// T<EFBFBD>l<EFBFBD>communications
    	case '62':// Programmation, conseil et autres activit<EFBFBD>s informatiques
    	case '63':// Services d'information
    	// K Activit<69>s financi<63>res et d'assurance
    	case '64':// Activit<EFBFBD>s des services financiers, hors assurance et caisses de retraite
    	case '65':// Assurance
    	case '66':// Activit<EFBFBD>s auxiliaires de services financiers et d'assurance
    	// L Activit<69>s immobili<6C>res
    	case '68':// Activit<EFBFBD>s immobili<EFBFBD>res
    	// M Activit<69>s sp<73>cialis<69>es, scientifiques et techniques
    	case '69':// Activit<EFBFBD>s juridiques et comptables
    	case '70':// Activit<EFBFBD>s des si<EFBFBD>ges sociaux ; conseil de gestion
    	case '71':// Activit<EFBFBD>s d'architecture et d'ing<EFBFBD>nierie ; activit<EFBFBD>s de contr<EFBFBD>le et analyses techniques
    	case '72':// Recherche-d<EFBFBD>veloppement scientifique
    	case '73':// Publicit<EFBFBD> et <EFBFBD>tudes de march<EFBFBD>
    	case '74':// Autres activit<EFBFBD>s sp<EFBFBD>cialis<EFBFBD>es, scientifiques et techniques
    	case '75':// Activit<EFBFBD>s v<EFBFBD>t<EFBFBD>rinaires
    	// N Activit<69>s de services administratifs et de soutien
    	case '77':// Activit<EFBFBD>s de location et location-bail
    	case '78':// Activit<EFBFBD>s li<EFBFBD>es <EFBFBD> l'emploi
    	case '79':// Activit<EFBFBD>s des agences de voyage, voyagistes, services de r<EFBFBD>servation et activit<EFBFBD>s connexes
    	case '80':// Enqu<EFBFBD>tes et s<EFBFBD>curit<EFBFBD>
    	case '81':// Services relatifs aux b<EFBFBD>timents et am<EFBFBD>nagement paysager
    	case '82':// Activit<EFBFBD>s administratives et autres activit<EFBFBD>s de soutien aux entreprises
			$map->addMarkerIcon($urlimg.'img/icones/etab'.$etab['Actif'].'.png');
			break;

    	// O Administration publique
    	case '84':// Administration publique et d<EFBFBD>fense ; s<EFBFBD>curit<EFBFBD> sociale obligatoire
    	// P Enseignement
    	case '85':// Enseignement
			$map->addMarkerIcon($urlimg.'img/icones/admin'.$etab['Actif'].'.png');
			break;
    	// Q Sant<6E> humaine et action sociale
    	case '86':// Activit<EFBFBD>s pour la sant<EFBFBD> humaine
    	case '87':// H<EFBFBD>bergement m<EFBFBD>dico-social et social
    	case '88':// Action sociale sans h<EFBFBD>bergement
    	// R Arts, spectacles et activit<69>s r<>cr<63>atives
    	case '90':// Activit<EFBFBD>s cr<EFBFBD>atives, artistiques et de spectacle
    	case '91':// Biblioth<EFBFBD>ques, archives, mus<EFBFBD>es et autres activit<EFBFBD>s culturelles
    	case '92':// Organisation de jeux de hasard et d'argent
    	case '93':// Activit<EFBFBD>s sportives, r<EFBFBD>cr<EFBFBD>atives et de loisirs
    	// S Autres activit<69>s de services
    	case '94':// Activit<EFBFBD>s des organisations associatives
    	case '95':// R<EFBFBD>paration d'ordinateurs et de biens personnels et domestiques
    	case '96':// Autres services personnels
    	// T Activit<69>s des m<>nages en tant qu'employeurs ; activit<69>s indiff<66>renci<63>es des m<>nages en tant que producteurs de biens et services pour usage propre
    	case '97':// Activit<EFBFBD>s des m<EFBFBD>nages en tant qu'employeurs de personnel domestique
    	case '98':// Activit<EFBFBD>s indiff<EFBFBD>renci<EFBFBD>es des m<EFBFBD>nages en tant que producteurs de biens et services pour usage propre
    	// U Activit<69>s extra-territoriales
    	case '99'://Activit<EFBFBD>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(); ?>
</body>
</html>