extranet/includes/scoresws/identite.php

<?php
require_once 'utils.php';
require_once 'common/dates.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 = '<a href="./?page=identite&siret='.$siret.'">'.
        substr($siret, 0, 3).' '.
        substr($siret, 3, 3).' '.
        substr($siret, 6, 3).'&nbsp; <i>'.
        substr($siret, 9, 5).'</i></a>';
    return array($lib, $data);
}

function identite_tvanumero($tvaNumero, $tvaAttribue, $dept)
{
    $lib  = 'Num&eacute;ro de TVA Intracom.';
    $data = '';
    if ($dept == 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 == false) {
            $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 ($isin != '' && $bourse->capitalisation != 0) {
        $wdate = new WDate;
        $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()
{
}

function identite_numrc($numRC, $tribunalLib, $numRM = '')
{
    if (isset($numRC) == true && $numRC != '') {
        $lib = 'Num&eacute;ro R.C.';
        $libTrib = '';
        if (preg_match('/(A|B|C|D)/i', $numRC)) {
            $lib = 'Num&eacute;ro R.C.';
            $libTrib = ' RCS '.
                preg_replace('/(^TC |^TI |^TGIcc |^TMX )/i', '', $tribunalLib);
        } else if (preg_match('/(P)/i', $numRC)) {
            $lib = 'Num&eacute;ro R.S.A.C.';
            $libTrib = ' RSAC '.
                preg_replace('/(^TC |^TI |^TGIcc |^TMX )/i', '', $tribunalLib);
        }

        $data = $numRC.$libTrib;
        return array($lib, $data);
    } else if (empty($numRM) == false) {
        $lib = 'Répertoire des métiers';
        $data = $numRM;
        return array($lib, $data);
    } else {
        return false;
    }
}

function identite_autreid($autreId, $tribunalLib, $numRC)
{
    if (isset($autreId) == true && $autreId != '' &&
        ((isset($numRC) == true && $numRC == '') ||
         substr($autreId, 0, 1) == 'W')) {
            $libTrib = '';
            if (substr($autreId, 0, 1) == 'W') {
                $lib = 'Identifiant R.N.A.';
            } else if (preg_match('/(A|B|C|D)/i', $autreId)) {
                $lib = 'Num&eacute;ro R.C.';
                $libTrib = ' RCS '.
                    preg_replace('/(^TC |^TI |^TGIcc |^TMX )/i', '',
                                 $tribunalLib);
            } else if (preg_match('/(P)/i', $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 != '') {
            $date = new WDate;
            $data .= "<i>&nbsp;(Fin d'activité en ".
                $date->dateT('Ymd', 'm/Y', $dateCloture).')</i>';
        }
    }
    if ($siren != 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,
                                     $actifrncs, $siret, $idEntreprise)
{
    $lib = 'Situation juridique';
    if (in_array(substr($situationjuridique, 0, 1), array('P', 'R'))) {
        $dateRad = '';
        if (isset($dateRadiation) &&
            $dateRadiation != '' &&
            $dateRadiation != '0000-00-00'){
            $wdate = new WDate;
            $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 ($dateRad != '') {
                $data .= '<br/>Radié du RCS le '.$dateRad;
            }
        }
        // Radiation
        if ($situationjuridique == 'RR') {
            $data .= 'Radié du RCS';
            if ($dateRad != '') {
                $data .= ' le '.$dateRad;
            }
        } else if ($situationjuridique == 'RP') {
            $data .= 'Radiation publiée';
            if ($dateRad != '') {
                $data .= ' le '.$dateRad;
            }
        }
    } else if ($actifrncs == 1) {
        $data = 'Actif au RCS';
    }
    // Mode Edition
    if (hasModeEdition()) {
        $data.= ' <a href="./?page=saisie&siret='.$siret.
            '&idEntreprise='.$idEntreprise.'">(Edition)</a>';
    }
    if (empty($data) == false) {
        return array($lib, $data);
    } else {
        return false;
    }
}

function identite_raisonsociale($nom, $nom2, $nomlong)
{
    $lib = 'Raison Sociale';

    $title = '';
    if (isset($nomlong) == true && $nomlong != '' && $nomlong != $nom) {
        $title = $nomlong;
    }

    $data = $nom;
    if ($nom2 != '') {
        $data.= '<br/>'.$nom2;
    }

    return array($lib, $data, $title);
}

function identite_enseignesigle($enseigne, $enseignelong, $sigle, $siglelong)
{
    $lib = '';

    if ($enseigne != '' && $sigle != '') {
        $lib  = 'Enseigne / Sigle';
        $data = $enseigne.' / '.$sigle;
    } else if ($enseigne != '' && $sigle == '' && $siglelong != '') {
        $lib  = 'Enseigne / Sigle';
        $data = $enseigne.' / '.$siglelong;
    } else if ($enseigne != '' && $sigle == '') {
        $lib  = 'Enseigne';
        $data = $enseigne;
    } else if ($enseigne == '' && $sigle != '') {
        $lib  = 'Sigle';
        $data = $sigle;
    } else if ($enseigne == '' && $sigle == '' && $siglelong != '') {
        $lib  = 'Sigle';
        $data = $siglelong;
    }

    $title = '';
    if (isset($siglelong) == true && $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 ($fj != $fj2 &&
        isset($fj2) == true && $fj2 != '' &&
        isset($fj2Lib) == true && $fj2Lib != '') {
        $data .= '<img src="./img/exclamation.png"'.
            ' title="Forme jurique à l\'INSEE : '.$fj2Lib.' ('.$fj2.')"/>';
    }
    return array($lib, $data);
}

function identite_dateimmat($dateimmat)
{
    $dateImmat = '';
    if (isset($dateimmat) == true &&
        $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;
    }
}

function identite_datecreaen($datecreaen)
{
    $lib = 'Cr&eacute;ation de l\'entreprise';
    $dateCreationEn = str_replace('-', '', $datecreaen);
    $date = new WDate;
    if (intval(substr($dateCreationEn, -2)) == 0) {
        $data = $date->dateT('Ymd', 'm/Y',   $dateCreationEn);
    } else {
        $data = $date->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 (intval($dateCreationEt) != 0) {
        $date = new WDate;
        if (intval(substr($dateCreationEt, -2)) == 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);
}

function identite_adresse($adresse, $adresse2, $num, $rue,
                          $cp, $ville, $pays, $dom, $domEnt, $domNb)
{
    $lib  = 'Adresse';
    $voie = ($rue == '') ? $adresse2 : $rue;

    $data  = '<div class="adresse">';
    $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>'.$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>';
    }
    if ($adresse2 != '') {
        $data .= '<span>'.$adresse2.'</span>';
    }
    if (intval($cp) != 0) {
        $data .= '<span>'.$cp.'&nbsp;'.strWsToHtml($ville).'</span>';
    }
    if ($pays != '' && strtoupper(substr($pays, 0, 3)) != 'FRA') {
        $data .= '<span>'.strWsToHtml($pays).'</span>';
    }
    $data .= '</a>';
    $data .= '</div>';

    if ($dom == 1) {
        $data .= '<div class="domiciliation">';
        $data .= '<img class="domiciliation"'.
            ' title="Cliquer pour afficher les informations"'.
            ' alt="domiciliation.png" src="img/domiciliation.png" />'.
            'Domiciliation';
        if ($domNb == 1000) {
            $domNb = '+ de 1000';
        }
        $data .= '<span title="Cliquer pour afficher les informations">';
        $data .= "Entreprises à l'adresse : ".$domNb."<br/>";
        if (count($domEnt) > 0) {
            $data .= 'Domiciliataire : <br/>';
            foreach ($domEnt as $ent) {
                $href = '/?page=identite&siret='.$ent['siren'];
                $data .= $ent['nom'].' (<a href="'.$href.'">'.
                    $ent['siren'].'</a>)';
                $data .= '<br/>';
            }
        }
        $data .= '</span>';
        $data .= '</div>';
    }
    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') {
        return false;
    }

    $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);
}

function identite_tel($tel, $enseigne, $nom, $adresse, $cp, $ville)
{
    $lib  = 'T&eacute;l&eacute;phone';

    $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 (intval($fax) > 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)) == false) {
        $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 (hasPref('naf4') && 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_nace($naceEnt, $naceEtab)
{
    if (hasPref('nace') && !empty($naceEnt)){
        $lib  = 'Codes NACE';
        $data = $naceEnt;
        if (empty($naceEtab) == false){
            $data .= ', <b>&Eacute;tab. :</b> '.$naceEtab;
        }
        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 ((intval($originecreation) > 0 &&
         intval($originecreation) < 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)
{
    $lib = 'Type d\'exploitation';
    if (isset($type) == true && $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);
}

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(intval($nbetab), null, null, ' ').'</a>';
        if (intval($nbetab) > 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) == true && intval($capital) > 0) {
        $title = '';
        if (isset($bilan->Capital) == true) {
            $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, ',', ' ').'&nbsp;';

        if ($capitaldev == 'EUR') {
            $data .= '&euro;';
        } else {
            $data .= $capitaldev.' ('.strWsToHtml($capitallib).')';
        }
        return array($lib, $data, $title);
    } else {
        return false;
    }
}

function identite_ca($bilan, $trancheCALib, $AnneeTCA = '')
{
    $lib = 'Chiffre d\'affaires';
    $title = '';
    if (empty($bilan->CA) == false) {
        $title .= 'Chiffre d\'affaires de '.moneyKM($bilan->CA).
            deviseText($bilan->Devise);
    }
    if (empty($bilan->Resultat) == false) {
        $title .= ' et Résultat de '.moneyKM($bilan->Resultat).
            deviseText($bilan->Devise);
    }
    $date = new WDate;
    if (empty($bilan->Cloture) == false) {
        $title .= ' au '.
            $date->dateT('Ymd', 'd/m/Y',
                         str_replace('-', '', $bilan->Cloture));
    }

    if (empty($bilan->CA) == false &&
        (isset($trancheCALib) == false || $trancheCALib == 'N/C')) {
        $data = moneyKM($bilan->CA).deviseText($bilan->Devise).' au '.
            $date->dateT('Ymd', 'd/m/Y',
                         str_replace('-', '', $bilan->Cloture));
        $data .= (empty($AnneeTCA) == true || $AnneeTCA == '0000') ? '' :
            ' en '.$AnneeTCA;
    } else if (empty($trancheCALib) == false && $trancheCALib != 'N/C') {
        $data  = strWsToHtml($trancheCALib);
        $data .= (empty($AnneeTCA) == true || $AnneeTCA == '0000') ? '' :
            ' en '.$AnneeTCA;
    } 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) == true &&
        $Dir1DateNaiss != '' &&
        $Dir1DateNaiss != '0000-00-00') {
        $dir1DateNaiss  =
            $date->dateT('Ymd', 'd/m/Y', str_replace('-','',$Dir1DateNaiss));
    }
    $dir1LieuNaiss = '';
    if (isset($Dir1LieuNaiss) == true && $Dir1LieuNaiss != '') {
        $dir1LieuNaiss = $Dir1LieuNaiss;
    }
    $dir2DateNaiss = '';
    if (isset($Dir2DateNaiss) == true &&
        $Dir2DateNaiss != '' &&
        $Dir2DateNaiss != '0000-00-00') {
        $dir2DateNaiss  =
            $date->dateT('Ymd', 'd/m/Y', str_replace('-','',$Dir2DateNaiss));
    }
    $dir2LieuNaiss = '';
    if (isset($Dir2LieuNaiss) == true && $Dir2LieuNaiss != '') {
        $dir2LieuNaiss = $Dir2LieuNaiss;
    }
    $dir1NaissText = '';
    if ($dir1DateNaiss != '') {
        $dir1NaissText .= 'né(e) le '.$dir1DateNaiss;
    }
    if ($dir1LieuNaiss != '' && $dir1NaissText != '') {
        $dir1NaissText .= ' à '.$dir1LieuNaiss;
    } else if ($dir1LieuNaiss != '' && $dir1NaissText == '') {
        $dir1NaissText.= 'né(e) à '.$dir1LieuNaiss;
    }

    $dir2NaissText = '';
    if ($dir2DateNaiss != '') {
        $dir2NaissText .= 'né(e) le '.$dir2DateNaiss;
    }
    if ($dir2LieuNaiss != '' && $dir2NaissText != '') {
        $dir2NaissText .= ' à '.$dir2LieuNaiss;
    } else if ($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 .= '<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;
    }
}

function identite_effectif($effectif, $bilan, $AnneeEffEn = '')
{
    $lib = 'Effectif de l\'entreprise';

    $title = '';
    if (empty($bilan->Effectif) == false) {
        $title .= $bilan->Effectif.' salarié(s)';
    }
    if (empty($bilan->Cloture) == false) {
        $date = new WDate;
        $title .= ' au '.
            $date->dateT('Ymd', 'd/m/Y', str_replace('-', '', $bilan->Cloture));
    }

    if (empty($effectif) == false && $effectif != 'N/C') {
        $data  = number_format($effectif * 1, null, null, ' ').' salarié(s)';
        $data .= (empty($AnneeEffEn) == true || $AnneeEffEn == '0000') ? '' :
            ' en '.$AnneeEffEn;
    } else {
        $data = 'N/C';
    }
    return array($lib, $data, $title);
}

function identite_effectifetab($effectifEtab, $AnneeEffEt)
{
    if (isset($effectifEtab) == true &&
        $effectifEtab != 'N/C' &&
        $effectifEtab != 'NN' &&
        $effectifEtab != 0) {
        $lib = 'Effectif de l\'établissement';
        $title = '';
        $data  = number_format(intval($effectifEtab), null, null, ' ').
            ' salarié(s)';
        $data .= (empty($AnneeEffEt) == true || $AnneeEffEt == '0000') ? '' :
            ' en '.$AnneeEffEt;
        return array($lib, $data, $title);
    } else {
        return false;
    }
}

function identite_typeetab($type)
{
    $lib = 'Type d\'Etablissement';
    $output = false;
    if (isset($type) == true && $type != 'N/C' && $type != '') {
        $output = array($lib, $type);
    }
    return $output;
}

function identite_statutsconst($StatutsConst, $StatutsConstDepot)
{
    $lib = 'Dépot des statuts';
    $data = '';
    $wdate = new WDate;
    if (empty($StatutsConst) == false &&
        $StatutsConst != '0000-00-00') {
        $data .= 'Constitués le '.
            $wdate->dateT('Y-m-d', 'd/m/Y', $StatutsConst);
    }
    if (empty($StatutsConstDepot) == false &&
        $StatutsConstDepot != '0000-00-00') {
        $data .= ' en dépôt du '.
            $wdate->dateT('Y-m-d', 'd/m/Y', $StatutsConstDepot);
    }
    if ($data != '') {
        return array($lib, $data);
    } else {
        return false;
    }
}

function identite_statutsmodif($StatutsModif, $StatutsModifDepot)
{
    $lib = 'Modification des statuts';
    $data = '';
    $wdate = new WDate;
    if (empty($StatutsModif) == false &&
        $StatutsModif != '0000-00-00') {
        $data .= 'Modifiés le '.$wdate->dateT('Y-m-d', 'd/m/Y', $StatutsModif);
    }
    if (empty($StatutsModifDepot) == false &&
        $StatutsModifDepot != '0000-00-00') {
        $data .= ' en dépôt du '.
            $wdate->dateT('Y-m-d', 'd/m/Y', $StatutsModifDepot);
    }
    if ($data != '') {
        return array($lib, $data);
    } else {
        return false;
    }
}

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;
    case 'CRS': return 'COURS';     break;
    default:    return strtoupper($voie);
    }
}

function identite_autresiren($liste)
{
    $typeLib = array('doublon' => 'Doublon Insee');
    if (is_array($liste) == true && count($liste) > 0) {
        $lib  = 'Autre(s) identification(s)';
        $data = '';
        foreach ($liste as $doublon) {
            if (array_key_exists($doublon['type'], $typeLib) == true) {
                $data .= '<a href="./?page=identite&siret='.
                    $doublon['siren'].'">'.
                    substr($doublon['siren'], 0, 3).'&nbsp;'.
                    substr($doublon['siren'], 3, 3).'&nbsp;'.
                    substr($doublon['siren'], 6, 3).'</a> ('.
                    $typeLib[$doublon['type']].')';
            }
        }
        if ($data != '') {
            return array($lib, $data);
        }
    }
    return false;
}

function identite_infogeo($geoPrecis, $geoLat, $geoLong,
                          $ville, $num, $voie, $rue, $cp)
{
}

function identite_commune()
{
}

function identite_cessionoffredate($date)
{
    if (empty($date) == false) {
        $lib = '';
        $wdate = new WDate;
        $data = 'Offres de reprises possibles jusqu\'au '.
            $wdate->DateT('Y-m-d', 'd/m/Y', $date);
        return array($lib, $data);
    } else {
        return false;
    }
}

function identite_cessioninvendate($date)
{
    if (empty($date) == false){
        $lib = '';
        $wdate = new WDate;
        $data = 'Inventaire déposé au greffe le '.
            $wdate->DateT('Y-m-d', 'd/m/Y', $date);
        return array($lib, $data);
    } else {
        return false;
    }
}

function identite_cessiondesc($desc){
    if (empty($desc) == false){
        $lib = '';
        $data = 'Actifs concernés '.$desc;
        return array($lib, $data);
    } else {
        return false;
    }
}

function identite_saisonnalite($saisonnalite = 0)
{
    if ($saisonnalite == 1) {
        $lib = 'Saisonnalité';
        $data = 'Activité saisonnière';
        return array($lib, $data);
    } else {
        return false;
    }
}

function identite_nomcommercial($nom)
{
    if (empty($nom) == false){
        $lib = 'Nom Commercial';
        $data = $nom;
        return array($lib, $data);
    } else {
        return false;
    }
}