'.substr($siret,9,5).'';
return array( $lib , $data );
}
function identite_siretsiege($siret)
{
$lib = 'Numéro identifiant Siret du siège';
$data = substr($siret,0,3).' '.substr($siret,3,3).' '.substr($siret,6,3).' '.substr($siret,9,5).'';
return array( $lib , $data );
}
function identite_tvanumero($tvaNumero, $tvaAttribue, $dept)
{
$lib = 'Numéro de TVA Intracom.';
$data = '';
if($dept*1==97)
{
$data.= 'Non attribué dans les D.O.M.';
}
else
{
$data.= substr($tvaNumero,0,2).' '.substr($tvaNumero,2,2).' '.substr($tvaNumero,-9);
if (!$tvaAttribue)
$data.= ' ';
}
return array( $lib , $data );
}
function identite_isin($isin, $siret)
{
if ($isin!='')
{
$lib = 'Code ISIN';
$data = ''.$isin.'';
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,'', ' ').' € 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é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éro R.C.';
$libTrib = ' RCS '.preg_replace('/(^TC |^TI |^TGIcc |^TMX )/i','',$tribunalLib);
}
elseif (preg_match('/(P)/i', $etab['AutreId']))
{
$lib = 'Numé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.= '
Accès à la fiche du siège';
if ($actif==1)
$data = 'Oui';
else {
$data = 'NON';
$dateCloture=str_replace('-','',$dateClotEt);
if ($dateClotEt<>'')
$data.= " (Fin d'activité en ".WDate::dateT('Ymd', 'm/Y', $dateCloture).')';
}
if ($siren*1<>0 && preg_match('/AVISINSEE/i', $_SESSION['tabInfo']['droits']))
$data.=' (Situation au répertoire SIRENE)';
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 = ''.
'En procédure collective'.
'';
if($dateRad!=''){ $data.= '
Radié du RCS le '.$dateRad; }
}
//Radiation
if($situationjuridique=='RR')
{
$data.= 'Radié du RCS';
if($dateRad!=''){ $data.= ' le '.$dateRad; }
}elseif($situationjuridique=='RP'){
$data.= 'Radiation publiée';
if($dateRad!=''){ $data.= ' le '.$dateRad; }
}
//Mode Edition
if ($_SESSION['tabInfo']['mode_edition']==1)
{
$data.= '(Edition)';
}
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.= '
'.$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.= '';
}
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é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éation de l\'é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 = '';
$data.= ''.$adresse.'
';
if (preg_match('/CHEZ SOFRADOM/i',$adresse2))
$etab['Adresse2']='CHEZ SOFRADOM';
//http://extranet.devlocal.com/?page=identite&siret=42495045900018&idEntreprise=6720043
if ($adresse2<>'')
$data.= '
'.$adresse2.'
';
$cp=$cp*1;
if ($cp!=0)
$data.= ''.$cp.' '.strWsToHtml($ville).'
';
if ($pays!='' && strtoupper(substr($pays,0,3))!='FRA')
$data.= ''.strWsToHtml($pays).'
';
$data.= '';
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.= 'ZUS n°'.$geoinfos['NZUS'].'
';
if ($geoinfos['ZFU']=='OUI') $data.= 'ZFU n°'.$geoinfos['NZFU'].'
';
if ($geoinfos['ZRU']=='OUI') $data.= 'ZRU n°'.$geoinfos['NZRU'].'
';
if ($geoinfos['ZRR']=='OUI') $data.= 'ZRR n°'.$geoinfos['NZRR'].'
';
if ($geoinfos['AFR']=='OUI') $data.= 'AFR n°'.$geoinfos['NAFR'].'
';
if ($geoinfos['CUCS']=='OUI') $data.= 'CUCS n°'.$geoinfos['NCUCS'];
return array($lib, $data);
}
else
{
return false;
}
}
function identite_tel($tel, $enseigne, $nom, $adresse, $cp, $ville)
{
$lib = 'Téléphone';
$data = '';
$data.= '';
$data.= '
';
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.= ' (Recherche annuaire)
';
$data.= '
';
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 = ''.$siteWeb.'';
return array($lib, $data);
}
else
{
return false;
}
}
function identite_mail($email)
{
if (trim($email)!='')
{
$lib = 'Courriel';
$data = ''.$email.'';
return array($lib, $data);
}
else
{
return false;
}
}
function identite_activiteen($activite, $nafent, $nafentlib)
{
$lib = 'Activité 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é de l\'é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).'
Étab. : '.$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è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\'établissements actifs';
$data = ''.number_format($nbetab*1,null,null,' ').'';
if ($nbetab*1>1)
{
$data.= ' (Liste)';
}
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,',',' ').' ';
if ($capitaldev='EUR') $data.= '€';
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']) && !empty($bilan['CA']) ) $title.='Chiffre d\'affaire de '.moneyKM($bilan['CA']).deviseText($bilan['Devise']);
if(isset($bilan['Resultat']) && !empty($bilan['Resultat']) ) $title.=' et Résultat de '.moneyKM($bilan['Resultat']).deviseText($bilan['Devise']);
if(isset($bilan['Cloture']) && !empty($bilan['Cloture']) ) $title.=' au '.WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$bilan['Cloture']));
if(isset($bilan['CA']) && !empty($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( !empty($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;
$dir_actif = false;
if ($Dir1Titre!='')
{
$data = '';
$data.= '
'.strWsToHtml(ucfirst($Dir1Titre)).'
'.strWsToHtml($Dir1NomPrenom);
if($dir1NaissText!=''){ $data.=', '.$dir1NaissText; }
$data.= '
';
$dir_actif = $dir_actif || true;
}
if ($Dir2Titre!='')
{
$data.= '
';
$data.= '';
$data.= '
'.strWsToHtml(ucfirst($Dir2Titre)).':
'.strWsToHtml($Dir2NomPrenom);
if($dir2NaissText!=''){ $data.=', '.$dir2NaissText; }
$data.= '
';
$dir_actif = $dir_actif || true;
}
if($dir_actif)
{
return array($lib, $data);
}else{
return false;
}
}
function identite_effectif($effectif, $bilan)
{
$lib = 'Effectif de l\'entreprise';
$title = '';
if( isset($bilan['Effectif']) && !empty($bilan['Effectif']) ) $title.=$bilan['Effectif'].' salarié(s)';
if( isset($bilan['Cloture']) && !empty($bilan['Cloture']) ) $title.=' au '.WDate::dateT('Ymd', 'd/m/Y', str_replace('-','',$bilan['Cloture']));
if( (!isset($effectif) || empty($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()
{
}