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('/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ège '; } else { $type='Etablissement '; } if ($etab['Actif']==1) $type.='actif'; else $type.='inactif'; $type.=' - '.$etab['NafEtabLib']; $title ="$siren ".$etab['Nic']." : $type
"; //etab['Nic'] if ($etab['Enseigne']<>'') $title.='Enseigne : '.$etab['Enseigne'].'
'; $texte =$etab['Adresse'].'
'; $adresse=$etab['Adresse'].' '; if ($etab['Adresse2']<>'') { $texte.=$etab['Adresse2'].'
'; if (strlen(trim($adresse))<7) $adresse=$etab['Adresse2'].' '; } $texte.=''.$etab['CP'].' '.$etab['Ville'].'
'; $adresse.=$etab['CP'].' '.$etab['Ville']; $texte.=''.$etab['NafEtab'].' : '.$etab['NafEtabLib'].''; $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; } } } ?> printHeaderJS(); ?> printMapJS(); ?> printMap(); ?>