2009-09-24 16:05:13 +00:00
< ? php
2009-10-23 13:34:42 +00:00
function identite_siret ( $siren , $siret )
2010-03-08 16:42:53 +00:00
{
$lib = 'Numéro identifiant Siret' ;
$data = substr ( $siren , 0 , 3 ) . ' ' . substr ( $siren , 3 , 3 ) . ' ' . substr ( $siren , 6 , 3 ) . ' <i>' . substr ( $siret , 9 , 5 ) . '</i>' ;
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_siretsiege ( $siret )
{
2010-03-08 16:42:53 +00:00
$lib = 'Numéro identifiant Siret du siège' ;
$data = '<a href="./?page=identite&siret=' . $siret . '">' . substr ( $siret , 0 , 3 ) . ' ' . substr ( $siret , 3 , 3 ) . ' ' . substr ( $siret , 6 , 3 ) . ' <i>' . substr ( $siret , 9 , 5 ) . '</i></a>' ;
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_tvanumero ( $tvaNumero , $tvaAttribue , $dept )
{
2010-03-08 16:42:53 +00:00
$lib = 'Numé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é dans les D.O.M.</a>' ;
}
else
2009-10-23 13:34:42 +00:00
{
2010-03-08 16:42:53 +00:00
$data .= substr ( $tvaNumero , 0 , 2 ) . ' ' . substr ( $tvaNumero , 2 , 2 ) . ' ' . substr ( $tvaNumero , - 9 );
if ( ! $tvaAttribue )
$data .= ' <img src="./img/exclamation.png" title="Non validé. Obligatoire sur factures, déclarations d\'échange de biens et de TVA !">' ;
2009-10-23 13:34:42 +00:00
}
2010-03-08 16:42:53 +00:00
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_isin ( $isin , $siret )
{
2010-03-08 16:42:53 +00:00
if ( $isin != '' )
{
$lib = 'Code ISIN' ;
$data = '<a href="./?page=bourse&siret=' . $siret . '" title="Voir les informations boursiéres">' . $isin . '</a>' ;
return array ( $lib , $data );
}
else
{
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_capitalisation ( $bourse , $isin )
{
2010-04-06 08:17:05 +00:00
if ( $isin != '' && $bourse [ 'capitalisation' ] != 0 ) {
2010-03-08 16:42:53 +00:00
$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 ;
}
2009-10-23 13:34:42 +00:00
}
function identite_logo ()
{
2010-03-08 16:42:53 +00:00
$lib = 'Logo' ;
2009-10-23 13:34:42 +00:00
}
2009-12-17 15:57:27 +00:00
function identite_numrc ( $numRC , $tribunalLib )
2009-10-23 13:34:42 +00:00
{
2010-03-08 16:42:53 +00:00
if ( isset ( $numRC ) && $numRC != '' )
{
$lib = 'Numéro R.C.' ;
$libTrib = '' ;
if ( preg_match ( '/(A|B|C|D)/i' , $numRC ))
{
$lib = 'Numéro R.C.' ;
$libTrib = ' RCS ' . preg_replace ( '/(^TC |^TI |^TGIcc |^TMX )/i' , '' , $tribunalLib );
}
elseif ( preg_match ( '/(P)/i' , $numRC ))
{
$lib = 'Numéro R.S.A.C.' ;
$libTrib = ' RSAC ' . preg_replace ( '/(^TC |^TI |^TGIcc |^TMX )/i' , '' , $tribunalLib );
}
$data = $numRC . $libTrib ;
return array ( $lib , $data );
}
else
{
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_autreid ( $autreId , $tribunalLib , $numRC )
{
2010-03-08 16:42:53 +00:00
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' , $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 ;
}
2009-10-23 13:34:42 +00:00
}
function identite_actif ( $siren , $siret , $idEntreprise , $siege , $actif , $dateClotEt )
{
2010-03-08 16:42:53 +00:00
$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ès à la fiche du siège</a>' ;
if ( $actif == 1 )
$data = 'Oui' ;
else {
$data = '<b>NON</b>' ;
$dateCloture = str_replace ( '-' , '' , $dateClotEt );
if ( $dateClotEt <> '' ) {
$date = new WDate ();
$data .= " <i> (Fin d'activité en " .
$date -> dateT ( 'Ymd' , 'm/Y' , $dateCloture ) . ')</i>' ;
}
}
if ( $siren * 1 <> 0 && preg_match ( '/AVISINSEE/i' , $_SESSION [ 'tabInfo' ][ 'droits' ]))
$data .= ' <a title="Voir l\'avis de situation correspondant de l\'INSEE" target="_blank" href="/?page=avis&siret=' . $siret . '">(Situation au répertoire SIRENE)</a>' ;
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
2010-01-11 13:39:16 +00:00
function identite_situationjuridique ( $situationjuridique , $dateRadiation , $actifrncs , $siret , $idEntreprise )
2010-03-08 16:42:53 +00:00
{
$lib = 'Situation juridique' ;
$output = false ;
2010-03-29 09:04:44 +00:00
if ( in_array ( substr ( $situationjuridique , 0 , 1 ), array ( 'P' , 'R' )) )
2009-10-23 13:34:42 +00:00
{
2010-03-08 16:42:53 +00:00
$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édure collective</b></font>' .
'</a>' ;
if ( $dateRad != '' ){ $data .= '<br/>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 ; }
}
}
elseif ( $actifrncs == 1 )
{
$data = 'Actif au RCS' ;
}
//Mode Edition
if ( $_SESSION [ 'tabInfo' ][ 'mode_edition' ] == 1 )
{
$data .= ' <a href="./?page=saisie&siret=' . $siret . '&idEntreprise=' . $idEntreprise . '">(Edition)</a>' ;
}
if ( ! empty ( $data )) $output = array ( $lib , $data );
return $output ;
2009-10-23 13:34:42 +00:00
}
function identite_raisonsociale ( $nom , $nom2 , $nomlong )
{
2010-03-08 16:42:53 +00:00
$lib = 'Raison Sociale' ;
$title = '' ;
if ( isset ( $nomlong ) && $nomlong != '' && $nomlong != $nom )
$title = $nomlong ;
$data = $nom ;
if ( $nom2 != '' ) $data .= '<br/>' . $nom2 ;
return array ( $lib , $data , $title );
2009-09-24 16:05:13 +00:00
}
2009-10-23 13:34:42 +00:00
function identite_enseignesigle ( $enseigne , $sigle , $siglelong )
{
2010-03-08 16:42:53 +00:00
$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 ;
}
2009-10-23 13:34:42 +00:00
}
function identite_fj ( $fj , $fjLib , $fj2 , $fj2Lib )
{
2010-03-08 16:42:53 +00:00
$lib = 'Forme juridique' ;
$data = $fj . ' : ' . strWsToHtml ( $fjLib );
if ( isset ( $fj2 ) && $fj2 != '' && isset ( $fj2Lib ) && $fj2Lib != '' )
{
$data .= '<img src="./img/exclamation.png" title="Forme jurique à l\'INSEE : ' . $fj2Lib . ' (' . $fj2 . ')"/>' ;
}
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_dateimmat ( $dateimmat )
{
2010-03-08 16:42:53 +00:00
$dateImmat = '' ;
if ( isset ( $dateimmat ) && $dateimmat != '' && $dateimmat != '0000-00-00' ) {
$date = new WDate ;
$dateImmat = $date -> dateT ( 'Ymd' , 'd/m/Y' ,
str_replace ( '-' , '' , $dateimmat ));
}
if ( $dateImmat != '' ) {
$lib = 'Date d\'immatriculation' ;
$data = $dateImmat ;
return array ( $lib , $data );
} else {
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_datecreaen ( $datecreaen )
{
2010-03-08 16:42:53 +00:00
$lib = 'Création de l\'entreprise' ;
$dateCreationEn = str_replace ( '-' , '' , $datecreaen );
$date = new WDate ;
if ( substr ( $dateCreationEn , - 2 ) * 1 == 0 ) {
$data = $date -> dateT ( 'Ymd' , 'm/Y' , $dateCreationEn );
} else {
$data = $date -> dateT ( 'Ymd' , 'd/m/Y' , $dateCreationEn );
}
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_datecreaet ( $datecreaet )
{
2010-03-08 16:42:53 +00:00
$lib = 'Création de l\'établissement' ;
$dateCreationEt = str_replace ( '-' , '' , $datecreaet );
if ( $dateCreationEt * 1 <> 0 ) {
$date = new WDate ;
if ( substr ( $dateCreationEt , - 2 ) * 1 == 0 ) {
$data = $date -> dateT ( 'Ymd' , 'm/Y' , $dateCreationEt );
} else {
$data = $date -> dateT ( 'Ymd' , 'd/m/Y' , $dateCreationEt );
}
} else {
$data = 'N/C' ;
}
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_adresse ( $adresse , $adresse2 , $num , $rue , $cp , $ville , $pays )
{
2010-03-08 16:42:53 +00:00
$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 .= '<span class="adresse">' . $adresse . '</span>' ;
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 .= '<span class="adresse">' . $adresse2 . '</span>' ;
2010-04-06 08:17:05 +00:00
if ( $cp * 1 != 0 )
2010-03-08 16:42:53 +00:00
$data .= '<span class="adresse">' . $cp . ' ' . strWsToHtml ( $ville ) . '</span>' ;
if ( $pays != '' && strtoupper ( substr ( $pays , 0 , 3 )) != 'FRA' )
$data .= '<span class="adresse">' . strWsToHtml ( $pays ) . '</span>' ;
$data .= '</a>' ;
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_zones ( $geoinfos )
{
2010-03-08 16:42:53 +00:00
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 ;
}
2009-10-23 13:34:42 +00:00
}
function identite_tel ( $tel , $enseigne , $nom , $adresse , $cp , $ville )
{
2010-03-08 16:42:53 +00:00
$lib = 'Télé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 .= ' <a title="Rechercher le numéro de télé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 );
2009-10-23 13:34:42 +00:00
}
function identite_fax ( $fax )
{
2010-03-08 16:42:53 +00:00
if ( $fax * 1 > 0 ){
$lib = 'Fax' ;
$data = $fax ;
return array ( $lib , $data );
}
else
{
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_web ( $web )
{
2010-03-08 16:42:53 +00:00
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 ;
}
2009-10-23 13:34:42 +00:00
}
function identite_mail ( $email )
{
2010-03-08 16:42:53 +00:00
if ( trim ( $email ) != '' )
{
$lib = 'Courriel' ;
$data = '<a href="mailto:' . $email . '" target="_blank">' . $email . '</a>' ;
return array ( $lib , $data );
}
else
{
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_activiteen ( $activite , $nafent , $nafentlib )
{
2010-03-08 16:42:53 +00:00
$lib = 'Activité de l\'entreprise' ;
2010-03-29 09:04:44 +00:00
if ( $activite != '' && ! preg_match ( '/non pr(e|é)cis(e|é)/i' , utf8_decode ( $activite ))) {
2010-03-25 13:44:32 +00:00
$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 ));
2010-03-08 16:42:53 +00:00
$data = $texte . ' (' . $nafent . ' : ' . strWsToHtml ( $nafentlib ) . ')' ;
} else {
$data = $nafent . ' : ' . strWsToHtml ( $nafentlib );
}
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_activiteet ( $nafetab , $nafetablib )
{
2010-03-08 16:42:53 +00:00
$lib = 'Activité de l\'établissement' ;
$data = $nafetab . ' : ' . strWsToHtml ( $nafetablib );
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_naf4 ( $naf4ent , $naf4entlib , $naf4etab , $naf4etablib )
{
2010-03-08 16:42:53 +00:00
if ( preg_match ( '/\bNAF4\b/i' , $_SESSION [ 'tabInfo' ][ 'pref' ]) && trim ( @ $naf4ent ) != '' )
{
$lib = 'Anciens codes NAF' ;
$data = $naf4ent . ' - ' . strWsToHtml ( $naf4entlib ) . '<br/><b>Étab. :</b> ' . $naf4etab . ' - ' . strWsToHtml ( $naf4etablib );
return array ( $lib , $data );
}
else
{
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_natureactivite ( $natureactivite , $actif )
{
2010-03-08 16:42:53 +00:00
if ( $natureactivite == 1 && $actif == 1 )
{
$lib = 'Nature de l\'activité' ;
$data = 'Saisonnière' ;
return array ( $lib , $data );
}
else
{
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_originefond ( $originecreation )
{
2010-03-08 16:42:53 +00:00
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 ;
}
2009-10-23 13:34:42 +00:00
}
function identite_typeexploitation ( $type )
{
2010-04-06 09:50:33 +00:00
$lib = 'Type d\'exploitation' ;
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 "
);
$data = $tabTypeExploitation [ $type ];
} else {
$data = " Non communiqué " ;
}
return array ( $lib , $data );
2009-10-23 13:34:42 +00:00
}
function identite_nbetabactif ( $nbetab , $siret , $idEntreprise )
{
2010-03-08 16:42:53 +00:00
if ( $nbetab != 'N/C' )
{
$lib = 'Nombre d\'établissements actifs' ;
$data = '<a title="Voir la liste des établissements" href="/?page=etablissements&siret=' . $siret . '&idEntreprise=' . $idEntreprise . '">' . number_format ( $nbetab * 1 , null , null , ' ' ) . '</a>' ;
if ( $nbetab * 1 > 1 )
{
$data .= ' <a title="Voir la liste des é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' ])) {
$date = new WDate ;
$title .= ' au ' .
$date -> dateT ( 'Ymd' , 'd/m/Y' ,
str_replace ( '-' , '' , $bilan [ 'Cloture' ]));
}
$lib = 'Capital' ;
if ( isset ( $capitaltype ) && $capitaltype == 'V' ) {
$lib .= ' variable' ;
}
$data = number_format ( $capital , 0 , ',' , ' ' ) . ' ' ;
2010-04-06 08:17:05 +00:00
if ( $capitaldev == 'EUR' ) {
2010-03-08 16:42:53 +00:00
$data .= '€' ;
} else {
$data .= $capitaldev . ' (' . strWsToHtml ( $capitallib ) . ')' ;
}
return array ( $lib , $data , $title );
} else {
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_ca ( $bilan , $trancheCALib )
{
2010-03-08 16:42:53 +00:00
$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' ]);
}
$date = new WDate ;
if ( isset ( $bilan [ 'Cloture' ]) && ! empty ( $bilan [ 'Cloture' ])) {
$title .= ' au ' . $date -> 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 ' .
$date -> dateT ( 'Ymd' , 'd/m/Y' ,
str_replace ( '-' , '' , $bilan [ 'Cloture' ]));
} else if ( ! 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' ;
$date = new WDate ;
$dir1DateNaiss = '' ;
if ( isset ( $Dir1DateNaiss ) &&
$Dir1DateNaiss != '' &&
$Dir1DateNaiss != '0000-00-00' ) {
$dir1DateNaiss = $date -> 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 = $date -> 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 = '<div class="txtAdresse">' ;
$data .= '<u><b>' . strWsToHtml ( ucfirst ( $Dir1Titre )) . '</b></u><br/>' . strWsToHtml ( $Dir1NomPrenom );
if ( $dir1NaissText != '' ){ $data .= ', ' . $dir1NaissText ; }
$data .= '</div>' ;
$dir_actif = $dir_actif || true ;
}
if ( $Dir2Titre != '' )
{
//$data.= '<br/>';
$data .= '<div class="txtAdresse">' ;
$data .= '<u><b>' . strWsToHtml ( ucfirst ( $Dir2Titre )) . '</b>:</u><br/>' . strWsToHtml ( $Dir2NomPrenom );
if ( $dir2NaissText != '' ){ $data .= ', ' . $dir2NaissText ; }
$data .= '</div>' ;
$dir_actif = $dir_actif || true ;
}
if ( $dir_actif )
{
return array ( $lib , $data );
} else {
return false ;
}
2009-10-23 13:34:42 +00:00
}
function identite_effectif ( $effectif , $bilan )
{
2010-03-08 16:42:53 +00:00
$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' ])) {
$date = new WDate ;
$title .= ' au ' . $date -> dateT ( 'Ymd' , 'd/m/Y' ,
str_replace ( '-' , '' , $bilan [ 'Cloture' ]));
}
2009-10-23 13:34:42 +00:00
2010-03-08 16:42:53 +00:00
if (( ! isset ( $effectif ) || empty ( $effectif ) ||
( isset ( $effecif ) == true &&
( $effecif == 'N/C' ||
$effectif == 0 ))) &&
isset ( $bilan [ 'Effectif' ])) {
$data = 'N/C' ;
} else if ( 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 );
2009-10-23 13:34:42 +00:00
}
2010-01-08 10:09:11 +00:00
function identite_typeetab ( $type )
{
2010-03-08 16:42:53 +00:00
$lib = 'Type d\'Etablissement' ;
$output = false ;
if ( isset ( $type ) && $type != 'N/C' && $type != '' ){
$output = array ( $lib , $type );
}
return $output ;
2010-01-08 10:09:11 +00:00
}
function identite_statutsconst ( $StatutsConst , $StatutsConstDepot )
{
2010-03-08 16:42:53 +00:00
$lib = 'Dépot des statuts' ;
$output = false ;
$data = '' ;
if ( ! empty ( $StatutsConst ) && $StatutsConst != '0000-00-00' )
{
$data .= 'Constitués le ' . WDate :: dateT ( 'Y-m-d' , 'd/m/Y' , $StatutsConst );
}
if ( ! empty ( $StatutsConstDepot ) && $StatutsConstDepot != '0000-00-00' )
{
$data .= ' en dépôt du ' . WDate :: dateT ( 'Y-m-d' , 'd/m/Y' , $StatutsConstDepot );
}
if ( $data != '' ) $output = array ( $lib , $data );
return $output ;
2010-01-08 10:09:11 +00:00
}
function identite_statutsmodif ( $StatutsModif , $StatutsModifDepot )
{
2010-03-08 16:42:53 +00:00
$lib = 'Modification des statuts' ;
$output = false ;
$data = '' ;
if ( ! empty ( $StatutsModif ) && $StatutsModif != '0000-00-00' )
{
$data .= 'Modifiés le ' . WDate :: dateT ( 'Y-m-d' , 'd/m/Y' , $StatutsModif );
}
if ( ! empty ( $StatutsModifDepot ) && $StatutsModifDepot != '0000-00-00' )
{
$data .= ' en dépôt du ' . WDate :: dateT ( 'Y-m-d' , 'd/m/Y' , $StatutsModifDepot );
}
if ( $data != '' ) $output = array ( $lib , $data );
return $output ;
2010-01-08 10:09:11 +00:00
}
2009-10-23 13:34:42 +00:00
function normaliseVoie ( $voie ) {
2010-03-08 16:42:53 +00:00
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 ;
}
2009-10-23 13:34:42 +00:00
}
2009-12-22 09:46:22 +00:00
function identite_autresiren ( $liste )
{
2010-03-08 16:42:53 +00:00
global $firephp ;
$typeLib = array ( 'doublon' => 'Doublon Insee' );
$return = false ;
if ( is_array ( $liste ) && count ( $liste ) > 0 )
{
$lib = 'Autre(s) identification(s)' ;
$data = '' ;
foreach ( $liste as $doublon )
{
if ( array_key_exists ( $doublon [ 'type' ], $typeLib ))
{
$data .= '<a href="./?page=identite&siret=' . $doublon [ 'siren' ] . '">' . substr ( $doublon [ 'siren' ], 0 , 3 ) . ' ' . substr ( $doublon [ 'siren' ], 3 , 3 ) . ' ' . substr ( $doublon [ 'siren' ], 6 , 3 ) . '</a> (' . $typeLib [ $doublon [ 'type' ]] . ')' ;
}
}
if ( $data != '' ) $return = array ( $lib , $data );
}
return $return ;
2009-12-22 09:46:22 +00:00
}
2009-10-23 13:34:42 +00:00
function identite_infogeo ( $geoPrecis , $geoLat , $geoLong , $ville , $num , $voie , $rue , $cp )
{
}
function identite_commune ()
{
}