332 lines
11 KiB
PHP
332 lines
11 KiB
PHP
|
<?if (!$_SESSION['connected']) {
|
|||
|
echo ('Vous devez <20>tre connect<63> afin de pouvoir utiliser cette fonctionnalit<69>');
|
|||
|
die();
|
|||
|
} else {
|
|||
|
$siret=trim(preg_replace('/[^0-9]/', '', $_REQUEST['siret']));
|
|||
|
if (strlen($siret)<>0 && strlen($siret)<>9 && strlen($siret)<>14) die('Param<61>tres incorrects !');
|
|||
|
|
|||
|
$id=trim(preg_replace('/[^0-9]/', '', $_REQUEST['id']))*1; // Si id=0 alors non communiqu<71>
|
|||
|
if (($siret*1)==0 && $id==0) die('Param<61>tres incorrects !');
|
|||
|
$siren=substr($siret,0,9);
|
|||
|
|
|||
|
if (isset($_REQUEST['id']) && $_REQUEST['id']*1<>0) $idCom=$_REQUEST['id'];
|
|||
|
else $idCom=false;
|
|||
|
|
|||
|
include_once(INCLUDE_PATH.'partenaires/classMTva.php');
|
|||
|
include_once(INCLUDE_PATH.'partenaires/classMMap.php');
|
|||
|
include_once(INCLUDE_PATH.'partenaires/classMCoface.php');
|
|||
|
include_once(FWK_PATH.'common/dates.php');
|
|||
|
|
|||
|
/** Utilisation du WS **/
|
|||
|
$client = new SoapClient(null, array( 'trace' => 1,
|
|||
|
'soap_version' => SOAP_1_1,
|
|||
|
'location' => WEBSERVICE_URL,
|
|||
|
'uri' => WEBSERVICE_URI,
|
|||
|
'login' => $_SESSION['tabInfo']['login'],
|
|||
|
'password' => $_SESSION['tabInfo']['password']));
|
|||
|
try {
|
|||
|
$O = $client->getInfosBourse($siren);
|
|||
|
$etab=$O['result'];
|
|||
|
} catch (SoapFault $fault) {
|
|||
|
echo '<pre>'.$client->__getLastResponse().'</pre>';
|
|||
|
echo 'ERREUR SOAP :'.EOL;
|
|||
|
print_r($fault);
|
|||
|
die();
|
|||
|
}
|
|||
|
$raisonSociale=$tabInfo['entrep']['raisonSociale'];
|
|||
|
?>
|
|||
|
<table width="580" border="0" align="left" bgcolor="#FFFFFF">
|
|||
|
<tr>
|
|||
|
<td colspan="3"><img src="./img/rub_bourse.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>
|
|||
|
<?
|
|||
|
if (trim($etab['Isin'])=='') {
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="580" class="StyleInfoLib" colspan="3"> </td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="550" class="StyleInfoLib" colspan="2">Société non côtée en bourse à ce jour.</td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
} else {
|
|||
|
|
|||
|
/**
|
|||
|
** On recherche un logo
|
|||
|
**/
|
|||
|
$urlImg='';
|
|||
|
$siteWeb='';
|
|||
|
if ($etab['Isin']<>'') {
|
|||
|
$locImg=PATH_LOGOS.$etab['Isin'];
|
|||
|
if (file_exists($locImg.'.gif')) { $urlImg='/img/logos/'.$etab['Isin'].'.gif'; $ext='.gif'; }
|
|||
|
elseif (file_exists($locImg.'.png')) { $urlImg='/img/logos/'.$etab['Isin'].'.png'; $ext='.png'; }
|
|||
|
elseif (file_exists($locImg.'.jpg')) { $urlImg='/img/logos/'.$etab['Isin'].'.jpg'; $ext='.jpg'; }
|
|||
|
elseif (file_exists($locImg.'.jpeg')) { $urlImg='/img/logos/'.$etab['Isin'].'.jpeg'; $ext='.jpeg'; }
|
|||
|
}
|
|||
|
|
|||
|
if ($urlImg=='') {
|
|||
|
$locImg=PATH_LOGOS.$etab['Siren'];
|
|||
|
if (file_exists($locImg.'.gif')) { $urlImg='/img/logos/'.$etab['Siren'].'.gif'; $ext='.gif'; }
|
|||
|
elseif (file_exists($locImg.'.png')) { $urlImg='/img/logos/'.$etab['Siren'].'.png'; $ext='.png'; }
|
|||
|
elseif (file_exists($locImg.'.jpg')) { $urlImg='/img/logos/'.$etab['Siren'].'.jpg'; $ext='.jpg'; }
|
|||
|
elseif (file_exists($locImg.'.jpeg')) { $urlImg='/img/logos/'.$etab['Siren'].'.jpeg'; $ext='.jpeg'; }
|
|||
|
}
|
|||
|
|
|||
|
if (trim($etab['Web'])<>'') {
|
|||
|
if (substr($etab['Web'],0,7)<>'http://')
|
|||
|
$siteWeb='http://'.$etab['Web'];
|
|||
|
else
|
|||
|
$siteWeb=$etab['Web'];
|
|||
|
}
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Code ISIN</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['Isin']; if (trim($etab['CodeSicovam'])*1>0) echo ' <b>(ancien code Sicovam : </b>'.$etab['CodeSicovam'].'<b>)</b>';?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Code Mnémo</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['CodeMnemo']?></td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
if(trim($etab['CodeBloomberg'])<>'') {
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Code Bloomberg</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['CodeBloomberg']?></td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
}
|
|||
|
if(trim($etab['CodeDatastream'])<>'') {
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Code Datastream</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['CodeDatastream']?></td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
}
|
|||
|
if(trim($etab['CodeRic'])<>'') {
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Code Ric</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['CodeRic']?></td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
}
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Place de cotation</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['placeCotation']?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Marché</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['Marche']?></td>
|
|||
|
</tr>
|
|||
|
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Nombre de titres</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['nombreTitres'],0,'', ' ')?> titres</td>
|
|||
|
</tr>
|
|||
|
<? switch (trim(strtoupper($etab['EligibleSRD']))) {
|
|||
|
case 'O': $srd='Oui'; break;
|
|||
|
default: $srd='Non'; break;
|
|||
|
}
|
|||
|
switch (trim(strtoupper($etab['EligiblePEA']))) {
|
|||
|
case 'O': $pea='Oui'; break;
|
|||
|
default: $pea='Non'; break;
|
|||
|
}
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Éligible SRD / PEA</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$srd?> / <?=$pea?></td>
|
|||
|
</tr>
|
|||
|
|
|||
|
<?
|
|||
|
if ($urlImg<>'') {
|
|||
|
$tabTmp=@getimagesize($locImg.$ext);
|
|||
|
$w=$tabTmp[0];
|
|||
|
$h=$tabTmp[1];
|
|||
|
if ($w>350) $strSize=@redimage($locImg.$ext,350,150);
|
|||
|
else $strSize='';
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Logo</td>
|
|||
|
<td width="350" class="StyleInfoData"><img src="<?=$urlImg?>" <?=$strSize?>/></td>
|
|||
|
</tr>
|
|||
|
<? }
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td colspan="3"> </td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td colspan="3"><img src="./img/srub_coordonnees.png" width="576" height="27"></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Raison Sociale</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['RaisonSociale']?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Adresse</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['Adresse']?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Date d'introduction en bourse</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['DateIntroduction']?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Date dernière assemblée générale</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['DateDerAG']?></td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
if (trim($etab['DateRadiation'])<>'' && $etab['DateRadiation']<>'0000-00-00') {
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Date de radiation</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['DateRadiation']?></td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
// 'AutreIsin'=>$bourse['autre_isin'],
|
|||
|
}
|
|||
|
?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Téléphone</td>
|
|||
|
<td width="350" class="StyleInfoData"><?
|
|||
|
if (strlen(trim($etab['Tel']))>5) echo $etab['Tel'].' ';
|
|||
|
if (strlen(trim($etab['Tel2']))>5) echo $etab['Tel2'];
|
|||
|
?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Fax</td>
|
|||
|
<td width="350" class="StyleInfoData"><?
|
|||
|
if (strlen(trim($etab['Fax']))>5) echo $etab['Fax'].' ';
|
|||
|
if (strlen(trim($etab['Fax2']))>5) echo $etab['Fax2'];
|
|||
|
?></td>
|
|||
|
</tr>
|
|||
|
<?
|
|||
|
if ($siteWeb<>'') { ?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Site Internet</td>
|
|||
|
<td width="350" class="StyleInfoData"><a href="<?=$siteWeb?>" target="_blank"><?=$siteWeb?></a></td>
|
|||
|
</tr>
|
|||
|
<? }
|
|||
|
|
|||
|
if (trim($etab['Mail'])<>'') { ?>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Courriel</td>
|
|||
|
<td width="350" class="StyleInfoData"><a href="mailto:<?=$etab['Mail'];?>" target="_blank"><?=$etab['Mail']?></a></td>
|
|||
|
</tr>
|
|||
|
<? } ?>
|
|||
|
<tr>
|
|||
|
<td colspan="3"> </td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td colspan="3"><img src="./img/srub_activites.png" width="576" height="27"></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Activité</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['Activite']?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Secteur</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=$etab['Secteur']?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="550" colspan="2" class="StyleInfoData"><?=str_replace("\n", '<br/>',$etab['ActiviteDet'])?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td colspan="3"> </td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td colspan="3"><img src="./img/srub_dercours.png" width="576" height="27"></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Dernière cotation connue</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=WDate::dateT('Y-m-d','d/m/Y',$etab['derCoursDate'])?></td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Cl<EFBFBD>ture</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['derCoursCloture'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Ouverture</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['derCoursOuverture'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Plus haut</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['derCoursPlusHaut'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Plus Bas</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['derCoursPlusBas'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Volume échang<EFBFBD></td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['derCoursVolume'],0,'', ' ')?> titres (<?=number_format($etab['derCoursVolume']/$etab['nombreTitres'],2,',', ' ')?> %)</td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Capitalisation</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['capitalisation'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
<tr><td colspan="3"> </td></tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Minimum historique</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['coursMin'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Maximum historique</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['coursMax'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
<tr>
|
|||
|
<td width="30"> </td>
|
|||
|
<td width="200" class="StyleInfoLib">Cours moyen</td>
|
|||
|
<td width="350" class="StyleInfoData"><?=number_format($etab['coursMoy'],2,',', ' ')?> €</td>
|
|||
|
</tr>
|
|||
|
|
|||
|
<?
|
|||
|
}
|
|||
|
}
|
|||
|
?>
|
|||
|
</table>
|
|||
|
<!--'Effectif'
|
|||
|
-->
|