extranet/includes/scoresws/identite.php
2009-10-23 13:34:42 +00:00

631 lines
18 KiB
PHP

<?php
function identite_siret($siren, $siret)
{
$lib = 'Num&eacute;ro identifiant Siret';
$data = substr($siren,0,3).' '.substr($siren,3,3).' '.substr($siren,6,3).'&nbsp; <i>'.substr($siret,9,5).'</i>';
return array( $lib , $data );
}
function identite_siretsiege($siret)
{
$lib = 'Num&eacute;ro identifiant Siret du si&egrave;ge';
$data = substr($siret,0,3).' '.substr($siret,3,3).' '.substr($siret,6,3).'&nbsp; <i>'.substr($siret,9,5).'</i>';
return array( $lib , $data );
}
function identite_tvanumero($tvaNumero, $tvaAttribue, $dept)
{
$lib = 'Num&eacute;ro de TVA Intracom.';
$data = '';
if($dept*1==97)
{
$data.= '<a href="http://eur-lex.europa.eu/LexUriServ/LexUriServ.do?uri=CELEX:31991L0680:FR:HTML" target="_blank">Non attribu&eacute dans les D.O.M.</a>';
}
else
{
$data.= substr($tvaNumero,0,2).' '.substr($tvaNumero,2,2).' '.substr($tvaNumero,-9);
if (!$tvaAttribue)
$data.= '&nbsp;<img src="./img/exclamation.png" title="Non validé. Obligatoire sur factures, déclarations d\'échange de biens et de TVA !">';
}
return array( $lib , $data );
}
function identite_isin($isin, $siret)
{
if ($isin!='')
{
$lib = 'Code ISIN';
$data = '<a href="./?page=bourse&siret='.$siret.'" title="Voir les informations boursi&eacute;res">'.$isin.'</a>';
return array( $lib , $data );
}
else
{
return false;
}
}
function identite_capitalisation($bourse, $isin)
{
if ($etab['Isin']!='' && $bourse['capitalisation']!=0)
{
$lib = 'Capitalisation';
$data = number_format($bourse['capitalisation'],0,'', ' ').' &euro; au '.WDate::dateT('Y-m-d','d/m/Y',$bourse['derCoursDate']);
return array( $lib , $data );
}
else
{
return false;
}
}
function identite_logo()
{
$lib = 'Logo';
}
function identite_numrc($numRC)
{
if (isset($numRC) && $numRC!='')
{
$lib = 'Num&eacute;ro R.C.';
$data = $numRC;
return array( $lib , $data );
}
else
{
return false;
}
}
function identite_autreid($autreId, $tribunalLib, $numRC)
{
if (isset($autreId) && $autreId!='' && ( (isset($numRC) && $numRC=='') || substr($autreId,0,1)=='W'))
{
$libTrib = '';
if (substr($autreId,0,1)=='W') $lib = 'Identifiant Association WALDEC';
elseif (preg_match('/(A|B|C|D)/i', $autreId))
{
$lib = 'Num&eacute;ro R.C.';
$libTrib = ' RCS '.preg_replace('/(^TC |^TI |^TGIcc |^TMX )/i','',$tribunalLib);
}
elseif (preg_match('/(P)/i', $etab['AutreId']))
{
$lib = 'Num&eacute;ro R.S.A.C.';
$libTrib = ' RSAC '.preg_replace('/(^TC |^TI |^TGIcc |^TMX )/i','',$tribunalLib);
}
$data = $autreId.$libTrib;
return array( $lib , $data );
}
else
{
return false;
}
}
function identite_actif($siren, $siret, $idEntreprise, $siege, $actif, $dateClotEt)
{
$lib = 'Etablissement actif';
if ($siege==0)
$lib.= '<br/><a title="Voir la fiche d\'identité du siège de l\'entreprise" href="/?page=identite&siret='.$siren.'&idEntreprise='.$idEntreprise.'">Acc&egrave;s à la fiche du si&egrave;ge</a>';
if ($actif==1)
$data = 'Oui';
else {
$data = '<b>NON</b>';
$dateCloture=str_replace('-','',$dateClotEt);
if ($dateClotEt<>'')
$data.= "<i>&nbsp;(Fin d'activité en ".WDate::dateT('Ymd', 'm/Y', $dateCloture).')</i>';
}
if ($siren*1<>0 && preg_match('/AVISINSEE/i', $_SESSION['tabInfo']['droits']))
$data.='&nbsp;&nbsp;&nbsp;<a title="Voir l\'avis de situation correspondant de l\'INSEE" target="_blank" href="/?page=avis&siret='.$siret.'">(Situation au r&eacute;pertoire SIRENE)</a>';
return array( $lib , $data );
}
function identite_situationjuridique($situationjuridique, $dateRadiation, $siret, $idEntreprise)
{
if ( $situationjuridique=='P' || $situationjuridique[0]=='R' || $_SESSION['tabInfo']['mode_edition']==1)
{
$lib = 'Situation juridique';
$dateRad = '';
if(isset($dateRadiation) && $dateRadiation!='' && $dateRadiation!='0000-00-00'){
$dateRad = WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$dateRadiation));
}
if ($situationjuridique=='P')
{
$data = '<a href="./?page=annonces&siret='.$siret.'&idEntreprise='.$idEntreprise.'">'.
'<font color="red"><b>En proc&eacute;dure collective</b></font>'.
'</a>';
if($dateRadiation!=''){ $data.= '<br/>Radié du RCS le '.$dateRad; }
}
//Radiation
if($situationjuridique=='RR')
{
$data.= 'Radié du RCS';
if($dateRadiation!=''){ $data.= ' le '.$dateRad; }
}elseif($situationjuridique=='RP'){
$data.= 'Radiation publiée';
if($dateRadiation!=''){ $data.= ' le '.$dateRad; }
}
//Mode Edition
if ($_SESSION['tabInfo']['mode_edition']==1)
{
$data.= '<a href="./?page=saisie&siret='.$siret.'&idEntreprise='.$idEntreprise.'">(Edition)</a>';
}
return array( $lib , $data );
}
else
{
return false;
}
}
function identite_raisonsociale($nom, $nom2, $nomlong)
{
$lib = 'Raison Sociale';
$title = '';
if(isset($nomlong) && $nomlong!='' && $nomlong!=$nom )
$title = $nomlong;
$data = $nom;
if ($nom2!='') $data.= '<br/>'.$nom2;
return array( $lib , $data , $title );
}
function identite_enseignesigle($enseigne, $sigle, $siglelong)
{
$lib = '';
if ($enseigne!='' && $sigle!=''){
$lib='Enseigne / Sigle';
$data=$enseigne.' / '.$sigle;
}elseif($enseigne!='' && $sigle=='' && $siglelong!='' ){
$lib='Enseigne / Sigle';
$data=$enseigne.' / '.$siglelong;
}elseif($enseigne!='' && $sigle==''){
$lib='Enseigne';
$data=$enseigne;
}elseif($enseigne=='' && $sigle!=''){
$lib='Sigle';
$data=$sigle;
}elseif($enseigne=='' && $sigle=='' && $siglelong!=''){
$lib='Sigle';
$data=$siglelong;
}
$title = '';
if( isset($siglelong) && $siglelong!='' && $siglelong!=$sigle)
$title = $siglelong;
if($lib!='')
{
return array($lib, $data, $title);
}
else
{
return false;
}
}
function identite_fj($fj, $fjLib, $fj2, $fj2Lib)
{
$lib = 'Forme juridique';
$data = $fj.' : '.strWsToHtml($fjLib);
if(isset($fj2) && $fj2!='' && isset($fj2Lib) && $fj2Lib!='')
{
$data.= '<img src="./img/exclamation.png" title="Forme jurique au RCS : '.$fj2Lib.' ('.$fj2.')"/>';
}
return array($lib, $data);
}
function identite_dateimmat($dateimmat)
{
$dateImmat = '';
if(isset($dateimmat) && $dateimmat!='' && $dateimmat!='0000-00-00'){
$dateImmat = WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$dateimmat));
}
if($dateImmat!='')
{
$lib = 'Date d\'immatriculation';
$data = $dateImmat;
return array($lib, $data);
}
else
{
return false;
}
}
function identite_datecreaen($datecreaen)
{
$lib = 'Cr&eacute;ation de l\'entreprise';
$dateCreationEn=str_replace('-','',$datecreaen);
if (substr($dateCreationEn,-2)*1==0)
$data = WDate::dateT('Ymd', 'm/Y', $dateCreationEn);
else
$data = WDate::dateT('Ymd', 'd/m/Y', $dateCreationEn);
return array($lib, $data);
}
function identite_datecreaet($datecreaet)
{
$lib = 'Cr&eacute;ation de l\'&eacute;tablissement';
$dateCreationEt=str_replace('-','',$datecreaet);
if ($dateCreationEt*1<>0) {
if (substr($dateCreationEt,-2)*1==0)
$data = WDate::dateT('Ymd', 'm/Y', $dateCreationEt);
else
$data = WDate::dateT('Ymd', 'd/m/Y', $dateCreationEt);
} else $data = 'N/C';
return array($lib, $data);
}
function identite_adresse($adresse, $adresse2, $num, $rue, $cp, $ville, $pays)
{
$lib = 'Adresse';
if($rue==''){ $voie = $adresse2; }else{ $voie = $rue; }
$data = '<a href="/?page=recherche&vue=list&formR[type]=ent&formR[numVoie]='.urlencode($num).'&formR[voie]='.urlencode($voie).'&formR[cpVille]='.urlencode($cp).'" title="Rechercher à partir de cette adresse">';
$data.= '<p class="adresse">'.$adresse.'</p>';
if (preg_match('/CHEZ SOFRADOM/i',$adresse2))
$etab['Adresse2']='<a title="Voir la fiche d\'identité du domiciliataire de cette entreprise" href="/?page=identite&siret=42495045900018&idEntreprise=6720043">CHEZ SOFRADOM</a>';
//http://extranet.devlocal.com/?page=identite&siret=42495045900018&idEntreprise=6720043
if ($adresse2<>'')
$data.= '<p class="adresse">'.$adresse2.'</p>';
$cp=$cp*1;
if ($cp!=0)
$data.= '<p class="adresse">'.$cp.'&nbsp;'.strWsToHtml($ville).'</p>';
if ($pays!='' && strtoupper(substr($pays,0,3))!='FRA')
$data.= '<p class="adresse">'.strWsToHtml($pays).'</p>';
$data.= '</a>';
return array($lib, $data);
}
function identite_zones($geoinfos)
{
if (@$geoinfos['ZUS']=='OUI' || @$geoinfos['ZFU']=='OUI' || @$geoinfos['ZRU']=='OUI' || @$geoinfos['CUCS']=='OUI' || @$geoinfos['ZRR']=='OUI' || @$geoinfos['AFR']=='OUI')
{
$lib = 'Zones prioritaires';
$data = '';
if ($geoinfos['ZUS']=='OUI') $data.= '<a href="http://sig.ville.gouv.fr/Territoire/'.$geoinfos['NZUS'].'" target="_blank">ZUS n°'.$geoinfos['NZUS'].'</a><br/>';
if ($geoinfos['ZFU']=='OUI') $data.= '<a href="http://sig.ville.gouv.fr/Territoire/'.$geoinfos['NZFU'].'" target="_blank">ZFU n°'.$geoinfos['NZFU'].'</a><br/>';
if ($geoinfos['ZRU']=='OUI') $data.= '<a href="http://sig.ville.gouv.fr/Territoire/'.$geoinfos['NZRU'].'" target="_blank">ZRU n°'.$geoinfos['NZRU'].'</a><br/>';
if ($geoinfos['ZRR']=='OUI') $data.= '<a href="http://www.diact.gouv.fr/IMG/Fichiers/Rural%20/ZRR/carte_zrr_20090409.pdf" target="_blank">ZRR n°'.$geoinfos['NZRR'].'</a><br/>';
if ($geoinfos['AFR']=='OUI') $data.= '<a href="http://www.diact.gouv.fr/IMG/Fichiers/AFR/com_fr_AFR0907.pdf" target="_blank">AFR n°'.$geoinfos['NAFR'].'</a><br/>';
if ($geoinfos['CUCS']=='OUI') $data.= '<a href="http://sig.ville.gouv.fr/Territoire/'.$geoinfos['NCUCS'].'" target="_blank">CUCS n°'.$geoinfos['NCUCS'];
return array($lib, $data);
}
else
{
return false;
}
}
function identite_tel($tel, $enseigne, $nom, $adresse, $cp, $ville)
{
$lib = 'T&eacute;l&eacute;phone';
$data = '';
$data.= '<div class="txtAdresse">';
$data.= '<p>';
if (trim($tel)=='') $data.= 'N/C';
else $data.= $tel;
if ($enseigne!='') $libNom = urlencode($enseigne);
else $libNom = urlencode($nom);
$i_adr=0;
while (substr($adresse,0,1)=='0')
{
$i_adr++;
$adresse = substr($adresse,1,strlen($adresse)-1);
if ($i_adr>4) break;
}
$data.= '&nbsp;<a title="Rechercher le num&eacute;ro de t&eacute;l&eacute;phone dans l\'annuaire" target="_blank" href="http://local.search.ke.voila.fr/S/searchproxi?act=&nom='.$libNom.'&adr='.urlencode(utf8_decode($adresse)).'&loc='.urlencode(utf8_decode($cp.' '.$ville)).'&x=0&y=0&bhv=searchproxi&profil=enville&guidelocid=&guideregid=&guidedepid=&actid=&ke=&locid=">(Recherche annuaire)</a></p>';
$data.= '</div>';
return array($lib, $data);
}
function identite_fax($fax)
{
if($fax*1>0){
$lib = 'Fax';
$data = $fax;
return array($lib, $data);
}
else
{
return false;
}
}
function identite_web($web)
{
if ($web!='')
{
if (substr($web,0,7)!='http://') $siteWeb = 'http://'.$web;
else $siteWeb = $web;
$lib = 'Site Internet';
$data = '<a href="'.$siteWeb.'" target="_blank">'.$siteWeb.'</a>';
return array($lib, $data);
}
else
{
return false;
}
}
function identite_mail($email)
{
if (trim($email)!='')
{
$lib = 'Courriel';
$data = '<a href="mailto:'.$email.'" target="_blank">'.$email.'</a>';
return array($lib, $data);
}
else
{
return false;
}
}
function identite_activiteen($activite, $nafent, $nafentlib)
{
$lib = 'Activit&eacute; de l\'entreprise';
if ($activite!='' && !preg_match('/non pr(e|é)cis(e|é)/i',utf8_decode($activite))) {
$texte = preg_replace_callback("/((?:[0-9]{9,9})|(?:[0-9]{3,3} [0-9]{3,3} [0-9]{3,3})|(?:[0-9]{3,3}\.[0-9]{3,3}\.[0-9]{3,3})|(?:[0-9]{3,3}-[0-9]{3,3}-[0-9]{3,3}))/", replace_siren, strWsToHtml($activite));
$data = $texte.' ('.$nafent.' : '. strWsToHtml($nafentlib).')';
} else
$data = $nafent.' : '. strWsToHtml($nafentlib);
return array($lib, $data);
}
function identite_activiteet($nafetab, $nafetablib)
{
$lib = 'Activit&eacute; de l\'&eacute;tablissement';
$data = $nafetab.' : '. strWsToHtml($nafetablib);
return array($lib, $data);
}
function identite_naf4($naf4ent, $naf4entlib, $naf4etab, $naf4etablib)
{
if (preg_match('/NAF4/i', $_SESSION['tabInfo']['pref']) && trim(@$naf4ent)!='')
{
$lib = 'Anciens codes NAF';
$data = $naf4ent.' - '.strWsToHtml($naf4entlib).'<br/><b>&Eacute;tab. :</b> '.$naf4etab.' - '. strWsToHtml($naf4etablib);
return array($lib, $data);
}
else
{
return false;
}
}
function identite_natureactivite($natureactivite, $actif)
{
if ($natureactivite==1 && $actif==1)
{
$lib = 'Nature de l\'activité';
$data = 'Saisonni&egrave;re';
return array($lib, $data);
}
else
{
return false;
}
}
function identite_originefond($originecreation)
{
if ( ( $originecreation*1>0 && $originecreation*1<9 ) ||
$originecreation=='A' || $originecreation=='B' || $originecreation=='C' ||
$originecreation=='D' || $originecreation=='E' )
{
$tabCreation=array(
'a1'=>'Création',
'a3'=>'Achat',
'a4'=>'Apport',
'a6'=>'Prise en location gérance',
'a7'=>'Partage',
'a8'=>'Reprise',
'aA'=>'Reprise globale de l\'exploitation agricole',
'aB'=>'Poursuite de l\'exploitation agricole par le conjoint',
'aC'=>'Transfert de propriété de l\'exploitation agricole',
'aD'=>'Apport d\'exploitation(s) agricole(s) individuelle(s)',
'aE'=>'Reprise d\'exploitation agricole individuelle',
);
$lib = 'Origine du fonds';
$data = $tabCreation['a'.$originecreation];
return array($lib, $data);
}
else
{
return false;
}
}
function identite_typeexploitation($type)
{
if ( isset($type) && $type!=0 )
{
$tabTypeExploitation = array(
1 => "Locataire du fond de commerce",
2 => "Loueur du fond de commerce",
3 => "Prestation de personnel",
10 => "Exploitation directe"
);
$lib = 'Type d\'exploitation';
$data = $tabTypeExploitation[$type];
return array($lib, $data);
}
else
{
return false;
}
}
function identite_nbetabactif($nbetab, $siret, $idEntreprise)
{
if ($nbetab!='N/C')
{
$lib = 'Nombre d\'&eacute;tablissements actifs';
$data = '<a title="Voir la liste des &eacute;tablissements" href="/?page=etablissements&siret='.$siret.'&idEntreprise='.$idEntreprise.'">'.number_format($nbetab*1,null,null,' ').'</a>';
if ($nbetab*1>1)
{
$data.= '&nbsp;<a title="Voir la liste des &eacute;tablissements" href="/?page=etablissements&siret='.$siret.'&idEntreprise='.$idEntreprise.'">(Liste)</a>';
}
return array($lib, $data);
}else{
return false;
}
}
function identite_capital($capital, $capitaldev, $capitallib, $capitaltype, $bilan)
{
if (isset($capital) && $capital*1>0)
{
$title = '';
if(isset($bilan['Capital'])) $title.='Capital de '.moneyKM($bilan['Capital']).deviseText($bilan['Devise']);
if(isset($bilan['Cloture'])) $title.=' au '.WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$bilan['Cloture']));
$lib = 'Capital';
if (isset($capitaltype) && $capitaltype=='V'){print 'variable';}
$data = number_format($capital,0,',',' ').'&nbsp;';
if ($capitaldev='EUR') $data.= '&euro;';
else $data.= $capitaldev.' ('.strWsToHtml($capitallib).')';
return array($lib, $data, $title);
}else{
return false;
}
}
function identite_ca($bilan, $trancheCALib)
{
$lib = 'Chiffre d\'affaire';
$title = '';
if(isset($bilan['CA'])) $title.='Chiffre d\'affaire de '.moneyKM($bilan['CA']).deviseText($bilan['Devise']);
if(isset($bilan['Resultat'])) $title.=' et Résultat de '.moneyKM($bilan['Resultat']).deviseText($bilan['Devise']);
if(isset($bilan['Cloture'])) $title.=' au '.WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$bilan['Cloture']));
if(isset($bilan['CA']) && (!isset($trancheCALib) || $trancheCALib=='N/C'))
{
$data = moneyKM($bilan['CA']).deviseText($bilan['Devise']).' au '.WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$bilan['Cloture']));
}elseif(isset($trancheCALib) && $trancheCALib!='N/C'){
$data = strWsToHtml($trancheCALib);
}else{
$data = 'N/C';
}
return array($lib, $data, $title);
}
function identite_dirigeants($Dir1Titre, $Dir1NomPrenom, $Dir1DateNaiss, $Dir1LieuNaiss, $Dir2Titre, $Dir2NomPrenom, $Dir2DateNaiss, $Dir2LieuNaiss)
{
$lib = 'Principaux Dirigeants';
$dir1DateNaiss = '';
if(isset($Dir1DateNaiss) && $Dir1DateNaiss!='' && $Dir1DateNaiss!='0000-00-00'){
$dir1DateNaiss = WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$Dir1DateNaiss));
}
$dir1LieuNaiss = '';
if(isset($Dir1LieuNaiss) && $Dir1LieuNaiss!=''){
$dir1LieuNaiss = $Dir1LieuNaiss;
}
$dir2DateNaiss = '';
if(isset($Dir2DateNaiss) && $Dir2DateNaiss!='' && $Dir2DateNaiss!='0000-00-00'){
$dir2DateNaiss = WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$Dir2DateNaiss));
}
$dir2LieuNaiss = '';
if(isset($Dir2LieuNaiss) && $Dir2LieuNaiss!=''){
$dir2LieuNaiss = $Dir2LieuNaiss;
}
$dir1NaissText = '';
if($dir1DateNaiss!='') $dir1NaissText.= 'né(e) le '.$dir1DateNaiss;
if($dir1LieuNaiss!='' && $dir1NaissText!='') $dir1NaissText.= ' à '.$dir1LieuNaiss;
elseif($dir1LieuNaiss!='' && $dir1NaissText=='') $dir1NaissText.= 'né(e) à '.$dir1LieuNaiss;
$dir2NaissText = '';
if($dir2DateNaiss!='') $dir2NaissText.= 'né(e) le '.$dir2DateNaiss;
if($dir2LieuNaiss!='' && $dir2NaissText!='') $dir2NaissText.= ' à '.$dir2LieuNaiss;
elseif($dir2LieuNaiss!='' && $dir2NaissText=='') $dir2NaissText.= 'né(e) à '.$dir2LieuNaiss;
$data = '<div class="txtAdresse">';
$data.= '<p><u><b>'.strWsToHtml(ucfirst($Dir1Titre)).'</b></u><br/>'.strWsToHtml($Dir1NomPrenom);
if($dir1NaissText!=''){ $data.=', '.$dir1NaissText; }
$data.= '</p></div>';
if ($Dir2Titre!='') {
$data.= '<br/>';
$data.= '<div class="txtAdresse">';
$data.= '<p><u><b>'.strWsToHtml(ucfirst($Dir2Titre)).'</b>:</u><br/>'.strWsToHtml($Dir2NomPrenom);
if($dir2NaissText!=''){ $data.=', '.$dir2NaissText; }
$data.= '</p></div>';
}
return array($lib, $data);
}
function identite_effectif($effectif, $bilan)
{
$lib = 'Effectif de l\'entreprise';
$title = '';
if(isset($bilan['Effectif'])) $title.=$bilan['Effectif'].' salarié(s)';
if(isset($bilan['Cloture'])) $title.=' au '.WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$bilan['Cloture']));
if( (!isset($effectif) || $effecif=='N/C' || $effectif==0) && isset($bilan['Effectif']))
{
$data = $title;
}elseif(isset($effectif) && $effectif!='N/C' && $effectif!=0 ){
$data = number_format($effectif*1,null,null,' ').' salarié(s)';
}else{
$data = 'N/C';
}
return array($lib, $data, $title);
}
function normaliseVoie($voie) {
switch (strtoupper($voie)) {
case 'BD': case 'BVD': return 'BOULEVARD'; break;
case 'AV': case 'AVE': return 'AVENUE'; break;
case 'PL': case 'PLA': return 'PLACE'; break;
case 'ESP': return 'ESPLANADE'; break;
//- 8E__ARRONDISSEMENT
default; return strtoupper($voie); break;
}
}
function identite_infogeo($geoPrecis, $geoLat, $geoLong, $ville, $num, $voie, $rue, $cp)
{
}
function identite_commune()
{
}