286 lines
12 KiB
PHP
286 lines
12 KiB
PHP
|
<? /*<!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">
|
|||
|
|
<head>
|
|||
|
|
<meta http-equiv="content-type" content="text/html; charset=utf-8"/>
|
|||
|
|
<title>Google Maps JavaScript API Example</title>
|
|||
|
|
<script src="http://maps.google.com/maps?file=api&v=2&key=ABQIAAAAuKBtUyFonYJBl1fqfc78tRSYaqxLwFTMDT_MtTSFor1bsUZ_ChTvuzyTINkPMlW88Ar9fofaphzN3w"
|
|||
|
|
type="text/javascript"></script>
|
|||
|
|
<script type="text/javascript">
|
|||
|
|
|
|||
|
|
//<![CDATA[
|
|||
|
|
|
|||
|
|
function load() {
|
|||
|
|
if (GBrowserIsCompatible()) {
|
|||
|
|
var map = new GMap2(document.getElementById("map"));
|
|||
|
|
map.setCenter(new GLatLng(37.4419, -122.1419), 13);
|
|||
|
|
}
|
|||
|
|
}
|
|||
|
|
|
|||
|
|
//]]>
|
|||
|
|
</script>
|
|||
|
|
</head>
|
|||
|
|
<body onload="load()" onunload="GUnload()">
|
|||
|
|
<div id="map" style="width: 500px; height: 300px"></div>
|
|||
|
|
</body>
|
|||
|
|
</html>*/
|
|||
|
|
|
|||
|
|
|
|||
|
|
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';
|
|||
|
|
|
|||
|
|
$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
|
|||
|
|
*/
|
|||
|
|
|
|||
|
|
|
|||
|
|
$map->setAPIKey('ABQIAAAAuKBtUyFonYJBl1fqfc78tRSYaqxLwFTMDT_MtTSFor1bsUZ_ChTvuzyTINkPMlW88Ar9fofaphzN3w');
|
|||
|
|
|
|||
|
|
|
|||
|
|
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(EXTRANET_URL.'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(EXTRANET_URL.'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(EXTRANET_URL.'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(EXTRANET_URL.'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(EXTRANET_URL.'img/icones/etab'.$etab['Actif'].'.png');
|
|||
|
|
break;
|
|||
|
|
case '52':// Entreposage et services auxiliaires des transports
|
|||
|
|
$map->addMarkerIcon(EXTRANET_URL.'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(EXTRANET_URL.'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(EXTRANET_URL.'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(EXTRANET_URL.'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()">
|
|||
|
|
|
|||
|
|
<table width="500" border="0" align="left" bgcolor="#FFFFFF">
|
|||
|
|
<!--
|
|||
|
|
<tr>
|
|||
|
|
<td colspan="3" align="center"><img src="./img/rub_etablissements.png" width="577" height="36" /></td>
|
|||
|
|
</tr>
|
|||
|
|
<tr>
|
|||
|
|
<td width="30"> </td>
|
|||
|
|
<td width="200" class="StyleInfoLib">Numéro identifiant Siren</td>
|
|||
|
|
<td width="350" class="StyleInfoData"><?=substr($siren,0,3).' '.substr($siren,3,3).' '.substr($siren,6,3)?></td>
|
|||
|
|
</tr>
|
|||
|
|
<tr>
|
|||
|
|
<td width="30"> </td>
|
|||
|
|
<td width="200" class="StyleInfoLib">Raison Sociale</td>
|
|||
|
|
<td width="350" class="StyleInfoData"><?=$raisonSociale?></td>
|
|||
|
|
</tr>
|
|||
|
|
<tr>
|
|||
|
|
<td colspan="3"> </td>
|
|||
|
|
</tr>
|
|||
|
|
<tr>
|
|||
|
|
<td colspan="3"><img src="./img/srub_etablissements.png" width="576" height="27" /></td>
|
|||
|
|
</tr>
|
|||
|
|
-->
|
|||
|
|
<tr>
|
|||
|
|
<td width="500" class="StyleInfoData"><?php $map->printMap(); ?></td>
|
|||
|
|
</tr>
|
|||
|
|
<!--
|
|||
|
|
<tr>
|
|||
|
|
<td width="30"> </td>
|
|||
|
|
<td colspan="2" width="550" class="StyleInfoData"><?php $map->printSidebar(); ?></td>
|
|||
|
|
</tr>-->
|
|||
|
|
</table>
|
|||
|
|
</body>
|
|||
|
|
</html>
|