'; + return $i; + } + } + // echo 'NAF '.$naf.' non trouvé !
'; + $naf=substr($naf,0,strlen($naf)-1); + } + return 17; // Secteur d'activité par défaut si non trouvé + } + + function getBorne($note, $borne, $secteur) { + + // print_array($this->tabR[$borne][$secteur],0); + for ($j=0; $j<10; $j++) + { + $tabMinMax=explode(':',$this->tabR[$borne][$secteur][$j]); + if ($tabMinMax[0]!='') $min=$tabMinMax[0]; + else $min=-1E99; + if ($tabMinMax[1]!='') $max=$tabMinMax[1]; + else $max=1E99; + + if ( ( $note>$min && $note<=$max ) ) + { +// echo "TROUVE ++++ $note > ".$tabMinMax[0]." et $note <= ". $tabMinMax[1].'
'; + if ($j==0) return 3; + elseif ($j<4) return $j+4; + else return $j*2+1; + } +// echo "NOK $note < ".$tabMinMax[0]." ou $note > ". $tabMinMax[1].'
'; + } + return 3; // On retourne la plus basse note par défaut + } + + + function getNoteBorne($note, $borne, $secteur, $numerateur, $denominateur) { + + $noteBorneBrute=$this->getBorne($note, $borne, $secteur); + + switch($borne) + { + case 1: + if ($numerateur<0) return 3; + else return $noteBorneBrute; + break; + case 2: + if ($numerateur==0) return 19; + else return $noteBorneBrute; + break; + case 3: + if ($numerateur==0 && $denominateur>0) return 19; + elseif ($denominateur<0) return 3; + else return $noteBorneBrute; + break; + case 4: + if ($note<0) return 19; + else return $noteBorneBrute; + break; + default: + return $noteBorneBrute; + break; + } + } + + + function getNotationFin ($coteMoy) { + if( $coteMoy > 18.5 ) + return 'A'; + elseif( $coteMoy > 16 ) + return 'B+'; + elseif( $coteMoy > 14 ) + return 'B'; + elseif( $coteMoy > 12.5 ) + return 'C+'; + elseif( $coteMoy > 11 ) + return 'C'; + elseif( $coteMoy > 10 ) + return 'C-'; + elseif( $coteMoy > 9 ) + return 'D+'; + elseif( $coteMoy > 8 ) + return 'D'; + elseif( $coteMoy > 7 ) + return 'D-'; + elseif( $coteMoy > 6 ) + return 'E+'; + elseif( $coteMoy > 4.5 ) + return 'E'; + elseif( $coteMoy > 3 ) + return 'E-'; + else + return 'E--'; + } + + + function getInfosNotation ($notation, $csv=false) { + if ($csv) { + $str =$this->tabNotation[$notation][1].';'. + $this->tabNotation[$notation][2].';'. + $this->tabNotation[$notation][3].';'. + $this->tabNotation[$notation][4].';'; + return $str; + } else { + $str ='Notation : '. $this->tabNotation[$notation][0]."\r\n"; + $str.='Equivalence BDF : '. $this->tabNotation[$notation][1]."\r\n"; + $str.='Grades Moody\'s : '. $this->tabNotation[$notation][2]."\r\n"; + $str.='Grades S&P : '. $this->tabNotation[$notation][3]."\r\n"; + $str.='Probabilité de défaillance : '. $this->tabNotation[$notation][4]." %\r\n"; + return $str; + } +} + +} \ No newline at end of file diff --git a/library/Metier/common/controles.php b/library/Metier/common/controles.php new file mode 100644 index 00000000..1f2401a8 --- /dev/null +++ b/library/Metier/common/controles.php @@ -0,0 +1,47 @@ +64 && $ascii<91 ) + /* En ASCII : A=65 et Z=90 + En ISIN... A=10 et Z=35 */ + return ($ascii-55); + return false; +} + +/** Test si un code ISIN donné est valable à partir de son algo de contrôle. + ** @param string $isin Code ISIN à vérifier + ** @return bool + **/ +function isValidIsin($isin) { + + $pays=substr($isin, 0,2); + $nsin=''.substr($isin, 2,9); + $clef=substr($isin,11,1)*1; + + $calcul=''.isinPoidsLettre($pays[0]).isinPoidsLettre($pays[1]).$nsin; + //echo "Etape 1 = $calcul".EOL; + + $sommeImpair=$sommePair=0; + for ($impair=0; $impair<12; $impair=$impair+2) { + $strImpair=''.$calcul[$impair]*2; + if (isset($strImpair[1])) $reste=$strImpair[1]*1; + else $reste=0; + $sommeImpair+=$strImpair[0]*1+$reste; + } + + for ($pair=1; $pair<12; $pair=$pair+2) + $sommePair+=$calcul[$pair]*1; + + $totalcalcul=$sommeImpair+$sommePair; + //echo "Etape 3 = $sommeImpair + $sommePair = $totalcalcul".EOL; + + $dizSuperieur=ceil($totalcalcul/10)*10; + $delta=$dizSuperieur-$totalcalcul; + //echo "Etape 4 = $dizSuperieur - $totalcalcul = $delta".EOL; + + if ($delta==$clef) return true; + + return false; +} +?> \ No newline at end of file diff --git a/library/Metier/common/fonctions.php b/library/Metier/common/fonctions.php new file mode 100644 index 00000000..f843387e --- /dev/null +++ b/library/Metier/common/fonctions.php @@ -0,0 +1,339 @@ + Code réponse Serveur + ** "header" => Headers du serveur + ** "body" => Page HTML + **/ +function parse_response($this_response) { + + + // Split response into header and body sections + list($response_headers, $response_body) = explode("\r\n\r\n", $this_response, 2); + $response_header_lines = explode("\r\n", $response_headers); + + // First line of headers is the HTTP response code + $http_response_line = array_shift($response_header_lines); + if(preg_match('@^HTTP/[0-9]\.[0-9] ([0-9]{3})@',$http_response_line, $matches)) { $response_code = $matches[1]; } + + // put the rest of the headers in an array + $response_header_array = array(); + $nbRMID=0; + foreach($response_header_lines as $header_line) + { + list($header,$value) = explode(': ', $header_line, 2); + + if ($header=='Set-cookie' && substr($value,0,5)=='RMID=' && $nbRMID<5)//{ + $nbRMID++; +// echo ("Je gicle le RMID n°$nbRMID\r\n");} + else + $response_header_array[$header] .= $value."\n"; + } + return array('code' => $response_code, 'header' => $response_header_array, 'body' => $response_body); +} + +/** Récupère une page HTML en fonction des paramètres : + ** $url Url distante de la page à récupérer + ** $strCookies Chaine de caractère contenant les cookies + ** $postData Tableau des données à passer en POST uniquement + ** $referer Referer à indiquer lors de l'appel de la page + ** $debug Activer le débogage (True/False) + ** + ** ... et retourne son contenu dans un tableau : + ** "code" => Code réponse Serveur + ** "header" => Headers du serveur + ** "body" => Page HTML + **/ +function getUrl($url, $strCookies='', $postData='', $referer='', $debug=false, $host='') { + + + $ch = curl_init(); + + if ($host=='') + $this_header = array('Host: '. HOST_INSEE); + else + $this_header = array('Host: '. $host); + + curl_setopt($ch, CURLOPT_URL, $url); + curl_setopt($ch, CURLOPT_HEADER, 1); + //curl_setopt($ch, CURLOPT_PROXY, '10.142.10.254:80'); + //curl_setopt($ch, CURLOPT_PROXYUSERPWD, 'username:password'); // Pas nécessaire en authentification NT + + curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); + //curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1); + //curl_setopt($ch, CURLOPT_MAXREDIRS, 1); + + $user_agent = 'Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)'; + curl_setopt($ch, CURLOPT_USERAGENT, $user_agent); + curl_setopt($ch, CURLOPT_REFERER, $referer); + + // Add each cookie that has been returned in the response + // If cookies need to be added/deleted or value changed, then add code here + if ($strCookies!='') { + //die('"'.$strCookies.'"'); + //echo $strCookies."\r\n"; + $cookies = explode("\n", $strCookies); + // Create the basic header + foreach($cookies as $this_cookie) { + if (trim($this_cookie)<>'') + array_push($this_header, 'Cookie: '.$this_cookie); + } + } + + if ($postData!='') { + if (is_array($postData)) + $post_data=$postData; + + $o=""; + foreach ($post_data as $k=>$v) + { + $o.= "$k=".utf8_encode($v)."&"; + } + $post_data=substr($o,0,-1); + + curl_setopt($ch, CURLOPT_POST, 1); + curl_setopt($ch, CURLOPT_POSTFIELDS, $post_data); + //if in_array('',$this_header + /*array_push($this_header, "Content-type: application/x-www-form-urlencoded"); + array_push($this_header, "Content-Length: 44");*/ + } + + curl_setopt($ch, CURLOPT_HTTPHEADER, $this_header); + //print_r($this_header); + + $page=curl_exec($ch); + $response = parse_response($page); + if ($debug){ + $url2=str_replace('http://', '', $url); + $url2=str_replace('/', '_', $url2); + $url2=str_replace('?', '(param)', $url2); + $url2=str_replace('&', '(et)', $url2); + + + $fp=fopen('/var/www/_includes/partenaires/insee/'. date('Ymd-His') .'-'. microtime_float(true) .'-'. $url2 . '.html', 'a'); + fwrite($fp, $url."\r\n"); + fwrite($fp, $page); + fclose($fp); + //echo strip_tags(html_entity_decode($response['body']), '
', $ligneAdresse); + $ligneAdresse1=strip_tags($tabligneAdresse[0]); + $ligneAdresse2=strip_tags($tabligneAdresse[1]); + $dispoPlan =(bool)(strpos($value, 'Plan')); + $dispoIti =(bool)(strpos($value, 'Itinéraire')); + $dispoPhoto =(bool)(strpos($value, 'Photo')); + $dispoWeb =(bool)(strpos($value, 'Site ')); + $lienWeb=getTextInHtml($value, '$raisonSociale, + 'AdresseLigne1' =>$ligneAdresse1, + 'AdresseLigne2' =>$ligneAdresse2, + 'Dispo_Plan' =>$dispoPlan, + 'Dispo_Iti' =>$dispoIti, + 'Dispo_Photo' =>$dispoPhoto, + 'Dispo_Web' =>$dispoWeb, + 'LienWeb' =>$lienWeb)); + } + } + return $tabRep; +} + +function getBonneAdresse($adresse, $tabGU) { + +// tableau de mots à vérifier +$words = array_keys($tabGU); + +// aucune distance de trouvée pour le moment +$shortest = -1; + +// boucle sur les des mots pour trouver le plus près +foreach ($words as $word) { + + // calcule la distance avec le mot mis en entrée, + // et le mot courant + $lev = levenshtein($adresse, $word); + + // cherche une correspondance exacte + if ($lev == 0) { + + // le mot le plus près est celui-ci (correspondance exacte) + $closest = $word; + $shortest = 0; + + // on sort de la boucle ; nous avons trouvé une correspondance exacte + break; + } + + // Si la distance est plus petite que la prochaine distance trouvée + // OU, si le prochain mot le plus près n'a pas encore été trouvé + if ($lev <= $shortest || $shortest < 0) { + // définission du mot le plus près ainsi que la distance + $closest = $word; + $shortest = $lev; + } +} +/* +echo "Mot entré : $adresse\n"; +if ($shortest == 0) { + echo "Correspondance exacte trouvée : $closest\n"; +} else { + echo "Vous voulez dire : $closest ?\n"; +}*/ +return $tabGU[$closest]; +} +?> \ No newline at end of file diff --git a/library/Metier/common/insee.class.php b/library/Metier/common/insee.class.php new file mode 100644 index 00000000..e05690db --- /dev/null +++ b/library/Metier/common/insee.class.php @@ -0,0 +1,548 @@ +
| Fiche siège'); + if ($pos>0) + $tabRet['typeEtablissement']='siège'; + + // Recherche Dernière MAJ / Activité + $pos=strpos($responseSiege, '(dernière mise à jour :'); + if ($pos>0) { + $tabRet['dateMAJ']=substr($responseSiege, $pos+51, 10); + $tabRet['dateAbsActivite']=''; + $tabRet['active']='O'; + } else { + $tabRet['active']='N'; + $tabRet['dateMAJ']=''; + $pos=strpos($responseSiege, 'Absence d\'activité notée le : '); + if ($pos>0) $tabRet['dateAbsActivite']=substr($responseSiege, $pos+78, 10); + else { + $pos=strpos($responseSiege, 'Absence d\'activité'); + if ($pos>0) $tabRet['dateAbsActivite']=''; + } + } + + $pos=strpos($responseSiege, ' size="-1"> n° SIRET : | '); + $tabRet['siret']=str_replace(' ', '', html_entity_decode(substr($responseSiege, $pos+97, 32))); + + $pos=strpos($responseSiege, 'size="-1"> Date de création : | '); + if ($pos>0) { + $posFin=strpos($responseSiege, '', $pos+109); + $tabRet['dateCreation']=str_replace(' ', '', html_entity_decode(substr($responseSiege, $pos+109, $posFin-($pos+109)))); + } + else $tabRet['dateCreation']=''; + + $pos=strpos($responseSiege, ' size="-1"> Raison sociale et Enseigne : | '); + $len=127; + if ($pos==0){ + $pos=strpos($responseSiege, ' size="-1"> Raison sociale et Enseigne : | '); + $len=122; + if ($pos==0){ + $pos=strpos($responseSiege, ' size="-1"> Raison sociale et Enseigne : | ');
+ $len=126;
+ $libelleErreur='Informations INSEE non diffusables';
+ }
+ }
+ if ($libelleErreur=='') {
+ //LARGE*DOMINIQUE MICHEL/ GERANT SARL BIMAGIQUE + $posFin=strpos($responseSiege, '', $pos+$len); + $raisonSocialeStr=trim(substr($responseSiege, $pos+$len, $posFin-($pos+$len))); + $raisonSocialeTabLigne=explode(' ', $raisonSocialeStr); + $tabRet['raisonSociale']=trim(str_replace(' ', '', html_entity_decode($raisonSocialeTabLigne[0]))); + $tabRet['Enseigne']=trim(str_replace(' ', '', html_entity_decode($raisonSocialeTabLigne[1]))); + + $pos=strpos($responseSiege, ' size="-1"> Activité principale : | '); + $tabRet['NafCode']=substr($responseSiege, $pos+120, 4); + $tabRet['NafLib']=trim(substr($responseSiege, $pos+137, 70)); + + $pos=strpos($responseSiege, ' size="-1"> Adresse : | ');
+ $posFin=strpos($responseSiege, '', $pos+103);
+ $AdresseStr=substr($responseSiege, $pos+103, $posFin-($pos+103));
+ $AdresseTabLigne=explode(' ', $AdresseStr);//' + $tabRet['AdresseLigne1']=str_replace(' ', '/', $AdresseTabLigne[0]); + $tabRet['AdresseLigne2']=str_replace(' ', '/', $AdresseTabLigne[1]); + $tabRet['AdresseLigne3']=str_replace(' ', '/', $AdresseTabLigne[2]); + /* + $AdresseNum=$AdresseTabLigne1[0]; + $AdresseVoi=$AdresseTabLigne1[1]; + $AdresseRue=$AdresseTabLigne1[2]; + $AdresseCP=$AdresseTabLigne2[0]; + $AdresseVille=$AdresseTabLigne2[1]; + */ + $pos=strpos($responseSiege, 'L\'entreprise est connue au répertoire comme '); + if ($pos>0) { + $posFin=strpos($responseSiege, '', $pos+106); + $tabRet['etatJuridique']=html_entity_decode(substr($responseSiege, $pos+106, $posFin-($pos+106))); + $tabRet['dateEtatJuridique']=''; + } else { + $pos=strpos($responseSiege, 'L\'entreprise est cessée le : '); + $tabRet['dateEtatJuridique']=substr($responseSiege, $pos+86, 10); + $tabRet['etatJuridique']='cessée'; + } + //echo 'GetDataEtab="'.$libelleErreur."\"\r\n"; + + return $tabRet; + } +} + + +function getDataEntreprise($pageHtml) +{ + global $libelleErreur; + + $responseEntreprise=$pageHtml; + $tabRet=array(); + + if ($libelleErreur=='') { + + $pos=strpos($responseEntreprise, 'size="-1"> Date de création : | '); + if ($pos>0) + $tabRet['dateCreationEntrep']=substr($responseEntreprise, $pos+109, 10); + else + $tabRet['dateCreationEntrep']=''; + + // Raison sociale et Sigle + $pos=strpos($responseEntreprise, ' size="-1"> Raison sociale et Sigle : | ');
+ $posFin=strpos($responseEntreprise, '', $pos+123);
+ $raisonSocialeStr=trim(substr($responseEntreprise, $pos+123, $posFin-($pos+123)));
+ $raisonSocialeTabLigne=explode(' ', $raisonSocialeStr); + $tabRet['raisonSocialeEntrep']=trim(str_replace(' ', '', html_entity_decode($raisonSocialeTabLigne[0]))); + $tabRet['sigle']=trim(str_replace(' ', '', html_entity_decode($raisonSocialeTabLigne[1]))); + + // Activité prinicpale Entrep + $pos=strpos($responseEntreprise, ' size="-1"> Activité principale : | '); + $tabRet['NafCodeEntrep']=substr($responseEntreprise, $pos+120, 4); + $tabRet['NafLibEntrep']=trim(substr($responseEntreprise, $pos+137, 70)); + + // Forme Juridique + $pos=strpos($responseEntreprise, ' size="-1"> Forme juridique : | '); + $tabRet['FJCodeEntrep']=substr($responseEntreprise, $pos+116, 4); + $tabRet['FJLibEntrep']=trim(substr($responseEntreprise, $pos+133, 70)); + + // Nb Etab Actifs + $pos=strpos($responseEntreprise, ' size="-1"> Nb établissements actifs : | ');
+ $posFin=strpos($responseEntreprise, '', $pos+118);
+ $tabRet['nbEtabActifs']=trim(str_replace(' ', '', html_entity_decode(substr($responseEntreprise, $pos+118, $posFin-($pos+118)))));
+ }
+ return $tabRet;
+}
+
+/*
+* parseHtml.php
+* Author: Carlos Costa Jordao
+* Email: carlosjordao@yahoo.com
+*
+* My notation of variables:
+* i_ = integer, ex: i_count
+* a_ = array, a_html
+* b_ = boolean,
+* s_ = string
+*
+* What it does:
+* - parses a html string and get the tags
+* - exceptions: html tags like , etc +* - At the end, the array will look like this: +* ["IMG"][0]["SRC"] = "xxx" +* ["IMG"][1]["SRC"] = "xxx" +* ["IMG"][1]["ALT"] = "xxx" +* ["A"][0]["HREF"] = "xxx" +* +*/ +function parseHtml( $s_str ) +{ + $i_indicatorL = 0; + $i_indicatorR = 0; + $s_tagOption = ''; + $i_arrayCounter = 0; + $a_html = array(); + // Search for a tag in string + while( is_int(($i_indicatorL=strpos($s_str,'<',$i_indicatorR))) ) { + // Get everything into tag... + $i_indicatorL++; + $i_indicatorR = strpos($s_str,'>', $i_indicatorL); + $s_temp = substr($s_str, $i_indicatorL, ($i_indicatorR-$i_indicatorL) ); + $a_tag = explode( ' ', $s_temp ); + // Here we get the tag's name + list( ,$s_tagName,, ) = each($a_tag); + $s_tagName = strtoupper($s_tagName); + // Well, I am not interesting in , or anything else like that... + // So, this is false for tags without options. + $b_boolOptions = is_array(($s_tagOption=each($a_tag))) && $s_tagOption[1]; + if( $b_boolOptions ) { + // Without this, we will mess up the array + $i_arrayCounter = (int)count($a_html[$s_tagName]); + // get the tag options, like src="htt://". Here, s_tagTokOption is 'src' and s_tagTokValue is '"http://"' + + do { + $s_tagTokOption = strtoupper(strtok($s_tagOption[1], "=")); + $s_tagTokValue = trim(strtok("=")); + $a_html[$s_tagName][$i_arrayCounter][$s_tagTokOption] = + $s_tagTokValue; + $b_boolOptions = is_array(($s_tagOption=each($a_tag))) && + $s_tagOption[1]; + } while( $b_boolOptions ); + } + } + return $a_html; +} + +function getDataEntrepriseRNCS($pageHtml) { + + global $libelleErreur; + + $tabRet=array(); + + // Liste et liens vers les Bilans + $tabRet['tabListeBilans']=getTabListeBilans($pageHtml); + $tabRet['raisonSociale']=getTextInHtml($pageHtml, ' | ', ' ', ''); + $tabRet['RCS']=getTextInHtml($pageHtml, 'RCS ', 'RCS ', '', true); + $tabRet['activite']=getTextInHtml($pageHtml, ' | Activité | ', 'class="basictext">', ''); + $tabRet['adresseSiege']=getTextInHtml($pageHtml, 'Siège + social | ', 'class="basictext">', ''); + print_r($tabRet); + die(); + // Capital social + + // Chiffre d'affaires + + // Date CA + + // Effectif + + // Forme Juridique + + // Nationalité + + // Activité + + // Siège social + /* +||||||||||||||||
 |
+ Siège + social | + |
+
+ 75 Avenue la Grande Armee + 75116 PARIS 16 |
+ ||||||||||||||||||||||||||||
+
+
 Renseignements
+ juridiques |
+ + |
|
+
+ Forme + juridique | + |
+ SA à conseil d'administration | +
|
+ Capital social | + + |
+ 171.285.000,00 + EURO | +
|
+ Nationalité | + |
+ France | + +
+
+
+
+
+
+
+
+
+
+
+
+ | Chiffres
+ clés |
+
+ au 31-12-2004 | +
|
+ Chiffre + d'affaires | + |
+
+ 18.049.000.000 + EU | +
|
+ Effectif | + |
+ De 5150 à 5720 | + +
+
+
+
| Société inactive | ', '', ' | '); + $strCapital=@getTextInHtml($pageHtml, 'Capital (', '(', ' | |||||||||||||
| Date de création | ', '', ' | '); + $tabRet['formeJuridique']=@getTextInHtml($pageHtml, 'Forme juridique | ', '', ' | '); + $tabRet['cotationBourse']=@getTextInHtml($pageHtml, 'Cotation en bourse | ', '', ' | '); + $tabRet['effectifSociete']=@getTextInHtml($pageHtml, 'Effectif société | ', '', ' | '); + $tabRet['activite']=@getTextInHtml($pageHtml, 'Activité | ', '', ' | '); + + $tabRet['sigle']=@getTextInHtml($pageHtml, 'Sigle | ', '', ' | '); + $tabRet['enseigne']=@getTextInHtml($pageHtml, 'Enseigne | ', '', ' | '); + + // Dirigeants + $strDir=@getTextInHtml($pageHtml, 'IDENTITE | ', '', ' |
', '
', $strRS_Adr); + $tabRet['raisonSociale']=trim($tabRS_Adr[0]); + $tabRS_Adr1=explode(' ', $tabRS_Adr[1]); + $tabRet['AdresseLigne1']=trim($tabRS_Adr1[0]); + $tabRet['AdresseLigne2']=trim($tabRS_Adr1[1]); + $tabRS_Adr1=explode(' ', $tabRS_Adr[2]); + $tabRet['codePostal']=trim($tabRS_Adr1[0]); + $tabRet['ville']=trim($tabRS_Adr1[1]); + $tabRet['UrlGeoLoc']=@getTextInHtml($pageHtml, '
', '
', $strTelFax); + $tabRet['tel']=trim($tabTelFax[0]); + $tabRet['fax']=trim($tabTelFax[1]); + + // Adresse Internet / Email + $strInet=@getTextInHtml($pageHtml, '
', '
', '
', $strBourse); + $tabRet['bourse_isin']=trim($tabBourse[0]); + $tabRet['bourse_marche']=trim($tabBourse[1]); + $tabRet['bourse_ville']=trim($tabBourse[2]); + + // Activité + $tabRet['activite']=trim(str_replace(' ', ' ', @getTextInHtml($pageHtml, '
| Produits disponibles |
 |
|
+
+
', false, false, true, true, $posInHtml, 0); + + // Récupération des Lignes d'adresse + $tabRet['ligne1']=$adrL1; + $tabRet['ligne2']=getTextInHtml($page, '
', false, false, true, true, $posInHtml); + $tabRet['voie_btq']=getTextInHtml($page, 'Bis/Ter/Quater/...', '', '
', false, false, true, true, $posInHtml); + $tabRet['voie_type']=getTextInHtml($page, 'Type', '', '
', false, false, true, true, $posInHtml); + $tabRet['voie_denom']=getTextInHtml($page, 'Dénomination', '', '
', false, false, true, true, $posInHtml); + $tabRet['voie_motDir']=getTextInHtml($page, 'directeur : ', '', '
', false, false, true, true, $posInHtml); + $tabRet['voie_matric']=getTextInHtml($page, 'Matricule voie :', '', '
', false, true, true, true, $posInHtml); + $tabRet['code_insee_commune']=getTextInHtml($page, 'Code INSEE commune :', '', '
', false, true, true, true, $posInHtml); + + print_r($tabRet); + //echo "$voie_num\r\n$voie_btq\r\n$voie_type\r\n$voie_denom\r\n$voie_motDir\r\n$voie_matric\r\n$code_insee_commune\r\n"; + } + +/* +
+ + 00441644
+ + 28074
+
+
+
+
+
Référentiels + d'avril 2006
+*/ + + } ?> \ No newline at end of file diff --git a/library/Metier/common/paramCotation.inc b/library/Metier/common/paramCotation.inc new file mode 100644 index 00000000..6fcc5416 --- /dev/null +++ b/library/Metier/common/paramCotation.inc @@ -0,0 +1,170 @@ +tabNotation['A+']=array('Exceptionnel', 'A3++', 'Aaa' ,'AAA' ,'0.001'); + $this->tabNotation['A'] =array('Excellent', 'A3+', 'Aa1 Aa2 Aa3' ,'AA+ AA AA-' ,'0.01'); + $this->tabNotation['B+']=array('Très bon', '3++', 'A1' ,'A+' ,'0.02'); + $this->tabNotation['B'] =array('Bon', '3+', 'A2 A3' ,'A A-' ,'0.04'); + $this->tabNotation['C+']=array('Assez bon', '3', 'Baa1' ,'BBB+' ,'0.15'); + $this->tabNotation['C'] =array('Acceptable', '3', 'Baa2' ,'BBB' ,'0.30'); + $this->tabNotation['C-']=array('Moyen', '3', 'Baa3' ,'BBB-' ,'0.60'); + $this->tabNotation['D+']=array('Passable', '4+', 'Ba1' ,'BB+' ,'0.90'); + $this->tabNotation['D'] =array('Médiocre', '4', 'Ba2' ,'BB' ,'1.25'); + $this->tabNotation['D-']=array('Très médiocre', '4', 'Ba3' ,'BB-' ,'1.60'); + $this->tabNotation['E+']=array('Mauvais (sous surveillance)', '5', 'B1 B2 B3', 'B+ B B-', '5.00'); + $this->tabNotation['E'] =array('Très mauvais (sensible, sans incident)', '6', 'Caa', 'CCC', '14.00'); + $this->tabNotation['E-']=array('Très mauvais (sensible avec incidents)', '8', 'Ca C', 'CC C', '17.00'); + $this->tabNotation['F'] =array('En défaut, hors procédures judiciaires (douteux)', '8 9', 'D', 'D', 'Défaut'); + $this->tabNotation['Z'] =array('En défaut, avec procédures judiciaires ou contentieuses (douteux)', 'P', '', '', 'Défaut'); + + $this->tabLibActivite[0]=''; + $this->tabLibActivite[15]='Industries Alimentaires : Collecte Appro'; + $this->tabLibActivite[3]='Industries Alimentaires : Collecte et 1ère transformation'; + $this->tabLibActivite[5]='Industries Alimentaires : Eaux de vie et Champagne'; + $this->tabLibActivite[2]='Industries Alimentaires : Autres activités'; + $this->tabLibActivite[6]='Industries extractives / Production Distribution : Énergie Eau'; + $this->tabLibActivite[7]='Construction - BTP'; + $this->tabLibActivite[1]='Industries Manufacturières'; + $this->tabLibActivite[8]='Négoce'; + $this->tabLibActivite[4]='Commerce de Gros'; + $this->tabLibActivite[9]='Commerce Distribution'; + $this->tabLibActivite[10]='Grande Distribution'; + $this->tabLibActivite[12]='Transports'; + $this->tabLibActivite[13]='Media Technologie de l\'information'; + $this->tabLibActivite[14]='Services'; + $this->tabLibActivite[11]='Hôtellerie et Loisirs / Activités immobilières'; + $this->tabLibActivite[16]='Banques. Assurances. Activités financières'; + $this->tabLibActivite[17]='Agriculture. Sylviculture. Pêche. Aquaculture'; + + $this->tabActivite[15]=array('512A'); + $this->tabActivite[3]=array('151A','151C','152','153E','155','157','159G','159J','159N','159Q'); + $this->tabActivite[5]=array('159A','159F'); + $this->tabActivite[2]=array('151E','151F','153A','153C','153F','154','156','158','159B','159D','159L','159S','159T'); + $this->tabActivite[6]=array('11','10','12','13','14','401','402','403','410'); + $this->tabActivite[7]=array('451','452','453','454','455'); + $this->tabActivite[1]=array('251','252','241','242','243','245','246','247','261','262','263','264','265','266','267','268','244','297','300','311','312','313','314','315','316','321','322','323','17','18','19','20','21','271','272','273','274','275','281','282','283','284','285','286','287','291','292','293','294','295','296','341','342','343','353','351','352','354','355','223','331','332','333','334','335','361','362','363','364','365','366','231','232','233','222','371','372'); + $this->tabActivite[8]=array(); + $this->tabActivite[4]=array('511A','511N','511P','512C','512E','512G','512J','513','511C','515A','515C','511E','511G','511J','511L','511R','511T','511U','514','515E','515F','515H','515J','515L','515N','515Q','516','517'); + $this->tabActivite[9]=array('501','502','503','504','505','521A','521B','521C','521J','522','523','524A','524C','524E','524F','524H','524J','524L','524N','524R','524T','524U','524V','524W','524X','524Y','524Z','525','526'); + $this->tabActivite[10]=array('521D','521E','521F','521H','524P'); + $this->tabActivite[12]=array('621','622','623','611','612','602','603','631','632','634','634B','634C','634A','641'); + $this->tabActivite[13]=array('221','722','721','723','724','725','726','924','642','922','921'); + $this->tabActivite[14]=array('703','712E','711','712A','713','714','712C','741A','741C','741E','741G','742','743','741J','744','745','746','747','748','900','633','801','802','803','804','851','852','853','930','911','912','913','527','950'); + $this->tabActivite[11]=array('923','925','926','927','551','552','553','554','555','702'); + $this->tabActivite[16]=array('651','660','672','652E','652A','652C','652F','671'); + $this->tabActivite[17]=array('751','990','752','990','701'); + + $this->tabR[1][0]=array(); + $this->tabR[1][1]=array('0:15.5','15.5:21.7','21.7:25','25:29.1','29.1:33.4','33.4:37','37:40','40:42.6','42.6:44.9','44.9:100'); + $this->tabR[1][2]=array('0:18.7','18.7:22.8','22.8:25','25:27.7','27.7:30.6','30.6:33','33:35','35:36.7','36.7:38.3','38.3:100'); + $this->tabR[1][3]=array('0:18.7','18.7:22.8','22.8:25','25:27.7','27.7:30.6','30.6:33','33:35','35:36.7','36.7:38.3','38.3:100'); + $this->tabR[1][4]=array('0:8.7','8.7:12.8','12.8:15','15:17.7','17.7:20.6','20.6:23','23:25','25:26.7','26.7:28.3','28.3:100'); + $this->tabR[1][5]=array('0:18.7','18.7:22.8','22.8:25','25:27.7','27.7:30.6','30.6:33','33:35','35:36.7','36.7:38.3','38.3:100'); + $this->tabR[1][6]=array('0:20.5','20.5:26.7','26.7:30','30:34.1','34.1:38.4','38.4:42','42:45','45:47.6','47.6:49.9','49.9:100'); + $this->tabR[1][7]=array('0:13.7','13.7:17.8','17.8:20','20:22.7','22.7:25.6','25.6:28','28:30','30:31.7','31.7:33.3','33.3:100'); + $this->tabR[1][8]=array('0:3.7','3.7:7.8','7.8:10','10:12.7','12.7:15.6','15.6:18','18:20','20:21.7','21.7:23.3','23.3:100'); + $this->tabR[1][9]=array('0:13.7','13.7:17.8','17.8:20','20:22.7','22.7:25.6','25.6:28','28:30','30:31.7','31.7:33.3','33.3:100'); + $this->tabR[1][10]=array('0:5.7','5.7:9.8','9.8:12','12:14.7','14.7:17.6','17.6:20','20:22','22:23.7','23.7:25.3','25.3:100'); + $this->tabR[1][11]=array('0:18.7','18.7:22.8','22.8:25','25:27.7','27.7:30.6','30.6:33','33:35','35:36.7','36.7:38.3','38.3:100'); + $this->tabR[1][12]=array('0:13.7','13.7:17.8','17.8:20','20:22.7','22.7:25.6','25.6:28','28:30','30:31.7','31.7:33.3','33.3:100'); + $this->tabR[1][13]=array('0:23.7','23.7:27.8','27.8:30','30:32.7','32.7:35.6','35.6:38','38:40','40:41.7','41.7:43.3','43.3:100'); + $this->tabR[1][14]=array('0:18.7','18.7:22.8','22.8:25','25:27.7','27.7:30.6','30.6:33','33:35','35:36.7','36.7:38.3','38.3:100'); + $this->tabR[1][15]=array('0:15.5','15.5:21.7','21.7:25','25:29.1','29.1:33.4','33.4:37','37:40','40:42.6','42.6:44.9','44.9:100'); + $this->tabR[1][16]=array('0:6.8','6.8:8.9','8.9:10','10:11.4','11.4:12.8','12.8:14','14:15','15:15.9','15.9:16.6','16.6:100'); + $this->tabR[1][17]=array('0:18.7','18.7:22.8','22.8:25','25:27.7','27.7:30.6','30.6:33','33:35','35:36.7','36.7:38.3','38.3:100'); + + $this->tabR[2][0]=array(); + $this->tabR[2][1]=array('1.8:','1.6:1.8','1.5:1.6','1.4:1,5','1.2:1.4','1.0:1.2','0.9:1.0','0.8:0,9','0.7:0,8','0:0.7'); + $this->tabR[2][2]=array('2.2:','1.9:2.2','1.8:1.9','1.6:1.8','1.4:1.6','1.2:1.4','1.0:1.2','0.9:1.0','0.7:0.9','0:0.7'); + $this->tabR[2][3]=array('2.2:','1.9:2.2','1.8:1.9','1.6:1.8','1.4:1.6','1.2:1.4','1.0:1.2','0.9:1.0','0.7:0.9','0:0.7'); + $this->tabR[2][4]=array('3.0:','2.7:3.0','2.5:2.7','2.3:2.5','2.0:2.3','1.7:2.0','1.5:1.7','1.3:1.5','1.1:1.3','0:1.1'); + $this->tabR[2][5]=array('2.6:','2.4:2.6','2.2:2.4','2.0:2.2','1.7:2.0','1.5:1.7','1.3:1.5','1.1:1.3','1.0:1.1','0:1'); + $this->tabR[2][6]=array('1.7:','1.6:1.7','1.5:1.6','1.4:1.5','1.2:1.4','1.1:1.2','1.0:1.1','0.9:1.0','0.8:0.9','0:0.8'); + $this->tabR[2][7]=array('1.5:','1.4:1.5','1.3:1.4','1.1:1.3','1.0:1.2','0.9:1.0','0.8:0.9','0.7:0.8','0.6:0.7','0:0.6'); + $this->tabR[2][8]=array('10.1:','8.8:10.1','8:8.8','7:8','5.8:7','4.8:5.8','4:4.8','3.3:4','2.8:3.3','0:2.8'); + $this->tabR[2][9]=array('3:','2.7:3','2.5:2.7','2.3:2.5','2:2.3','1.7:2','1.5:1.7','1.3:1.5','1.1:1.3','0:1.1'); + $this->tabR[2][10]=array('3.8:','3.3:3.8','3.0:3.3','2.6:3.0','2.2:2.6','1.8:2.2','1.5:1.8','1.2:1.5','1.0:1.2','0:1'); + $this->tabR[2][11]=array('2.3:','2.1:2.3','2:2.1','1.8:2','1.6:1.8','1.5:1.6','1.3:1.5','1.2:1.3','1:1.2','0:1'); + $this->tabR[2][12]=array('2.3:','2.1:2.3','2:2.1','1.8:2','1.6:1.8','1.5:1.6','1.3:1.5','1.2:1.3','1:1.2','0:1'); + $this->tabR[2][13]=array('1.8:','1.6:1.8','1.5:1.6','1.4:1.5','1.2:1.4','1:1.2','0.9:1','0.8:0.9','0.7:0.8','0:0.7'); + $this->tabR[2][14]=array('1.8:','1.6:1.8','1.5:1.6','1.4:1.5','1.2:1.4','1:1.2','0.9:1','0.8:0.9','0.7:0.8','0:0.7'); + $this->tabR[2][15]=array('2.2:','1.9:2.2','1.7:1.9','1.5:1.7','1.2:1.5','1.0:1.2','0.8:1.0','0.7:0.8','0.5:0.7','0:0.5'); + $this->tabR[2][16]=array('10.1:','8.8:10.1','8:8.8','7:8','5.8:7','4.8:5.8','4:4.8','3.3:4','2.8:3.3','0:2.8'); + $this->tabR[2][17]=array('2.2:','1.9:2.2','1.8:1.9','1.6:1.8','1.4:1.6','1.2:1.4','1:1.2','0.9:1','0.7:0.9','0:0.7'); + + $this->tabR[3][0]=array(); + $this->tabR[3][1]=array('4.4:','4:4.4','3.8:4','3.5:3.8','3.1:3.5','2.8:3.1','2.5:2.8','2.2:2.5','2:2.2','0:2'); + $this->tabR[3][2]=array('5.2:','4.7:5.2','4.5:4.7','4.1:4.5','3.7:4.1','3.3:3.7','3:3.3','2.7:3','2.4:2.7','0:2.4'); + $this->tabR[3][3]=array('5.2:','4.7:5.2','4.5:4.7','4.1:4.5','3.7:4.1','3.3:3.7','3:3.3','2.7:3','2.4:2.7','0:2.4'); + $this->tabR[3][4]=array('5.2:','4.7:5.2','4.5:4.7','4.1:4.5','3.7:4.1','3.3:3.7','3:3.3','2.7:3','2.4:2.7','0:2.4'); + $this->tabR[3][5]=array('8.6:','7.9:8.6','7.5:7.9','6.9:7.5','6.2:6.9','5.6:6.2','5:5.6','4.5:5','4:4.5','0:4'); + $this->tabR[3][6]=array('4.4:','4:4.4','3.8:4','3.5:3.8','3.1:3.5','2.8:3.1','2.5:2.8','2.2:2.5','2:2.2','0:2'); + $this->tabR[3][7]=array('4.4:','4:4.4','3.8:4','3.5:3.8','3.1:3.5','2.8:3.1','2.5:2.8','2.2:2.5','2:2.2','0:2'); + $this->tabR[3][8]=array('10.9:','9.7:10.9','9:9.7','8:9','6.8:8','5.8:6.8','5:5.8','4.3:5','3.7:4.3','0:3.7'); + $this->tabR[3][9]=array('5.2:','4.7:5.2','4.5:4.7','4.1:4.5','3.7:4.1','3.3:3.7','3:3.3','2.7:3','2.4:2.7','0:2.4'); + $this->tabR[3][10]=array('5.2:','4.7:5.2','4.5:4.7','4.1:4.5','3.7:4.1','3.3:3.7','3:3.3','2.7:3','2.4:2.7','0:2.4'); + $this->tabR[3][11]=array('5.2:','4.7:5.2','4.5:4.7','4.1:4.5','3.7:4.1','3.3:3.7','3:3.3','2.7:3','2.4:2.7','0:2.4'); + $this->tabR[3][12]=array('5.9:','5.4:5.9','5:5.4','4.5:5','3.9:4.5','3.4:3.9','3:3.4','2.6:3','2.3:2.6','0:2.3'); + $this->tabR[3][13]=array('4.2:','3.8:4.2','3.5:3.8','3.1:3.5','2.7:3.1','2.3:2.7','2:2.3','1.7:2','1.5:1.7','0:1.5'); + $this->tabR[3][14]=array('4.2:','3.8:4.2','3.5:3.8','3.1:3.5','2.7:3.1','2.3:2.7','2:2.3','1.7:2','1.5:1.7','0:1.5'); + $this->tabR[3][15]=array('6.9:','6.3:6.9','6.0:6.3','5.5:6.0','5.0:5.5','4.5:5.0','4.0:4.5','3.6:4.0','3.2:3.6','0:3.2'); + $this->tabR[3][16]=array('10.9:','9.7:10.9','9:9.7','8:9','6.8:8','5.8:6.8','5:5.8','4.3:5','3.7:4.3','0:3.7'); + $this->tabR[3][17]=array('5.2:','4.7:5.2','4.5:4.7','4.1:4.5','3.7:4.1','3.3:3.7','3:3.3','2.7:3','2.4:2.7','0:2.4'); + + $this->tabR[4][0]=array(); + $this->tabR[4][1]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][2]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][3]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][4]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][5]=array('0:1.36','1.36:1.44','1.44:1.5','1.5:1.58','1.58:1.71','1.71:1.85','1.85:2','2:2.16','2.16:2.33','2.33:'); + $this->tabR[4][6]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][7]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][8]=array('0:1.1','1.1:1.2','1.2:1.3','1.3:1.4','1.4:1.6','1.6:1.8','1.8:2','2:2.2','2.2:2.5','2.5:'); + $this->tabR[4][9]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][10]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][11]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][12]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + $this->tabR[4][13]=array('0:2.4','2.4:2.7','2.7:3','3:3.4','3.4:4.1','4.1:5','5:6','6:7.2','7.2:8.7','8.7:'); + $this->tabR[4][14]=array('0:2.4','2.4:2.7','2.7:3','3:3.4','3.4:4.1','4.1:5','5:6','6:7.2','7.2:8.7','8.7:'); + $this->tabR[4][15]=array('0:2.9','2.9:3.4','3.4:3.7','3.7:4.3','4.3:5.2','5.2:6.2','6.2:7.5','7.5:9.1','9.1:10.9','10.9:'); + $this->tabR[4][16]=array('0:1.1','1.1:1.2','1.2:1.3','1.3:1.4','1.4:1.6','1.6:1.8','1.8:2','2:2.2','2.2:2.5','2.5:'); + $this->tabR[4][17]=array('0:2','2:2.3','2.3:2.5','2.5:2.9','2.9:3.5','3.5:4.2','4.2:5','5:6','6:7.2','7.2:'); + + $this->tabR[5][0]=array(); + $this->tabR[5][1]=array('-99:-40','-40:-34','-34:-30','-30:-24','-24:-16','-16:-8','-8:0','0:8.1','8.1:16.1','16.1:'); + $this->tabR[5][2]=array('-99:-40','-40:-34','-34:-30','-30:-24','-24:-16','-16:-8','-8:0','0:8.1','8.1:16.1','16.1:'); + $this->tabR[5][3]=array('-99:-40','-40:-34','-34:-30','-30:-24','-24:-16','-16:-8','-8:0','0:8.1','8.1:16.1','16.1:'); + $this->tabR[5][4]=array('-99:-16.7','-16.7:-12.7','-12.7:-10','-10:-6','-6:-0.7','-0.7:4.7','4.7:10','10:15.3','15.3:20.7','20.7:'); + $this->tabR[5][5]=array('-999:-420','-420:-384','-384:-360','-360:-324','-324:-276','-276:-228','-228:-180','-180:-132','-132:-84','-84:'); + $this->tabR[5][6]=array('-99:-40','-40:-34','-34:-30','-30:-24','-24:-16','-16:-8','-8:0','0:8.1','8.1:16.1','16.1:'); + $this->tabR[5][7]=array('-99:-30','-30:-24','-24:-20','-20:-14','-14:-6','-6:2','2:10','10:18','18:26','26:'); + $this->tabR[5][8]=array('-99:-41.7','-41.7:-34.7','-34.7:-30','-30:-23','-23:-13.7','-13.7:-4.3','-4.3:5','5:14.3','14.3:23.7','23.7:'); + $this->tabR[5][9]=array('-99:-16.7','-16.7:-12.7','-12.7:-10','-10:-6','-6:-0.7','-0.7:4.7','4.7:10','10:15.3','15.3:20.7','20.7:'); + $this->tabR[5][10]=array('-99:-5','-5:-2','-2:0','0:3','3:7','7:11','11:15','15:19','19:23','23:'); + $this->tabR[5][11]=array('-99:-6.7','-6.7:-2.7','-2.7:0','0:4','4:9.3','9.3:14.7','14.7:20','20:25.3','25.3:30.7','30.7:'); + $this->tabR[5][12]=array('-99:-6.7','-6.7:-2.7','-2.7:0','0:4','4:9.3','9.3:14.7','14.7:20','20:25.3','25.3:30.7','30.7:'); + $this->tabR[5][13]=array('-99:-6.7','-6.7:-2.7','-2.7:0','0:4','4:9.3','9.3:14.7','14.7:20','20:25.3','25.3:30.7','30.7:'); + $this->tabR[5][14]=array('-99:-6.7','-6.7:-2.7','-2.7:0','0:4','4:9.3','9.3:14.7','14.7:20','20:25.3','25.3:30.7','30.7:'); + $this->tabR[5][15]=array('-99:-38.3','-38.3:-36.3','-36.3:-35.0','-35:-33','-33.0:-30','-30:-27.7','-27.7:-25.0','-25.0:-22.3','-22.3:-19.7','-19.7:'); + $this->tabR[5][16]=array('-99:-41.7','-41.7:-34.7','-34.7:-30','-30:-23','-23:-13.7','-13.7:-4.3','-4.3:5','5:14.3','14.3:23.7','23.7:'); + $this->tabR[5][17]=array(':-58.3','-58.3:53.3','-53.3:-50','-50:-45','-45:-38.3','-38.3:-31.7','-31.7:-25','-25:-18.3','-18.3:-11.7','-11.7:'); + + $this->tabR[6][0]=array(); + $this->tabR[6][1]=array('0:6','6:6.6','6.6:7','7:7.6','7.6:8.4','8.4:9.2','9.2:10','10:10.8','10.8:11.6','11.6:'); + $this->tabR[6][2]=array('0:6','6:6.6','6.6:7','7:7.6','7.6:8.4','8.4:9.2','9.2:10','10:10.8','10.8:11.6','11.6:'); + $this->tabR[6][3]=array('0:1.5','1.5:2.1','2.1:2.5','2.5:3.1','3.1:3.9','3.9:4.7','4.7:5.5','5.5:6.3','6.3:7.1','7.1:'); + $this->tabR[6][4]=array('0:1.8','1.8:2.2','2.2:2.5','2.5:2.9','2.9:3.4','3.4:4','4:4.5','4.5:5','5:5.6','5.6:'); + $this->tabR[6][5]=array('0:6.7','6.7:7.5','7.5:8','8:8.8','8.8:9.9','9.9:10.9','10.9:12','12:13.1','13.1:14.1','14.1:'); + $this->tabR[6][6]=array('0:7.7','7.7:8.5','8.5:9','9:9.8','9.8:10.9','10.9:11.9','11.9:13','13:14.1','14.1:15.1','15.1:'); + $this->tabR[6][7]=array('0:3','3:3.6','3.6:4','4:4.6','4.6:5.4','5.4:6.2','6.2:7','7:7.8','7.8:8.6','8.6:'); + $this->tabR[6][8]=array('0:1.3','1.3:1.7','1.7:2','2:2.4','2.4:2.9','2.9:3.5','3.5:4','4:4.5','4.5:5.1','5.1:'); + $this->tabR[6][9]=array('0:1.8','1.8:2.2','2.2:2.5','2.5:2.9','2.9:3.4','3.4:4','4:4.5','4.5:5','5:5.6','5.6:'); + $this->tabR[6][10]=array('0:1.3','1.3:1.7','1.7:2','2:2.4','2.4:2.9','2.9:3.5','3.5:4','4:4.5','4.5:5.1','5.1:'); + $this->tabR[6][11]=array('0:8.3','8.3:9.3','9.3:10','10:11','11:12.3','12.3:13.7','13.7:15','15:16.3','16.3:17.7','17.7:'); + $this->tabR[6][12]=array('0:4.7','4.7:5.5','5.5:6','6:6.8','6.8:7.9','7.9:8.9','8.9:10','10:11.1','11.1:12.1','12.1:'); + $this->tabR[6][13]=array('0:3','3:4.8','4.8:6','6:7.8','7.8:10.2','10.2:12.6','12.6:15','15:17.4','17.4:19.8','19.8:'); + $this->tabR[6][14]=array('0:3','3:4.8','4.8:6','6:7.8','7.8:10.2','10.2:12.6','12.6:15','15:17.4','17.4:19.8','19.8:'); + $this->tabR[6][15]=array('0:2','2:2.3','2.3:2.5','2.5:2.8','2.8:3.2','3.2:3.6','3.6:4.0','4.0:4.4','4.4:4.8','4.8:'); + $this->tabR[6][16]=array('0:1.7','1.7:1.9','1.9:2','2:2.2','2.2:2.5','2.5:2.7','2.7:3','3:3.3','3.3:3.5','3.5:'); + $this->tabR[6][17]=array('0:4.7','4.7:5.5','5.5:6','6:6.8','6.8:7.9','7.9:8.9','8.9:10','10:11.1','11.1:12.1','12.1:'); + + ?> \ No newline at end of file diff --git a/library/Metier/common/rncs.class.php b/library/Metier/common/rncs.class.php new file mode 100644 index 00000000..cc0c0025 --- /dev/null +++ b/library/Metier/common/rncs.class.php @@ -0,0 +1,9 @@ + \ No newline at end of file diff --git a/library/Metier/conversion/bilAltares.php b/library/Metier/conversion/bilAltares.php new file mode 100644 index 00000000..530df221 --- /dev/null +++ b/library/Metier/conversion/bilAltares.php @@ -0,0 +1,795 @@ +'CR', + 11=>'CR', + 13=>'CR', + 14=>'CR', + 15=>'CR', + 16=>'CR', + 17=>'CR', + 18=>'CR', + 19=>'CR', + 2=>'VT', + 21=>'VT', + 22=>'VT', + 24=>'VT', + 25=>'VT', + 3=>'CE', + 31=>'ME', + 32=>'ME', + 33=>'ME', + 34=>'ME', + 35=>'Rec', + 36=>'MAF', + 37=>'LG', + 38=>'LG', + 39=>'MD', + 4=>'RD', + 41=>'DIS', + 42=>'FLG', + 51=>'RJ', + 52=>'RJ', + 53=>'RA', + 56=>'PIE', + 57=>'SAUVJ', + 58=>'SAUVP', + 59=>'RR', + 6=>'R&L', + 61=>'LB', + 62=>'LJ', + 63=>'FP', + 64=>'INT', + 65=>'LQ', + 69=>'RL', + 7=>'Suite', + 71=>'SRJ', + 72=>'SRLJ', + 73=>'SP', + 74=>'AP', + 75=>'MP', + 76=>'EP', + 77=>'PRO', + 78=>'DC', + 79=>'CIA', + 8=>'INFR', + 91=>'DC', + 92=>'CP', + ); + +$tabEven2SO=array( // PROCOL + 1010=>92, // Déclaration de cessation de paiement + 1050=>7, // Homologation de la conciliation + 1055=>7, // Résolution de la conciliation + 1100=>57, // Jugement de sauvegarde + 1101=>58, // Plan de sauvegarde + 1200=>52, // Redressement Judiciaire + 1201=>52, // Conversion sauvegarde en Redressement Judiciaire + 1202=>75, // Renouv. Periode Observation + 1203=>78, // Avis de dépot de l'état de collocation + 1204=>78, // Dépôt des créances + 1205=>78, + 1206=>78, + 1207=>53, // Règlemement amiable + 1208=>78, + 1209=>51, // Règlement Judiciaire + 1210=>77, // Production + 1211=>52, // Redressement Judiciaire par extension au(x) gérant(s) + 1212=>69, // Rectif ou Annul.LJ + 1214=>78, // Avis de dépôt de l'état des créances (Loi de 1985) + 1215=>7, // Jugement de désignation des organes de la procédure + 1216=>78, // Autre avis de dépôt + 1300=>62, // Conversion Redressement Judiciaire en Liquidation + 1301=>62, // Ouverture Liquidation Judiciaire + 1302=>66, // Ouverture Liquidation Judiciaire Simplifiée + 1303=>62, // Ouverture Liquidation Judiciaire sur résolution + 1304=>62, // Réouverture Liquidation Judiciaire + 1305=>62, // Liquidation Judiciaire + 1306=>66, // Liquidation Judiciaire simplifiée + 1307=>62, // Conversion sauvegarde en Liquidation Judiciaire + 1308=>62, // Fin du régime de Liquidation Judiciaire Simplifiée + 1309=>62, // Conversion Liquidation Judiciaire en Liquidation + 1310=>56, // Procédure d'Insolvabilité Européenne + 1311=>62, // Liquidation Judiciaire par extension au(x) gérants + 1312=>62, // Liquidation Judiciaire avec continuation d'exploitation + 1313=>62, // Liquidation Judiciaire sans remise des accessoires + 1346=>7, // Procédure d'insolvabilité (Règlement 1346/2000 du Conseil Européen) + 1400=>7, // Nomination d'un administrateur judiciaire + 1401=>7, // Nomination d'un mandataire judiciaire + 1402=>7, // Nomination d'un représentant des créanciers + 1403=>7, // Nominnation/Remplacement de commissaire à l'exécution du plan + 1404=>7, // Prolongement de la mission du commissaire à l'exécution du plan + 1405=>7, // Nomination d'un juge commissaire + 1406=>7, // Changement de SYNDIC + 1407=>75, // Modif. de Plan + 1408=>75, // Modification du plan de cession + 1409=>75, // Modif. de de continuation + 1410=>75, // Suite de jugement/règlement/liquidation + 1411=>75, // Arrêt du plan de cession + 1412=>75, // Arrêt du plan de cession partielle + 1413=>75, // Arrêt du plan de continuation + 1414=>75, // Arrêt du plan de redressement + 1415=>75, // Prolongement du plan cession + 1416=>75, // Jugement constatant la bonne exécution du plan + 1417=>62, // Jugement d'extension de liquidation judiciaire + 1418=>52, // Jugement d'extension d'une procédure de redressement judiciaire + 1419=>57, // Jugement d'extension d'une procédure de sauvegarde + 1420=>7, // Nomination d'un liquidateur judiciaire + 1421=>7, // Jugement prorogeant le plan de redressement + 1425=>7, // Plan de cession avec location gérance + 1430=>7, // Jugement autorisant la poursuite d'activité + 1431=>7, // Jugement de cessation partielle d'activité + 1435=>7, // Suspension de l'exécution provisoire + 1436=>7, // Suspension provisoire des poursuites + 1440=>7, // Jugement accordant un délai pour déposer la liste des créances + 1445=>7, // Concordat + 1450=>92, //Cessation paiement + 1455=>7, // Jugement arrêtant le plan d'apurement du passif + 1460=>7, // Homologation du plan + 1470=>7, // Fin de mission d'administrateur judiciaire + 1480=>7, // Jugement ordonnant la jonction des procédures + 1500=>79, // Clôture de la procédure + 1501=>79, // Clôture de la procédure après cession totale + 1502=>76, // Clôture de la procédure pour extinction du passif + 1503=>79, // Cloture insuf.Actif + 1504=>79, // Clôture sauvegarde pour absence de projet de plan + 1505=>74, // Appel de jugement + 1506=>59, // Rectif ou Annulation RJ + 1507=>74, // Appel de jugement + 1508=>7, // Extinction du plan de sauvegarde + 1509=>7, // Extinction du plan de redressement + 1510=>74, // Rejet du plan + 1511=>7, // Résolution du plan de cession + 1512=>7, // Résolution du plan de continuation + 1513=>7, // Résolution du plan de sauvegarde + 1515=>74, // Arrêt divers + 1517=>59, // Rectification d'une erreur matérielle + 1520=>7, // Ordonnance + 1525=>74, // Appel du ministère public + 1530=>7, // Jugement constatant l'impécuniosité de la procédure de liquidation + 1540=>7, // Ordonnance statuant sur les contestations du projet de répartition + 1541=>74, // Rétractation de prononcé de liquidation judiciaire sur tierce opposition + 1542=>74, // Rétractation de jugement d'ouverture d'une procédure de sauvegarde sur tierce opposition + 1543=>74, // Rétractation de jugement d'ouverture d'une procédure de redressement judiciaire sur tierce opposition + 1544=>74, // Rétractation de jugement d'ouverture d'une procédure de liquidation judiciaire sur tierce opposition + 1545=>74, // Rétractation de jugement d'ouverture sur tierce opposition + 1546=>74, // Autre rétractation sur tierce opposition + 1550=>7, // Suites de jugements + 1580=>7, // Jugement prononçant la continuation de l'activité par apurement du passif + 1600=>63, // Faillite personnelle + 1601=>64, // Interdiction de gérer + 1602=>7, // Jugement de réhabilitation + 1603=>61, // Liquidation de Biens + 1604=>8, // Banqueroute + 1605=>7, // Jugement autorisant la reprise des poursuites individuelles + 1610=>8, // Faillite personnelle (Loi de 1985) + 1611=>8, // Interdiction de gérer (Loi de 1985) + 1620=>7, // Jugement condamnant le dirigeant en comblement du passif + 1650=>8, // Rétablissement Personnel + 1700=>7, // Décision soumise à publicité + 1900=>8, // Interdiction temporaire d'exercice de la profession de CAC + 1901=>8, // Radiation de la liste des CAC + 1999=>7, // Autre procédure collective + // MMD + 2000=>4, // Mention d'office + 2100=>39, // Chg.Capital/Cess.apport de parts + 2101=>39, // Chg.Capital/Cess.apport de parts + 2102=>39, // Chg.Capital/Cess.apport de parts + 2200=>4, // Cessation d'activité + 2201=>4, // Cessation d'activité temporaire + 2202=>41, // Dissolution + 2203=>41, // Dissolution de la société + 2204=>41, // Cessation d'activité avec dissolution + 2205=>4, // Fermeture du fonds + 2206=>39, // Mise en sommeil de la société + 2207=>39, // Suppression d'une branche d'activité + 2208=>39, // Suppression de l'établissement principal + 2209=>39, // Vente du fonds + 2210=>39, // Déclaration de dissolution par l'associé unique. + 2211=>39, // Clôture de la liquidation + 2212=>39, // Liquidation amiable + 2300=>39, // Changement d'Adresse + 2301=>39, // Modification de l'adresse du siège + 2302=>39, // Modification de l'enseigne + 2303=>39, // Modification de la date de clôture de l'exercice + 2304=>39, // Modification de la date de début d'activité + 2305=>39, // Modification de la dénomination + 2306=>39, // Modification de la durée de la société + 2307=>39, // Modification de la forme juridique + 2308=>39, // Modification du nom + 2309=>39, // Modification du nom commercial + 2310=>39, // Modification du pseudonyme + 2311=>39, // Modification sur l'exploitation + 2312=>39, // Modification(s) diverse(s) + 2313=>39, // Modification de l'activité + 2314=>39, // Poursuite de l'activité + 2315=>39, // Modification de l'administration + 2316=>39, // Mise en activité de la société + 2317=>39, // Modification du sigle + 2318=>39, // Modifications diverses + 2319=>39, // Poursuite de l'activité malgré la perte de plus de... + 2320=>39, // Reconsitution de l'actif net + 2321=>39, // Reconsitution de la moitié de l'actif net + 2350=>39, // Déclaration des associés (loi du 1er février 2005) + 2401=>39, // Changement de régime matrimonial + 2402=>39, // Changement de régime matrimonial (divorce) + 2403=>39, // Changement de régime matrimonial (mariage) + 2404=>39, // Changement de régime matrimonial (veuvage) + 2405=>39, // Changement de régime matrimonial (contrat de maria... + 2406=>39, // Reprise du fonds par le conjoint + 2407=>39, // Mention du conjoint collaborateur + 2408=>39, // Radiation du conjoint collaborateur + 2500=>3, // Confirmation établissement principal ou secondaire + 2510=>39, // L'établissement secondaire devient principal + 2520=>39, // Extension de l'établissement principal + 2600=>39, // Décès + 2610=>39, // Décision de l'unique actionnaire + 2620=>39, // Transmission universelle du patrimoine + 2630=>39, // Donation/Partage + 2635=>39, // Cession de parts + 2639=>39, // Nantissement de parts sociales + 2640=>39, // Changement de domicile personnel + 2650=>39, // Changement de nationalité + 2660=>39, // Réalisation de l'apport partiel d'actif + 2661=>39, // Apport partiel + 2700=>39, // Fusion/Absorption (entitée absorbante) + 2701=>39, // Fusion/Absorption (Entitée absorbante. Entité abso... + 2702=>39, // Fusion/Absorption (Entitée absorbante. Entité abso... + 2703=>39, // Fusion/Absorption (Entitée absorbante. Entité abso... + 2710=>39, // Projet de fusion (entitée absorbante) + 2720=>39, // Fusion/Absorption (entitée absorbée) + 2721=>39, // Fusion/Absorption (entitée absorbée non identifiée... + 2725=>39, // Fusion/Absorption + 2726=>39, // Projet de Fusion/Absorption + 2730=>39, // Projet de fusion (entitée absorbée) + 2740=>39, // Scission + 2750=>39, // Société participation + 2800=>37, // Location gérance reçue + 2840=>38, // Location/Gérance + 2850=>38, // Location gérance donnée : Précédent propriétaire e... + 2851=>38, // Location gérance donnée : Précédent propriétaire + 2860=>38, // Location gérance donnée : Précédent exploitant + 2870=>38, // Location gérance donnée + 2875=>38, // Gérance/Mandat + 2880=>38, // Renouvellement de location gérance + 2881=>38, // Changement de location gérance + 2885=>42, // Fin de location gérance + 2890=>38, // Location gérance relative à une branche + 2891=>39, // Location gérance relative à un établissement + 2892=>39, // Location gérance relative à un fond + 2900=>32, // Transfert d'établissement + 2901=>32, // Transfert de siège + 2902=>32, // Transfert du fonds + 2903=>32, // Projet de transfert du siège + 2904=>32, // Transfert du siège à l'étranger + 2950=>32, // Création de fonds + 2980=>32, // Transfert entre tribunaux + // DEPOTS DES COMPTES + 3100=>91, + 3200=>91, + 3300=>91, + 3999=>91, + // CREATIONS + 4000=>1, // Création d'entreprise + 4050=>1, // Création d'entreprise sans activité + 4100=>1, // Création d'entreprise sans établissement + 4200=>17, // Création d'établissement + 4250=>17, // Création suite à transfert + 4300=>17, // Création suite à reprise d'activité + 4350=>1, // Création suite à fin de location-gérance + 4355=>1, // Création suite à prise en location-gérance + 4360=>1, // Reprise d'activité par suite de la résolution de v + 4400=>1, // Création suite à changement de FJ + 4410=>1, // Création suite à héritage ou donation + 4450=>1, // Création suite à reprise par le conjoint + 4500=>17, // Fonds acquis dans le cadre d'une PC + 4501=>17, // Fonds acquis par achat + 4502=>17, // Fonds acquis par apport + 4600=>1, // Immatriculation d'une société de droit européen + 4999=>1, // Création + + // ventes !!! + 5500=>2, // Entreprise réalisant la vente + 5501=>2, // Entreprise réalisant la vente : Ancien propriétair... BODA ventes 12 0000-00-00 00:00:00 + 5502=>2, // Entreprise réalisant la vente : Ancien propriétair... BODA ventes 12 0000-00-00 00:00:00 + 5503=>2, // Entreprise réalisant la vente : Ancien propriétair... BODA ventes 12 0000-00-00 00:00:00 + 5510=>2, // Entreprise réalisant la vente : Co-propriétaire BODA ventes 12 0000-00-00 00:00:00 + 5600=>2, // Entreprise réalisant l'acquisition BODA ventes 12 0000-00-00 00:00:00 + 5650=>2, + 5700=>2, // Entreprise réalisant l'acquisition BODA ventes 12 0000-00-00 00:00:00 + 5999=>2, + + // RADIATIONS + 6000=>4, //Radiation pour cause de clôture de la liquidation (amiable/simplifié/général) + 6001=>4, //Radiation pour cause de clôture de la liquidation amiable + 6002=>4, //Radiation pour cause de clôture de la liquidation judiciaire pour IA + 6003=>4, //Radiation pour cause de clôture de la liquidation judiciaire + 6004=>4, //Radiation pour cause de clôture de la liquidation judiciaire simplifié + 6005=>4, //Radiation pour clôture du plan de cession + 6100=>4, //Radiation pour cause de décès + 6200=>4, //Radiation pour cause de mention d'office + 6201=>4, //Radiation pour cause de cessation d'activité + 6300=>4, //Radiation pour cause de non-exercice + 6400=>4, //Radiation pour cause de transfert + 6500=>4, //Radiation pour cause de jugement de clôture du plan de cession + 6600=>4, //Radiation d'un établissement + 6700=>4, //Radiation + ); +$tabEven2RO=array( 2305=>'a', + 2308=>'a', // Chg de dénomination(RS,Ens,Sigle) + 2309=>'a', // Modification du nom commercial BODB mmd 12 0000-00-00 00:00:00 + 2310=>'a', // Modification du pseudonyme + 2300=>'b', // Changement d'Adresse + 2301=>'b', + 2900=>'b', // Transfert d'établissement + 2901=>'b', // Transfert de siège + 2902=>'b', // Transfert du fonds + 2903=>'b', // Projet de transfert du siège + 2904=>'b', // Transfert du siège à l'étranger + 2950=>'b', // Création de fonds + 2980=>'b', // Transfert entre tribunaux + 2101=>'c', // Chg.Capital/Cess.apport de parts + 2315=>'d', // Changement de Dirigeants + 2313=>'e', // Mod Act/obj.soc./Cess./Mise somm. + 2307=>'f', // Changement de Forme juridique + 2318=>'g', // Opération sur Participations + 2725=>'h', // Fusion Absorption + 2318=>'i', // Mod.garantie financière/Caution + 2401=>'j', // Changement de régime matrimonial + 2319=>'k', // Non dissolution anticipée + 2318=>'l', // Non dissolution anticipée + 2318=>'m', // Dissolution anticipée (ou non) + 2303=>'n', // Mod.date cloture exercice social + 5500=>'V', // Entreprise réalisant la vente + 5501=>'V', // Entreprise réalisant la vente : Ancien propriétair... BODA ventes 12 0000-00-00 00:00:00 + 5502=>'V', // Entreprise réalisant la vente : Ancien propriétair... BODA ventes 12 0000-00-00 00:00:00 + 5503=>'V', // Entreprise réalisant la vente : Ancien propriétair... BODA ventes 12 0000-00-00 00:00:00 + 5510=>'V', // Entreprise réalisant la vente : Co-propriétaire BODA ventes 12 0000-00-00 00:00:00 + 5600=>'V', + 5650=>'V', + 5700=>'A', // Entreprise réalisant l'acquisition BODA ventes 12 0000-00-00 00:00:00 + 1411=>'F', // Arrêt du plan de cession + 1408=>'G', // Modification du plan de cession + 1409=>'N', // Modification du plan de continuation + 1414=>'M', // Arrêt du plan de redressement + + ); + + +function exporte($txt, $lon, $sep='') { + $txt=strtr(trim($txt),array('''=>"'",'&'=>'&', '²'=>'²', "\r"=>'', "\n"=>'', "\t"=>'')); + + if ($sep=='') return sprintf("%-".$lon.'.'.$lon."s", $txt); + + return trim(sprintf("%-".$lon.'.'.$lon."s", $txt)).$sep; +} + + +function conversionSd2So2000($nomFichierIn, $numeroAbonneBil='000960030', $nomFichierOut='', $optionFicheId='S') { + + $message=''; + $iDb=new WDB(); + $iBodacc=new MBodacc(); + $iInsee=new MInsee(); + $iRncs=new MRncs(); + + global $tabEvenSolib; + global $tabEven2SO; + global $tabEven2RO; + + $tabLignes=file($nomFichierIn); +//print_r($tabLignes); +//die(); + + $ligne001=$ligne100=$ligne104=$ligne999=0; + if ($nomFichierOut=='') $nomFichierOut=$nomFichierIn.'.bil'; + + $fp=fopen($nomFichierOut, 'w'); + $dateJ=date('Ymd'); + $ecrireLignePre=false; + + /** Codes/Variables à gérer **/ + $depPar=0; + $SOSTAE=''; + $typeFicheId='I'; // Fiche Identifiant + $optExtInsee=$optScore=false; + + /** Type de fiche Id **/ + if (strpos($optionFicheId, 'S')==true) $typeFicheId='S'; // Fiche Standard + elseif (strpos($optionFicheId, 'C')==true) $typeFicheId='C'; // Fiche Complète + if (strpos($optionFicheId, 'E')==true) $optExtInsee=true; // Option Extension INSEE + if (strpos($optionFicheId, 'N')==true) $optScore=true; // Option Score + + foreach ($tabLignes as $i=>$ligne) { + $typeLigne=substr($ligne, 0, 3)*1; + switch ($typeLigne) { + case 1: // Ligne ignorée + // Ecriture de l'entête + $ligne001++; + break; + case 100: // Structure Bodacc + case 999: // Fin + $strTxt=wordwrap($txtAnn, 39, EOL); + $tabTxt=explode(EOL, $strTxt); + foreach($tabTxt as $j=>$txt) { + $SOSEQ++; + if($j%16==0) { + // Type d'enregistrement 1=EntConf, 2=Rejet, 4=Multipropo, 5=Suivi MAJ Entrep, 7=Infos, 8=Envoi documen, 9=Annonce + $typEnr=9; + if ($j==0) $ligneTXT =initstr($SONABO, 9, '0', ALIGN_RIGHT); // Numéro d'abonné BIL ? + else $ligneTXT.=EOL.initstr($SONABO, 9, '0', ALIGN_RIGHT); // Numéro d'abonné BIL ? + $ligneTXT.=initstr($SONUME, 9, '0', ALIGN_RIGHT); // Numéro d'entreprise BIL ? + $ligneTXT.=initstr($SONUS, 9, '0', ALIGN_RIGHT); // Numéro d'UFS BIL ? + $ligneTXT.=initstr($nann, 9, '0', ALIGN_RIGHT); // Numéro d'annonce BIL ? + $ligneTXT.=initstr($siren, 9, '0', ALIGN_RIGHT); // Siren + $ligneTXT.=initstr($nic, 5, '0', ALIGN_RIGHT); // Nic + $ligneTXT.=exporte('SE', 2); // Code produit BIL ? SE, DE, DI, SJ + $ligneTXT.=initstr($SOSEQ, 5, '0', ALIGN_RIGHT); // Numéro dans la séquence + $ligneTXT.=initstr($dateJ, 8, '0', ALIGN_RIGHT); // Numéro dans la séquence + $ligneTXT.=exporte($typEnr, 1); // Type d'enregistrement 1=EntConf, 2=Rejet, 4=Multipropo, 5=Suivi MAJ Entrep, 7=Infos, 8=Envoi documen, 9=Annonce + $ligneTXT.=exporte('TXT', 3); // Structure identité + $ligneTXT.=exporte('A', 1); // Confirmation 'A'uto ou 'C' pour manuelle + $ligneTXT.=exporte($ref, 30); // Réf. Client + $ligneTXT.=exporte($SOORIG, 1); // 1:Insee actif, 2=Ufs, 3=Annonce, 4=Manuelle, 5=Asso, 7=RCS actif, 8=Insee cessa eco, 9=Insee/RCS radié + $ligneTXT.=exporte($SOJAL, 3); // 001=Bodacc A, 200=Bodacc B, 300=Bodacc C + $ligneTXT.=initstr($datePar, 8, '0', ALIGN_RIGHT); // Date de parution + $ligneTXT.=initstr(0, 5, '0', ALIGN_RIGHT); // Page + $ligneTXT.=exporte($codeEve, 2); // + $ligneTXT.=initstr($depPar, 2, '0', ALIGN_RIGHT); + $ligneTXT.=initstr($numAnn, 6, '0', ALIGN_RIGHT); + $ligneTXT.=exporte($codeRol, 1); // + $ligneTXT.=exporte('T', 1); + } + $ligneTXT.=exporte($txt, 40); + } + $codeEve=$codeRol=''; + $ligneOut=$ligneID.EOL.$ligneANN.EOL.$ligneTXT; + if ($ligne100>1) $ecrireLignePre=true; + if($typeLigne==999) { + $ligne999++; + break; + } + + $nann = trim(substr($ligne, 3 , 10 ))*1; // N° d'annonce + $siren = substr($ligne, 13 , 9 ); // Siren de l'entreprise concernée par l'annonce + $tabIdentite=@$iInsee->getIdentiteEntreprise($siren); + $nic = trim(substr($ligne, 22, 5 ))*1; // Nic + $ref = trim(substr($ligne, 71, 18 )); // Référence Client + $numPar = substr($ligne, 27 , 3 ); // Numéro de parution du Bodacc dans l'année + $bodacc = substr($ligne, 30 , 1 ); // Code Bodacc (A, B ou C) A, B ou C + $datePar= substr($ligne, 31 , 8 )*1; // Date de parution du Bodacc Format AAAAMMJJ + $numAnn = substr($ligne, 39 , 5 ); // Numéro de l'annonce dans le Bodacc + $typeAnn= substr($ligne, 47 , 1 ); // Type d'annonce Bodacc I=Insertion (publication d'une annonce), A=Additif (ajout à une précédente annonce), (1) R=Rectificatif (correction d'une annonce), S=Suppression d'une annonce + $corNumA= substr($ligne, 48 , 5 ); // Numéro de l'annonce corrigée Si annonce différent de Insertion + $corDate= substr($ligne, 53 , 8 ); // Date du Bodacc de l'annonce corrigée Si annonce différent de Insertion. Format AAAAMMJJ + $corPage= substr($ligne, 61 , 6 ); // Première page du Bodacc de l'annonce corrigée Si annonce différent de Insertion + $corNumP= substr($ligne, 67 , 4 ); // Numéro parution du Bodacc dans l'année de l'annonce corrigée Si annonce différent de Insertion + $numRC = trim(substr($ligne,95 , 9 )); // Numéro de RC (Registre du Commerce) de l'entreprise + $rs = trim(substr($ligne,104, 150 )); // Raison sociale de l'entreprise + $nomCom = trim(substr($ligne,254, 100 )); // Nom Commerciale + $ens = trim(substr($ligne,354, 100 )); // Enseigne + $fj = trim(substr($ligne,484, 4 ))*1; // FJ + $fjLib = trim(substr($ligne,488, 90 )); // FJ libellé + $capMnt = trim(substr($ligne,578, 15 )); // Capital + $capDev = trim(substr($ligne,593, 3 )); // Capital Devise + $adrNum = trim(substr($ligne,596, 4 )); // + $adrBtq = trim(substr($ligne,600, 1 )); // FJ libellé + $adrVoi = trim(substr($ligne,601, 5 )); // FJ libellé + $adrLib = trim(substr($ligne,606, 50 )); // FJ libellé + $adrL2 = trim(substr($ligne,656, 50 )); // FJ libellé + $adrL3 = trim(substr($ligne,706, 40 )); // FJ libellé + $adrCP = trim(substr($ligne,746, 5 ))*1; // FJ libellé + $adrVil = trim(substr($ligne,751, 45 )); // FJ libellé + if ($adrCP==0) { + $adrNum = trim(substr($ligne,796, 4 )); // FJ libellé + $adrBtq = trim(substr($ligne,800, 1 )); // FJ libellé + $adrVoi = trim(substr($ligne,801, 5 )); // FJ libellé + $adrLib = trim(substr($ligne,806, 50 )); // FJ libellé + $adrL2 = trim(substr($ligne,856, 50 )); // FJ libellé + $adrL3 = trim(substr($ligne,906, 40 )); // FJ libellé + $adrCP = trim(substr($ligne,946, 5 ))*1; // FJ libellé + $adrVil = trim(substr($ligne,951, 45 )); // FJ libellé + } + $even=array(); + $even[7]= substr($ligne, 996 , 4 )*1; // Code Evènement Bodacc n°1 Cf. Table EVEN + $even[6]= substr($ligne, 1000, 4 )*1; // Code Evènement Bodacc n°2 Cf. Table EVEN + $even[5]= substr($ligne, 1004, 4 )*1; // Code Evènement Bodacc n°3 Cf. Table EVEN + $even[4]= substr($ligne, 1008, 4 )*1; // Code Evènement Bodacc n°4 Cf. Table EVEN + $even[3]= substr($ligne, 1012, 4 )*1; // Code Evènement Bodacc n°5 Cf. Table EVEN + $even[2]= substr($ligne, 1016, 4 )*1; // Code Evènement Bodacc n°6 Cf. Table EVEN + $even[1]= substr($ligne, 1020, 4 )*1; // Code Evènement Bodacc n°7 Cf. Table EVEN + $even[0]= substr($ligne, 1024, 4 )*1; // Code Evènement Bodacc n°8 Cf. Table EVEN + $txtEven=''; + foreach ($even as $codeEven) + if ($codeEven<>0) { + if (@$codeEve=='') $codeEve=$tabEven2SO[$codeEven]; + if (@$codeRol=='') $codeRol=$tabEven2RO[$codeEven]; + $txtEven.=$iBodacc->getEvenement($codeEven).', '; + $catEven=$iBodacc->getChapitreEvenement($codeEven); + } + else + $txtEven.=''; + $txtEven=substr($txtEven,0,strlen($txtEven)-2); + $dateCess= substr($ligne, 1136, 8 )*1; // Date de cessat° des paiements + $dateJuge= substr($ligne, 1144, 8 )*1; // Date de jugement + $dateEffet=substr($ligne, 1161, 8 )*1; // Date d'effet + if ($dateEffet*1==0) $dateEffet=$dateJuge; + + $vteMnt=trim(substr($ligne, 1169, 15 ))*1; // Montant de la vente + $vteDev=substr($ligne, 1184, 3 ); // Devise de la vente + + + if ($nic*1==0) $nic=$tabIdentite['Nic']; + + $SONABO=$numeroAbonneBil; + if ($tabIdentite['Actif']==1) $SOORIG=1; + elseif (!isset($tabIdentite['Actif'])) $SOORIG=3; + elseif ($tabIdentite['Actif']==0 && ($tabIdentite['EntActiveRCS']==1||$tabIdentite['EtabActifRCS']==1)) $SOORIG=7; + elseif ($tabIdentite['Actif']==0 && $tabIdentite['EntActiveRCS']==0 && $tabIdentite['EtabActifRCS']==0) $SOORIG=9; + else $SOORIG=8; + + if ($tabIdentite['Civilite']==1) $SOTSEX='M'; + elseif ($tabIdentite['Civilite']==2) $SOTSEX='F'; + else $SOTSEX=''; + $SONUME=''.preg_replace('/^0+/','', $tabIdentite['Source']).$tabIdentite['SourceId']; + $SONUS='000000000'; + $SOSEQ=1; + if ($adrCP==0) { + $adrNum = $tabIdentite['AdresseNum']; + $adrBtq = $tabIdentite['AdresseBtq']; + $adrVoi = $tabIdentite['AdresseVoie']; + $adrLib = $tabIdentite['AdresseRue']; + $adrL2 = $tabIdentite['Adresse2']; + $adrL3 = ''; + $adrCP = $tabIdentite['CP']; + $adrVil = $tabIdentite['Ville']; + } + $typEnr=1; + $DBILS2 =initstr($SONABO, 9, '0', ALIGN_RIGHT); // Numéro d'abonné BIL ? + $DBILS2.=initstr($SONUME, 9, '0', ALIGN_RIGHT); // Numéro d'entreprise BIL ? + $DBILS2.=initstr($SONUS, 9, '0', ALIGN_RIGHT); // Numéro d'UFS BIL ? + $DBILS2.=initstr($nann, 9, '0', ALIGN_RIGHT); // Numéro d'annonce BIL ? + $DBILS2.=initstr($siren, 9, '0', ALIGN_RIGHT); // Siren + $DBILS2.=initstr($nic, 5, '0', ALIGN_RIGHT); // Nic + $DBILS2.=exporte('SE', 2); // Code produit BIL ? SE, DE, DI, SJ + $DBILS2.=initstr($SOSEQ, 5, '0', ALIGN_RIGHT); // Numéro dans la séquence dans le groupe + $DBILS2.=initstr($dateJ, 8, '0', ALIGN_RIGHT); // Date d'envoi de l'info + $DBILS2.=exporte($typEnr, 1); // Type d'enregistrement 1=EntConf, 2=Rejet, 4=Multipropo, 5=Suivi MAJ Entrep, 7=Infos, 8=Envoi documen, 9=Annonce + $DBILS2.=exporte('ID', 3); // Structure identité + $DBILS2.=exporte('A', 1); // Confirmation 'A'uto ou 'C' pour manuelle + $DBILS2.=exporte($ref, 30); // Réf. Client + //($annonce['codePostalSiege'], 5, '0', ALIGN_RIGHT) + $DBILS2.=exporte($SOORIG, 1); // 1:Insee actif, 2=Ufs, 3=Annonce, 4=Manuelle, 5=Asso, 7=RCS actif, 8=Insee cessa eco, 9=Insee/RCS radié + $DBILS2.=exporte('', 1); // D=Siren douteux + $DBILS2.=exporte('', 9); // Témoin de MAJ + $DBILS2.=exporte($rs, 60); // + $DBILS2.=exporte(substr($rs,60),30); // + $DBILS2.=exporte($tabIdentite['Sigle'], 30); // Vide ! + $DBILS2.=exporte($ens, 60); // + $DBILS2.=initstr($adrNum, 4, '0', ALIGN_RIGHT); // + $DBILS2.=exporte($adrBtq, 1); // + $DBILS2.=exporte(preg_replace('/ +/',' ',$adrVoi.' '.$adrLib), 33); // + $DBILS2.=exporte($adrVil, 32); // + $DBILS2.=initstr($adrCP, 5, '0', ALIGN_RIGHT); // + $DBILS2.=exporte(preg_replace('/ +/',' ',$adrL2.' '.$adrL3), 30); // + $DBILS2.=initstr($tabIdentite['DateCreaEn'], 8, '0', ALIGN_RIGHT); // Date créa ENT + $DBILS2.=exporte($tabIdentite['Siege'], 1); // Statut de l'établissement + $DBILS2.=initstr($tabIdentite['FJ'], 4, 0, ALIGN_RIGHT); + $DBILS2.=exporte($SOTSEX, 1); // Sexe M/F + + $DBILS2.=initstr($tabIdentite['NbEtab']*1, 4, 0, ALIGN_RIGHT); + $DBILS2.=exporte($SOSTAE, 4); // NAF4 ENT + $DBILS2.=exporte('', 4); // Famille ENT + $DBILS2.=exporte($SOSTAE, 4); // NAF4 ETAB + $DBILS2.=exporte('', 4); // Famille ETAB + $DBILS2.=exporte('', 1); // Indicateur Procol + $DBILS2.=exporte('', 2); // Code monnaie + $DBILS2.=initstr(0, 13, '0', ALIGN_RIGHT); // Montant du capital + $DBILS2.=exporte('', 7); // Effectif + $DBILS2.=exporte('', 9); // Num RC + $DBILS2.=initstr(strtr($tabIdentite['Tel'],array('.'=>'','+'=>'00',' '=>'','-'=>'','/'=>'')), 10, '0', ALIGN_RIGHT); + $DBILS2.=initstr(strtr($tabIdentite['Fax'],array('.'=>'','+'=>'00',' '=>'','-'=>'','/'=>'')), 10, '0', ALIGN_RIGHT); + //5630Z5630Z RUE 00000000 00000000 2901929019 + $DBILS2.=exporte($tabIdentite['Web'], 40); + $DBILS2.=exporte('', 3); // Qualité du dirigeant + $DBILS2.=exporte('', 60); // NOM, Prénom du dirigeant + $DBILS2.=initstr(0, 8, '0', ALIGN_RIGHT); // Date Naiss Diri +// $DBILS2.=exporte('', 79); + $DBILS2.=exporte('', 35); // Lieu de Naissance + if ($optScore) { + $tabTmp=$iDb->select('scores_surveillance', + 'siren, actif, procol, indiScore, indiScore20, encours, indiScoreDate, dateBilan, indiScorePre, indiScore20Pre, encoursPre, indiScoreDatePre, sourceModif, nbModifs, dateUpdate', + "siren=$siren AND indiScoreDate>0", false, MYSQL_ASSOC); + if (@$tabTmp[0]['siren']*1==$siren) { + echo "$siren, parution Annonce le $datePar, calcul le ".@$tabTmp[0]['dateUpdate'].EOL; + $tabScore=$tabTmp[0]; + $note=$tabScore['indiScore20']; + $encours=round($tabScore['encours']/1000); + } else { + echo "$siren, parution Annonce le $datePar, pas de calcul !".EOL; + $tabScore=@calculIndiScore($siren, $nic, false, 0, false); + $note=$tabScore['Indiscore20']; + $encours=round($tabScore['encours']/1000); + } + $encoursDev='EUR'; + } else + $note=$encours=$encoursDev=''; + $DBILS2.=initstr($note, 2, '0', ALIGN_RIGHT); //37 Note sur 20 + $DBILS2.=initstr($encours, 7, '0', ALIGN_RIGHT); //44 Encours KE KF + $DBILS2.=exporte('', 1); //45 Code paiement + $DBILS2.=exporte('', 1); //46 Code situfi + $DBILS2.=exporte('', 1); //47 Code Avis + $DBILS2.=exporte($encoursDev,3); //47 Encours de la devise + $DBILS2.=exporte('', 6); // Code Sicovam + $DBILS2.=exporte('', 2); // Type de marché RM, CT, SM, HC, MO, NM, ML, AL, MR + $DBILS2.=exporte('', 12); // Code ISIN + $DBILS2.=exporte('', 9); // Filler Bil anciennement sur 83, 32 puis 9 + $DBILS2.=exporte($tabIdentite['NafEnt'], 5); + $DBILS2.=exporte($tabIdentite['NafEtab'], 5);// + $DBILS2.=exporte('', 18); //60 Filler + $DBILS2.=exporte('', 4); // Filler RUE ? + $DBILS2.=exporte('', 5); // Nic source cible de l'étab + $DBILS2.=initstr(0, 8, '0', ALIGN_RIGHT); // Date de MAJ du capital + $DBILS2.=exporte('', 3); // Monnaie d'origine du capital + $DBILS2.=exporte('', 3); // Monnaie de livraison du capital (fin de l'ancien filler) + $DBILS2.=initstr(0, 8, '0', ALIGN_RIGHT); // Date de création de l'établissement + $DBILS2.=exporte('', 1); // Origine création + $DBILS2.=exporte('', 2); // Tr Eff Ent + $DBILS2.=exporte('', 2); // Tr Eff Etab + $DBILS2.=exporte('', 2); // NAP 40 Entrep + $DBILS2.=exporte('', 2); // NAP 40 Etab + $DBILS2.=exporte('', 5); // Act Artisanale Etab + $DBILS2.=exporte('', 1); // Modalité activité entrep + $DBILS2.=exporte('', 1); // Modalité activité etab + $DBILS2.=exporte('', 2); // Code Région Entrep + $DBILS2.=exporte('', 2); // Code Région Etab + $DBILS2.=exporte($tabIdentite['Dept'], 2); // Département du siège + $DBILS2.=exporte($tabIdentite['codeCommune'], 3); // Localité + $DBILS2.=exporte($tabIdentite['Dept'], 2); // Département de l'étab + $DBILS2.=exporte($tabIdentite['codeCommune'], 3); // Localité + $DBILS2.=exporte('', 1); // Dept Outre Mer + $DBILS2.=exporte('', 1); // Arrondissement + $DBILS2.=exporte('', 1); // Canton Dom ? + $DBILS2.=exporte('', 2); // Canton + $DBILS2.=exporte('', 8); // Code Ilot + $DBILS2.=exporte('', 2); // ZEMET + $DBILS2.=exporte('', 2); // Tranche Comm Etab + $DBILS2.=exporte('', 2); // Dept Unite urbaine + $DBILS2.=exporte('', 1); // Taille UU + $DBILS2.=exporte('', 2); // UU etab + $DBILS2.=exporte('', 5); // Code rivoli + $DBILS2.=exporte('', 2); // PPale région entrep + $DBILS2.=exporte('', 1); // Code monoreg + $DBILS2.=exporte('', 1); // Code monoact + $DBILS2.=exporte('', 1); // Code tranche CA + $DBILS2.=exporte('', 1); // Tranche part CA export + $DBILS2.=exporte('', 1); // RECME + $DBILS2.=exporte('', 1); // Ordinarité + $DBILS2.=exporte('', 2); // Code nature étab + $DBILS2.=exporte('', 2); // Sigularité étab + + $ligneID=$DBILS2; + $ligne100++; + $cor=''; + if ($typeAnn<>'I') + $cor=" - Annonce n°$corNumA $corNumP, page $corPage, du ".WDate::dateT('Ymd','d/M/Y',$corDate); + switch($typeAnn) { + case 'I': $cor='Insertion'.$cor; break; + case 'A': $cor='Additif'.$cor; break; + case 'R': $cor='Rectificatif'.$cor; break; + case 'S': $cor='Suppression'.$cor; break; + default: break; + } + $codeTri= substr($ligne, 89 , 6 ); // Code Tribunal Codification interne utilisée par le Bodacc + $libTri=$iBodacc->getTribunalNom($codeTri); + + $SOSEQ++; + if ($bodacc=='A') $SOJAL='001'; + elseif ($bodacc=='B') $SOJAL='200'; + elseif ($bodacc=='C') $SOJAL='300'; + else $SOJAL='999'; + $DBILS2 =initstr($SONABO, 9, '0', ALIGN_RIGHT); // Numéro d'abonné BIL ? + $DBILS2.=initstr($SONUME, 9, '0', ALIGN_RIGHT); // Numéro d'entreprise BIL ? + $DBILS2.=initstr($SONUS, 9, '0', ALIGN_RIGHT); // Numéro d'UFS BIL ? + $DBILS2.=initstr($nann, 9, '0', ALIGN_RIGHT); // Numéro d'annonce BIL ? + $DBILS2.=initstr($siren, 9, '0', ALIGN_RIGHT); // Siren + $DBILS2.=initstr($nic, 5, '0', ALIGN_RIGHT); // Nic + $DBILS2.=exporte('SE', 2); // Code produit BIL ? SE, DE, DI, SJ + $DBILS2.=initstr($SOSEQ, 5, '0', ALIGN_RIGHT); // Numéro dans la séquence + $DBILS2.=initstr($dateJ, 8, '0', ALIGN_RIGHT); // Numéro dans la séquence + $DBILS2.=exporte('9', 1); // Type d'enregistrement 1=EntConf, 2=Rejet, 4=Multipropo, 5=Suivi MAJ Entrep, 7=Infos, 8=Envoi documen, 9=Annonce + $DBILS2.=exporte('ANN', 3); // Structure identité + $DBILS2.=exporte('A', 1); // Confirmation 'A'uto ou 'C' pour manuelle + $DBILS2.=exporte($ref, 30); // Réf. Client + //($annonce['codePostalSiege'], 5, '0', ALIGN_RIGHT) + $DBILS2.=exporte($SOORIG, 1); // 1:Insee actif, 2=Ufs, 3=Annonce, 4=Manuelle, 5=Asso, 7=RCS actif, 8=Insee cessa eco, 9=Insee/RCS radié + $DBILS2.=exporte($SOJAL, 3); // 001=Bodacc A, 200=Bodacc B, 300=Bodacc C + $DBILS2.=initstr($datePar, 8, '0', ALIGN_RIGHT); // Date de parution + $DBILS2.=initstr(0, 5, '0', ALIGN_RIGHT); // Page + if ($codeEve=='') { + $message.="Siren : $siren, Bodacc $bodacc, code évènement non géré : '$codeEven'".EOL; + /*$nann = trim(substr($ligne, 3 , 10 ))*1; // N° d'annonce + $siren = substr($ligne, 13 , 9 ); // Siren de l'entreprise concernée par l'annonce + $tabIdentite=@$iInsee->getIdentiteEntreprise($siren); + $nic = trim(substr($ligne, 22, 5 ))*1; // Nic + $ref = trim(substr($ligne, 71, 18 )); // Référence Client + $numPar = substr($ligne, 27 , 3 ); // Numéro de parution du Bodacc dans l'année + = substr($ligne, 30 , 1 ); // Code Bodacc (A, B ou C) A, B ou C + $datePar= substr($ligne, 31 , 8 )*1; // Date de parution du Bodacc Format AAAAMMJJ + $numAnn*/ + sendMail('infoslegales@scores-decisions.com', 'ylenaour@scores-decisions.com', "Surveillance Annonces Legales SOFID (ERREUR)", $message); + return $message; + } + $DBILS2.=exporte($codeEve, 2); // + $DBILS2.=initstr($depPar, 2, '0', ALIGN_RIGHT); + $DBILS2.=initstr($numAnn, 6, '0', ALIGN_RIGHT); + $DBILS2.=exporte($codeRol, 1); // + $DBILS2.=exporte($tabEvenSolib[$codeEve], 5); + $DBILS2.=exporte($codeTri, 6); // + $DBILS2.=exporte($numPar, 3); // + $DBILS2.=initstr($dateJuge, 8, '0', ALIGN_RIGHT); // Date de jugement + $DBILS2.=initstr($dateEffet, 8, '0', ALIGN_RIGHT); // Date d'effet + $DBILS2.=initstr($dateCess, 8, '0', ALIGN_RIGHT); // Date de cessat° des paiements + $DBILS2.=exporte($vteDev, 2); // Devise de la vente + $DBILS2.=initstr($vteMnt, 11, '0', ALIGN_RIGHT); // Montant de la vente + $DBILS2.=exporte('', 33); // Particularité + $DBILS2.=exporte('', 4); // Code rubrique du Bodacc A1xx + $DBILS2.=exporte('', 6); // Code lib injecté + + $tabJuge=$iRncs->getIntervenants($siren); + foreach ($tabJuge as $iDepot=>$depot) { + $DBILS2.=exporte($depot['admid'], 5); // Mot clé Nom + $DBILS2.=exporte($depot['admtype'], 1); // Type officier ministeriel + $DBILS2.=initstr($depot['admid'], 7, '0', ALIGN_RIGHT); // Code Bil + $DBILS2.=exporte($depot['admnom'], 30); // Nom syndic + $DBILS2.=initstr($depot['admadrNum'], 4, '0', ALIGN_RIGHT); // N° rue + $DBILS2.=exporte($depot['admadrInd'], 1); // Bis + $DBILS2.=exporte($depot['admadrType'], 3); // Type Voie + $DBILS2.=exporte($depot['admadrVoie'], 33); // Lib Voie + $DBILS2.=exporte($depot['admadr2'], 32); // Lieu + $DBILS2.=exporte($depot['admadrCP'], 5); // CP + $DBILS2.=exporte($depot['admadrVille'], 32); // Ville + $DBILS2.=exporte('', 10); // Tel + if ($iDepot==1) break; + } + + $ligneANN=$DBILS2; + $txtAnn=''; + //if ($ligne100>1) $ecrireLignePre=true; + break; + case 104: // Annonce + $ligne104++; + $txtAnn=trim($txtAnn.' '.trim(substr($ligne, 89 , 1910))); // Texte Annonce + break; + default: // Ligne non gérée + break; + } + if ($ecrireLignePre) { + fwrite($fp, $ligneOut.EOL); + $ecrireLignePre=false; + } + } + fclose($fp); + return true; +} \ No newline at end of file diff --git a/library/Metier/insee/classMInsee.php b/library/Metier/insee/classMInsee.php new file mode 100644 index 00000000..2c3afa2d --- /dev/null +++ b/library/Metier/insee/classMInsee.php @@ -0,0 +1,5930 @@ +'Modification de l\'établissement', + 'iOA'=>'Activation économique de l\'établissement par adjonction de moyens de production', + 'i0C'=>'Création de l\'établissement', + 'iOD'=>'Désactivation économique de l\'établissement par suppression de moyens de production', + 'i0F'=>'Fermeture de l\'établissement', + 'iOR'=>'Modification simple ou modification de moyen de production de l\'établissement', + 'iCC'=>'Création de l\' entreprise par création du premier établissement', + 'iRC'=>'Réactivation de l\'entreprise par création de l\'établissement', + 'iRR'=>'Réactivation de l\'entreprise par réactivation de l\'établissement', + 'iFF'=>'Fermeture de l\'établissement entraînant la fermeture de l\'entreprise', + 'iTC'=>'Création de l\'établissement dans le cadre d\'un transfert', + 'iTR'=>'Réactivation de l\'établissement dans le cadre d\'un transfert', + 'iTO'=>'Modification simple ou de moyens de production sur l\'établissement dans le cadre d\'un transfert', + 'iTA'=>'Activation économique de l\'établissement par adjonction de moyens de production dans le cadre d\'un transfert', + 'iTD'=>'Désactivation économique de l\'établissement par suppression de moyens de production dans le cadre d\'un transfert', + 'iTF'=>'Fermeture de l\'établissement dans le cadre d\'un transfert', + 'iER'=>'Modification ERR de l\'établissement', + // Evènements Crées par différentiel de la Mensuelle Insee par S&D + 'iM0C'=>'Création de l\'établissement', + 'iM0F'=>'Fermeture de l\'établissement', + 'iM0R'=>'Réactivation de l\'établissement', + 'iM00'=>'Modification de l\'établissement', + 'iMAS'=>'Modification de la nature d\'activité et de la saisonalité', + 'iMAC'=>'Modification de la nature d\'activité de l\'établissement', + 'iMSA'=>'Modification de la saisonalité de l\'établissement', + // Evènements Crées par diff3+4 + 'iMPF'=>'Etablissement présumé fermé (formalités de création faites par le repreneur)', + 'iMNP'=>'Etablissement présumé fermé (retour de courrier en NPAI)', + // Décret n°2010-1042 du 01/09/2010 relatif à l'inscription au registre du commerce et des sociétés et au répertoire national mentionné à l'article R. 123-220 du code de commerce + // Codification provisoire à changer dans l'attente de l'INSEE + 'iRCS'=>'Suppression du SIREN suite au refus d\'inscription au Registre du Commerce et des Sociétés', + // Nouveaux évènements Sirene3 de la quotidienne Insee + 'i110'=>'Création de l\'entreprise', + 'i120'=>'Réactivation de l\'entreprise', + 'i125'=>'Réactivation de l\'entreprise suite à une mise à jour du répertoire SIRENE', + 'i130'=>'Création de l\'établissement', + 'i145'=>'Reprise d\'activité de l\'établissement suite à une mise à jour du répertoire SIRENE', + 'i400'=>'Suppression du doublon', + 'i410'=>'Cessation juridique de l\'entreprise', + 'i420'=>'Absence d\'activité de l\'entreprise (cessation économique de l\'entreprise)', + 'i425'=>'Absence d\'activité d\'une entreprise suite à une mise à jour au répertoire SIRENE', + 'i430'=>'Fermeture de l\'établissement', + 'i435'=>'Fermeture de l\'établissement suite à une mise à jour au répertoire SIRENE', + 'i510'=>'Création de l\'établissement d\'arrivée et cessation de l\'établissement de départ dans le cadre d\'un transfert', + 'i520'=>'Création de l\'établissement d\'arrivée et modification de l\'établissement de départ dans le cadre d\'un transfert', + 'i530'=>'Modification de l\'établissement d\'arrivée et cessation de l\'établissement de départ dans le cadre d\'un transfert', + 'i540'=>'Modification de l\'établissement d\'arrivée et modification de l\'établissement de départ dans le cadre d\'un transfert', + 'i610'=>'Modification d\'activité au niveau du SIREN associé à une activation économique par adjonction de moyens de production', + 'i620'=>'Modification d\'activité au niveau du SIREN associé à une désactivation économique par suppression de moyens de production', + 'i621'=>'Modification d\'activité du SIREN associé à une désactivation économique par suppression de moyens de production suite à une correction d\'erreur', + 'i631'=>'Modification d\'activité du SIREN associé', + 'i640'=>'Modification d\'activité au niveau de l\'établissement associée à une activation économique par adjonction de moyens de production', + 'i650'=>'Modification d\'activité au niveau de l\'établissement associée à une désactivation économique par suppression de moyens de production', + 'i661'=>'Modification d\'activité de l\'établissement', + 'i710'=>'Modification de l\'identification du SIREN', + 'i711'=>'Modification de l\'identification du SIREN suite à correction d\'erreur', + 'i720'=>'Modification de l\'adresse ou de l\'identification de l\'établissement', + 'i780'=>'Modification de l\'établissement', + 'i781'=>'Modification de l\'établissement suite à correction d\'erreur', + 'i795'=>'Personne radiée à sa demande de de la base SIRENE diffusion', + ); + +global $tabDestinat; +$tabDestinat=array( 'i3'=>'Etablissement vendu', + 'i7'=>'Maintien d\'activité, l\'établissement devient siège', + 'i8'=>'Maintien d\'activité, l\'établissement devient principal', + 'iA'=>'Maintien d\'activité, l\'établissement devient secondaire', + 'iB'=>'Etablissement fermé', + 'iC'=>'Etablissement supprimé', + 'iD'=>'Mise en location-gérance de la totalité du fonds', + 'iE'=>'Mise en location-gérance d\'une partie du fonds', + 'iF'=>'Cessation d\'activité (pour les liasses agricoles)', + 'iG'=>'Mise en location-gérance de la totalité des terres et des bâtiments agricoles (pour les liasses agricoles)', + 'iH'=>'Mise en location-gérance d\'une partie des terres et des bâtiments agricoles (pour les liasses agricoles)', + 'iI'=>'Transmission au conjoint (pour les liasses agricoles)', + 'iJ'=>'Cession (pour les liasses agricoles)', + 'iVP'=>'Suppression partielle d\'activité par vente', + 'iDP'=>'Suppression partielle d\'activité par disparition', + 'iRP'=>'Suppression partielle d\'activité par reprise par le propriétaire', + ); +global $tabTypEtab; +$tabTypEtab=array( 'i00'=>'Rappel des données de l\'établissement du siège en cas de modification exclusive de l\'entreprise', + 'i08'=>'Siège avant transfert non fermé', + 'i09'=>'Siège après transfert non créé', + 'i10'=>'Siège avant transfert fermé', + 'i11'=>'Siège après transfert créé', + 'i12'=>'Siège créé (hors transfert)', + 'i13'=>'Siège fermé (hors transfert)', + 'i14'=>'Siège modifié (hors transfert) : modification de l\'activité principale avec activation économique', + 'i15'=>'Siège modifié (hors transfert) : modification de l\'activité principale avec désactivation économique', + 'i16'=>'Siège modifié (hors transfert) : modification de l\'activité principale de l\'établissement', + 'i17'=>'Siège modifié (hors transfert) : modification de l\'identification de l\'établissement', + 'i19'=>'Siège modifié (hors transfert) : autre modification de l\'établissement', + 'i20'=>'Établissement avant transfert fermé', + 'i21'=>'Établissement après transfert créé', + 'i22'=>'Établissement créé (hors transfert)', + 'i23'=>'Établissement fermé (hors transfert)', + 'i24'=>'Établissement modifié (hors transfert) : modification de l\'activité principale avec activation économique', + 'i25'=>'Établissement modifié (hors transfert) : modification de l\'activité principale avec désactivation économique', + 'i26'=>'Établissement modifié (hors transfert) : autre modification de l\'activité principale de l\'établissement', + 'i27'=>'Établissement modifié (hors transfert) : modification de l\'identification de l\'établissement', + 'i29'=>'Établissement modifié (hors transfert) : modification d\'une autre variable de l\'établissement', + 'i30'=>'Établissement avant transfert non fermé', + 'i31'=>'Établissement après transfert non créé', + 'i32'=>'Établissement supprimé', + ); + +require_once 'Metier/bodacc/classMBodacc.php'; +require_once 'Metier/bodacc/classMBalo.php'; +require_once 'Metier/partenaires/classMTva.php'; +require_once 'Metier/partenaires/classMMap.php'; +require_once 'Metier/partenaires/classMAmabis.php'; +require_once 'Metier/partenaires/classMRncs.php'; +require_once 'Metier/partenaires/classMTel.php'; +require_once 'Metier/partenaires/classMBourse.php'; +require_once 'Metier/partenaires/classMBilans.php'; + +class MInsee { + + private static $tabFct=array( 'ADM'=>'Administrateur', + 'ASS'=>'Associé', + 'COG'=>'Co-gérant', + 'CON'=>'Contrôleur de gestion', + 'DID'=>'Directeur Général Délégué', + 'DIR'=>'Directeur', + 'GER'=>'Gérant', + 'PCS'=>'Président du Conseil de Surveillance', + 'PDG'=>'Président Directeur Général', + 'PP'=>'Personne Physique', + 'PRD'=>'Président du directoire', + 'PRE'=>'Président du Conseil d\'Administration', + 'VIC'=>'Vice président du CA ou Surv.', + ); + + private static $tabDep=array( '01'=>'Ain', + '1'=>'Ain', + '02'=>'Aisne', + '2'=>'Aisne', + '03'=>'Allier', + '3'=>'Allier', + '04'=>'Alpes-de-Haute-Provence', + '4'=>'Alpes-de-Haute-Provence', + '05'=>'Hautes-Alpes', + '5'=>'Hautes-Alpes', + '06'=>'Alpes-Maritimes', + '6'=>'Alpes-Maritimes', + '07'=>'Ardèche', + '7'=>'Ardèche', + '08'=>'Ardennes', + '8'=>'Ardennes', + '09'=>'Ariège', + '9'=>'Ariège', + '10'=>'Aube', + '11'=>'Aude', + '12'=>'Aveyron', + '13'=>'Bouches-du-Rhône', + '14'=>'Calvados', + '15'=>'Cantal', + '16'=>'Charente', + '17'=>'Charente-Maritime', + '18'=>'Cher', + '19'=>'Corrèze', + '20'=>'Corse', + '2A'=>'Corse-du-Sud', + '20A'=>'Corse-du-Sud', + '2B'=>'Haute-Corse', + '20B'=>'Haute-Corse', + '21'=>'Côte-d\'Or', + '22'=>'Côtes-d\'Armor', + '23'=>'Creuse', + '24'=>'Dordogne', + '25'=>'Doubs', + '26'=>'Drôme', + '27'=>'Eure', + '28'=>'Eure-et-Loir', + '29'=>'Finistère', + '30'=>'Gard', + '31'=>'Haute-Garonne', + '32'=>'Gers', + '33'=>'Gironde', + '34'=>'Hérault', + '35'=>'Ille-et-Vilaine', + '36'=>'Indre', + '37'=>'Indre-et-Loire', + '38'=>'Isère', + '39'=>'Jura', + '40'=>'Landes', + '41'=>'Loir-et-Cher', + '42'=>'Loire', + '43'=>'Haute-Loire', + '44'=>'Loire-Atlantique', + '45'=>'Loiret', + '46'=>'Lot', + '47'=>'Lot-et-Garonne', + '48'=>'Lozère', + '49'=>'Maine-et-Loire', + '50'=>'Manche', + '51'=>'Marne', + '52'=>'Haute-Marne', + '53'=>'Mayenne', + '54'=>'Meurthe-et-Moselle', + '55'=>'Meuse', + '56'=>'Morbihan', + '57'=>'Moselle', + '58'=>'Nièvre', + '59'=>'Nord', + '60'=>'Oise', + '61'=>'Orne', + '62'=>'Pas-de-Calais', + '63'=>'Puy-de-Dôme', + '64'=>'Pyrénées-Atlantiques', + '65'=>'Hautes-Pyrénées', + '66'=>'Pyrénées-Orientales', + '67'=>'Bas-Rhin', + '68'=>'Haut-Rhin', + '69'=>'Rhône', + '70'=>'Haute-Saône', + '71'=>'Saône-et-Loire', + '72'=>'Sarthe', + '73'=>'Savoie', + '74'=>'Haute-Savoie', + '75'=>'Paris', + '76'=>'Seine-Maritime', + '77'=>'Seine-et-Marne', + '78'=>'Yvelines', + '79'=>'Deux-Sèvres', + '80'=>'Somme', + '81'=>'Tarn', + '82'=>'Tarn-et-Garonne', + '83'=>'Var', + '84'=>'Vaucluse', + '85'=>'Vendée', + '86'=>'Vienne', + '87'=>'Haute-Vienne', + '88'=>'Vosges', + '89'=>'Yonne', + '90'=>'Territoire de Belfort', + '91'=>'Essonne', + '92'=>'Hauts-de-Seine', + '93'=>'Seine-Saint-Denis', + '94'=>'Val-de-Marne', + '95'=>'Val-d\'Oise', + '971'=>'Guadeloupe', + '972'=>'Martinique', + '973'=>'Guyane', + '974'=>'Réunion', + '975'=>'Saint-Pierre-et-Miquelon', + '976'=>'Mayotte', + '985'=>'Mayotte', // Codification au Bodacc + '986'=>'Wallis-et-Futuna', + '987'=>'Polynésie-Française', + '988'=>'Nouvelle-Calédonie', + ); + + private static $tabDepArt=array( '01'=>'de l\'Ain', + '1'=>'de l\'Ain', + '02'=>'de l\'Aisne', + '2'=>'de l\'Aisne', + '03'=>'de l\'Allier', + '3'=>'de l\'Allier', + '04'=>'des Alpes-de-Haute-Provence', + '4'=>'des Alpes-de-Haute-Provence', + '05'=>'des Hautes-Alpes', + '5'=>'des Hautes-Alpes', + '06'=>'Ades lpes-Maritimes', + '6'=>'des Alpes-Maritimes', + '07'=>'de l\'Ardèche', + '7'=>'de l\'Ardèche', + '08'=>'des Ardennes', + '8'=>'des Ardennes', + '09'=>'de l\'Ariège', + '9'=>'de l\'Ariège', + '10'=>'de l\'Aube', + '11'=>'de l\'Aude', + '12'=>'de l\'Aveyron', + '13'=>'des Bouches-du-Rhône', + '14'=>'du Calvados', + '15'=>'du Cantal', + '16'=>'de la Charente', + '17'=>'de la Charente-Maritime', + '18'=>'du Cher', + '19'=>'de la Corrèze', + '20'=>'de la Corse', + '2A'=>'de la Corse-du-Sud', + '20A'=>'de la Corse-du-Sud', + '2B'=>'de la Haute-Corse', + '20B'=>'de la Haute-Corse', + '21'=>'de la Côte-d\'Or', + '22'=>'des Côtes-d\'Armor', + '23'=>'de la Creuse', + '24'=>'de la Dordogne', + '25'=>'du Doubs', + '26'=>'de la Drôme', + '27'=>'de l\'Eure', + '28'=>'de l\'Eure-et-Loir', + '29'=>'du Finistère', + '30'=>'du Gard', + '31'=>'de la Haute-Garonne', + '32'=>'du Gers', + '33'=>'de la Gironde', + '34'=>'de l\'Hérault', + '35'=>'de l\'Ille-et-Vilaine', + '36'=>'de l\'Indre', + '37'=>'de l\'Indre-et-Loire', + '38'=>'de l\'Isère', + '39'=>'du Jura', + '40'=>'des Landes', + '41'=>'du Loir-et-Cher', + '42'=>'de la Loire', + '43'=>'de la Haute-Loire', + '44'=>'de la Loire-Atlantique', + '45'=>'du Loiret', + '46'=>'du Lot', + '47'=>'du Lot-et-Garonne', + '48'=>'de la Lozère', + '49'=>'du Maine-et-Loire', + '50'=>'de la Manche', + '51'=>'de la Marne', + '52'=>'de la Haute-Marne', + '53'=>'de la Mayenne', + '54'=>'de la Meurthe-et-Moselle', + '55'=>'de la Meuse', + '56'=>'du Morbihan', + '57'=>'de la Moselle', + '58'=>'de la Nièvre', + '59'=>'du Nord', + '60'=>'de l\'Oise', + '61'=>'de l\'Orne', + '62'=>'du Pas-de-Calais', + '63'=>'du Puy-de-Dôme', + '64'=>'des Pyrénées-Atlantiques', + '65'=>'des Hautes-Pyrénées', + '66'=>'des Pyrénées-Orientales', + '67'=>'du Bas-Rhin', + '68'=>'du Haut-Rhin', + '69'=>'du Rhône', + '70'=>'de la Haute-Saône', + '71'=>'de la Saône-et-Loire', + '72'=>'de la Sarthe', + '73'=>'de la Savoie', + '74'=>'de la Haute-Savoie', + '75'=>'de Paris', + '76'=>'de la Seine-Maritime', + '77'=>'de la Seine-et-Marne', + '78'=>'des Yvelines', + '79'=>'des Deux-Sèvres', + '80'=>'de la Somme', + '81'=>'du Tarn', + '82'=>'du Tarn-et-Garonne', + '83'=>'du Var', + '84'=>'du Vaucluse', + '85'=>'de la Vendée', + '86'=>'de la Vienne', + '87'=>'de la Haute-Vienne', + '88'=>'des Vosges', + '89'=>'de l\'Yonne', + '90'=>'du Territoire de Belfort', + '91'=>'de l\'Essonne', + '92'=>'des Hauts-de-Seine', + '93'=>'de la Seine-Saint-Denis', + '94'=>'du Val-de-Marne', + '95'=>'du Val-d\'Oise', + '971'=>'de la Guadeloupe', + '972'=>'de la Martinique', + '973'=>'de la Guyane', + '974'=>'de la Réunion', + '975'=>'de Saint-Pierre-et-Miquelon', + '976'=>'de Mayotte', + '985'=>'de Mayotte', // Codification au Bodacc + '986'=>'de Wallis-et-Futuna', + '987'=>'de la Polynésie-Française', + '988'=>'de la Nouvelle-Calédonie', + ); + + /**Nature d'établissements*/ + private static $tabNature = array( '20'=>'Petit magasin (moins de 300m²)', + '21'=>'Magasin (de 300m² à 400m²)', + '22'=>'Grande surface (de 400 à 2500m²)', + '23'=>'Très grande surface (plus de 2500m²)', + '91'=>'Base d\'activité sur chantiers', + '92'=>'Base d\'activité sur marchés', + '93'=>'Base d\'activité en clientèle', + '99'=>'Autre'); + + /**Régions du code officiel géographique*/ + private static $tabRegion = array( '1'=>'Guadeloupe', + '2'=>'Martinique', + '3'=>'Guyane', + '4'=>'Réunion', + '11'=>'Ile-de-France', + '21'=>'Champagne-Ardenne', + '22'=>'Picardie', + '23'=>'Haute-Normandie', + '24'=>'Centre', + '25'=>'Basse-Normandie', + '26'=>'Bourgogne', + '31'=>'Nord-Pas-de-Calais', + '41'=>'Lorraine', + '42'=>'Alsace', + '43'=>'Franche-Comté', + '52'=>'Pays de la Loire', + '53'=>'Bretagne', + '54'=>'Poitou-Charentes', + '72'=>'Aquitaine', + '73'=>'Midi-Pyrénées', + '74'=>'Limousin', + '82'=>'Rhône-Alpes', + '83'=>'Auvergne', + '91'=>'Languedoc-Roussillon', + '93'=>'Provence Alpes Côte d Azur', + '94'=>'Corse', + '98'=>'Territoire d outre-mer (TOM)', + '99'=>'Etranger'); + + /**Tranches de Chiffre d'Affaires INSEE + **/ + private static $tabTCA = array( '0'=>'N/C', + '1'=>'de 500 000 à 1 ME', + '2'=>'de 1 à 2 ME', + '3'=>'de 2 à 5 ME', + '4'=>'de 5 à 10 ME', + '5'=>'de 10 à 20 ME', + '6'=>'de 20 à 50 ME', + '7'=>'de 50 à 100 ME', + '8'=>'de 100 à 200 ME', + '9'=>'plus de 200 ME' + ); + + /** Tranche de CA Export **/ + private static $tabTCAexp = array( '0'=>'0%', + '1'=>'moins de 5%', + '2'=>'de 5 à 25%', + '3'=>'de 25 à 50%', + '4'=>'plus de 50%', + ); + + /**Tranche d'habitants de commune détaillée*/ + private static $tabTCD=array( '1'=>'Commune de moins de 50 habitants', + '2'=>'Commune de 50 à 99 habitants', + '3'=>'Commune de 100 à 149 habitants', + '4'=>'Commune de 150 à 199 habitants', + '5'=>'Commune de 200 à 249 habitants', + '6'=>'Commune de 250 à 299 habitants', + '7'=>'Commune de 300 à 399 habitants', + '8'=>'Commune de 400 à 499 habitants', + '11'=>'Commune de 500 à 699 habitants', + '12'=>'Commune de 700 à 999 habitants', + '13'=>'Commune de 1000 à 1499 habitants', + '14'=>'Commune de 1500 à 1999 habitants', + '15'=>'Commune de 2000 à 2499 habitants', + '16'=>'Commune de 2500 à 2999 habitants', + '17'=>'Commune de 3000 à 3999 habitants', + '18'=>'Commune de 4000 à 4999 habitants', + '21'=>'De 5 000 à 6 999 habitants', + '22'=>'De 7 000 à 9 999 habitants', + '31'=>'De 10 000 à 14 999 habitants', + '32'=>'De 15 000 à 19 999 habitants', + '41'=>'De 20 000 à 24 999 habitants', + '42'=>'De 25 000 à 29 999 habitants', + '43'=>'De 30 000 à 39 999 habitants', + '44'=>'De 40 000 à 49 999 habitants', + '51'=>'De 50 000 à 69 999 habitants', + '52'=>'De 70 000 à 99 999 habitants', + '61'=>'De 100 000 à 149 999 habitants', + '62'=>'De 150 000 à 199 999 habitants', + '71'=>'De 200 000 à 299 999 habitants', + '72'=>'De 300 000 à 499 999 habitants', + '73'=>'De 500 000 à 1 499 999 habitants', + '80'=>'Plus de 1 500 000 habitants'); + + /**Tranches d'effectifs INSEE*/ + private static $tabEffectif=array( 0=>'N/C', + 1=>'de 1 à 2 salarié(s)', + 2=>'de 3 à 5 salariés', + 3=>'de 6 à 9 salariés', + 11=>'de 10 à 19 salariés', + 12=>'de 20 à 49 salariés', + 21=>'de 50 à 99 salariés', + 22=>'de 100 à 199 salariés', + 31=>'de 200 à 249 salariés', + 32=>'de 250 à 499 salariés', + 41=>'de 500 à 999 salariés', + 42=>'de 1 000 à 1 999 salariés', + 51=>'de 2 000 à 4 999 salariés', + 52=>'de 5 000 à 9 999 salariés', + 53=>'plus de 10 000 salariés'); + + /**Libellé des singularités INSEE*/ + private static $tabSingularite=array('1'=>'Propiétaire Exploitant direct', + '2'=>'Locataire Gérant', + '10'=>'Loueur de fonds', + '30'=>'Unité singulière de première espèce: avocats assocés, stations services sous mandat..', + '31'=>'Associé d\'exploitation en commun; ce groupe comprend notamment: associé de société de fait, associé d\'indivision', + '33'=>'Employeur non exploitant: prestataire de personnel, gérant mandataire', + '34'=>'Membre d\'une société civile professionnelle', + '40'=>'Siège d\'une unité SIREN de droit privé sans activité', + '41'=>'Siège d\'un organisme public sans activité', + '42'=>'Siège d\'un établissement public local non doté de l\'autonomie comptable: une partie des centres communaux d\'action sociale, une partie des caisses des écoles', + '43'=>'Sièges de domiciliation', + '52'=>'Sans domicile fixe', + '60'=>'Activité occasionnelle ou accessoire: Expert auprès des tribunaux, médecin, infirmier, pharmacien remplçant, avocat stagiaire, sportif amateur', + '70'=>'Activité en location (autre que le fond de commerce): Exploitant de terrain de camping, location de garage ou parking, locations de meublés, location de terres agricoles', + '80'=>'Gestion immobilière de biens propres: syndicats de copropriétaires', + '90'=>'Unité singulière de seconde espèce: établissement d\'une entreprise installée à Monaco, siège à l\'etranger de sociétés, associé gérant de sociétés'); + + /**Libellé des origines de création INSEE*/ + private static $tabOrigine=array( + '0'=>'Non renseigné', + '1'=>'Création pure', + '2'=>'Création suite à déménagement', // Création S&D du 20/04/2011 ancien 'Réinstallation après transfert' + '3'=>'Achat', + '4'=>'Apport', + '5'=>'Reprise au conjoint ou apport reçu', + '6'=>'Prise en location-gérance', + '7'=>'Partage', + '8'=>'Reprise', + '9'=>'Autre modalité d\'acquisition', + 'A'=>'Reprise globale d\'une exploitation agricole', + 'B'=>'Poursuite de l\'exploitation agricole par le conjoint', + 'C'=>'Transfert de propriété d\'une exploitation agricole', + 'D'=>'Apport d\'exploitation(s) agricole(s) individuelle(s)', + 'E'=>'Reprise totale ou partielle d\'exploitation individuelle', + ); + + private static $tabEven=array( 'i110'=>'Création d\'une entreprise', + 'i120'=>'Réactivation d\'une entreprise', + 'i125'=>'Réactivation d\'une entreprise suite à une mise à jour du répertoire', + 'i130'=>'Création d\'un établissement', + 'i145'=>'Reprise d\'activité dans un établissement suite à une mise à jour du répertoire', + 'i400'=>'Suppression d\'un double', + 'i410'=>'Cessation juridique de l\'entreprise', + 'i420'=>'Absence d\'activité de l\'entreprise (cessation économique de l\'entreprise)', + 'i425'=>'Absence d\'activité d\'une entreprise suite à une mise à jour au répertoire', + 'i430'=>'Fermeture d\'un établissement', + 'i435'=>'Fermeture d\'un établissement suite à une mise à jour au répertoire', + 'i510'=>'Création de l\'établissement d\'arrivée et cessation de l\'établissement de départ dans le cadre d\'un transfert', + 'i520'=>'Création de l\'établissement d\'arrivée et modification de l\'établissement de départ dans le cadre d\'un transfert', + 'i530'=>'Modification de l\'établissement d\'arrivée et cessation de l\'établissement de départ dans le cadre d\'un transfert', + 'i540'=>'Modification de l\'établissement d\'arrivée et modification de l\'établissement de départ dans le cadre d\'un transfert', + 'i610'=>'Modification d\'activité au niveau du SIREN associé à une activation économique par adjonction de moyens de production', + 'i620'=>'Modification d\'activité au niveau du SIREN associé à une désactivation économique par suppression de moyens de production', + 'i621'=>'Modification d\'activité du SIREN associé à une désactivation économique par suppression de moyens de production suite à une correction d\'erreur', + 'i631'=>'Autre modification d\'activité du SIREN associé', + 'i640'=>'Modification d\'activité au niveau de l\'établissement associée à une activation économique par adjonction de moyens de production', + 'i650'=>'Modification d\'activité au niveau de l\'établissement associée à une désactivation économique par suppression de moyens de production', + 'i661'=>'Autre modification d\'activité au niveau de l\'établissement', + 'i710'=>'Modification de l\'identification du SIREN', + 'i711'=>'Modification de l\'identification du SIREN suite à correction d\'erreur', + 'i720'=>'Modification de l\'adresse ou de l\'identification de l\'établissement', + 'i780'=>'Autre modification entraînant la mise à jour d\'au moins une variable du répertoire', + 'i781'=>'Autre modification entraînant la mise à jour d\'au moins une variable du répertoire suite à correction d\'erreur', + ); + + private $tabCodeVoie=array(); + private $tabCodesNaf=array(); + private $tabCodesNafa=array(); + private $tabCodesNace=array(); + + private $body=''; + private $codeRetour=0; + private $header=array(); + + private $iDb; + private $iDbInsee; + private $iDbSD; + private $iBodacc; + + // Plan de redressement ou de continuation + private $debutPlan; // Date de début/jugement/publication du plan SSAAMMJJ + private $dureePlan; // Durée du plan en mois + private $finPlan; // Date de fin du plan SSAAMMJJ + + // Appel de jugement + private $appelJugement=false; // Présence d'un appel de jugement + + public function __construct() { + $this->iDb=new WDB(); + //$this->iDb->setCharSet('UTF-8'); + $this->iDbInsee=new WDB('insee'); + //$this->iDbInsee->setCharSet('UTF-8'); + $this->iDbSD=new WDB('sdv1'); + //$this->iDbSD->setCharSet('UTF-8'); + $this->tabCodeVoie=$this->getTabCodeVoie(); + $this->iBodacc=new MBodacc(); + } + +/** Test de la validité du siren demandé + * @param int SIREN à tester + * @param int NIC (facultatif) + * @param mixed Message textuel d'erreur à afficher en cas d'erreur ou false + * @return mixed true, false ou Message d'erreur passé en paramètre + */ +function valideSiren($siren, $nic='', $erreur=false) { + + /** Si le siren est de taille < à 9, on ajoute des 0 significatifs **/ + switch (strlen($siren)) { + case 1: $siren='00000000'.$siren; break; + case 2: $siren='0000000'.$siren; break; + case 3: $siren='000000'.$siren; break; + case 4: $siren='00000'.$siren; break; + case 5: $siren='0000'.$siren; break; + case 6: $siren='000'.$siren; break; + case 7: $siren='00'.$siren; break; + case 8: $siren='0'.$siren; break; + } + + if (strlen($nic)>0) { + switch (strlen($nic)) { + case 1: $nic='0000'.$nic; break; + case 2: $nic='000'.$nic; break; + case 3: $nic='00'.$nic; break; + case 4: $nic='0'.$nic; break; + } + } + + + if (!valideData($siren, 9, 9,'N')) //Siren non précisé ou incorrect. + return $erreur; + elseif ($siren*1==0) // Siren vide + return $erreur; + else + { + if (!isset($nic) || trim($nic)=='') + { + $somme=0; + for ($i=0; $i<=8; $i+=2) // Traitement IMPAIR + $somme+=(integer)substr($siren,$i,1); + + for ($i=1; $i<=7; $i+=2) + { // Traitement PAIR + $var_tmp=(string)(2*((integer)substr($siren,$i,1))); + $som_tmp=0; + for($j=0;$jArray ( + ** [adrComp0] => Maison des associations + ** [num] => 33 + ** [typeVoie] => R + ** [libVoie] => Louis Blanc + ** [cp] => ... + ** [ville] => ... Si contenu dans l'adresse + ** )+ ** + ** @param string $strLigneDAdresse La ligne d'adresse textuelle (ex : Maison des associations, 33 rue Louis Blanc + ** @return array tableau contenant l'adresse structurée ici + **/ + public function structureVoie($strLigneDAdresse) { + $tabRet=$tabAdr=array(); + $strLigneDAdresse=trim($strLigneDAdresse); + if ($strLigneDAdresse=='') return $tabRet; + $tabLignes=explode(',', preg_replace('/,$/', '', $strLigneDAdresse)); + foreach ($tabLignes as $strLigneDAdresse) { + $strLigneDAdresse=trimAccent($strLigneDAdresse); + $strLigneDAdresse=preg_replace('/[^0-9a-zA-Z]/', ' ', $strLigneDAdresse); + $strLigneDAdresse=trim(preg_replace('/ +/', ' ', $strLigneDAdresse)); + //echo "1. Adresse nettoyées = $strLigneDAdresse".EOL; + $adrAvecCP=preg_match("/(.*)([0-9]{5,5}|[0-9][0-9] [0-9]{3,3})([\D]*)/", $strLigneDAdresse, $tabAdrTmp); + if ($adrAvecCP) { + //echo "Adresse avec Code Postal\n"; + //print_r($tabAdrTmp); + $strLigneDAdresse=trim($tabAdrTmp[1]); + $tabRet['cp']=$tabAdrTmp[2]; + $tabRet['ville']=trim(strtoupper($tabAdrTmp[3])); + }// else echo "Adresse sans Code Postal\n"; + $adrAvecNum=preg_match("/^([0-9]{1,4})(.*)/", $strLigneDAdresse, $tabAdrTmp); + if ($adrAvecNum) { + //echo "Adresse avec Numéro de voie\n"; + //print_r($tabAdrTmp); + $tabRet['num']=$tabAdrTmp[1]; + if (preg_match("/^\b(B|BIS|T|TER|Q|a|c|d|e|f|g|h|i|j|k|l|m|n|o|p|r|s)\b(.*)/i", $tabAdrTmp[2], $tabAdrTmp2)) + { //echo "Adresse avec Bis, Ter, Q...\n"; + //print_r($tabAdrTmp2); + $tabRet['indRep']=trim($tabAdrTmp2[1]); $typeVoie=trim($tabAdrTmp2[2]);} + else $typeVoie=trim($tabAdrTmp[2]); + } else $typeVoie=trim($strLigneDAdresse); + // On récupère le type de voie si possible et le libellé de la voie + $voieTrouvee=false; + foreach ($this->tabCodeVoie as $code=>$voie) { + if (preg_match("/^($voie |$voie".'s '."|$code )(.*)/i", $typeVoie, $tabAdrTmp)) { + //echo "Adresse avec type de voie\n"; + //print_r($tabAdrTmp); + $tabRet['typeVoie']=$code; + $tabRet['libVoie']=trim(strtoupper($tabAdrTmp[2])); + $voieTrouvee=true; + break; + } + } + if (!$voieTrouvee) $tabAdr[]=$typeVoie; + } + foreach ($tabAdr as $k=>$ligne) + $tabRet['adrComp'.$k]=trim(strtoupper($ligne)); + + if (!isset($tabRet['libVoie'])) { $tabRet['libVoie']=$ligne; unset($tabRet['adrComp'.$k]); } + + if (isset($tabRet['adrComp0'])) { + if ($tabRet['adrComp0']=='BIS' || $tabRet['adrComp0']=='B') { + $tabRet['indRep']='B'; + $tabRet['adrComp0']=''; + } elseif ($tabRet['adrComp0']=='TER' || $tabRet['adrComp0']=='T') { + $tabRet['indRep']='T'; + $tabRet['adrComp0']=''; + } + } + + return $tabRet; + } + + public function getEtablissements($siren, $nic='', $deb=0, $nbRep=20, $maxRep=200, $dep=0, $actif=-1) { + +// @sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "classMInsee::getEtab sur $siren", "$siren, $nic, $deb, $nbRep, $maxRep, $dep, $actif"); + $this->setTabCodesNaf(); + $deb=$deb*1; + $dep=$dep*1; + $nbRep=$nbRep*1; + $limit="LIMIT $deb, $nbRep"; + $strInfo=''; + if ($actif*1==1) $strActif=' AND e.actif=1 '; + elseif ($actif*1==-1) $strActif=''; + else $strActif=' AND e.actif=0 '; + /* "CONCAT(e.siren, e.nic) as siret, e.actif", + "$where ORDER BY siege DESC, actif DESC, nic DESC $limit", false, MYSQL_ASSOC); + $etab=@$listeEtab[0]; + + $nom=trim($etab['raisonSociale']); + // Cas des noms vides à l'INSEE (une centaine) + if ($nom=='') $nom=@preg_replace('/,.*$/','',$etab['identite_pre']); +*/ + if ($dep>0 && $dep<99999) { + if ($dep<96) $strDep='AND adr_cp BETWEEN '.$dep.'000 AND '.$dep.'999'; + elseif ($dep>9999) $strDep="AND adr_cp BETWEEN $dep AND $dep"; + else $strDep='AND adr_cp BETWEEN '.$dep.'00 AND '.$dep.'99'; + $tabTmp=$this->iDb->select('etablissements', 'count(*)', "siren=$siren $strDep"); + $nbTot=$tabTmp[0][0]; + $listeEtab=$this->iDb->select('etablissements e', + "'Etab' as Loc, e.id, e.source, e.source_id, e.triCode, e.autre_id, e.siren, e.nic, e.siege, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep, e.teff_etab, ". + "CONCAT(e.siren, e.nic) as siret, e.actif, e.identite_pre", + "siren=$siren $strDep $strActif ORDER BY e.siege , e.actif DESC $limit", false, MYSQL_ASSOC); + } elseif ($nic=='') { + $tabTmp=$this->iDb->select('etablissements', 'count(*)', "siren=$siren"); + $nbTot=$tabTmp[0][0]; + $listeEtab=$this->iDb->select('etablissements e', + "'Etab' as Loc, e.id, e.source, e.source_id, e.triCode, e.autre_id, e.siren, e.nic, e.siege, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep, e.teff_etab, ". + "CONCAT(e.siren, e.nic) as siret, e.actif, e.identite_pre", + "e.siren=$siren $strActif ORDER BY e.siege DESC, e.actif DESC $limit", false, MYSQL_ASSOC); + } else { + $listeEtab=$this->iDb->select('etablissements e', + "'Etab' as Loc, e.id, e.source, e.source_id, e.triCode, e.autre_id, e.siren, e.nic, e.siege, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep, e.teff_etab, ". + "CONCAT(e.siren, e.nic) as siret, e.actif, e.identite_pre", + "siren=$siren AND (nic=$nic OR siege=1) $strActif ORDER BY e.siege , e.actif DESC $limit", false, MYSQL_ASSOC); + $nbTot=count($listeEtab); + } + if ($nbTot==0 && $actif==-1) { + require_once 'Metier/sphinx/rechercheFonc.php'; + $liste = verificationDuSiret($siren); + if ($liste != false) { + //print 'Essayez :
'; + $listeSiren=array(); + foreach ($liste as $s) { + if (sommeDeControle($s) != 0) { + print 'erreur somme de controle sur '.$s. + ' ('.sommeDeControle($s).')
'; + } else { + $listeSiren[]=$s; + } + } + $strSiren=implode(',',$listeSiren); + $tabTmp=$this->iDb->select('etablissements', 'count(*)', "siren IN ($strSiren) AND siege=1"); + $nbTot=$tabTmp[0][0]; + $listeEtab=$this->iDb->select('etablissements e', + "'Etab' as Loc, e.id, e.source, e.source_id, e.triCode, e.autre_id, e.siren, e.nic, e.siege, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep, e.teff_etab, ". + "CONCAT(e.siren, e.nic) as siret, e.actif, e.identite_pre", + "siren IN ($strSiren) AND siege=1 ORDER BY e.rang DESC, e.actif DESC, e.nic ASC $limit", true, MYSQL_ASSOC); + $strInfo='Siren saisit invalide'; + } + } + foreach ($listeEtab as $etab) { + $tel=sprintf('%010d', strtr($etab['tel'],array('-'=>'', '/'=>'','.'=>'',','=>''))); + if ($tel<>'0000000000') $tel=implode('.', str_split($tel,2)); + else $tel=''; + + $fax=sprintf('%010d', strtr($etab['fax'],array('-'=>'', '/'=>'','.'=>'',','=>''))); + if ($fax<>'0000000000') $fax=implode('.', str_split($fax,2)); + else $fax=''; + + $nom=trim($etab['raisonSociale']); + // Cas des noms vides à l'INSEE (une centaine) + if ($nom=='') $nom=@preg_replace('/,.*$/','',$etab['identite_pre']); + + $tabRet[]=array( 'Localisation'=>$etab['Loc'], + 'id'=>$etab['id'], + 'Pertinence'=>100, + 'Siret'=>$etab['siret'], + 'Siege'=>$etab['siege'], + 'Nom'=>$nom, + 'Sigle'=>$etab['sigle'], + 'Enseigne'=>$etab['enseigne'], + 'Adresse'=>trim(preg_replace('/ +/', ' ', trim( $etab['adr_num'] .' '. $etab['adr_btq'] .' '. + $etab['adr_typeVoie'] .' '. $etab['adr_libVoie']))), + 'Adresse2'=>trim(preg_replace('/ +/', ' ', $etab['adr_comp'])), + 'CP'=>$etab['adr_cp'], + 'Ville'=>$etab['adr_ville'], + 'Tel'=>$tel, + 'Fax'=>$fax, + 'FJ'=>$etab['cj'], + 'FJLib'=>$this->getLibelleFJ($etab['cj']), + 'Siren'=>$etab['siren'], + 'Nic'=>$etab['nic'], + 'Actif'=>$etab['actif'], + 'NafEtab'=>$etab['ape_etab'], // Etablissement + 'NafEnt'=>$etab['ape_entrep'], // Entreprise + 'NafEtabLib'=>$this->getLibelleNaf($etab['ape_etab']), + 'NafEntLib' =>$this->getLibelleNaf($etab['ape_entrep']), + 'EffEtTr'=>$etab['teff_etab'], + 'EffEtTrLib'=>self::$tabEffectif[$etab['teff_etab']], + ); + } + + if ($dep==0) $dep=''; // Evite l'affichage d'un 0 inutile sur l'Extranet + + return array( 'criteres'=>array('siren'=>$siren, 'nic'=>$nic, 'dep'=>$dep), + 'info'=>$strInfo, + 'nbReponses'=>count($tabRet), + 'nbReponsesTotal'=>$nbTot, + 'reponses'=>$tabRet); + } + + + public function getEtablissementsParId($typeId, $id, $deb=0, $nbRep=20, $maxRep=200, $dep=0) { + + $this->setTabCodesNaf(); + $deb=$deb*1; + $dep=$dep*1; + + $nbRep=$nbRep*1; + $limit="LIMIT $deb, $nbRep"; + + if ($typeId=='TEL') { + debugLog('I',"Recherche par TEL de $id avec un maximum de $nbRep réponses",__LINE__,__FILE__, __FUNCTION__, __CLASS__); + + $tabTmp=$this->iDb->select('etablissements', 'count(*)', "TEL=$id OR FAX=$id"); + $nbTot=$tabTmp[0][0]; + $listeEtab=$this->iDb->select('etablissements e', + "'Etab' as Loc, e.id, e.source, e.source_id, e.triCode, e.autre_id, e.siren, e.nic, e.siege, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep,". + "CONCAT(e.siren, e.nic) as siret, e.actif", + "TEL=$id OR FAX=$id ORDER BY e.siege DESC, e.actif DESC $limit", false, MYSQL_ASSOC); + /*if (count($listeEtab)==0) { + $iAmabis=new MAmabis(); + $repAmabis=$iAmabis->searchByTelFax($id); + }*/ + + } elseif ($typeId=='AUTRE') { + /** Formatage des numéros de RC **/ + $tabId=array($id); + if (preg_match('/(\d*)(\D)(\d*)/', $id,$matches)) { + if (strlen($matches[1])<=2) { + // Années du type 54 ou 07 + if ($matches[1]>date('y')) $deb='19'.$matches[1]; + else $deb='20'.$matches[1]; + } else // Années du type 1900 ou 2000 + $deb=substr($matches[1],2,2); + $numero =$matches[3]*1; + for ($i=strlen($numero); $i<=7; $i++) { + $tabId[]=$matches[1].$matches[2].sprintf('%0'.$i.'s',$numero); + $tabId[]=$deb.$matches[2].sprintf('%0'.$i.'s',$numero); + } + } + $strId=implode("','", $tabId); + + /** Gestion du numéro de département ou CP **/ + $strDep=''; + if ($dep>0 && $dep<99999) { + if ($dep<96) $strDep='AND adr_cp BETWEEN '.$dep.'000 AND '.$dep.'999'; + elseif ($dep>9999) $strDep="AND adr_cp BETWEEN $dep AND $dep"; + else $strDep='AND adr_cp BETWEEN '.$dep.'00 AND '.$dep.'99'; + } + $tabTmp=$this->iDb->select('etablissements', 'count(*)', "autre_id IN ('$strId') $strDep"); + $nbTot=$tabTmp[0][0]; + $listeEtab=$this->iDb->select('etablissements e', + "'Etab' as Loc, e.id, e.source, e.source_id, e.triCode, e.autre_id, e.siren, e.nic, e.siege, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep, e.teff_etab, ". + "CONCAT(e.siren, e.nic) as siret, e.actif", + "autre_id IN ('$strId') $strDep ORDER BY siege DESC $limit", false, MYSQL_ASSOC); + } + foreach ($listeEtab as $etab) { + $tabRet[]=array( 'Localisation'=>$etab['Loc'], + 'id'=>$etab['id'], + 'Pertinence'=>100, + 'Siret'=>$etab['siret'], + 'Siege'=>$etab['siege'], + 'Nom'=>$etab['raisonSociale'], + 'Sigle'=>$etab['sigle'], + 'Enseigne'=>$etab['enseigne'], + 'Adresse'=>trim(preg_replace('/ +/', ' ', trim( $etab['adr_num'] .' '. $etab['adr_btq'] .' '. + $etab['adr_typeVoie'] .' '. $etab['adr_libVoie']))), + 'Adresse2'=>trim(preg_replace('/ +/', ' ', $etab['adr_comp'])), + 'CP'=>$etab['adr_cp'], + 'Ville'=>$etab['adr_ville'], + 'Tel'=>$etab['tel'], + 'Fax'=>$etab['fax'], + 'FJ'=>$etab['cj'], + 'FJLib'=>$this->getLibelleFJ($etab['cj']), + 'Siren'=>$etab['siren'], + 'Nic'=>$etab['nic'], + 'Actif'=>$etab['actif'], + 'NafEtab'=>$etab['ape_etab'], // Etablissement + 'NafEnt'=>$etab['ape_entrep'], // Entreprise + 'NafEtabLib'=>$this->getLibelleNaf($etab['ape_etab']), + 'NafEntLib' =>$this->getLibelleNaf($etab['ape_entrep']), + ); + } + + if ($dep==0) $dep=''; // Evite l'affichage d'un 0 inutile sur l'Extranet + + return array( 'criteres'=>array('autreId'=>$id, 'dep'=>$dep), + 'nbReponses'=>count($tabRet), + 'nbReponsesTotal'=>$nbTot, + 'reponses'=>$tabRet); + } + + /** Retourne juste si un siren existe + ** + ** @param integer $siren + ** @return bool + **/ + function sirenExiste($siren) { + $siren=$siren*1; + $listeEtab=$this->iDb->select('etablissements', 'id', "siren=$siren LIMIT 0,1", false, MYSQL_ASSOC); + if (@count($listeEtab)>0) + return true; + return false; + } + + /** Retourne l'identité issue de la table établissements + ** + ** @param integer $siren + ** @return bool + **/ + function getIdentiteLight($siren, $nic=0, $id=0) { + $siren=$siren*1; + $nic=$nic*1; + $id=$id*1; + $limit=''; //LIMIT O,1' ; + if ($id>0 && $siren<1000) $where=" id=$id "; + elseif ($nic<>0) $where=" siren=$siren AND nic=$nic "; + elseif ($siren<>0) $where=" siren=$siren "; + else return array(); + + $listeEtab=$this->iDb->select('etablissements e', + "e.id, e.source, e.source_id, e.autre_id, e.siren, e.nic, e.siege, e.autre_id, e.triCode, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep, ". + "e.adr_dep, e.adr_com, e.capital, e.capitalDev, e.capitalSrc, e.tca, e.teff_entrep, e.teff_etab, ". + "CONCAT(e.siren, e.nic) as siret, e.actif, e.identite_pre", + "$where ORDER BY siege DESC, actif DESC, nic DESC $limit", false, MYSQL_ASSOC); + $etab=@$listeEtab[0]; + + $nom=trim($etab['raisonSociale']); + // Cas des noms vides à l'INSEE (une centaine) + if ($nom=='') $nom=@preg_replace('/,.*$/','',$etab['identite_pre']); + + $tabRet=array( 'id'=>$etab['id'], + 'Siret'=>$etab['siret'], + 'Siege'=>$etab['siege'], + 'Nom'=>$nom, + 'Tribunal'=>$etab['triCode'], + 'Sigle'=>$etab['sigle'], + 'Enseigne'=>$etab['enseigne'], + 'Adresse'=>trim(preg_replace('/ +/', ' ', trim( $etab['adr_num'] .' '. $etab['adr_btq'] .' '. + $etab['adr_typeVoie'] .' '. $etab['adr_libVoie']))), + 'Adresse2'=>trim(preg_replace('/ +/', ' ', $etab['adr_comp'])), + 'AdresseNum'=>$etab['adr_num'], + 'AdresseBtq'=>$etab['adr_btq'], + 'AdresseVoie'=>$etab['adr_typeVoie'], + 'AdresseRue'=>$etab['adr_libVoie'], + 'CP'=>$etab['adr_cp'], + 'Ville'=>$etab['adr_ville'], + 'Tel'=>$etab['tel'], + 'Fax'=>$etab['fax'], + 'FJ'=>$etab['cj'], + 'FJ_lib'=>$this->getLibelleFJ($etab['cj']), + 'Siren'=>$etab['siren'], + 'Nic'=>$etab['nic'], + 'Actif'=>$etab['actif'], + 'NafEtab'=>$etab['ape_etab'], + 'NafEnt'=>$etab['ape_entrep'], + 'NafEntLib' =>$this->getLibelleNaf($etab['ape_entrep']), + 'NafEtabLib'=>$this->getLibelleNaf($etab['ape_etab']), + 'AutreId'=>$etab['autre_id'], + 'Source'=>$etab['source'], + 'SourceId'=>$etab['source_id'], + // Ajout du 25 mars 2010 + 'Dept'=>$etab['adr_dep'], + 'codeCommune'=>$etab['adr_com'], + 'Capital'=>$etab['capital'], + 'CapitalDev'=>$etab['capitalDev'], + 'TrancheCA'=>$etab['tca'], + 'TrancheCALib'=>self::$tabTCA[$etab['tca']], + 'EffEnTr'=>$etab['teff_entrep'], + 'EffEnTrLib'=>self::$tabEffectif[$etab['teff_entrep']], + 'EffEtTr'=>$etab['teff_etab'], + 'EffEtTrLib'=>self::$tabEffectif[$etab['teff_etab']], + ); + + return $tabRet; + } + + /** Retourne la liste des devise + ** + ** @param string $codeDevise Code ISO devise + ** @return Devise ou liste des devises (si pas de code ISO en entrée) + **/ + function getDevises($codeIso='') { + if (trim($codeIso)<>'') $strWhere="devIso='$codeIso'"; + else $strWhere='1'; + $liste=$this->iDb->select('tabDevises', 'devIso, devNom', $strWhere, false, MYSQL_ASSOC); + $tabRet=array(); + foreach ($liste as $ligne) + $tabRet[$ligne['devIso']]=$ligne['devNom']; + return $tabRet; + } + + /** Retourne la liste des mandataires/administrateurs/oppositions d'une ou plusieurs cours d'appel + ** + ** @param array $arrIdCA Id S&D de la cour d'appel + ** @param bool $condense Par défaut retourne un tableau concatenant Nom, prenom, adresse complète + ** @param array $type Type d'opposition. Ex array('A','M') pour Admin/Mandataires. Autres: a'V'ocat,'H'uissier,'N'otaire + ** @return Liste des Mandataires/Administrateurs de la cours d'appel + **/ + function getMandataires($arrIdCA=array(), $condense=true, $type=array()) { + if (count($arrIdCA)>0) $strIdCA='AND ( coursAppel in ('.implode(',', $arrIdCA).') OR coursAppel2 in ('.implode(',', $arrIdCA).') )'; + else $strIdCA=''; + + if (count($type)>0) $strType="AND type in ('".implode("','", $type)."') "; + else $strType=''; + + + if (!$condense) + $fields='id,sirenGrp,sirenMand,Nom,Prenom,type,tribunal,Statut,adresse,adresseComp,cp,ville,tel,fax,email,web,contact'; + else + $fields="id, CONCAT(Nom,' ',Prenom,' ',adresse,' ',adresseComp,' ',cp,' ',ville) as Mand"; + + $liste=$this->iDb->select('tabMandataires', $fields, "1 $strIdCA $strType ORDER BY sirenGrp", true, MYSQL_ASSOC); + $tabRet=array(); + if (!$condense) foreach ($liste as $ligne) $tabRet[]=$ligne; + else foreach ($liste as $ligne) $tabRet[$ligne['id']]=preg_replace('/ +/',' ',$ligne['Mand']); + + return $tabRet; + } + + /** Retourne la liste des mandataires/administrateurs/oppositions correspondant à un nom + ** + ** @param string $nom Nom du mandataire + ** @param bool $condense Par défaut retourne un tableau concatenant Nom, prenom, adresse complète + ** @param array $type Type d'opposition. Ex array('A','M') pour Admin/Mandataires. Autres: a'V'ocat,'H'uissier,'N'otaire + ** @return Liste des Mandataires/Administrateurs de la cours d'appel + **/ + function searchMandataires($nom, $condense=true, $type=array(), $cpDep=0) { + + $strIdCA="AND (Nom LIKE '%$nom%' OR Prenom LIKE '%$nom%') "; + + if (count($type)>0) $strType="AND type in ('".implode("','", $type)."') "; + else $strType=''; + + if ($cpDep>0 && $cpDep<100) $strCp="AND cp BETWEEN $cpDep"."000 AND $cpDep"."999 "; + elseif ($cpDep>99 && $cpDep<1000) $strCp="AND cp BETWEEN $cpDep"."00 AND $cpDep"."99 "; + elseif ($cpDep>999) $strCp="AND cp=$cpDep "; + else $strCp=''; + + if (!$condense) + $fields='id,sirenGrp,sirenMand,Nom,Prenom,type,tribunal,Statut,adresse,adresseComp,cp,ville,tel,fax,email,web,contact'; + else + $fields="id, CONCAT(Nom,' ',Prenom,' ',adresse,' ',adresseComp,' ',cp,' ',ville) as Mand"; + + $liste=$this->iDb->select('tabMandataires', $fields, "1 $strIdCA $strType $strCp ORDER BY sirenGrp", false, MYSQL_ASSOC); + $tabRet=array(); + if (!$condense) foreach ($liste as $ligne) $tabRet[]=$ligne; + else foreach ($liste as $ligne) $tabRet[$ligne['id']]=preg_replace('/ +/',' ',$ligne['Mand']); + + return $tabRet; + } + + /** Récupère les informations du mandataire + ** + ** @param integer $idMand Identifiant SD du mandataire + ** @return array + **/ + function getMandataire($idMand) { + $fields='id,sirenGrp,sirenMand,Nom,Prenom,type,coursAppel,coursAppel2,tribunal,Statut,stagiaire,adresse,adresseComp,cp,ville,tel,fax,email,web,contact'; + $liste=$this->iDb->select('tabMandataires', $fields, "id=$idMand", true, MYSQL_ASSOC); + return @$liste[0]; + } + + + function getHuissiers($arrIdCA=array(), $condense=true) { + if (count($arrIdCA)>0) + $strIdCA="AND tribunal in ('".implode("','", $arrIdCA)."')"; + + else $strIdCA=''; + if (!$condense) + $fields='id,sirenGrp,sirenMand,Nom,Prenom,type,tribunal,Statut,adresse,adresseComp,cp,ville,tel,fax,email,web,contact'; + else + $fields="id, CONCAT(Nom,' ',Prenom,' ',adresse,' ',adresseComp,' ',cp,' ',ville) as Mand"; + + $liste=$this->iDb->select('tabMandataires', $fields, "1 AND type='H' $strIdCA ORDER BY sirenGrp", false, MYSQL_ASSOC); + $tabRet=array(); + if (!$condense) foreach ($liste as $ligne) $tabRet[]=$ligne; + else foreach ($liste as $ligne) $tabRet[$ligne['id']]=preg_replace('/ +/',' ',$ligne['Mand']); + //@wsLog('HUISSIERS',$strIdCA,count($liste)); + return $tabRet; + } + + /** Retourne l'identite Textuelle d'un mandataires/administrateurs + ** + ** @param integer $idMand Id S&d du mandataire + ** @return string Mandataire + **/ + function getMandatairesParId($idMand) { + if ($idMand>0) { + $liste=$this->iDb->select('tabMandataires', "CONCAT(Nom,' ',Prenom,' ',adresse,' ',adresseComp,' ',cp,' ',ville) as Mand", "id=$idMand", false); + return $liste[0][0]; + } + return ''; + } + + function getNaf4($siren, $nic=0, $id=0) { + $tabRet=array(); + $siren=$siren*1; + if ($siren==0) return false; + $nic=$nic*1; + $id=$id*1; + /*if ($id>0 && $siren==0) $where=" id=$id "; + else*/if ($nic<>0) $where=" siren=$siren AND nic=$nic "; + else $where=" siren=$siren AND siege=1 "; + + $insee=$this->iDbInsee->select('bascule', 'siren, nic, apen5, apen4, apet5, apet4', $where, false, MYSQL_ASSOC); + $tabRet=$insee[0]; + $tabRet['apen4_lib']=$this->getLibelleNaf($tabRet['apen4']); + $tabRet['apet4_lib']=$this->getLibelleNaf($tabRet['apet4']); + return $tabRet; + } + + function getIdentiteEntreprise($siren, $nic=0, $id=0, $forceVerif=false, $accesDist=true) { + global $timer; + $timer=array('debutIdentite'=>microtime(true)); + //$accesDist=false; + $tdebIni=microtime(1); + $ligne=date('YmdHis').";$siren;getIdentiteEntreprise Début ---"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + + $siren=$siren*1; + $nic=$nic*1; + $id=$id*1; + $limit=''; //LIMIT O,1' ; + if ($id>0 && $siren<1000) $where=" id=$id "; + elseif ($nic<>0) $where=" siren=$siren AND nic=$nic "; + elseif ($siren<>0) $where=" siren=$siren ";//AND siege=1 "; + $listeEtab=$this->iDb->select('etablissements e', + "e.id, e.source, e.source_id, e.triCode, e.autre_id, e.siren, e.nic, e.siege, e.autre_id, ". + "e.raisonSociale, e.enseigne, e.sigle, e.adr_num, e.adr_btq, e.adr_typeVoie, e.adr_libVoie, ". + "e.adr_comp, e.adr_cp, e.adr_ville, e.tel, e.fax, e.cj, e.ape_etab, e.ape_entrep, ". + "e.capital, e.capitalDev, e.capitalSrc, CONCAT(e.siren, e.nic) as siret, e.actif, ". + "e.age_entrep, e.age_etab, e.tca, e.tcaexp, e.teff_entrep, e.teff_etab", + "$where ORDER BY siege DESC, actif DESC, nic DESC $limit", false, MYSQL_ASSOC); + + $etab=@$listeEtab[0]; + $nic=@$etab['nic']; + $timer['tableEtablissements']=microtime(true); + + /** Si le siren est valide, on part chez Infogreffe **/ + if (count($listeEtab)==0 && $this->valideSiren($siren) && $accesDist) { + $iGeffes=new MGreffes(); + $etabG=$iGeffes->getIdentite($siren); + if ($etabG) { + $adr=$this->structureVoie($etabG['Adresse']); + // Date de dernière MAJ + $lastMaj=str_replace('-','',$etabG['DateRadiation'])*1; + if (str_replace('-','',$etabG['DateCreation'])*1>$lastMaj) + $lastMaj=str_replace('-','',$etabG['DateCreation'])*1; + if (str_replace('-','',$etabG['DateUpdate'])*1>$lastMaj) + $lastMaj=str_replace('-','',$etabG['DateUpdate'])*1; + + $etab=array( 'id' => $etabG['id'], + 'siret' => $etabG['Siret'], + 'siege' => $etabG['Siege'], + 'raisonSociale' => $etabG['Nom'], + 'sigle' => $etabG['Sigle'], + 'enseigne' => $etabG['Enseigne'], + 'Adresse' => $etabG['Adresse'], + 'adr_comp' => $etabG['Adresse2'], + 'adr_num' => $adr['num'], + 'adr_btq' => $adr['adr_btq'], + 'adr_typeVoie' => $adr['typeVoie'], + 'adr_libVoie' => $adr['libVoie'], + 'adr_dep' => substr($etabG['CP'],0,2), + 'adr_cp' => $etabG['CP'], + 'adr_ville' => $etabG['Ville'], + 'tel' => $etabG['Tel'], + 'fax' => $etabG['Fax'], + 'cj' => $etabG['FJ'], + 'siren' => $etabG['Siren'], + 'nic' => $etabG['Nic'], + 'actif' => $etabG['Actif'], + 'ape_etab' => $etabG['NafEtab'], + 'ape_entrep' => $etabG['NafEnt'], + 'autre_id' => $etabG['NumRC'], + 'dateMAJ' => WDate::DateT('Ymd','Y-m-d',$lastMaj), + ); + } + $timer['accesInfogreffeCarInconnu']=microtime(true); + } + unset($listeEtab); + + /** Informations locales issues de la table infos_entrep + **/ + if ($siren>100) { + $info=$this->iDb->select('infos_entrep', 'raisonSociale, isin, nscrl, tel, fax, web, mail, latitude, longitude, precis, dateCreation, dateFermeture, naf, naf_lib, ca, effectif, nbEtab, activite, sirenDoublon, waldec', "siren=$siren", false, MYSQL_ASSOC); + $tab=$info[0]; + $waldec=$tab['waldec']; + if ($tab['sirenDoublon']==0) { + $info=$this->iDb->select('infos_entrep', 'siren AS sirenDoublon', "sirenDoublon=$siren", false, MYSQL_ASSOC); + $tab['sirenDoublon']=$info[0]['sirenDoublon']; + } + + $insee=$this->iDb->select('etablissements', 'CONCAT(SIREN,NIC) AS siret', "SIREN=$siren AND SIEGE=1 ORDER BY ACTIF%10 DESC, NIC DESC",false,MYSQL_ASSOC); + $siretSiege=$insee[0]['siret']; + $timer['infosEntrep']=microtime(true); + } + + if ($nic>0) $strNic="AND NIC=$nic"; + else $strNic='AND NIC<100000 AND SIEGE=1'; + + $moisNonDiff=0; + + /** Informations INSEE + **/ + if ($siren>100) { + $insee=$this->iDbInsee->select('identite', 'ACTIF%10 AS ACTIF, actifEco%10 AS actifEco, NOM, NOM2, SIGLE, ENSEIGNE, ADR_NUMVOIE, ADR_BTQ, ADR_TYPVOIE, ADR_LIBVOIE, ADR_LIBCOM, ADR_CP, ADR_COMP, ADR_DISTSP, PAYS, DCREN, SIEGE, AUXILT, SAISONAT, CJ, CIVILITE, NBETAB, APE_ENT, APE_ETAB, PROCOL, PROCOL_TYPE, PROCOL_DATE, CAPITAL, EFF_ENT, NUMRC, TEL, FAX, DIR_FCT, DIR_IDEN, DIR_DATEN, DIR_LIEUN, CAPITAL_DATE, CAPITAL_DEV, DCRET, TEFF_ENT, ADR_DEP, ADR_COM, TCA, TCAEXP, EFF_ET, TEFF_ET, CODEVOIE, DATE_MAJ, APRM, ACTIVNAT, ORIGINE, MODET, EXPLET, LIEUACT, ACTISURF, DEFET, MODEN, PRODPART, EXPLEN, MONOREG, REGIMP, MONOACT, DEFEN, DEFET, IDENTITE_PRE', + "SIREN=$siren $strNic ORDER BY SIEGE DESC, ACTIF DESC LIMIT 0,1",false,MYSQL_ASSOC); + if (count($insee)>0) { + $tabInsee=$insee[0]; + $tabNotice=$this->getInfosNotice($siren, $nic); + $tabInsee['TCA_AN']=$tabNotice['insEAEANT']; + $tabInsee['RECME']=$tabNotice['insRECME']; + // On force l'indicateur "actifEco" à 0 si l'établissement est juridiquement inactif + if ($tabInsee['ACTIF']*1==0) $tabInsee['actifEco']=0; + } else { + // Siren absent de l'Insee + $tabInsee=array( + 'CIVILITE'=>0, + 'NBETAB'=>1, + 'TEL'=>$etab['tel'], /** @todo Prendre sur les pages jaunes **/ + 'FAX'=>$etab['fax'], /** @todo idem **/ + 'Web'=>'', /** @todo Prendre sur les pages jaunes et/ou google **/ + 'Mail'=>'', /** @todo idem **/ + 'CJ'=>$etab['cj'], + 'CJ_lib'=>$this->getLibelleFJ($etab['cj']), + 'ACTIF'=>$etab['actif'], + 'APE_ETAB'=>$etab['ape_etab']?$etab['ape_etab']:$etab['ape_entrep'], + 'APE_ENT'=>$etab['ape_entrep']?$etab['ape_entrep']:$etab['ape_etab'], + 'CAPITAL'=>$etab['capital'], + 'CAPITAL_DEV'=>$etab['capitalDev'], + 'ADR_DEP'=>$etab['adr_dep'], + 'TEFF_ENT'=>$etab['teff_entrep'], + 'DEFEN'=>'', + 'TEFF_ET'=>$etab['teff_etab'], + 'DEFET'=>'', + 'TCA'=>$etab['tca'], + 'TCA_AN'=>'', + 'TCAEXP'=>$etab['tcaexp'], + ); + } + + $tabTmp=$this->iDb->select('etablissements', 'count(*) AS nbEtabs', "siren=$siren AND NIC<100000 AND ACTIF%10=1",false,MYSQL_ASSOC); + $nbEtab=$tabTmp[0]['nbEtabs']; + $inseeND=$this->iDbInsee->select('insee_nondiff', 'siren, mois, dateInsert',"siren=$siren",false,MYSQL_ASSOC); + $moisNonDiff=@$tabTmp[0]['mois']; + $timer['tableIdentite']=microtime(true); + } + else { + $tabInsee=array( + 'CIVILITE'=>0, + 'NBETAB'=>1, + 'TEL'=>$etab['tel'], /** @todo Prendre sur les pages jaunes **/ + 'FAX'=>$etab['fax'], /** @todo idem **/ + 'Web'=>'', /** @todo Prendre sur les pages jaunes et/ou google **/ + 'Mail'=>'', /** @todo idem **/ + 'CJ'=>$etab['cj'], + 'CJ_lib'=>$this->getLibelleFJ($etab['cj']), + 'ACTIF'=>$etab['actif'], + 'APE_ETAB'=>$etab['ape_etab']?$etab['ape_etab']:$etab['ape_entrep'], + 'APE_ENT'=>$etab['ape_entrep']?$etab['ape_entrep']:$etab['ape_etab'], + 'CAPITAL'=>'', + 'CAPITAL_DEV'=>'', + 'ADR_DEP'=>$etab['adr_dep'], + ); + $nbEtab='N/C'; + } + + if (count($info)==0) { + $idComp=$this->getIdentitePart($siren, $etab['raisonSociale'], $etab['enseigne'], $etab['sigle'], 0, $accesDist); + $tab=$idComp; + $timer['getIdentitePart']=microtime(true); + } + + /** Géocodage de l'adresse + **/ + $ligne=date('YmdHis').";$siren;MMap AVANT"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $mMap=new MMap(true);//$etab['adr_num'].' '.$this->getCodeVoie($etab['adr_typeVoie']).' '.$etab['adr_libVoie'], $etab['adr_cp'], $etab['adr_ville']); + $mMap->geoCodeAdresse($etab['adr_num'],'',$etab['adr_typeVoie'],$this->getCodeVoie($etab['adr_typeVoie']), $etab['adr_libVoie'], $etab['adr_cp'], $etab['adr_ville'], 'France', trim($tabInsee['ADR_DEP'].$tabInsee['ADR_COM'].$tabInsee['CODEVOIE'])); + $ligne=date('YmdHis').";$siren;MMap APRES ($duree s)"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $tab['latitude']=$mMap->latitudeDec; + $tab['longitude']=$mMap->longitudeDec; + $tab['precis']=$mMap->precision; + $timer['geoCodage']=microtime(true); + + /** Accès provisoire à AMABIS + **/ + if ($accesDist) { + $ligne=date('YmdHis').";$siren;MAmabis Avant"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $tdeb=microtime(1); + $iAmabis=new MAmabis(); + $repAmabis=$iAmabis->getZonage($etab['adr_num'],$etab['adr_btq'],$etab['adr_typeVoie'],$etab['adr_libVoie'], $etab['adr_cp'], $etab['adr_ville'], trim($tabInsee['ADR_DEP'].$tabInsee['ADR_COM'].$tabInsee['CODEVOIE']), false, 'TEST', false); + $duree=round(microtime(1)-$tdeb,3); + $ligne=date('YmdHis').";$siren;MAmabis APRES ($duree s)"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $timer['zonesPrioritaires']=microtime(true); + } else + $repAmabis=array(); + + + /** N° de TVA Intracommunautaire + **/ + if ($siren*1>100) { + $ligne=date('YmdHis').";$siren;MTva Avant"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $tdeb=microtime(1); + $iTva=new MTva($siren, $accesDist); + $vatNumber=$iTva->vatNumber; + $vatDefined=$iTva->vatDefined; + $duree=round(microtime(1)-$tdeb,3); + $ligne=date('YmdHis').";$siren;MTva APRES ($duree s)"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $timer['tvaIntra']=microtime(true); + } else { + $vatNumber='FR00000000000'; + $vatDefined=false; + } + + $nom =trim($etab['raisonSociale']); + if ($nom=='') $nom=@preg_replace('/,.*$/','',$tabInsee['IDENTITE_PRE']); + $nom2=$tel=$fax=''; + if (strtoupper(trim($tabInsee['NOM2']))<>strtoupper(trim($etab['sigle']))) + $nom2=trim($tabInsee['NOM2']); + + if (trim($tab['tel'])<>'') $tel=trim($tab['tel']); + elseif ($tabInsee['TEL']<>'') $tel=implode('.', str_split($tabInsee['TEL'],2)); + + if (trim($tab['fax'])<>'') $fax=trim($tab['fax']); + elseif ($tabInsee['FAX']<>'') $fax=implode('.', str_split($tabInsee['FAX'],2)); + + /*if ( $accesDist && $etab['actif']==1 ) {/*&& + ($tel=='' || /*$fax=='' ||* // Pas de tél ou Fax + ($etab['siege']==1 && ($tab['web']=='' || $tab['web']=='http://')) + //$tab['web']=='' || $tab['mail']=='' || // Pas de Web/Mail + ) + ) */ + $ligne=date('YmdHis').";$siren;MTel Avant"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $tdeb=microtime(1); + $iTel=new MTel(false);//$accesDist); + $iTel->getTel($siren); + $tmp=$iTel->getTel($siren, $nic); + $duree=round(microtime(1)-$tdeb,3); + $ligne=date('YmdHis').";$siren;MTel APRES ($duree s)"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $activitePJ_An8=''; + foreach ($tmp as $tmp2) { + if ($tmp2['typeTel']=='tel' && ($tel==''||$tel==trim($tab['tel'])) ) + $tel=implode('.', str_split($tmp2['telephone'],2)); + if ($tmp2['typeTel']=='fax' && ($fax==''||$fax==trim($tab['fax'])) ) + $fax=implode('.', str_split($tmp2['telephone'],2)); + if ($tmp2['typeTel']=='web' && $tab['web']=='') $tab['web']=$tmp2['infoTel']; + if ($tmp2['typeTel']=='mail' && $tab['mail']=='') $tab['mail']=$tmp2['infoTel']; + if ($tmp2['typeTel']=='an8') $activitePJ_An8=$tmp2['infoTel']; + } + $timer['telFax']=microtime(true); + //} + + /** Type d'exploitation + ** 0 : N/C + ** 1 : Locataire d'un fond de commerce + ** 2 : Loueur d'un fond de commerce + ** 3 : Prestataire de personnel + ** 10: Exploitation directe + ** 11: Sans activité ??? + **/ + $typeExploitation=0; + if (strtoupper($tabInsee['EXPLET'])=='O') { + switch ($tabInsee['PRODPART']*1) { + case 1: // Locataire d'un fond de commerce + $tabAnn2=$this->getAnnoncesLegales($siren, 0, array(5700)); + if (count($tabAnn2)>0) $typeExploitation=0; + else $typeExploitation=1; + break; + case 2: // Loueur d'un fond de commerce + case 3: // Prestataire de personnel + $typeExploitation=$tabInsee['PRODPART']*1; + break; + default: + if (!($tabInsee['CJ']>=7000 && $tabInsee['CJ']<8000) && + !($tabInsee['CJ']>=9000 && $tabInsee['CJ']<10000) ) { + if ($tabInsee['ORIGINE']*1==6) // Prise en location-gérance + $typeExploitation=1; // Locataire d'un fond de commerce + elseif ($tabInsee['ORIGINE']*1==1 || // Création pure + $tabInsee['ORIGINE']*1==3 || // Achat + $tabInsee['ORIGINE']*1==4) // Apport + /* + '2'=>'Réinstallation après transfert', + '5'=>'Reprise au conjoint ou apport reçu', + + '7'=>'Partage', + '8'=>'Reprise', + '9'=>'Autre modalité d\'acquisition', + 'A'=>'Reprise globale d\'une exploitation agricole', + 'B'=>'Poursuite de l\'exploitation agricole par le conjoint', + 'C'=>'Transfert de propriété d\'une exploitation agricole', + 'D'=>'Apport d\'exploitation(s) agricole(s) individuelle(s)', + 'E'=>'Reprise totale ou partielle d\'exploitation individuelle', + */ + $typeExploitation=10; + elseif ($nbEtab<2) { + $tabAnn=$this->getAnnoncesLegales($siren, 0, 'L'); + if (count($tabAnn)>0) { + //@sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "classMInsee::getAnnonces... sur $siren", print_r($this->getAnnoncesLegales($siren, 0, 'L'), true)); + //ICI + if ($tabAnn[0]['DateParution']>$tabInsee['DCRET'] && ($tabAnn[0]['Departement']==$tabInsee['ADR_DEP'] || $tabAnn[0]['Departement']==substr(''.$tabInsee['ADR_DEP'].''.$tabInsee['ADR_COM'],O,3)*1)) + $typeExploitation=1; // Locataire d'un fond de commerce + } elseif (count($this->getAnnoncesLegales($siren, 0, 'G'))>0) { + //@sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "classMInsee::getAnnonces... sur $siren", print_r($this->getAnnoncesLegales($siren, 0, 'G'), true)); + $typeExploitation=2; // Loueur d'un fond de commerce + } + } elseif ($tabInsee['ORIGINE']*1 <>0 && + $tabInsee['ORIGINE']*1 <>8 && + $tabInsee['ORIGINE']*1 <>9 && + $tabInsee['ORIGINE'] <>'NR') + $typeExploitation=10; // Exploitation directe + } + break; + } + } + $timer['typeExploitation']=microtime(true); + + /** Recherche de prédécesseur ou successeur + **/ + + global $tabInfoUser; //@todo : Voir à quoi + + $tabAssoc=$this->getSiretAssoc($siren, $nic); + if (count($tabAssoc)>0) { + if (isset($tabAssoc['pre'])) { + // Il y a un prédécesseur + if ($tabInsee['ORIGINE']*1==0 || + $tabInsee['ORIGINE']*1==1 || + $tabInsee['ORIGINE']*1==9 || + $tabInsee['ORIGINE']=='NR') + $tabInsee['ORIGINE']=2; // Transfert + } + } + $timer['siretPrecSuivant']=microtime(true); + + /** Code Pays + **/ + $codePaysIso2='FR'; + if ($tabInsee['ADR_DEP']>98) { + $codePaysInsee=$tabInsee['ADR_COM']; + $tabTmp=$this->iDb->select( 'jo.tabPays j, insee.insee_tabPays i', + 'j.codPays, j.numPays, j.codPays3, j.codePaysInpi, j.libPays, i.LIBCOG, i.ACTUAL', + "j.codePaysInsee=$codePaysInsee AND j.codePaysInsee=substring( i.COG, 3, 3 ) AND i.ACTUAL IN (1,4) AND j.numPays is NOT NULL", false, MYSQL_ASSOC); + if (count($tabTmp)==1) { + $codePaysIso2=$tabTmp[0]['codPays']; + } else { + $codePaysIso2=''; + foreach ($tabTmp as $tabTmp2) { + if (trim(preg_replace('/[^A-Z]/','',strtoupper(strtr($tabTmp2['libPays'], + 'àáâãäåæçèéêëìíîïðñòóôõöùúûüýÿÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖÙÚÛÜÝ', + "aaaaaaaceeeeiiiionooooouuuuyyAAAAAAACEEEEIIIIONOOOOOUUUUY"))))==trim(preg_replace('/[^A-Z]/','',strtoupper($tabTmp2['LIBCOG'])))) { + $codePaysIso2=$tabTmp2['codPays']; + break; + } + } + // Exception lié à anomalies de données INSEE + if ($codePaysIso2=='' && $codePaysInsee==237) $codePaysIso2='KR'; + + if ($codePaysIso2=='') { + sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "classMInsee::getIdentiteEntreprise(siren=$siren,nic=$nic=,id=$id) Plusieurs Codes Pays", "Siret $siren $nic +Id=$id".EOL. +print_r($tabInsee, true).EOL. +print_r($tabTmp, true)); + } + } + } + $timer['codePays']=microtime(true); + + $tabIris=$this->getInfosIris($tabInsee['ADR_DEP'].$tabInsee['ADR_COM'], substr($tabInsee['CODEVOIE'],0,4), $etab['adr_num'], $etab['adr_btq'], $etab['adr_typeVoie'], $etab['adr_libVoie']); + $timer['codeIris']=microtime(true); +/* + return array('codIris'=>$ret[0]['codeIris'], + 'codComIris'=>$ret[0]['codeInseeIris'], + 'libIris'=>$ret[0]['LIB_IRIS'], + 'typIris'=>$tabTypeIris[$ret[0]['TYP_IRIS']], +*/ + // Est-ce un ancien établissement siège ? + $ancienSiege=false; + $dateFinSiege=0; + if ($etab['siege']==0 || ($etab['siege']==1 && $tabInsee['ACTIF']==0)) { + $dateFinSiege=$this->isAncienSiege($siren,$nic); + if ($dateFinSiege>19000101) $ancienSiege=true; + } + $timer['ancienSiege']=microtime(true); + + if ($tabInsee['ACTIF']*1==1 && $tabInsee['actifEco']*1==0) { + /** L'établissement est actif juridiquement à l'INSEE mais sans activité économique + **/ + $tabTmp=$this->iDb->select('insee.insee_even', 'insEVE, IF(insDATEVE=0, idFlux*1, insDATEVE) AS insDATEVE', + "insSIREN=$siren AND insEVE IN ('OD','TD','MPF','MNP','420','425','620','621','650') ORDER BY insDATEVE DESC", false, MYSQL_ASSOC); + if (count($tabTmp)>0) { + $tabModif=$tabTmp[0]; + switch(''.$tabModif['insEVE']) { + case 'OD': + case 'TD': + case '420': // Absence d'activité de l'entreprise (cessation économique de l.entreprise) + case '425': // Absence d'activité d'une entreprise suite à une mise à jour au répertoire // + case '620': + case '621': + case '650': + // Fermé économiquement + $tabInsee['actifEcoType']='ECOF'; + $tabInsee['actifEcoDate']=$tabModif['insDATEVE']; + break; + case 'MPF': // Présumé Fermé + $tabInsee['actifEcoType']='PFER'; + $tabInsee['actifEcoDate']=$tabModif['insDATEVE']; + break; + case 'MNP': // NPAI + $tabInsee['actifEcoType']='NPAI'; + $tabInsee['actifEcoDate']=$tabModif['insDATEVE']; + break; + default: + $tabInsee['actifEco']=1; + $tabInsee['actifEcoDate']=''; + $tabInsee['actifEcoType']=''; + break; + } + } + } + + $tabRet=array( 'id'=>$etab['id'], + 'Siret'=>$etab['siret'], + 'SiretSiege'=>$siretSiege, + 'AncienSiege'=>$ancienSiege, + 'AncienSiegeDateFin'=>$dateFinSiege, + 'Siege'=>$etab['siege'], + 'Tribunal'=>strtr($etab['triCode'],array('préfec'=>'','sous-p'=>'','Déclar'=>'')), + 'Nom'=>$nom, //EIRL + + 'Nom2'=>$nom2, + 'Sigle'=>$etab['sigle'], + 'Enseigne'=>$etab['enseigne'], //EIRL + 'Adresse'=>trim(preg_replace('/ +/', ' ', trim( $etab['adr_num'] .' '. $etab['adr_btq'] .' '. + $etab['adr_typeVoie'] .' '. $etab['adr_libVoie']))), + 'Adresse2'=>trim(preg_replace('/ +/', ' ', $etab['adr_comp'])), + 'AdresseNum'=>$etab['adr_num'], + 'AdresseBtq'=>$etab['adr_btq'], + 'AdresseVoie'=>$etab['adr_typeVoie'], + 'AdresseRue'=>$etab['adr_libVoie'], + 'CP'=>$etab['adr_cp'], + 'Ville'=>$etab['adr_ville'], + 'Pays'=>$tabInsee['PAYS'], + 'PaysIso2'=>$codePaysIso2, + + 'Civilite'=>$tabInsee['CIVILITE'], + 'NbEtab'=>$nbEtab, + 'Tel'=>$tel, + 'Fax'=>$fax, + 'Web'=>$tab['web'], + 'Mail'=>$tab['mail'], + + 'GeoLat'=>$tab['latitude'], + 'GeoLon'=>$tab['longitude'], + 'GeoPrecis'=>$tab['precis'], + + 'TvaNumero'=>$vatNumber, + 'TvaAttribue'=>$vatDefined, + + 'FJ'=>$tabInsee['CJ'], + 'FJ_lib'=>$this->getLibelleFJ($tabInsee['CJ']), + 'RECME'=>$tabInsee['RECME'], + 'Siren'=>$etab['siren'], + 'Nic'=>$etab['nic'], + 'Actif'=>$tabInsee['ACTIF'], // Etablissement juridiquement ACTIF + 'ActifEco'=>$tabInsee['actifEco'], // Etablissement économiquement ACTIF + 'ActifEcoDate'=>$tabInsee['actifEcoDate'], // Etablissement économiquement Inactif depuis + 'ActifEcoType'=>$tabInsee['actifEcoType'], // Type d'inactivité éco ECOF, NPAI, PFER ou vide + 'NafEtab'=>$tabInsee['APE_ETAB'], + 'NafEnt'=>$tabInsee['APE_ENT'], + 'NaceEtab'=>$this->getCodeNace($tabInsee['APE_ETAB']), + 'NaceEnt'=>$this->getCodeNace($tabInsee['APE_ENT']), + 'NafEntLib' =>$this->getLibelleNaf($tabInsee['APE_ENT']), + 'NafEtabLib'=>$this->getLibelleNaf($tabInsee['APE_ETAB']), + 'AutreId'=>$etab['autre_id'], + 'Source'=>$etab['source'], + 'SourceId'=>$etab['source_id'], + 'Isin'=>$tab['isin'], + 'Capital'=>$etab['capital'], + 'CapitalDev'=>$etab['capitalDev'], + 'CapitalSrc'=>$etab['capitalSrc'], + +// 'Singularite'=>'', + 'DateCreaEt'=>$tabInsee['DCRET'], + 'DateCreaEn'=>$tabInsee['DCREN'], +// 'DateClotEn'=>$tabInsee[''], +// 'DateClotEt'=>$tabInsee[''], +// 'SitJur_lib'=>$tabInsee['PROCOL_TYPE'], +// 'SitJur_date'=>$tabInsee['PROCOL_DATE'], + 'SituationJuridique'=>'', + 'EffEnTr'=>$tabInsee['TEFF_ENT'], + 'EffEnTrLib'=>self::$tabEffectif[$tabInsee['TEFF_ENT']], + 'EffEtTr'=>$tabInsee['TEFF_ET'], + 'EffEtTrLib'=>self::$tabEffectif[$tabInsee['TEFF_ET']], + 'EffectifEtab'=>$tabInsee['EFF_ET'], + 'Effectif'=>$tabInsee['EFF_ENT'], + 'Dept'=>$tabInsee['ADR_DEP'], + 'codeCommune'=>$tabInsee['ADR_COM'], + 'TrancheCA'=>$tabInsee['TCA'], + 'TrancheCALib'=>self::$tabTCA[$tabInsee['TCA']], + 'TrancheCAexp'=>$tabInsee['TCAEXP'], + 'TrancheCAexpLib'=>self::$tabTCAexp[$tabInsee['TCAEXP']], + 'TrancheCAType'=>'I', + 'AnneeEffEn'=>$tabInsee['DEFEN'], + 'AnneeEffEt'=>$tabInsee['DEFET'], + 'AnneeTCA'=>$tabInsee['TCA_AN'], + + 'dir1Titre'=>self::$tabFct[$tabInsee['DIR_FCT']], + 'dir1NomPrenom'=>preg_replace('/^EIRL\s/','',$tabInsee['DIR_IDEN']), + 'Rivoli'=>substr($tabInsee['CODEVOIE'],0,4).' '.substr($tabInsee['CODEVOIE'],-1), + 'InfosIris'=>$tabIris, + 'NatureActivite'=>$tabInsee['ACTIVNAT'], // Nature de l'activité + 'OrigineCreation'=>$tabInsee['ORIGINE'], // Origine de la création + 'Auxiliaire'=>$tabInsee['AUXILT'], // 1=Auxiliaire / 0=Non auxiliaire + 'Saisonnalite'=>$tabInsee['SAISONAT'], // P=Activité permanente / S=Activité saisonnière + 'ACTISURF'=>$tabInsee['ACTISURF'], + 'EXPLEN'=>$tabInsee['EXPLEN'], + 'EXPLET'=>$tabInsee['EXPLET'], + 'LIEUACT'=>$tabInsee['LIEUACT'], + 'MODEN'=>$tabInsee['MODEN'], + 'MONOACT'=>$tabInsee['MONOACT'], + 'MONOREG'=>$tabInsee['MONOREG'], + 'REGIMP'=>$tabInsee['REGIMP'], + 'PRODPART'=>$tabInsee['PRODPART'], + 'GeoInfos'=>$repAmabis, + 'NonDiffusible'=>$moisNonDiff, + 'TypeExploitation'=>$typeExploitation, + 'DateMajINSEE'=>str_replace('--','',WDate::dateT('Ymd','Y-m-d',$tabInsee['DATE_MAJ'])), + 'APRM'=>$tabInsee['APRM'], + 'APRM_Lib'=>$this->getLibelleNafa($tabInsee['APRM']), + 'AutreSiret'=>$tabAssoc, + // MODET, + ); + + /** Estimation du Chiffre d'affaires **/ + $cj1=substr($tabInsee['CJ'],0,1)*1; + if ($tabRet['TrancheCA']*1==0 && $tabRet['AnneeTCA']*1==0 && $tabInsee['ACTIF']==1 && $tabInsee['CJ']<>1800 && $tabInsee['CJ']<>1900 && $cj1<>7 && $cj1<>8 && $cj1<>9) { + $caEstime=$this->getCAnafEffectif($tabInsee['APE_ENT'], $tabInsee['EFF_ENT']); + $tabRet['TrancheCA']=$this->getTca($caEstime); + $tabRet['TrancheCALib']=self::$tabTCA[$tabRet['TrancheCA']]; + if ($tabRet['TrancheCA']*1>0) { + $tabRet['TrancheCAType']='E'; + $tabRet['AnneeTCA']=date('Y')-2; + } + } + + /** Si tourisme, recherche du classeement **/ + $tabNafTourisme=array( '5510Z', // Hôtels et hébergement similaire + '5520Z', // Hébergement touristique et autre hébergement de co + '5530Z', // Terrains de camping et parcs pour caravanes ou véh + '702A', // Location de logements + '6820A', // Location de logements + '6820B', // Location de terrains et d'autres biens immobiliers + '551A', // Hôtels touristiques avec restaurant + '5610A', // Restauration traditionnelle + '741J', // Administration d'entreprises + '7010Z', // Activités des sièges sociaux + '552C', // Exploitation de terrains de camping + '702C', // Location d'autres biens immobiliers + '551C', // Hôtels touristiques sans restaurant + '553A', // Restauration de type traditionnel + ); + if (in_array($tabInsee['APE_ENT'], $tabNafTourisme) || + in_array($tabInsee['APE_ETAB'], $tabNafTourisme) ) { + $ret=$this->iDb->select('tourisme', 'id, nom, adresse, adrCp, adrVille, nbEtoiles, typeClasse, categorie, dateClasse, tel, fax, mail, web, typeChambres, capacite', "siren=$siren AND nic=$nic", false, MYSQL_ASSOC); + if (isset($ret[0])) { + $tabRet['NafEtabLib'].=' ('.$ret[0]['nbEtoiles'].' étoiles le '. + WDate::dateT('Y-m-d','d/m/Y',$ret[0]['dateClasse']).')'; + if ($tabRet['Tel']=='') $tabRet['Tel']=$ret[0]['tel']; + if ($tabRet['Fax']=='') $tabRet['Fax']=$ret[0]['fax']; + if ($tabRet['Web']=='') $tabRet['Web']=$ret[0]['web']; + if ($tabRet['Mail']=='') $tabRet['Mail']=$ret[0]['mail']; + } + } + + /** Nombre d'actions du capital si disponible **/ + if ($etab['capital']>0) { + $insee=$this->iDbInsee->select( + 'sdv1.capitalActions', + 'capital, deviseCapital, nbActions, actionNominale, dateInfo', + "siren=$siren AND capital>0 ORDER BY dateInfo DESC LIMIT 0,1",false,MYSQL_ASSOC); + $tabRet['CapitalNbActions']=0; + $tabRet['CapitalMtActions']=0; + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "getIdentite sur $siren", print_r($insee, true).EOL.mysql_error()); + if (count($insee)>0) { + if ($etab['capital']==$insee[0]['capital']) { + $tabRet['CapitalNbActions']=$insee[0]['nbActions']; + $tabRet['CapitalMtActions']=$insee[0]['actionNominale']; + } + } + } + $timer['nbActionsCapital']=microtime(true); + + /** Numéro de TVA non défini + **/ + if (!$vatDefined) { + // Dom Tom ou étranger + if ($tabRet['Dept']>96) + $tabRet['TvaFacultatif']=2; + // Micro-entreprise + if ($tabRet['FJ']*1<2000 && $tabRet['Effectif']==0 && $tabRet['TrancheCA']==0) + $tabRet['TvaFacultatif']=1; + } + + + /** Date de début d'activité de l'entreprise si absente INSEE + **/ + if ($siren>100 && $tabRet['DateCreaEn']==0) { + $insee=$this->iDbInsee->select('identite', 'DCREN', "SIREN=$siren AND DCREN>0 ORDER BY DCREN ASC LIMIT 0,1",false,MYSQL_ASSOC); + if (count($insee)>0) + $tabRet['DateCreaEn']=$insee[0]['DCREN']; + else { + $tmp=$this->getAvisInsee($siren); + $dateCreaEn=WDate::dateT('Y-m-d','Ymd',$tmp['dateEtatEn']); + if (preg_match("/Prise d'activité/", $tmp['etatEn']) && + $dateCreaEn>19000101) { + $this->iDbInsee->update('identite', array('DCREN'=>$dateCreaEn), + "SIREN=$siren AND NIC=".$etab['nic']); +/* @sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getIdentiteEntreprise() sur $siren DateCreaEn trouvée", +print_r($tmp, true)); + } else + @sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getIdentiteEntreprise() sur $siren date NON TROUVEE", +print_r($tmp, true)); +*/ + } + } + } + $timer['dateDebutActivite']=microtime(true); + + + /** Adresse de domiciliation + **/ + $tabDom=$this->infoAdresseDom( $tabRet['AdresseNum'], + $tabRet['AdresseBtq'], + $tabRet['AdresseVoie'], + $tabRet['AdresseRue'], + $tabRet['Adresse2'], + $tabRet['CP'], $tabRet['Ville']); + if (is_array($tabDom) && count($tabDom)>0) + foreach($tabDom as $i=>$dom) { + $tabRet['AdresseDom']=1; + $tabRet['AdresseDomNb']=$dom['nbEntrep']; + $domiciliataire=''; + if (preg_match('/^CHEZ (.*)$/i',$tabRet['Adresse2'], $matches) && + !preg_match('/ M | M. | MR | MME | MLLE /i',$tabRet['Adresse2'])) { + $domiciliataire=$matches[1]; + $tabRet['AdresseDom']=2; + } + $tabRet['AdresseDomEnt'][]=array('siren'=>$dom['siren'], + 'nom'=>prepareString($dom['nom']), + ); + } + $timer['adresseDom']=microtime(true); + + + /** Siren en Doublon ? + **/ + if ($tab['sirenDoublon']>0) $tabRet['AutreSiren']=array('listeSiren'=>array('siren'=>$tab['sirenDoublon'], + 'type' =>'doublon')); + if ($siren>100) { + $tabProcol=$this->getAnnoncesLegales($siren, 0, 'P', false); + $tabDates=array(); + foreach ($tabProcol as $iProcol=>$procol) + $tabDates[]=$procol['dateJugement']; + rsort($tabDates); + $dateProcol=str_replace('-','',$tabDates[0])*1; + if (count($tabProcol)>0) { + if ($this->dureePlan>0 && date('Ymd')<$this->finPlan) { + /** En cours de plan de continuation/redressement + $this->debutPlan; // Date de début/jugement/publication du plan SSAAMMJJ + $this->dureePlan; // Durée du plan en mois + $this->finPlan; // Date de fin du plan SSAAMMJJ + */ + $tabRet['SituationJuridique']='PL'; + /*@sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getIdentiteEntreprise() sur $siren En cours de plan", + 'Début du plan : '. $this->debutPlan .EOL. + 'Durée du plan : '. $this->dureePlan .' mois'.EOL. + 'Fin du plan : '. $this->finPlan);*/ + } elseif ($this->dureePlan>0 && date('Ymd')>=$this->finPlan) + // Plan révolu + $tabRet['SituationJuridique']=''; + elseif ($this->appelJugement) + // Appel de jugement + $tabRet['SituationJuridique']='PA'; + else + // En cours de procédure + $tabRet['SituationJuridique']='P'; + + $tabTmp=$this->iDb->select('scores_cutoff', 'encours, scoreSolv, scoreDir, scoreConf, DATE(dateInsert)*1 AS dateInsert, DATE(dateUpdate)*1 AS dateUpdate', "siren=$siren", false, MYSQL_ASSOC); + if ($tabTmp[0]['scoreSolv']>0) { + if($tabTmp[0]['dateUpdate']>$tabTmp[0]['dateInsert']) + $dateMaj=str_replace('-','',$tabTmp[0]['dateUpdate']); + else + $dateMaj=str_replace('-','',$tabTmp[0]['dateInsert']); + if ($dateProcol<=$dateMaj) + $tabRet['SituationJuridique']=''; + } + } elseif (count($this->getAnnoncesLegales($siren, 0, 'A', false))>0) + $tabRet['SituationJuridique']='A'; + elseif (count($this->getAnnoncesLegales($siren, 0, 'D', false))>0) + $tabRet['SituationJuridique']='D'; + + /** Date de dernière mise à jour **/ + $tabAnn=$this->getAnnoncesLegales($siren, 0, '', false, false); + $tabDates=array(); + foreach ($tabAnn as $iAnn=>$ann) + $tabDates[]=$ann['dateInsertionSD']; + rsort($tabDates); + $tabRet['dateMajANN']=WDate::dateT('Y-m-d','Y-m-d',$tabDates[0]); + if ($tabRet['dateMajANN']=='--') $tabRet['dateMajANN']=''; + $timer['getAnnoncesLegales']=microtime(true); + } + if (($tabInsee['CJ']>0 && $tabInsee['CJ']<20 || + $tabInsee['CJ']>999 && $tabInsee['CJ']<2000) && $tabInsee['DIR_FCT']=='') + $tabRet['dir1Titre']=self::$tabFct['PP']; + + if ($tabInsee['CIVILITE']>0 && $tabRet['dir1NomPrenom']=='') { + if ($tabInsee['CIVILITE']==1) $tabRet['dir1NomPrenom']='M. '; + elseif ($tabInsee['CIVILITE']==2) $tabRet['dir1NomPrenom']='Mme '; + $tabRet['dir1NomPrenom'].=$tabInsee['NOM']; + } + + if ($tabInsee['ACTIF']==0 && $siren>100) { + if ($etab['nic']*1>0) $strNic='AND insNIC='.$etab['nic']; + else $strNic=''; +// $tmp=$this->iDbInsee->select( 'insee_even', 'insDATEVE', "insSIREN=$siren $strNic AND ( insEVE LIKE 'FF' OR insEVE LIKE '410' OR insEVE LIKE '420' OR insEVE LIKE '425' OR insDESTINAT<>'') ORDER BY insDATEVE DESC LIMIT 0,1", false, MYSQL_ASSOC); +// $tabRet['DateClotEn']=@$tmp[0]['insDATEVE']; + $tmp=$this->iDbInsee->select( 'insee_even', 'insDATEVE', "insSIREN=$siren $strNic AND ( insEVE LIKE 'FF' OR insEVE LIKE 'TF' OR insEVE LIKE '0F' OR insEVE LIKE 'TD' OR insEVE LIKE '0D' OR insEVE LIKE '410' OR insEVE LIKE '420' OR insEVE LIKE '425' OR insEVE LIKE '400' OR insEVE LIKE '430' OR insEVE LIKE '435' OR insDESTINAT<>'') ORDER BY insDATEVE DESC LIMIT 0,1", false, MYSQL_ASSOC); + $tabRet['DateClotEt']=@$tmp[0]['insDATEVE']; + unset($tmp); + $timer['dateClotureInsee']=microtime(true); + } + + if ($tabRet['TrancheCALib']=='') $tabRet['TrancheCALib']='N/C'; + if ($tabRet['EffEnTrLib']=='') $tabRet['EffEnTrLib']='N/C'; + + $tabRet['CapitalLib']=''; + $strEvenVtLg=" AND Rubrique<>'ventes' AND typeEven NOT LIKE '%2700%' AND typeEven NOT LIKE '%2701%' AND typeEven NOT LIKE '%2702%' AND typeEven NOT LIKE '%2703%' AND typeEven NOT LIKE '%2710%' AND typeEven NOT LIKE '%2720%' AND typeEven NOT LIKE '%2721%' AND typeEven NOT LIKE '%2725%' AND typeEven NOT LIKE '%2730%' AND typeEven NOT LIKE '%2740%' AND typeEven NOT LIKE '%2750%' AND typeEven NOT LIKE '%2800%' AND typeEven NOT LIKE '%2840%' AND typeEven NOT LIKE '%2850%' AND typeEven NOT LIKE '%2851%' AND typeEven NOT LIKE '%2860%' AND typeEven NOT LIKE '%2870%' AND typeEven NOT LIKE '%2875%' AND typeEven NOT LIKE '%2880%' AND typeEven NOT LIKE '%2881%' AND typeEven NOT LIKE '%2885%' AND typeEven NOT LIKE '%2890%' AND typeEven NOT LIKE '%2891%' AND typeEven NOT LIKE '%2892%' "; + if ($siren>100) { + if ($tabRet['CapitalSrc']<>5) { + /** Recherche du n° RC, de la Forme Juridique et du Capital au Bodacc **/ + $bodacc=$this->iDb->select( 'bodacc_detail', 'Capital, CapitalDev', + "siren=$siren AND capital<>0 $strEvenVtLg ORDER BY Bodacc_Date_Parution DESC LIMIT 0,1", false, MYSQL_ASSOC); + $annCap=@$bodacc[0]; + if ($tabRet['Capital']==0 || $tabRet['CapitalDev']=='' || $tabRet['Capital']<>$annCap['Capital']*1) { + if ($tabInsee['CJ']>1999 && $tabInsee['CJ']<7000) { + $tabRet['Capital']=$annCap['Capital']*1; + $tabRet['CapitalDev']=$annCap['CapitalDev']; + $tabRet['CapitalSrc']=10; + } + } + + if ($tabRet['Capital']==0 || $tabRet['CapitalDev']=='') { + $iDbHisto=new WDB('historiques'); + $bodaccHisto=$iDbHisto->select( + 'entrep e, texte x',//.codEven Code évènement du mouvement Bodacc libEven ', + 'e.ANBASE, e.NOBOD, e.CODTRI, e.JAL, e.DATE, e.CODEVE, e.SSCODE, e.DEPT, e.NOANN, e.ROLE, e.SIREN, e.E1GSIR, e.E1GNIC, x.annonceNum, x.annonceTxt', + "e.E1GSIR=$siren AND e.ANBASE=x.annonceNum AND e.DATE BETWEEN 19890101 AND 20041231 AND x.annonceTxt LIKE '%capital%' /*AND (e.CODEVE BETWEEN 10 AND 19 OR e.CODEVE BETWEEN 30 AND 41 OR e.CODEVE BETWEEN 51 AND 79 ) */ GROUP BY e.ANBASE ORDER BY e.DATE DESC", false, MYSQL_ASSOC); + if (count($bodaccHisto)>0) { + foreach ($bodaccHisto as $ann) { + if ($ann['DATE']<19960101 && $ann['E1GSIR']<>$ann['SIREN']) continue; + $tabCodeTri=$ann['CODTRI']; + if ( ($ann['CODEVE']>=10 && $ann['CODEVE']<20) || + ($ann['CODEVE']>=30 && $ann['CODEVE']<42) || + ($ann['CODEVE']>=51 && $ann['CODEVE']<80) ) { + if (preg_match('/Capital(?:.|)\:(.*)(eur.|f|livre)/Uis', $ann['annonceTxt'], $matches) && $tabInsee['CJ']>1999 && $tabInsee['CJ']<7000) + + $tabRet['Capital']=trim(strtr($matches[1],array(' '=>'', ',00 '=>'', '.00 '=>'')))*1; + if (substr(strtoupper($matches[2]),0,3)=='EUR') + $tabRet['CapitalDev']='EUR'; + elseif (substr(strtoupper($matches[2]),0,3)=='LIV') + $tabRet['CapitalDev']='GBP'; + else + $tabRet['CapitalDev']='FRF'; + break; + } + } + } + } + } + if ($tabRet['CapitalDev']<>'' && $tabRet['CapitalDev']<>'EUR') { + $dev=$tabRet['CapitalDev']; + $devise=$this->iDbSD->select( 'devise_liste l, devise_cours c', 'c.devise, c.valeur, c.date, l.devNom, l.devNomPays, l.devPaysIso', "c.devise='$dev' and l.devIso='$dev' ORDER BY c.date DESC LIMIT 0,1", false, MYSQL_ASSOC); + $dev=@$devise[0]; + //die(print_r($dev)); + $devise=$tabRet['Capital']*$dev['valeur']*1; + $tabRet['CapitalLib']=''.$dev['devNom'].' soit '.number_format(round($devise),null,null,' ').' EUR'; + } + $timer['capital']=microtime(true); + + /** Recherche du code Tribunal du siège **/ + if ($tabRet['CapitalSrc']<>5) { + $bodacc=$this->iDb->select( 'bodacc_detail', 'RC, FJ, Tribunal_Code', + "siren=$siren AND RC<>'' $strEvenVtLg ORDER BY Bodacc_Date_Parution DESC LIMIT 0,1", false, MYSQL_ASSOC); + if ($tabRet['AutreId']=='') $tabRet['AutreId']=@$bodacc[0]['RC']; + if ($tabRet['Tribunal']=='') $tabRet['Tribunal']=@$bodacc[0]['Tribunal_Code']; + } + + if ($tabRet['FJ_lib']=='') { + $bodacc=$this->iDb->select( 'bodacc_detail', 'FJ', + "siren=$siren AND FJ<>'' $strEvenVtLg ORDER BY Bodacc_Date_Parution DESC LIMIT 0,1", false, MYSQL_ASSOC); + $tabRet['FJ_lib']=@$bodacc[0]['FJ']; + } + /** Recherche de l'activité réelle **/ + $bodacc=$this->iDb->select( 'bodacc_detail', 'Activite', "siren=$siren AND Activite<>'' AND Activite NOT LIKE 'non precis%' $strEvenVtLg ORDER BY Bodacc_Date_Parution DESC LIMIT 0,1", false, MYSQL_ASSOC); + $annCap=@$bodacc[0]; + if ($tabInsee['CJ']<7000 || $tabInsee['CJ']>7999) + $tabRet['Activite']=trim(/*preg_replace("/Adjonction.{1,7}activit(?:e|é)(?:.|)\:", '', */$annCap['Activite']);//); + + if ($tabRet['Activite']=='' && trim($tab['activite'])<>'') + $tabRet['Activite']=trim($tab['activite']); + elseif ($tabRet['Activite']=='' && ($tabInsee['CJ']>90 && $tabInsee['CJ']<94 || + $tabInsee['CJ']>9000 && $tabInsee['CJ']<9400) ) { + $siretMin=(''.$siren.'00000')*1; + $siretMax=(''.$siren.'99999')*1; + //$bodacc=$this->iDb->select( 'asso', 'Assoc_Web, Assoc_Mail, Assoc_Objet, Assoc_NObjet', "Siret BETWEEN $siretMin AND $siretMax AND (Assoc_Objet<>'' OR Assoc_NObjet<>'') ORDER BY Date_Parution DESC LIMIT 0,1", true, MYSQL_ASSOC); + $bodacc=$this->iDb->select( 'asso', 'Assoc_Web, Assoc_Mail, Assoc_Objet, Assoc_NObjet, Assoc_Nom, typeAsso, Waldec', "siren=$siren AND dateSuppr=0 AND (Assoc_Objet<>'' OR Assoc_NObjet<>'') ORDER BY Date_Parution DESC LIMIT 0,1", false, MYSQL_ASSOC); + $annCap=@$bodacc[0]; + $tabRet['Activite'] = trim($annCap['Assoc_NObjet']); + if (trim($tabRet['AutreId'])=='') + $tabRet['AutreId'] = trim($annCap['Waldec']); + $tabRet['nomLong'] = trim($annCap['Assoc_Nom']); + if ($tabRet['Activite']=='') $tabRet['Activite']=trim($annCap['Assoc_Objet']); + if ($tabRet['Web']=='') $tabRet['Web']=trim($annCap['Assoc_Web']); + if ($tabRet['Mail']=='') $tabRet['Mail']=trim($annCap['Assoc_Mail']); + if ($annCap['typeAsso']=='ASL' && $tabRet['FJ']<>9150) { + $tabRet['FJ2'] = $tabRet['FJ']; + $tabRet['FJ2_Lib'] = $tabRet['FJ_lib']; + $tabRet['FJ'] = 9150; + $tabRet['FJ_lib'] = $this->getLibelleFJ(9150); + } elseif ($annCap['typeAsso']=='FOD') { + $tabRet['FJ_lib'].= ' (Fonds de dotation)'; + } + if (trim($tabRet['AutreId'])=='') + $tabRet['AutreId'] = trim($waldec); + + } elseif ($tabRet['Activite']=='' && ($tabInsee['CJ']<7000 || $tabInsee['CJ']>7999)) { + $iDbHisto=new WDB('historiques'); + //10 à 19// Création d'entreprise + //30 à 41 + //51 à 79=>'1503', // Cloture insuf.Actif + $bodaccHisto=$iDbHisto->select( + 'entrep e, texte x',//.codEven Code évènement du mouvement Bodacc libEven ', + 'e.ANBASE, e.NOBOD, e.CODTRI, e.JAL, e.DATE, e.CODEVE, e.SSCODE, e.DEPT, e.NOANN, e.ROLE, e.SIREN, e.E1GSIR, e.E1GNIC, x.annonceNum, x.annonceTxt', + "e.E1GSIR=$siren AND e.ANBASE=x.annonceNum AND e.DATE BETWEEN 19890101 AND 20041231 AND x.annonceTxt LIKE '%ctivit%' GROUP BY e.ANBASE ORDER BY e.DATE DESC", false, MYSQL_ASSOC); + if (count($bodaccHisto)>0) { + foreach ($bodaccHisto as $idx=>$ann) { + if ($ann['DATE']<19960101 && $ann['E1GSIR']<>$ann['SIREN']) continue; + if ($tabCodeTri<>'' && $tabCodeTri<>@$ann['CODTRI']) $tabCodeTri=@$ann['CODTRI']; + //if ($siren==403119431) $tabRet['Activite'].="$idx(".$ann['CODEVE'].'):'.$ann['annonceTxt'].' / '; + if ( ($ann['CODEVE']<20) || + ($ann['CODEVE']>=30 && $ann['CODEVE']<42) || + ($ann['CODEVE']>=51 && $ann['CODEVE']<80) ) { + //Activite: r + if (preg_match('/(.*)Activit(?:e|é)(?:.|)\:(.*)(?:Adresse(?:.*|)|Commentaires?|Administration|Etablissement principal|Date d\'effet|Date.de.d.but d.activit.|Capital|Nom commercial)(?:.|)\:/Uis', $ann['annonceTxt'], $matches)) + if (strpos(substr($matches[1],-20),'cess') === false && + strpos(substr($matches[1],-20),'date') === false) { + $tabRet['Activite']=$matches[2]; + break; + } + } + } + } + } + $timer['activiteReelle']=microtime(true); + + $bodacc=$this->iDb->select('rncs_dirigeants', + "nom, prenom, naissance_nom, civilite, fonction_code as code, fonction_lib as libelle, naissance_date AS dateNaiss, naissance_lieu AS lieuNaiss, dirRS as rs, '' as dateEffet", + "siren=$siren AND actif%10=1 AND fonction_lib NOT LIKE '%Administrateur%' ORDER BY actif DESC, fonction_lib DESC", false, MYSQL_ASSOC); + if (count($bodacc)==0) + $bodacc=$this->iDb->select('rncs_dirigeants', + "nom, prenom, naissance_nom, civilite, fonction_code as code, fonction_lib as libelle, naissance_date AS dateNaiss, naissance_lieu AS lieuNaiss, dirRS as rs, '' as dateEffet", + "siren=$siren AND actif%10=0 AND fonction_lib NOT LIKE '%Administrateur%' ORDER BY actif DESC, fonction_lib DESC", false, MYSQL_ASSOC); + + if (count($bodacc)>0) { + $k=1; + foreach ($bodacc as $ann) { + if ($tabInsee['CJ']>=7000 && $tabInsee['CJ']<=7999 && + $ann['libelle']<>'Maire' && + //$ann['libelle']<>'Premier Adjoint' && + $ann['libelle']<>'Président' && + $ann['libelle']<>'Directeur général') continue; + $tabRet['dir'.$k.'Code']=$ann['code']; + $tabRet['dir'.$k.'Titre']=$ann['libelle']; + if (trim($ann['naissance_nom'])<>'') { + if ($ann['civilite']=='MME' || $ann['civilite']=='MLLE') + $nomNaiss=' née '.trim($ann['naissance_nom']); + elseif ($ann['civilite']=='M') + $nomNaiss=' né '.trim($ann['naissance_nom']); + else + $nomNaiss=' né(e) '.trim($ann['naissance_nom']); + } else $nomNaiss=''; + if (trim($ann['rs'])<>'') { + $tabRet['dir'.$k.'NomPrenom']=$ann['rs']; + if (trim($ann['nom'])<>'' || trim($ann['prenom'])<>'') + $tabRet['dir'.$k.'NomPrenom'].=' repr. par '.$ann['nom'].' '.$ann['prenom']; + } else { + $tabRet['dir'.$k.'NomPrenom']=$ann['nom'].' '.$ann['prenom'].$nomNaiss; + $tabRet['dir'.$k.'Nom']=$ann['nom']; + $tabRet['dir'.$k.'Prenom']=$ann['prenom']; + } + $tabRet['dir'.$k.'DateFct']=$ann['dateEffet']; + $tabRet['dir'.$k.'DateNaiss']=$ann['dateNaiss']; + $tabRet['dir'.$k.'LieuNaiss']=$ann['lieuNaiss']; + if ($k==2) break; + $k++; + } + } + else { + $bodacc=$this->iDb->select('bodacc_dirigeants d, bodacc_detail b, bodacc_fonctions f', + 'd.num, d.dateEffet, d.Rubrique, d.fonction, d.rs, d.nom, d.prenom, d.nomUsage, d.depart, d.dateInsert, f.libelle', + "b.SIREN=$siren AND b.id=d.id AND b.typeEven NOT BETWEEN 5000 AND 5700 AND b.typeEven NOT BETWEEN 2700 AND 2900 AND d.fonction=f.codeFct AND d.depart<>1 AND f.triCode IN ('ASS','COG','DID','DIR','GER','PCS','PDG','PRD','PRE','PRT','VIC') GROUP BY d.fonction, d.rs, d.nom, d.prenom ORDER BY d.dateEffet DESC", false, MYSQL_ASSOC); + //$annCap=@$bodacc[0]; + if (count($bodacc)>0) { + $k=1; + foreach ($bodacc as $ann) { + $tabRet['dir'.$k.'Code']=$ann['fonction']; + $tabRet['dir'.$k.'Titre']=$ann['libelle']; + $tabRet['dir'.$k.'NomPrenom']=$ann['rs'].' '.$ann['nom'].' '.$ann['prenom']; + $tabRet['dir'.$k.'Nom']=$ann['nom']; + $tabRet['dir'.$k.'Prenom']=$ann['prenom']; + $tabRet['dir'.$k.'DateFct']=$ann['dateEffet']; + if ($k==2) break; + $k++; + } + } + } + $timer['dirigeants']=microtime(true); + + /** Recherche du site Web ou Email dans le JO ASSO + **/ + if ( ($tabRet['Web']=='' || $tabRet['Mail']=='') && + ($tabInsee['CJ']>90 && $tabInsee['CJ']<94 || + $tabInsee['CJ']>9000 && $tabInsee['CJ']<9400) ) { + $siretMin=(''.$siren.'00000')*1; + $siretMax=(''.$siren.'99999')*1; + //$bodacc=$this->iDb->select( 'asso', 'Assoc_Web, Assoc_Mail', "Siret BETWEEN $siretMin AND $siretMax AND (Assoc_Web<>'' OR Assoc_Mail<>'') ORDER BY Date_Parution DESC LIMIT 0,1", true, MYSQL_ASSOC); + $bodacc=$this->iDb->select( 'asso', 'Assoc_Web, Assoc_Mail', "siren=$siren AND dateSuppr=0 AND (Assoc_Web<>'' OR Assoc_Mail<>'') ORDER BY Date_Parution DESC LIMIT 0,1", false, MYSQL_ASSOC); + $annCap=@$bodacc[0]; + if ($tabRet['Web']=='') $tabRet['Web']=trim($annCap['Assoc_Web']); + if ($tabRet['Mail']=='') $tabRet['Mail']=trim($annCap['Assoc_Mail']); + + } + } else { + if ($etab['source']==3) { + $id=$etab['source_id']; + $bodacc=$this->iDb->select( 'asso', 'Activite, Sous_Prefecture, Assoc_Web, Assoc_Mail, Assoc_Objet, Assoc_Fusion, Assoc_Date_Declaration2', "id=$id AND dateSuppr=0", false, MYSQL_ASSOC); + $annCap=@$bodacc[0]; + $tabRet['Activite'] = $annCap['Assoc_Objet']; + $tabRet['Web'] = $annCap['Assoc_Web']; + $tabRet['Mail'] = $annCap['Assoc_Mail']; + $tabRet['VilleDecl'] = $annCap['Sous_Prefecture']; + if ($tabRet['Actif']==0) { + // $tabRet['DateClotEn'] = $annCap['Assoc_Date_Declaration2']; + $tabRet['DateClotEt'] = $annCap['Assoc_Date_Declaration2']; + } else { + $tabRet['DateCreaEt'] = $annCap['Assoc_Date_Declaration2']; + $tabRet['DateCreaEn'] = $annCap['Assoc_Date_Declaration2']; + } + } + } + $timer['association']=microtime(true); + + + if (@count($etabG)>0) { + // On initialise les dernères variables en prov. d'Infogreffes + //$tabRet['DateClotEn'] = $etabG['DateRadiation']; + $tabRet['DateClotEt'] = $etabG['DateRadiation']; + $tabRet['dateImmat'] = $etabG['DateCreation']; + if ($tabRet['dateImmat']*1==0) + $tabRet['dateImmat']= substr($etabG['NumRC2'],0,4).'0101'; + $tabRet['DateCreaEt'] = $tabRet['DateCreaEn'] = substr($etabG['NumRC2'],0,4).'0100'; + + $tabRet['FJ'] = $etabG['FJ']; + if ($etabG['FJ']==1900) { + $tabRet['dir1Titre']='PP'; + $tabNom=explode(' ', $etabG['Nom']); + $tabNom[0]=strtoupper($tabNom[0]); + for($i=1; isset($tabNom[$i]); $i++) + if ($tabNom[$i]=='EPOUSE') + $tabNom[$i]='epouse'; + elseif ($tabNom[$i-1]<>'epouse') + $tabNom[$i]=ucwords(strtolower($tabNom[$i])); + $tabRet['dir1NomPrenom']=implode(' ', $tabNom); + } + $tabRet['FJ_lib'] = $etabG['FJLib']; // prepareString($etab['FJLib']), + $tabRet['AutreId'] = $etabG['NumRC']; + /* 'Source'=>$etab['source'], + 'SourceId'=>$etab['source_id'],*/ + $tabRet['NafEtab'] = $etabG['NafEtab']; + $tabRet['NafEnt'] = $etabG['NafEnt']; + $tabRet['NafEntLib'] = $etabG['NafEntLib']; + $tabRet['NafEtabLib'] = $etabG['NafEtabLib']; + $tabRet['SiretSiege'] = $etabG['Siret']; + $tabRet['DateMajRCS'] = $etab['dateMAJ']; + $tabRet['numGreffe'] = $etabG['NumGreffe']; + $tabRet['numRC'] = $etabG['NumRC2']; + $tabRet['Enseigne'] = $etabG['Enseigne']; + $iRncs=new MRncs(); + $tabRet['Tribunal'] = $iRncs->getCodeBodaccTribunal($etabG['NumGreffe']); + } + if ($tabRet['Siege']==1 && $tabRet['Actif'] && $tabRet['Tribunal']=='') + $tabRet['Tribunal']=$tabCodeTri; + + $rep=$this->iDb->select('rncs_entrep', 'siren, sirenValide, actif, numGreffe, triCode, triId, numRC, numRC2, raisonSociale, nom, prenom, nomUsage, sigle, dateNaiss, lieuNaiss, sexe, nationalite, pays, naf, cj, capitalMontant, capitalDevise, capitalDevIso, dateImma, dateRad, dateRad*1 AS dateRadNum, capitalType, capitalCent, provisoires, flux, DATE(dateUpdate) AS jourUpdate', "siren=$siren", false, MYSQL_ASSOC); + $entrep=$rep[0]; + if (isset($entrep['numGreffe'])) { //ETRANGER// + $tabRet['numGreffe'] = $entrep['numGreffe']; + $tabRet['numRC'] = $entrep['numRC2']; + if (( preg_match('/[A-Z]/i',substr($tabRet['AutreId'],2,2)) && + !preg_match('/[A-Z]/i',substr($tabRet['AutreId'],0,2)) + ) || $tabRet['AutreId']=='') + $tabRet['AutreId'] = $etabG['NumRC2']; + $tabRet['Tribunal'] = $entrep['triCode']; + if (strtoupper(trim($entrep['raisonSociale']))<>strtoupper(trim($tabRet['Nom']))) + $tabRet['nomLong'] = strtoupper($entrep['raisonSociale']); + if (strtoupper(trim($entrep['sigle']))<>strtoupper(trim($tabRet['Sigle']))) + $tabRet['sigleLong']= strtoupper($entrep['sigle']); + $tabRet['dateImmat'] = $entrep['dateImma']; + $tabRet['dateRad'] = $entrep['dateRad']; + //if ($entrep['actif']==0 && $entrep['dateRadNum']==0) {} + $tabRet['Capital'] = $entrep['capitalMontant']+($entrep['capitalCent']/100); + $tabRet['CapitalDev'] = $entrep['capitalDevIso']; + $tabRet['CapitalType'] = trim(strtoupper(substr($entrep['capitalType'],0,1))); + + // Par défaut, la Forme juridique qui fait foie est celle de l'INPI + $fjInpi=$entrep['cj']*1; + if ($tabRet['FJ']*1<>$fjInpi && $fjInpi>0) { + $tabRet['FJ2'] = $tabRet['FJ']; + $tabRet['FJ2_Lib'] = $tabRet['FJ_lib']; + $tabRet['FJ'] = $fjInpi; + $tabRet['FJ_lib'] = $this->getLibelleFJ($fjInpi); + } else { + $tabRet['FJ2'] = $tabRet['FJ']; + $tabRet['FJ2_Lib'] = $tabRet['FJ_lib']; + } + if ($fjInpi>=1000 && $fjInpi<2000) { + $tabRet['dir1Titre']='Personne physique'; + $tabRet['dir1NomPrenom']=strtoupper($entrep['nom']).' '.ucwords(strtolower($entrep['prenom'])); + $tabRet['dir1Nom']=strtoupper($entrep['nom']); + $tabRet['dir1Prenom']=ucwords(strtolower($entrep['prenom'])); + $tabRet['dir1DateNaiss']=$entrep['dateNaiss']; + $tabRet['dir1LieuNaiss']=$entrep['lieuNaiss']; + } + + if ($tabRet['DateMajRCS']=='') { + if ($entrep['jourUpdate']<>'0000-00-00') + $tabRet['DateMajRCS']=$entrep['jourUpdate']; + else + $tabRet['DateMajRCS']=$entrep['flux']; + } + if ($entrep['actif']==1 || $entrep['actif']==11) + $tabRet['EntActiveRCS']=1; // On signal que l'entreprise est active au RCS + else { + $tabRet['EntActiveRCS']=0; // On signal que l'entreprise est radié du RCS + if ($tabRet['SituationJuridique']=='') + $tabRet['SituationJuridique']='RR'; // On signal que l'entreprise est radié du RCS + } + + /** Spécificité EIRL **/ + if ($fjInpi==1000) { + $rep=$this->iDb->select('rncs_eirl', + 'denomination, activite', + "siren=$siren", false, MYSQL_ASSOC); + $entrep=$rep[0]; + $tabRet['Activite']=$entrep['activite']; + } + + /** Informations sur l'établissement au RNCS **/ + $rep=$this->iDb->select('rncs_etab', + 'id, siege, actif, enseigne, nomCommercial, + adrNumVoie, adrIndRep, adrLibVoie, adrTypeVoie, adrVoie, + cp, commune, adrComp, adresse1, adresse2, adresse3, + naf, dateFermeture, flux, dateInsert, DATE(dateUpdate) AS jourUpdate', + "siren=$siren AND nic=$nic", false, MYSQL_ASSOC); + $entrep=$rep[0]; + if (isset($entrep['id'])) { + $tabRet['EtabActifRCS']=0; + if ($entrep['jourUpdate']<>'0000-00-00' && + str_replace('-','',$entrep['jourUpdate'])*1>str_replace('-','',$tabRet['DateMajRCS'])) + $tabRet['DateMajRCS']=$entrep['jourUpdate']; + + if ($entrep['actif']*1==1) $tabRet['EtabActifRCS']=1; // On signal que l'établissement est actif au RCS + $tabRet['NomCommercial']=$entrep['nomCommercial']; + $tabRet['enseigneLong']=$entrep['enseigne']; + + if ($codePaysIso2<>'FR' && $codePaysIso2<>'') { + $tabRet['Adresse'] = trim(preg_replace('/ +/', ' ', $entrep['adrNumVoie'] .' '.$entrep['adrIndRep'].' '. + $entrep['adrTypeVoie'].' '.$entrep['adrVoie'])); + $tabRet['Adresse2'] = trim(preg_replace('/ +/', ' ', $entrep['adrComp'])); + $tabRet['AdresseNum'] = $entrep['adrNumVoie']; + $tabRet['AdresseBtq'] = $entrep['adrIndRep']; + $tabRet['AdresseVoie'] = $entrep['adrTypeVoie']; + $tabRet['AdresseRue'] = $entrep['adrVoie']; + $tabRet['CP'] = $entrep['cp']; + $tabRet['Ville'] = $entrep['commune']; + /* 'Siren'=>$etab['siren'], + 'Nic'=>$etab['nic'], + */ + } + } + $timer['infosRNCS']=microtime(true); + } elseif ($siren>1000) { + /** + ** Recherche au RM + **/ + $rep=$this->iDb->select('artisanat', 'siren, actif, numRM, denomination, sigle, nomCommercial, enseigne, fj, effectif, aprm, debutActivite, activite, adresse, cp, ville, cessation, radiation, nom,prenom,nomUsage,dateNaiss,lieuNaiss,qualite,qualif,dateQualif,dateFctDeb,dateFctFin,DATE(dateUpdate) AS jourUpdate, DATE(dateInsert) AS dateInsert', "siren=$siren", false, MYSQL_ASSOC); + $entrep=$rep[0]; + if (isset($entrep['numRM'])) { + $tabRet['AutreId'] = $entrep['numRM']; + + /** @todo Traiter ou non les zones : + * - denomination, fj,effectif,adresse,cp,ville, + * - cessation, dateQualif,dateFctDeb,dateFctFin + * Transformer les FJ en CJ dans la table + * Ajouter les fonctions des dir dans la table + * Ne pas prendre les supprimer dans la construction des index ! + */ + if ($tabRet['Activite']=='') $tabRet['Activite']=$entrep['activite']; + if ($tabRet['APRM']=='') { + $tabRet['APRM']=$entrep['aprm']; + $tabRet['APRM_Lib']=$this->getLibelleNafa($entrep['aprm']); + } + + // $tabRet['Tribunal'] = $entrep['triCode']; + if (strtoupper(trim($entrep['nom'].' '.$entrep['prenom'].' '.$entrep['nomUsage']))<>strtoupper(trim($tabRet['Nom']))) + $tabRet['nomLong'] = strtoupper(trim($entrep['nom'].' '.$entrep['prenom'].' '.$entrep['nomUsage'])); + if (strtoupper(trim($entrep['sigle']))<>strtoupper(trim($tabRet['Sigle']))) + $tabRet['sigleLong']= strtoupper($entrep['sigle']); + + $tabRet['dateImmat'] = $entrep['debutActivite']; + $tabRet['dateRad'] = $entrep['radiation']; + + // Si on est au greffe, on est artisan commercant + if ($tabRet['numGreffe']*1>0) + $fjInpi=1100; // Artisan Commerçant + else + $fjInpi=1300; // Artisan + + // Par défaut, la Forme juridique qui fait foie est celle de l'INPI + if ($tabRet['FJ']*1<>$fjInpi) { + $tabRet['FJ2'] = $tabRet['FJ']; + $tabRet['FJ2_Lib'] = $tabRet['FJ_lib']; + $tabRet['FJ'] = $fjInpi; + $tabRet['FJ_lib'] = $this->getLibelleFJ($fjInpi); + } else { + $tabRet['FJ2'] = $tabRet['FJ']; + $tabRet['FJ2_Lib'] = $tabRet['FJ_lib']; + } + + $tabRet['dir1Titre']=ucwords(strtolower($entrep['qualite'].' '.$entrep['qualif'])); + $tabRet['dir1NomPrenom']=strtoupper($entrep['nom']).' '.ucwords(strtolower($entrep['prenom'])); + $tabRet['dir1Nom']=strtoupper($entrep['nom']); + $tabRet['dir1Prenom']=ucwords(strtolower($entrep['prenom'])); + $tabRet['dir1DateNaiss']=$entrep['dateNaiss']; + $tabRet['dir1LieuNaiss']=$entrep['lieuNaiss']; + + if ($tabRet['DateMajRCS']=='') { + if ($entrep['jourUpdate']<>'0000-00-00') + $tabRet['DateMajRCS']=$entrep['jourUpdate']; + else + $tabRet['DateMajRCS']=$entrep['dateInsert']; + } + if ($entrep['actif']==1 || $entrep['actif']==11) + $tabRet['EntActiveRCS']=1; // On signal que l'entreprise est active au RCS + else { + $tabRet['EntActiveRCS']=0; // On signal que l'entreprise est radié du RCS + if ($tabRet['SituationJuridique']=='') + $tabRet['SituationJuridique']='RR'; // On signal que l'entreprise est radié du RCS + } + + $tabRet['NomCommercial']=$entrep['nomCommercial']; + $tabRet['enseigneLong']=$entrep['enseigne']; + } + } + + if ( $accesDist && + // Département couvert par Infogreffe + $tabRet['Dept']<>57 && $tabRet['Dept']<>67 && $tabRet['Dept']<>68 && $tabRet['Dept']<>97 && $tabRet['Dept']<>98 && $tabRet['Dept']<>99 && + // Forme Juridique présente au greffe + ( $tabInsee['CJ']==1100 || + $tabInsee['CJ']==1200 || + $tabInsee['CJ']==1300 || + $tabInsee['CJ']==1700 || + ($tabInsee['CJ']>=3100 && $tabInsee['CJ']<=3299) || + ($tabInsee['CJ']>=4100 && $tabInsee['CJ']<=4199) || + ($tabInsee['CJ']>=5100 && $tabInsee['CJ']<=5899) || + ($tabInsee['CJ']>=6100 && $tabInsee['CJ']<=6599) || + $tabInsee['CJ']==9900 || + preg_match('/EIRL/', $nom) || preg_match('/EIRL/', $nom2) || + preg_match('/EIRL/', $tabRet['Sigle']) || preg_match('/EIRL/', $tabRet['Enseigne']) || + preg_match('/EIRL/', $tabRet['Adresse']) || preg_match('/EIRL/', $tabRet['Adresse2']) + ) && + ( $tabInsee['CJ']==1700 || // Agents commerciaux (uniquement au Greffes RSAC) + $tabRet['numRC']=='' || // Numéro de RCS absent = Anomalie (<à3%) + $tabRet['Tribunal']=='' || // Tribunal absent = anomalie + str_replace('-','',$tabRet['dateImmat'])*1==0 || // Pas de date d'immat = anomalie (<à9%) + ($nbEtab*1==0 && str_replace('-','',$tabRet['dateRad'])*1==0) // Inactif sans date de RAD + ) + ) { + $ligne=date('YmdHis').";$siren;MGreffes Avant"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + $tdeb=microtime(1); + $iGeffes=new MGreffes(); + $iRncs=new MRncs(); + $etabG=$iGeffes->getIdentite($siren); + $duree=round(microtime(1)-$tdeb,3); + $ligne=date('YmdHis').";$siren;MGreffes APRES ($duree s)"; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + if ($etabG) { + if ($tabRet['numRC']=='') $tabRet['numRC'] = $etabG['NumRC2']; + if ($tabRet['Tribunal']=='') $tabRet['Tribunal'] = $iRncs->getCodeBodaccTribunal($etabG['NumGreffe']); + if (str_replace('-','',$tabRet['dateImmat'])*1==0) $tabRet['dateImmat']= $etabG['DateCreation']; + if (str_replace('-','',$tabRet['dateRad'])*1==0) { + $tabRet['dateRad'] = $etabG['DateRadiation']; + if (str_replace('-','',$tabRet['dateRad'])*1>0 && $tabRet['SituationJuridique']=='') + $tabRet['SituationJuridique']='RR'; + } + if (preg_match('/[A-Z]/i',substr($tabRet['AutreId'],2,2)) || $tabRet['AutreId']=='') + $tabRet['AutreId'] = $etabG['NumRC2']; + } + $timer['infosInfogreffes']=microtime(true); + } + + /** Si il n'y a aucun établissement actif et qu'on est radié au RCS : + ** on part chercher la dernière annonce de Radiation au Bodacc + **/ + if (($nbEtab*1)==0 || (isset($entrep['numGreffe']) && $entrep['actif']==0 && $entrep['dateRadNum']==0)) { + $tabRad=$this->getAnnoncesLegales($siren, 0, 'R'); + //@file_put_contents('/var/www/html/ws2/inseeDebug.log', print_r($tabRad, true)); + if (count($tabRad)>0) { + // Il y a au moins une annonce de radiation au Bodacc + if ($tabRet['SituationJuridique']=='') + $tabRet['SituationJuridique']='RP'; + + $dateEff=str_replace('-','', $tabRad[0]['dateEffet'])*1; + $dateJug=str_replace('-','', $tabRad[0]['dateJugement'])*1; + $datePar=str_replace('-','', $tabRad[0]['DateParution'])*1; + if ($dateEff>0) + $tabRet['dateRad']=$dateEff; + elseif ($dateJug>0) + $tabRet['dateRad']=$dateJug; + elseif ($datePar>0) + $tabRet['dateRad']=$datePar; + } + $timer['infosRadiation']=microtime(true); + } + + /** Eléments Financiers en provenance du dernier Bilan + **/ + $rep=$this->iDb->select('bilans', 'siren, dateExercice, dureeExercice, monnaie, typeBilan, unite, postes, dateProvPartenaire, dateInsert', "siren=$siren AND typeBilan IN ('N','S') ORDER BY dateExercice DESC", false, MYSQL_ASSOC); + $entrep=$rep[0]; + if (isset($entrep['dateExercice'])) { + $tabRet['bilanAnnee'] = substr($entrep['dateExercice'],0,4); + $tabRet['bilanDate'] = $entrep['dateExercice']; + $tabRet['bilanMois'] = $entrep['dureeExercice']; + $tabRet['bilanDevise'] = $entrep['monnaie']; + if ($entrep['dateProvPartenaire']>0) + $tabRet['bilanDateMaj']=WDate::dateT('Ymd','Y-m-d',$entrep['dateProvPartenaire']); + else + $tabRet['bilanDateMaj']=WDate::dateT('Y-m-d','Y-m-d',$entrep['dateInsert']); + + switch (strtoupper(trim($entrep['unite']))) { + case 'M': $unite='M'; break; + case 'K': $unite='K'; break; + default: $unite='U'; break; + } + $tabTmp=explode(';', $entrep['postes']); + $tabBilan=array(); + foreach ($tabTmp as $i=>$strTmp) { + $tabTmp2=explode('=', $strTmp); + if (isset($tabTmp2[1])) + if ($unite=='K' && $tabTmp2[0]<>'YP' && $tabTmp2[0]<>'YP1' && $tabTmp2[0]<>'376') + $tabBilan[$tabTmp2[0]]=$tabTmp2[1]*1000; + elseif ($unite=='M' && $tabTmp2[0]<>'YP' && $tabTmp2[0]<>'YP1' && $tabTmp2[0]<>'376') + $tabBilan[$tabTmp2[0]]=$tabTmp2[1]*1000000; + else $tabBilan[$tabTmp2[0]]=$tabTmp2[1]; + } + if (strtoupper($entrep['typeBilan'])=='S') { + $mBil=new MBilans(0); + $tabTmp=$mBil->bilanSimplifie2Normal($tabBilan); + $tabBilan=array_merge($tabTmp, $tabBilan); + } + + $tabRet['bilanDA'] = $tabBilan['DA']; + $tabRet['bilanFL'] = $tabBilan['FL']; + $tabRet['bilanHN'] = $tabBilan['HN']; + $tabRet['bilanYP'] = $tabBilan['YP']; + + // Fiche AGS + $tabRet['bilanPQ'] = $tabBilan['PQ']; + $tabRet['bilanPU'] = $tabBilan['PU']; + $tabRet['bilanPY'] = $tabBilan['PY']; + $tabRet['bilanQC'] = $tabBilan['QC']; + + /** Tranche de CA Bilan Réel si TCA Insee ou Estimée < dernière clôture **/ + if ($tabRet['AnneeTCA']<=$tabRet['bilanAnnee'] && $tabInsee['ACTIF']==1) { + $tabRet['TrancheCA']=$this->getTca($tabBilan['FL']); + $tabRet['TrancheCALib']=self::$tabTCA[$tabRet['TrancheCA']]; + $tabRet['TrancheCAType']='R'; + $tabRet['AnneeTCA']=$tabRet['bilanAnnee']; + } + + /** Contrôle de la cohérence du type d'exploitation **/ + if ($tabBilan['AH']>0 && // Je possède un fond commercial + $tabRet['TypeExploitation']<>2 && // et je ne suis pas Loueur d'un fond + $tabRet['TypeExploitation']<>3 && // et je ne suis pas Prestataire de personnel + $tabRet['TypeExploitation']<>10) { // et je ne suis pas exploitant direct + /*@sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "Identite sur $siren : Type d'exploitation", + "Fonds commercial au dernier bilan .... ".$tabBilan['AH'].EOL. + "Ancien type d'exploitation ........... ".$tabRet['TypeExploitation'].EOL. + "Nouveau type d'exploitation .......... 10 (exploitation directe)".EOL.print_r($tabBilan,true));*/ + $tabRet['TypeExploitation']=10; + } + $timer['infosBilan']=microtime(true); + } elseif($caEstime>0 && $tabInsee['ACTIF']==1) { + $tabRet['bilanAnnee'] = date('Y')-2; + $tabRet['bilanFLestime']=$caEstime; + } + + /** CA Estimé si aucune info Bilan au TCA Insee + **/ + //$tabRet['caEstime'] = getCAnafEffectif($tabRet['NafEnt'],$tabRet['Effectif']); + + + //exec("/var/www/batch/getInfosId.php $siren $piece > /dev/null &"); + + /** DEBUT parallele ** + $pids = array(); + $shm = ftok(__FILE__, 'c'); + $shm_id = shm_attach($shm); + $mutex = sem_get($shm); + + define("_IDCOMP", -1); + define("_MAP", -1); + define("_AMABIS", -1); + define("_TVA", -1); + define("_TEL", -1); + define("_GREFFE", -1); + + shm_put_var($shm_id, _IDCOMP, -1); + shm_put_var($shm_id, _MAP, -1); + shm_put_var($shm_id, _AMABIS, -1); + shm_put_var($shm_id, _TVA, -1); + shm_put_var($shm_id, _TEL, -1); + shm_put_var($shm_id, _GREFFE, -1); + + for($instance=0; $instance<7; $instance++) + { + $pid = pcntl_fork(); + if ($pid == -1) { + die('could not fork'); + } else if ($pid) { + // we are in the parent + $pids[] = $pid; + } else { + // we're in the child - download the movie + switch ($instance) { + case 0: // Identité partenaire + if (count($info)==0 && $accesDist) { + $idComp=$this->getIdentitePart($siren, $etab['raisonSociale'], $etab['enseigne'], $etab['sigle']); + shm_put_var($shm_id, _IDCOMP, serialize($idComp)); + } + break; + case 1: // Google MAP + $mMap=new MMap(true); + $mMap->geoCodeAdresse($etab['adr_num'],'',$etab['adr_typeVoie'],$this->getCodeVoie($etab['adr_typeVoie']), $etab['adr_libVoie'], $etab['adr_cp'], $etab['adr_ville'], 'France', trim($tabInsee['ADR_DEP'].$tabInsee['ADR_COM'].$tabInsee['CODEVOIE'])); + shm_put_var($shm_id, _MAP, serialize($mMap)); + break; + case 2: // Zones prioritaires + if ($accesDist) { + $iAmabis=new MAmabis(); + $repAmabis=$iAmabis->getZonage($etab['adr_num'],$etab['adr_btq'],$etab['adr_typeVoie'],$etab['adr_libVoie'], $etab['adr_cp'], $etab['adr_ville'], trim($tabInsee['ADR_DEP'].$tabInsee['ADR_COM'].$tabInsee['CODEVOIE']), false, 'TEST', false); + } + shm_put_var($shm_id, _AMABIS, serialize($repAmabis)); + break; + case 3: // N° de TVA + if ($siren*1>100) + $iTva=new MTva($siren, $accesDist); + shm_put_var($shm_id, _TVA, serialize($iTva)); + break; + case 4: // Téléphonie Siège + if ( $accesDist && ( + $tel=='' || $fax=='' || // Pas de tél ou Fax + $tab['web']=='' || $tab['mail']=='' || // Pas de Web/Mail + ($etab['siege']==0 && $etab['actif']==1) ) // Ets secondaire actif + ) { + $iTel=new MTel(); + $iTel->getTel($siren); + } + break; + case 5: // Téléphonie Etab + if ( $accesDist && ( + $tel=='' || $fax=='' || // Pas de tél ou Fax + $tab['web']=='' || $tab['mail']=='' || // Pas de Web/Mail + ($etab['siege']==0 && $etab['actif']==1) ) // Ets secondaire actif + ) { + $iTel=new MTel(); + $tmp=$iTel->getTel($siren, $nic); + shm_put_var($shm_id, _TEL, serialize($tmp)); + } + break; + case 6: // Infogreffe + if ( $accesDist && $tabRet['Dept']<>57 && $tabRet['Dept']<>67 && $tabRet['Dept']<>68 && $tabRet['Dept']<>97 && $tabRet['Dept']<>98 && $tabRet['Dept']<>99 && // Départements du périmètre infogreffe + ( $tabInsee['CJ']==1700 || // Agents commerciaux (uniquement au Greffes RSAC + $tabRet['numRC']=='' || // Numéro de RCS absent = Anomalie + $tabRet['Tribunal']=='' || // Tribunal absent = anomalie + str_replace('-','',$tabRet['dateImmat'])*1==0 || // Pas de date d'immat = anomalie + ($nbEtab*1==0 && str_replace('-','',$tabRet['dateRad'])*1==0) // Inactif sans date de RAD + ) + ) { + $iGeffes=new MGreffes(); + $etabG=$iGeffes->getIdentite($siren); + shm_put_var($shm_id, _GREFFE, serialize($etabG)); + } + break; + } + exit(); + } + } + + foreach($pids as $pid) { + pcntl_waitpid($pid, $status); + } + + $idComp = unserialize(shm_get_var($shm_id, _IDCOMP)); + $mMap = unserialize(shm_get_var($shm_id, _MAP)); + $repAmabis = unserialize(shm_get_var($shm_id, _AMABIS)); + $iTva = unserialize(shm_get_var($shm_id, _TVA)); + $iTel = unserialize(shm_get_var($shm_id, _TEL)); + $etabG = unserialize(shm_get_var($shm_id, _GREFFE)); + @sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getIdentiteEntreprise() sur $siren", "Données récoltées en //".EOL. + print_r($idComp, true) .EOL. + print_r($mMap, true) .EOL. + print_r($repAmabis, true) .EOL. + print_r($iTva, true) .EOL. + print_r($iTel, true) .EOL. + print_r($etabG, true)); + /** FIN parallele **/ + + $tabRet['TribunalLib']=$this->iBodacc->getTribunalNom($tabRet['Tribunal']); + $duree=round(microtime(1)-$tdebIni,3); + $ligne=date('YmdHis').";$siren;getIdentiteEntreprise Fin ($duree s) ==="; + $fp=fopen(LOG_PATH.'/accesDistant.log', 'a'); + fwrite($fp,$ligne.EOL); + fclose($fp); + + /** Si on n'a trouvé aucune activité, on prend le libellé de l'activité pages Jaunes **/ + if ($tabRet['Activite']=='' && $activitePJ_An8<>'') + $tabRet['Activite']=$activitePJ_An8; + + /** Numero de Registre du métier si nécessaire **/ + if ( ($tabRet['FJ']==1100 || $tabRet['FJ']==1300 || $tabRet['FJ']==11 || $tabRet['FJ']==13 || $tabInsee['APRM']<>'') && + ($tabRet['Dept']=='2A' || $tabRet['Dept']=='2B' || $tabRet['Dept']<98) ) { + // Artisan Commerçant OU Artisan en FRANCE + $tabRet['NumRM']=$siren.' RM '.$tabRet['Dept']; + if ($tabRet['Dept']=='2A') $tabRet['NumRM'].='.1'; // Ajaccio + elseif ($tabRet['Dept']=='2B') $tabRet['NumRM'].='.2'; // Bastia + elseif ($tabRet['Dept']==97) $tabRet['NumRM'].=substr($tabRet['codeCommune'],0,1); + } + + /** Recherche des infos boursières **/ + $iBourse=new MBourse($siren); + $bourse=$iBourse->getInfosBourse($siren); + $tabRet['Bourse']=array('placeCotation'=>$bourse['placeCotation'], + 'nombreTitres'=>$bourse['nombreTitres'], + 'capitalisation'=>$bourse['close']*$bourse['nombreTitres'], + 'derCoursDate'=>$bourse['date'], + 'derCoursCloture'=>$bourse['close']); + $timer['infosBoursieres']=microtime(true); + + /** Date de dernière mise à jour **/ + $lastMaj=str_replace('-','',$tabRet['DateMajINSEE'])*1; + if (str_replace('-','',$tabRet['DateMajRCS'])*1>$lastMaj) + $lastMaj=str_replace('-','',$tabRet['DateMajRCS'])*1; + if (str_replace('-','',$tabRet['bilanDateMaj'])*1>$lastMaj) + $lastMaj=str_replace('-','',$tabRet['bilanDateMaj'])*1; + if (str_replace('-','',$tabRet['dateMajANN'])*1>$lastMaj) + $lastMaj=str_replace('-','',$tabRet['dateMajANN'])*1; + $tabRet['dateMajIdentite']=WDate::dateT('Ymd','Y-m-d',$lastMaj); + + $i=$dureeCalc=0;$strTime=''; + $strTimeCsv=date('Y/m/d H:i:s').",$siren,$nic,$id,"; + foreach ($timer as $lib=>$time) { + $strTime.=sprintf("%30s",$lib)."\t:\t"; + $duree=round($time-$timePre,3); + $dureeCalc+=$duree; + if ($i==0) { $strTime.="0 s"; $timeDeb=$time; } + else $strTime.="$duree s"; + $strTimeCsv.="$duree,"; + $strTime.="\n"; + $timePre=$time; + $i++; + } + $dureeTot=round($time-$timeDeb,3); + $tempsPerdu=round($dureeTot-$dureeCalc,3); + if ($tempsPerdu<0) $tempsPerdu=0; + $strTime.="Temps perdu\t:\t$tempsPerdu s +--------------------- +TOTAL : $dureeTot s\n"; + $strTimeCsv.="$tempsPerdu,$dureeTot".EOL; + + if (!file_exists(REP_TEMP.'/debugIdentite.csv')) { + $fp=fopen(REP_TEMP.'/debugIdentite.csv', 'a+'); + $strTimeTmp='dateTime,siren,nic,id,'; + foreach ($timer as $lib=>$time) + $strTimeTmp.=$lib.','; + $strTimeTmp.='tempsPerdu,dureeTot'.EOL; + fwrite($fp, $strTimeTmp); + fclose($fp); + } + $fp=fopen(REP_TEMP.'/debugIdentite.csv', 'a+'); + fwrite($fp, $strTimeCsv); + fclose($fp); + + if(ENV<>'PRD' && $tabInfoUser['login']=='ylenaour') + @sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "Identite sur $siren : Durées ".ENV, $strTime.EOL.print_r($tabRet,true)); + + return $tabRet; + } + + + function getDirigeantsOp($siren) { + $siren=$siren*1; + $tabRet=array(); + $dirs=$this->iDb->select( + 'sdv1.dirigeantsOp d, jo.bodacc_fonctions f', + 'siren, nic, civ, nom, prenom, d.codFct, f.libelle, tel, fax, email, dateInsert, dateUpdate', + "siren=$siren AND d.codFct=f.codeFct", false, MYSQL_ASSOC); + + foreach ($dirs as $k=>$dir) { + $tabRet[]=array( + 'Fonction' => $dir['codFct'], + 'Titre' => $dir['libelle'], + 'Societe' => '', + 'Civilite' => $dir['civ'], + 'Nom' => trim(strtoupper($dir['nom'])), + 'Prenom' => ucwords(strtolower($dir['prenom'])), + 'NaissDate' => '', + 'NaissVille' => '', + 'NaissDepPays' => '', + 'Ancien' => 0, + 'DateFct' => '', + 'Cinf' => 0, + ); + } + return $tabRet; + } + + function getDirigeants($siren, $histo=true) { + $siren=$siren*1; + $tabRet=array(); + + if ($histo) { + $bodacc=$this->iDb->select( + 'bodacc_dirigeants d, bodacc_detail b, bodacc_fonctions f', + 'd.num, d.dateEffet, d.Rubrique, d.fonction, d.rs, d.nom, d.prenom, d.nomUsage, d.depart, d.dateInsert, f.libelle', + "b.SIREN=$siren AND b.id=d.id AND b.typeEven NOT BETWEEN 5000 AND 5700 AND b.typeEven NOT BETWEEN 2700 AND 2900 AND d.fonction=f.codeFct GROUP BY d.fonction, d.rs, d.nom, d.prenom ORDER BY d.dateEffet DESC, d.fonction DESC", true, MYSQL_ASSOC); + if (count($bodacc)>0) { + foreach ($bodacc as $k=>$ann) { + /* if (!$histo && ( + $ann['fonction']<>300 && // Commissaire aux comptes titulaire + $ann['fonction']<>301 && // Co-commissaire aux comptes suppléant + $ann['fonction']<>302 && // Co-commissaire aux comptes titulaire + $ann['fonction']<>303 && // Commissaire aux comptes suppléant + $ann['fonction']<>304) ) // Commissaire aux comptes + continue;*/ + $tabRet[]=array( 'Fonction' => $ann['fonction'], + 'Titre' => $ann['libelle'], + 'Societe' => $ann['rs'], + 'Nom' => trim(strtr($ann['nom'], array( "Modification d'"=>'', + "Modification de"=>'', + "Nomination d'un"=>'', + ))), + 'Prenom' => $ann['prenom'], + 'NomUsage' => $ann['nomUsage'], + 'Ancien' => $ann['depart'], + 'DateFct' => $ann['dateEffet'], + ); + } + } + $iDbHisto=new WDB('historiques'); + $iBodacc=new MBodacc(); + $bodaccHisto=$iDbHisto->select( + 'entrep e, texte x', + 'e.ANBASE, e.NOBOD, e.CODTRI, e.JAL, e.DATE, e.CODEVE, e.SSCODE, e.DEPT, e.NOANN, e.ROLE, e.SIREN, e.E1GSIR, e.E1GNIC, x.annonceNum, x.annonceTxt', + "e.E1GSIR=$siren AND e.ANBASE=x.annonceNum AND e.DATE BETWEEN 19890101 AND 20050101 AND x.annonceTxt LIKE '%Administration%' GROUP BY e.ANBASE ORDER BY e.DATE DESC", true, MYSQL_ASSOC); + if (count($bodaccHisto)>0) { + foreach ($bodaccHisto as $ann) { + if ($ann['DATE']<19960101 && $ann['E1GSIR']<>$ann['SIREN']) continue; + if ( ($ann['CODEVE']<20) || + ($ann['CODEVE']>=30 && $ann['CODEVE']<42) || + ($ann['CODEVE']>=51 && $ann['CODEVE']<80) ) { + if (preg_match('/Administration(?:.|)\:(.*)(?:Adresse.*|Commentaires?|Activit(?:e|é)|Etablissement principal|Date d\'effet|Date.de.d.but d.activit.)(?:.|)\:/Uis', $ann['annonceTxt'], $matches)) { + $iDir=0; + $tabAdministration=$iBodacc->getDirigeants($matches[1]); + foreach ($tabAdministration as $tabDir) { + /* $tabDir['num']=$numDir; + $tabDir['dateEffet']=$dateEffet; + $tabDir['id']=$idAnnRet; + $tabDir['Rubrique']='mmd'; + $tabDir['dateInsert']=$dateInsert; + //'fonction'=>$numFonction, 'rs'=>trim(str_replace(',','',$raisonSociale)), 'nom'=>$nom, 'prenom'=>$prenom, 'nomUsage'=>$usage, 'depart'=>$oldFonction); + + */ + $nom=trim(strtr(preg_replace('/ +/',' ', $tabDir['nom']), + array( "Modification d'"=>'', + "Modification"=>'', + "Modification de"=>'', + "Nomination d'un"=>'', + "Nomination en qualité d'"=>'', + "Nomination en qualité de"=>'', + "dont le est"=>'', + "nouvel"=>'', + "partant"=>'', + "ancien d'honneur"=>'', + "nouveaux"=>'', + "nouveau"=>'', + "ancien"=>'', + "Nouveau"=>'', + "Cette société se constitue Date de début d'"=>'', + ))); + if ($nom<>'') { + $tabRet[]=array( 'Fonction' => $tabDir['fonction'], + 'Titre' => $iBodacc->getFctDir($tabDir['fonction']),//.' ('.$tabDir['fonction'].')', + 'Societe' => $tabDir['rs'], + 'Nom' => $nom, + 'Prenom' => $tabDir['prenom'], + 'NomUsage' => $tabDir['nomUsage'], + 'Ancien' => $tabDir['depart'], + 'DateFct' => Wdate::dateT('Ymd','Y-m-d', $ann['DATE']), + ); + $this->iDb->insert('bodacc_dirigeants_histo', + array( 'siren' => $siren, + 'id' => $ann['ANBASE'], + 'num' => $iDir, + 'dateEffet' => Wdate::dateT('Ymd','Y-m-d', $ann['DATE']), + 'fonction' => $tabDir['fonction'], + 'rs' => $tabDir['rs'], + 'nom' => $nom, + 'prenom' => $tabDir['prenom'], + 'nomUsage' => $tabDir['nomUsage'], + 'depart' => $tabDir['depart'], + ), true); + /*if (mysql_errno()>0) { + echo mysql_errno().' : '.mysql_error().EOL; + }*/ + $iDir++; + } + } + //break; + } + } + } + } + } + + if (!$histo || ($histo && count($tabRet)==0) ) { + $dirs=$this->iDb->select( + 'rncs_dirigeants/* d, bodacc_fonctions f*/', + 'siren, raisonSociale, dirRS, civilite, nom, prenom, naissance_nom, naissance_date, naissance_lieu, fonction_code, fonction_lib, cinf, dateFin, flux, dateInsert/*f.libelle*/', + "siren=$siren /*AND d.fonction_code=f.codeFct*/ AND actif%10=1", false, MYSQL_ASSOC); + + foreach ($dirs as $k=>$dir) { + if ($dir['naissance_date']<>'0000-00-00') + $dateNaiss=Wdate::dateT('Y-m-d','d/m/Y', $dir['naissance_date']); + else + $dateNaiss=''; + if ($dir['flux']<>'0000-00-00') + $dateModif=Wdate::dateT('Y-m-d','d/m/Y', $dir['flux']); + else + $dateModif=Wdate::dateT('Y-m-d','d/m/Y', $dir['dateInsert']); + $nom=trim($dir['nom']); + $nomUsage=''; + if (trim($dir['naissance_nom'])<>'') { + $nom=trim($dir['naissance_nom']); + $nomUsage=trim($dir['nom']); + } + $tabRet[]=array( 'Fonction' =>$dir['fonction_code'], + 'Titre' =>$dir['fonction_lib'], + 'Societe' =>$dir['dirRS'], + 'Civilite' =>$dir['civilite'], + 'Nom' =>$nom, + 'Prenom' =>$dir['prenom'], + 'NomUsage' =>$nomUsage, + 'NaissDate' =>$dateNaiss, + 'NaissVille' =>$dir['naissance_lieu'], + 'NaissDepPays' =>'', // 25 + 'Ancien' =>0, + 'DateFct' =>$dateModif, + 'Cinf' =>$dir['cinf'], + ); + } + } + + /** Recherche de CAC si liste des dirigeants actifs **/ + if (!$histo) { + $bodacc=$this->iDb->select( + 'bodacc_dirigeants d, bodacc_detail b, bodacc_fonctions f', + 'd.num, d.dateEffet, d.Rubrique, d.fonction, d.rs, d.nom, d.prenom, d.nomUsage, d.depart, d.dateInsert, f.libelle', + "b.SIREN=$siren AND b.id=d.id AND b.typeEven NOT BETWEEN 5000 AND 5700 AND b.typeEven NOT BETWEEN 2700 AND 2900 AND d.fonction=f.codeFct AND d.fonction BETWEEN 300 AND 304 GROUP BY d.fonction, d.rs, d.nom, d.prenom ORDER BY d.dateEffet DESC, d.fonction DESC", false, MYSQL_ASSOC); + if (count($bodacc)>0) { + foreach ($bodacc as $k=>$ann) { + $rs=trim(strtoupper($ann['rs'])); + $nom=preg_replace('/en fonction le .*/i','',$ann['nom']); + $nom=preg_replace('/Nomination .*/i','',$nom); + $nom=preg_replace('/Modification .*/i','',$nom); + $nom=preg_replace('/Nouvelles?\s+$/i','',trim($nom)); + $nom=preg_replace('/Nouveaux?\s+$/i','',trim($nom)); + $nom=preg_replace('/ancien.*/i','',$nom); + $nom=preg_replace('/en remplacement d.*/i','',$nom); + $nom=trim(strtoupper(preg_replace('/(\.|,)$/','',trim($nom)))); + $prenom=trim($ann['prenom']); + if ($prenom=='' && $rs=='' && $nom<>'') { + $rs=$nom; + $nom=''; + } + //if ($rs==$nom) + $tabRet[]=array('Fonction' => $ann['fonction'], + 'Titre' => $ann['libelle'], + 'Societe' => $rs, + 'Nom' => $nom, + 'Prenom' => $prenom, + 'NomUsage' => $ann['nomUsage'], + 'Ancien' => $ann['depart'], + 'DateFct' => $ann['dateEffet'], + ); + if ($k>1) break; // On s'arrête à 2 CAC (pb des co-cac non gérés) + } + } + } + + if (count($tabRet)==0) { + $dirs=$this->iDb->select( + 'rncs_dirigeants/* d, bodacc_fonctions f*/', + 'siren, raisonSociale, civilite, nom, prenom, naissance_nom, naissance_date, naissance_lieu, fonction_code, fonction_lib, cinf, dateFin, flux, dateInsert, /*f.libelle*/ date(dateUpdate)*1 as dateUpdate', + "siren=$siren /*AND d.fonction_code=f.codeFct*/ AND actif%10=0 ORDER BY dateUpdate DESC", false, MYSQL_ASSOC); + $dateUpdatePre=$dirs[0]['dateUpdate']; + foreach ($dirs as $k=>$dir) { + if ($dir['naissance_date']<>'0000-00-00') + $dateNaiss=Wdate::dateT('Y-m-d','d/m/Y', $dir['naissance_date']); + else + $dateNaiss=''; + if ($dir['flux']<>'0000-00-00') + $dateModif=Wdate::dateT('Y-m-d','d/m/Y', $dir['flux']); + else + $dateModif=Wdate::dateT('Y-m-d','d/m/Y', $dir['dateInsert']); + if ($dir['dateUpdate']<>$dateUpdatePre) break; + $tabRet[]=array( 'Fonction' =>$dir['fonction_code'], + 'Titre' =>$dir['fonction_lib'], + 'Societe' =>'',//utf8_encode($dir['Societe']), + 'Civilite' =>$dir['civilite'], + 'Nom' =>trim($dir['nom']), + 'Prenom' =>$dir['prenom'], + 'NomUsage' => $tabDir['nomUsage'], + 'NaissDate' =>$dateNaiss, + 'NaissVille' =>$dir['naissance_lieu'], + 'NaissDepPays' =>'', // 25 + 'Ancien' =>1, + 'DateFct' =>$dateModif, + 'Cinf' =>$dir['cinf'], + ); + $dateUpdatePre=$dir['dateUpdate']; + } + } + + if (count($tabRet)==0) { + + if ($tabIdentite['FJ']*1>1000 && $tabIdentite['FJ']*1<2000) { + $tabTmp=explode(' ', $tabIdentite['Nom']); + $nom=$prenom=''; + foreach ($tabTmp as $mot) + if (strtoupper($mot)==$mot) + $nom.=' '.$mot; + else + $prenom.=' '.$mot; + if ($etab['Civilite']*1==1) { $genre='Monsieur '; $civilite='M'; } + elseif ($etab['Civilite']*1==2) { $genre='Madame '; $civilite='MME'; } + else { $genre=''; $civilite=''; } + + $tabTmp=$this->iDbInsee->select('identite', 'SIREN, CJ, CIVILITE, DIR_DATEN, DIR_LIEUN', + "SIREN=$siren AND (DIR_DATEN>0 OR DIR_LIEUN<>'') ORDER BY DIR_DATEN DESC, DIR_LIEUN DESC", + false, MYSQL_ASSOC); + $tabTmp=@$tabTmp[0]; + + $tabRet[]=array( 'Titre' =>'Personne physique', + 'Societe' =>'',//utf8_encode($dir['Societe']), + 'Civilite' =>$civilite, + 'Nom' =>trim($nom), + 'Prenom' =>trim($prenom), + 'NomUsage' =>'', + 'NaissDate' =>Wdate::dateT('Ymd', 'd/m/Y', $tabTmp['DIR_DATEN']),// 07/09/1961 + 'NaissVille' =>$tabTmp['DIR_LIEUN'], // LE RUSSEY//, + 'NaissDepPays' =>'', // 25 + 'Ancien' =>0, + 'DateFct' =>$tabIdentite['DateCrea'],//$tabIdentite['DateImma'], + ); + $this->iDb->insert('rncs_dirigeants', array('siren' => $siren, + 'raisonSociale' => $etab['Nom'], + 'civilite' => $civilite, + 'nom' => trim($nom), + 'prenom' => trim($prenom), + 'naissance_nom' => '', + 'naissance_date'=> $tabTmp['DIR_DATEN'], + 'naissance_lieu'=> $tabTmp['DIR_LIEUN'], + 'fonction_code' => 1050, + 'fonction_lib' => 'Personne physique', + 'actif' => 1, + 'dateInsert' => date('YmdHis'), + 'source' => 'inp', + ), true); + } + } + return $tabRet; + } + + /** Liste des annonces légales pour un siren donnée + ** + ** @param integer $siren + ** @param integer $idAnnonce + ** @param mixed $rubrique Filter par rubrique (P)rocol, (D)issolution, (R)adiation, (A)bsorption, (L)ocataire, + ** (G)érance:propriétaire, (V)endeur, bodacc (C), (BODA) (BODB) (BODC) ou tableau des codeEven + ** @param bool $forceVerif + ** @return array + **/ + function getAnnoncesLegales($siren, $idAnnonce=0, $rubrique='', $forceVerif=false, $allTextes=false) {// rubrique = + $siren=$siren*1; + $strIdAnn=''; + $tabRet=array(); + $procol=false; // Par défaut, on ne trouve pas de procédure collective ! + $this->dureePlan=0; // Par défaut, on ne trouve aucune durée de plan + + if ($idAnnonce>0) $strIdAnn=" AND d.id=$idAnnonce "; + elseif ($idAnnonce==0 && $siren<100) return $tabRet; + + if ($rubrique=='P' || + $rubrique=='PH') // Procédure collective + $strIdAnn=" AND d.Rubrique='procol' AND d.typeEven NOT LIKE '%1005%' + AND d.typeEven NOT LIKE '%1010%' + AND d.typeEven NOT LIKE '%1050%' + AND d.typeEven NOT LIKE '%1055%' + AND d.typeEven NOT LIKE '%1550%' "; + /** @todo Prévoir de ne pas sortir l'annonce si 'P' demandé et date juge > 10 ans + ** AND e.DATE>=".((date('Y')*1)-10).''.date('md') + **/ + elseif ($rubrique=='D') // Dissolution de la société + $strIdAnn=" AND (d.typeEven LIKE '%2202%' OR d.typeEven LIKE '%2203%' OR d.typeEven LIKE '%2204%' OR + d.typeEven LIKE '%2210%' OR d.typeEven LIKE '%2211%' OR d.typeEven LIKE '%2212%') "; + elseif ($rubrique=='A') // Absorption + $strIdAnn=" AND (d.typeEven LIKE '%2720%' OR d.typeEven LIKE '%2721%') "; + + elseif ($rubrique=='BODA') // BODACC A + $strIdAnn=" AND d.Rubrique IN ('creations','procol','ventes') "; + elseif ($rubrique=='BODB') // BODACC B + $strIdAnn=" AND d.Rubrique IN ('mmd','radiations') "; + + elseif ($rubrique=='C' || $rubrique=='BODC') // Dépôt des comptes, BODACC C + $strIdAnn=" AND (d.Rubrique='comptes' OR d.typeEven LIKE '%3100%' OR d.typeEven LIKE '%3200%' + OR d.typeEven LIKE '%3300%' OR d.typeEven LIKE '%3999%') "; + elseif ($rubrique=='R') + $strIdAnn=" AND (d.typeEven LIKE '%2202%' OR d.typeEven LIKE '%2203%' OR d.typeEven LIKE '%2204%' OR + d.typeEven LIKE '%2210%' OR d.typeEven LIKE '%2211%' OR d.typeEven LIKE '%2212%' OR d.Rubrique='radiations') "; + elseif ($rubrique=='L') // Location gérance Locataire + $strIdAnn=" AND (d.typeEven LIKE '%2800%' OR d.typeEven LIKE '%2875%' OR d.typeEven LIKE '%2880%' OR + d.typeEven LIKE '%2881%' OR d.typeEven LIKE '%2885%' OR d.typeEven LIKE '%2840%' OR + d.typeEven LIKE '%4355%') "; + elseif ($rubrique=='G') // Location gérance Propriétaire + $strIdAnn=" AND (d.typeEven LIKE '%2850%' OR d.typeEven LIKE '%2851%' OR d.typeEven LIKE '%2860%' OR + d.typeEven LIKE '%2870%') "; + elseif ($rubrique=='V') // Ventes/Cessions + $strIdAnn=" AND (d.typeEven LIKE '%5500%' OR d.typeEven LIKE '%5501%' OR d.typeEven LIKE '%5502%' OR + d.typeEven LIKE '%5503%' OR d.typeEven LIKE '%5510%' OR d.typeEven LIKE '%5600%' OR + d.typeEven LIKE '%5650%') "; + elseif (is_array($rubrique) && count($rubrique)>0) { + $strIdAnn=" AND ("; + foreach ($rubrique as $codeEven) + $tabTmp[]=" d.typeEven LIKE '%$codeEven%' "; + $strIdAnn.=implode(' OR ',$tabTmp); + $strIdAnn.=')'; + // @sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "classMInsee::getAnnonces... sur $siren", $strIdAnn); + } + + //elseif ($rubrique=='V') $strIdAnn=" AND d.Rubrique='ventes' "; + + if ($rubrique<>'' && $rubrique<>'P' && $rubrique<>'PH' && $rubrique<>'D' && $rubrique<>'A' && $rubrique<>'C' && $rubrique<>'R' + && $rubrique<>'L' && $rubrique<>'G' && $rubrique<>'V' + && $rubrique<>'BODA' && $rubrique<>'BODB' && $rubrique<>'BODC' && !is_array($rubrique)) + return false; + + if ($idAnnonce==0 || $idAnnonce>=1) { /** On recherche dans les annonces récentes **/ + $groupBy=' '; + $strCle='1 '; + if ($siren<>0) $strCle ="d.siren=$siren "; + else $groupBy=' GROUP BY d.id '; + $bodacc=$this->iDb->select( + 'bodacc_detail d, bodacc b, tribunaux t',//.codEven Code évènement du mouvement Bodacc libEven ', + "b.id, b.Bodacc_Code, b.Bodacc_Annee_Parution, b.Bodacc_Num, b.Num_Annonce, b.Bodacc_Date_Parution, b.Tribunal_Dept, b.Tribunal_Code, d.Rubrique, b.typeAnnonce, b.corrNum_Annonce, b.corrBodacc_Date_Parution, b.corrPage, b.corrNumParution, b.corrTexteRectificatif, b.annonce, b.dateInsert, t.triCode, t.triNom, t.triSiret, d.typeEven, d.dateEffet, d.dateDebutActivite, d.dateCessationActivite, d.dateJugement, d.dateFinObservation, d.VenteMt, d.VenteDev, d.FJ, d.Capital, d.CapitalDev, CONCAT(d.commentaires,' ',d.fusion) as complement, d.raisonSociale, d.nomCommercial, d.enseigne, d.sigle, d.adresse, d.codePostal, d.ville, d.adresseSiege, d.codePostalSiege, d.villeSiege", + "$strCle AND d.id=b.id AND b.Tribunal_Code=t.triCode AND d.dateSuppr=0 $strIdAnn $groupBy ORDER BY b.Bodacc_Date_Parution DESC", false, MYSQL_ASSOC); + $k=0; + if (count($bodacc)>0) { + foreach ($bodacc as $k=>$ann) { + $tabEven=explode(';', $ann['typeEven']); + $tabRetEven=array(); + if ($ann['typeAnnonce']<>'Insertion')//BODACC n°002 A du 04/01/2006. + $tabRetEven[]=array('CodeEven'=>'0000', + 'LibEven'=> $ann['typeAnnonce'].' de l\'annonce './*n°'. + $ann['corrNum_Annonce'].' BODACC n°'. + $ann['corrNumParution'].*/' du '. + WDate::dateT('Y-m-d','d/m/Y',$ann['corrBodacc_Date_Parution'])/*.' (page '. + $ann['corrPage'].')'*/); + else { + if (trim($ann['typeEven'])<>'') { + foreach ($tabEven as $even) { + $tabRetEven[]=array('CodeEven'=>$even,'LibEven'=>$this->iBodacc->getEvenement($even)); + if (($this->dureePlan==0 || $this->dureePlan==120) && + ( $even==1407 || // Modification de plan + $even==1409 || // Modification du plan de continuation + $even==1413 || // Arrêt du plan de continuation + $even==1414) ) // Arrêt du plan de redressement + { + $this->debutPlan=str_replace('-','',$ann['dateJugement']); // SSAAMMJJ + if (preg_match('/dur.e(?:.*)plan(?:.*)(\d+)\s+ans?/Uis', $ann['annonce'], $matches)) { + $this->dureePlan=$matches[1]*12; // 10 ans = 120 mois + } + if ($this->dureePlan<1 || $this->dureePlan>120) { + $this->dureePlan=120; // 10 ans = 120 mois + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "Annonce de Plan Récent sur $siren sans durée", print_r($ann, true).EOL.print_r($matches, true)); + } + $this->finPlan=WDate::period2Days($this->debutPlan, $this->dureePlan.' mois'); +// sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnoncesLegales($siren, idAn=$idAnnonce, rubrique=$rubrique, verif=$forceVerif, txt=$allTextes) Annonce de Plan", print_r($ann, true)); + } + } + } + else { + switch ($ann['Rubrique']) { + case 'mmd': $codeEven='2313'; $libEven='Modification(s) diverse(s)'; break; + case 'comptes': $codeEven='3999'; $libEven='Dépôt des comptes'; break; + case 'creations': $codeEven='4999'; $libEven='Création d\'entreprise'; break; + case 'procol': $codeEven='1999'; $libEven='Procédure collective'; break; + case 'radiations': $codeEven='6700'; $libEven='Radiation'; break; + case 'ventes': $codeEven='5999'; $libEven='Vente/Cession'; break; + default: $codeEven='0000'; $libEven=$ann['Rubrique']; break; + } + $tabRetEven[]=array('CodeEven'=>$codeEven,'LibEven'=>$libEven); + } + } + + if ($ann['Rubrique']=='procol') $procol=true; + + //dateDebutActivite + // + $dateCes=str_replace('-','', $ann['dateCessationActivite'])*1; + $dateDeb=str_replace('-','', $ann['dateDebutActivite'])*1; + $dateEff=str_replace('-','', $ann['dateEffet'])*1; + if ($dateCes>0) + $dateEffet=$ann['dateCessationActivite']; + elseif ($dateDeb>0) + $dateEffet=$ann['dateDebutActivite']; + else + $dateEffet=$ann['dateEffet']; + $adresseAnn=trim(preg_replace('/ +/',' ', $ann['adresseSiege'].' '.$ann['codePostalSiege'].' '.$ann['villeSiege'])); + if (strlen($adresse)<8) + $adresseAnn=trim(preg_replace('/ +/',' ', $ann['adresse'].' '.$ann['codePostal'].' '.$ann['ville'])); + $tabRet[$k]=array( 'id'=>$ann['id'], + 'BodaccCode'=>'BOD'.$ann['Bodacc_Code'], + 'BodaccNum'=>$ann['Bodacc_Num'], + 'NumAnnonce'=>$ann['Num_Annonce'], + 'DateParution'=>$ann['Bodacc_Date_Parution'], + 'Departement'=>$ann['Tribunal_Dept'], + 'Tribunal'=>$ann['triNom'], + 'TribunalCode'=>$ann['triCode'], + 'TribunalSiret'=>$ann['triSiret'], + 'Rubrique'=>$ann['Rubrique'], + 'typeAnnonce'=>$ann['typeAnnonce'], + 'texteRectificatif'=>$ann['corrTexteRectificatif'], + // 'texteAnnonce'=>$ann['annonce'], + 'dateEffet'=>$dateEffet, + 'dateJugement'=>$ann['dateJugement'], + /// d.dateDebutActivite, d.dateCessationActivite, d.dateJugement', + 'dateFin'=>$ann['dateFinObservation'], + 'montantVente'=>trim($ann['VenteMt'].' '.$ann['VenteDev']), + 'libFJ'=>$ann['FJ'], + 'codFJ'=>$this->iBodacc->getCodeFormeJur($ann['FJ']), + 'capital'=>$ann['Capital'], + 'capitalDev'=>$ann['CapitalDev'], + 'raisonSociale'=>$ann['raisonSociale'], + 'nomCommercial'=>$ann['nomCommercial'], + 'sigle'=>$ann['sigle'], + 'adresse'=>$adresseAnn, + 'dateInsertionSD'=>$ann['dateInsert'], + 'evenements'=>$tabRetEven, + 'complement'=>$ann['complement'], + ); + if ($idAnnonce<>0 || $allTextes) + $tabRet[$k]['texteAnnonce']=$ann['annonce']; + } + } + } + + if ($idAnnonce==0 || $idAnnonce<0) { /** On recherche dans les annonces passées **/ + $iDbHisto=new WDB('historiques'); + $tabTmp=array( 10=>'4000', // Création d'entreprise + 11=>'4000', + 13=>'4000', + 14=>'4000', + 15=>'4000', + 16=>'4000', + 17=>'4200', // Création d'établissement + 18=>'4200', + 19=>'4200', + 20=>'5999', // ou 5700 en fonction du code xxx + 21=>'5999', + 22=>'5999', + 24=>'5999', + 25=>'5999', + 30=>'2500', // Confirmation Ets + 31=>'2318', + 32=>'2318', + 33=>'2318', + 34=>'2318', + 35=>'2318', + 36=>'2318', + 37=>'2800', // Loc. Gérance recue + 38=>'2860', // Loc. Gérance donnée + 39=>'2318', + 40=>'6700', // Radiation + 41=>'2202', // Dissolution + 42=>'2885', // Fin location gérance + 51=>'1209', // Règlement Judiciaire + 52=>'1200', // Redressement Judiciaire + 53=>'1207', // Règlemement amiable + //53=> Conciliation ???????????????????????????????????????? + 56=>'1310', // Procédure d'Insolvabilité Européenne + 57=>'1100', // Jugement de sauvegarde + 58=>'1101', // Plan de sauvegarde + 59=>'1506', // Rectif ou Annulation RJ + 60=>'1305', // Redr.& liq.Judiciaire + 61=>'1603', // Liquidation de Biens + 62=>'1305', + 63=>'1600', // Faillite personnelle + 64=>'1601', // Interdiction de gérer + 65=>'1305', + 66=>'1306', // Liquidation Judiciaire Simplifiée + 69=>'1506',//Rectif ou Annul.LJ + 70=>'1550', // Suites de jugements + 71=>'1550', // Suite reglement/L + 72=>'1550', // Suite redressement/L + 73=>'1550', // Susp.Provis.pours. ????????????????????????????????????????? + 74=>'1505', // Appel de jugement + 75=>'1407', // Modif. de Plan + 76=>'1502', // Extinction Passif + 77=>'1210', // Production + 78=>'1204', // Dépôt des créances + 79=>'1503', // Cloture insuf.Actif + 92=>'1450', //Cessation paiement ?? + ); + $tabTmp2=array( ''=>'2318', + 'a'=>'2308', // Chg de dénomination(RS,Ens,Sigle) + 'b'=>'2300', // Changement d'Adresse + 'c'=>'2101', // Chg.Capital/Cess.apport de parts + 'd'=>'2315', // Changement de Dirigeants + 'e'=>'2313', // Mod Act/obj.soc./Cess./Mise somm. + 'f'=>'2307', // Changement de Forme juridique + 'g'=>'2318', // Opération sur Participations + 'h'=>'2725', // Fusion Absorption + 'i'=>'2318', // Mod.garantie financière/Caution + 'j'=>'2401', // Changement de régime matrimonial + 'k'=>'2319', // Non dissolution anticipée + 'l'=>'2318', // Non dissolution anticipée + 'm'=>'2318', // Dissolution anticipée (ou non) + 'n'=>'2303', // Mod.date cloture exercice social + 'o'=>'2300;2101', // Mod.Adresse + Capital + 'p'=>'2300;2315', // Mod.Adresse + Dirigeants + 'q'=>'2300;2313', // Mod.Adresse + Activité + 'r'=>'2300;2307', // Mod.Adresse + F.Juridique + 's'=>'2101;2315', // Modification Capital + Dirigeants + 't'=>'2101;2313', // Modification Capital + Activité + 'u'=>'2101;2307', // Mod.Capital + Forme Juridique + 'v'=>'2315;2313', // Mod.Dirigeants + Activité + 'w'=>'2315;2307', // Mod.Dirigeants + Forme Juridique + 'x'=>'2313;2307', // Mod.Activité + Forme Juridique + 'y'=>'2318', // Changement de Dirigeants ? + 'z'=>'2318', // + //'K'=> + ); + + if ($idAnnonce<0) { + $idAnnonce=abs($idAnnonce); + $strIdAnn=" AND e.ANBASE=$idAnnonce "; + } else + $strIdAnn=''; + if ($rubrique=='P') $strIdAnn=" AND e.E1GSIR NOT IN(340460104) AND e.CODEVE BETWEEN 50 AND 79 ";//AND e.DATE>=".((date('Y')*1)-10).''.date('md'); + elseif ($rubrique=='PH')$strIdAnn=" AND e.CODEVE BETWEEN 50 AND 79 "; + elseif ($rubrique=='R') $strIdAnn=" AND e.CODEVE BETWEEN 40 AND 42 "; + elseif ($rubrique=='L') $strIdAnn=" AND e.CODEVE IN(37,42) "; + elseif ($rubrique=='G') $strIdAnn=" AND e.CODEVE=38 "; + elseif ($rubrique=='BODA') $strIdAnn=" AND e.JAL=1 "; + elseif ($rubrique=='BODB') $strIdAnn=" AND e.JAL=200 "; + elseif (is_array($rubrique)) { + $tabCodEve=$tabCodRol=array(); + foreach ($rubrique as $codeEvenTmp) { + $codRet=array_search($codeEvenTmp, $tabTmp2); // Ne gère pas les ; de tabtmp2 + if ($codRet) $tabCodRol[]=$codRet; + else { + $tabCodEve[]=array_search($codeEvenTmp, $tabTmp)*1; + } + } + $strIdAnn=''; + $tabCodEve=array_unique($tabCodEve); + $tabCodRol=array_unique($tabCodRol); + if (count($tabCodEve)>0) + $strIdAnn.=' AND e.CODEVE IN('.implode(',',$tabCodEve).') '; + if (count($tabCodRol)>0) + $strIdAnn.=" AND e.ROLE IN('".implode("','",$tabCodRol)."') "; + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnoncesLegales($siren, idAn=$idAnnonce, rubrique=$rubrique, verif=$forceVerif, txt=$allTextes)", print_r($rubrique, true).EOL.$strIdAnn); + /* + if (!$codRet) { + $codRet=array_search($codeEvenTmp, $tabTmp)*1; + $strIdAnn=" AND e.CODEVE=$codRet "; + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnoncesLegales($siren, idAn=$idAnnonce, rubrique=$rubrique, verif=$forceVerif, txt=$allTextes)", print_r($rubrique, true)); + } else + $strIdAnn=" AND e.ROLE='$codRet' "; + }*/ + //$strIdAnn=$tabCodRet + } + + // On ne part pas dans l'histo dans certains cas... + if ($rubrique<>'V' && $rubrique<>'D' && $rubrique<>'A' && $rubrique<>'C' && $rubrique<>'BODC') { + $bodaccHisto=$iDbHisto->select( + 'texte x, entrep e',//.codEven Code évènement du mouvement Bodacc libEven ', + 'e.ANBASE, e.NOBOD, e.CODTRI, e.JAL, e.DATE, e.CODEVE, e.SSCODE, e.DEPT, e.NOANN, e.ROLE, e.SIREN, e.E1GSIR, e.E1GNIC, x.annonceNum, x.annonceTxt/*, t.triNom, t.triSiret*/', + "e.E1GSIR=$siren AND e.ANBASE=x.annonceNum /*AND e.CODTRI=t.triCode*/ $strIdAnn AND e.DATE BETWEEN 19890101 AND 20041231 GROUP BY e.ANBASE ORDER BY e.DATE DESC", false, MYSQL_ASSOC); + if (count($bodaccHisto)>0) { + foreach ($bodaccHisto as $ann) { + if ($ann['DATE']<19960101 && $ann['E1GSIR']<>$ann['SIREN']) continue; + $k++; + //if ($ann['DATE']<19920101) break; + //if ($ann['DATE']>20051231) continue; + if ($ann['JAL']==1) $Bodacc_Code='BODA'; + elseif ($ann['JAL']==200) $Bodacc_Code='BODB'; + + if ($ann['CODEVE']>49 && $ann['CODEVE']<80) $procol=true; + + if ($ann['CODEVE']<20) $rub='creations'; // 4xxx + elseif ($ann['CODEVE']<=25) $rub='ventes'; // 5xxx + elseif ($ann['CODEVE']<40) $rub='mmd'; // 2xxx + elseif ($ann['CODEVE']<42) $rub='radiations'; // 6xxx + elseif ($ann['CODEVE']<50) $rub='mmd'; // 2xxx + elseif ($ann['CODEVE']<80) $rub='procol'; // 1xxx + $tabEvens=array(); + $newCodeEven=$tabTmp[$ann['CODEVE']]; + if ($newCodeEven*1==2318) { + $tabNewEven=@explode(';', $tabTmp2[$ann['ROLE']]); + if (count($tabNewEven)>0) { + foreach ($tabNewEven as $newCodeEven) + $tabEvens[]=array('CodeEven'=>$newCodeEven,'LibEven'=>$this->iBodacc->getEvenement($newCodeEven)); + } else + $tabEvens[]=array('CodeEven'=>$newCodeEven,'LibEven'=>$this->iBodacc->getEvenement($newCodeEven)); + } else { + $tabEvens[]=array('CodeEven'=>$newCodeEven,'LibEven'=>$this->iBodacc->getEvenement($newCodeEven)); + if (($this->dureePlan==0 || $this->dureePlan==120) && $ann['CODEVE']==75) { // Modification de plan + $this->debutPlan=$ann['DATE']; // SSAAMMJJ + if (preg_match('/dur.e(?:.*)plan(?:.*)(\d+)\s+ans?/Uis', $ann['annonceTxt'], $matches)) { + $this->dureePlan=$matches[1]*12; // 10 ans = 120 mois + } + if ($this->dureePlan<1 || $this->dureePlan>120) { + $this->dureePlan=120; // 10 ans = 120 mois + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "Annonce de Plan Histo sur $siren sans durée", print_r($ann, true).EOL.print_r($matches, true)); + } + $this->finPlan=WDate::period2Days($this->debutPlan, $this->dureePlan.' mois'); + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "Annonce de Plan Histo sur $siren se terminant le $finPlan (durée=$dureePlan mois, début le $debutPlan)", print_r($ann, true).EOL.print_r($matches, true)); + } + } + // Recherche du capital et de la FJ dans le texte histo + if ( ($ann['CODEVE']>=10 && $ann['CODEVE']<20) || + ($ann['CODEVE']>=30 && $ann['CODEVE']<42) || + ($ann['CODEVE']>=51 && $ann['CODEVE']<80) ) { + // Recherche du capital + if (preg_match('/Capital(?:.|)\:(.*)(eur.|f|livre)/Uis', $ann['annonceTxt'], $matches)) {// && $tabInsee['CJ']>1999 && $tabInsee['CJ']<7000) + $capital=trim(strtr($matches[1],array(' '=>'', ',00 '=>'', '.00 '=>'')))*1; + if (substr(strtoupper($matches[2]),0,3)=='EUR') + $capitalDev='EUR'; + elseif (substr(strtoupper($matches[2]),0,3)=='LIV') + $capitalDev='GBP'; + else + $capitalDev='FRF'; + } else + $capital=$capitalDev=''; + // Recherche de la forme juridique + if (preg_match('/Forme(?:.|)\:(.*)(Capital|Adresse|Activit.|Administration|Commentaire)(?:.|)\:/Uis', $ann['annonceTxt'], $matches)) {// && $tabInsee['CJ']>1999 && $tabInsee['CJ']<7000) + $libFJ=trim($matches[1]); + } + } + + $tabRet[$k]=array( 'id'=>-$ann['ANBASE'], + 'BodaccCode'=>$Bodacc_Code, + 'BodaccNum'=>$ann['NOBOD'], + 'NumAnnonce'=>$ann['NOANN'], + 'DateParution'=>substr($ann['DATE'],0,4).'-'.substr($ann['DATE'],4,2).'-'.substr($ann['DATE'],6,2), + 'Departement'=>$ann['DEPT'], + 'Tribunal'=>$this->iBodacc->getTribunalNom['CODTRI'], //$ann['triNom'], + 'TribunalSiret'=>$this->iBodacc->getTribunalSiret['CODTRI'],//$ann['triSiret'], + 'Rubrique'=>$rub, + 'typeAnnonce'=>'Insertion',/** @todo à GERER $ann['SSCODE'],**/ + //'texteRectificatif'=>$ann['corrTexteRectificatif'], + // 'texteAnnonce'=>$ann['annonceTxt'], + 'dateEffet'=>substr($ann['DATE'],0,4).'-'.substr($ann['DATE'],4,2).'-'.substr($ann['DATE'],6,2), + 'dateJugement'=>substr($ann['DATE'],0,4).'-'.substr($ann['DATE'],4,2).'-'.substr($ann['DATE'],6,2), 'dateFin'=>'', + 'montantVente'=>'', + 'libFJ'=>$libFJ, + 'codFJ'=>$this->iBodacc->getCodeFormeJur($libFJ), + 'capital'=>$capital, + 'capitalDev'=>$capitalDev, + 'raisonSociale'=>'',//$ann['raisonSociale'], + 'nomCommercial'=>'',//$ann['nomCommercial'], + 'sigle'=>'',//$ann['sigle'], + 'adresse'=>'',//$adresseAnn, + 'dateInsertionSD'=>'', + 'evenements'=>$tabEvens, + ); + if ($idAnnonce<>0 || $allTextes) + $tabRet[$k]['texteAnnonce']=$ann['NOANN'].' - '.$ann['annonceTxt']; + } + } + } + } + + //@sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnonceProcol Debug 5 sur $siren", print_r($tabRet,true)); + + // On ne cherche pas de PROCOL + récente si on est en visualisation d'annonce Bodacc Classique + if ($idAnnonce>=1 || $idAnnonce<0) return $tabRet; + + // Si je n'ai pas d'annonce Bodacc de procol on vérifie dans la table de collecte + // Si annonce Bodacc de Procol et pas de Vérif Forcée chez un partenaire alors on affiche la collecte + /* if (!$procol || ($procol && !$forceVerif)) {*/ + //@sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnonceProcol Debug avMerge sur $siren", print_r($tabRet,true)); + $tabTmp=$this->getProColPart($siren, $rubrique, $forceVerif, $idAnnonce); + $tabRet=array_merge($tabTmp, $tabRet); + // } + // @sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnonceProcol Debug apMerge sur $siren", print_r($tabRet,true)); + + /** On vérifie si la société n'est pas in bonis pour les raisons suivantes : + ** 1502 : Clôture de la procédure pour extinction du passif + **/ + if ($rubrique=='P') { + $tabJugements=array(); + foreach ($tabRet as $i=>$ann) { + $tabJugements[$ann['dateJugement']]=$ann['evenements'][0]['CodeEven']; + } + // Si plan recherche des annonces suivantes + if ($this->dureePlan>0) { + ksort($tabJugements); + // Tableau chronologique des dates de jugement ==> code jugement + reset($tabJugements); + foreach ($tabJugements as $dateJuge=>$codeJuge) { + if ($dateJuge>$this->debutPlan & ( + ($codeJuge>=1100 && $codeJuge<=1101)|| // Sauvegarde + ($codeJuge>=1200 && $codeJuge<=1202)||$codeJuge==1211|| // RJ + ($codeJuge>=1300 && $codeJuge<=1313)|| // LJ + ($codeJuge>=1500 && $codeJuge<=1504) ) ) // Cloture + // Si plan suivi de SV, RJ, LJ ou clôture alors pas de plan + $this->dureePlan=0; + } + } + + // Tableau ante-chronologique des dates de jugement ==> code jugement + krsort($tabJugements); + reset($tabJugements); + + $tabNoProcol=array(); + $tmp=$this->iDb->select('tabEvenements', 'codEven,affProcol', 'affProcol>0', false, MYSQL_ASSOC); + foreach ($tmp as $tmp2) + $tabNoProcol[$tmp2['codEven']]=$tmp2['affProcol']; + + if (@array_key_exists(current($tabJugements), $tabNoProcol)) { + // Ce code jugement Procol n'appel pas forcément l'indicateur : SituationJuridique=P +// sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnonceProcol sur $siren (avant le SWITCH)", print_r($tabNoProcol, true)); + switch($tabNoProcol[current($tabJugements)]) { + case 1: // PAS DE MENTION DE LA PROCOL + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnonceProcol sur $siren (cas 1)", print_r($tabNoProcol, true)); + $tabRet=array(); + break; + case 2: // Ne pas mentionner la procol si CJ=1xxx + $tabId=$this->getIdentiteLight($siren); + if (substr($tabId['FJ'],0,1)*1==1) { + //sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnonceProcol sur $siren (cas 2a)", print_r($tabNoProcol, true)); + $tabRet=array(); + } elseif ($tabId['Actif']*1>0 && substr($tabId['FJ'],0,1)*1<>9 ) { + $derProcol =str_replace('-','',key($tabJugements))*1; + $maxLatence=date('Ymd',mktime(0,0,0,(substr($derProcol,4,2)*1)+1,substr($derProcol,6,2),substr($derProcol,0,4))); + if (date('Ymd')>$maxLatence) { + sendMail('production@scores-decisions.com', 'prod@scores-decisions.com', "Vérifier la Procédure Collective sur $siren (cas 2b)", "L'entreprise, siren $siren, fait l'objet d'une clôture de procédure collective de type ".current($tabJugements)." alors qu'elle est encore active !".EOL."Merci de vérifier et de supprimer la procédure le cas échéant !"); + $tabRet=array(); + }/* + $iRncs=new MRncs(); + $tabId2=$iRncs->getInfosEntrep($siren); + if ($tabId2['siren']==$siren) + $tabId2['actif']*/ + } + break; + case 3: // Pas Procol si actif RCS + $tabId=$this->getIdentiteLight($siren); + if ($tabId['Actif']*1>0) { + sendMail('production@scores-decisions.com', 'prod@scores-decisions.com', "MInsee::getAnnonceProcol sur $siren (cas 3)", print_r($tabNoProcol, true)); + $tabRet=array(); + } + break; + case 4: // Le dernier jugement est un appel => Procol Suspendu + $this->appelJugement=true; + break; + } + } + + if (count($tabRet)>0) { + $derProcol=str_replace('-','',key($tabJugements))*1; + $dateTropAncienne=(date('Ymd')*1)-120000; + if ($derProcol<$dateTropAncienne) { + $tabId=$this->getIdentiteLight($siren); + if ($tabId['Actif']*1>0) { + /** Procédure trop ancienne **/ + $derPr=WDate::dateT('Ymd','d/m/Y',$derProcol); + @sendMail('production@scores-decisions.com', 'prod@scores-decisions.com', "Vérifier la Procédure Collective sur $siren (cas 5)", "L'entreprise, siren $siren, fait l'objet d'une clôture de procédure collective de type ".current($tabJugements)." en date du $derPr alors que cela fait plus de 12 ans !".EOL."Merci de vérifier et de supprimer la procédure le cas échéant !".EOL.print_r($tabBilans,true).EOL."Liste des derniers jugements :".EOL.print_r($tabJugements,true)); + $tabRet=array(); + } + } elseif ((current($tabJugements)>=1300 && current($tabJugements)<=1313 && current($tabJugements)!=1310) || + (current($tabJugements)>=1500 && current($tabJugements)<=1504)) { + /** En Procol mais présence d'une annonce de cloture ou LJ + avec Bilan publié ultérieurement + **/ + $mBil=new MBilans($siren); + $tabBilans=$mBil->listeBilans($accesDist); + $derExercice=0; + + foreach ($tabBilans as $idx=>$bilan) + if ($bilan['dateExercice']>$derExercice) $derExercice=$bilan['dateExercice']; + + if ($derExercice>$derProcol) { + $derEx=WDate::dateT('Ymd','d/m/Y',$derExercice); + $derPr=WDate::dateT('Ymd','d/m/Y',$derProcol); + @sendMail('production@scores-decisions.com', 'prod@scores-decisions.com', "Vérifier la Procédure Collective sur $siren (cas 4)", "L'entreprise, siren $siren, fait l'objet d'une clôture de procédure collective de type ".current($tabJugements)." en date du $derPr alors que le dernier bilan publié date du $derEx !".EOL."Merci de vérifier et de supprimer la procédure le cas échéant !".EOL.print_r($tabBilans,true).EOL."Liste des derniers jugements :".EOL.print_r($tabJugements,true)); + $tabRet=array(); + } + } + } + } elseif ($rubrique=='D' && count($tabRet)>0) { + $tabJugements=array(); + foreach ($tabRet as $i=>$ann) { + $tabJugements[$ann['DateParution']]=$ann['evenements'][0]['CodeEven']; + } + // Tableau ante-chronologique des dates de jugement ==> code jugement + krsort($tabJugements); + reset($tabJugements); + + $mBil=new MBilans($siren); + $tabBilans=$mBil->listeBilans($accesDist); + $derExercice=0; + $derProcol=str_replace('-','',key($tabJugements))*1; + foreach ($tabBilans as $idx=>$bilan) + if ($bilan['dateExercice']>$derExercice) $derExercice=$bilan['dateExercice']; + if ($derExercice>$derProcol) { + $derEx=WDate::dateT('Ymd','d/m/Y',$derExercice); + $derPr=WDate::dateT('Ymd','d/m/Y',$derProcol); + @sendMail('production@scores-decisions.com', 'prod@scores-decisions.com', "MInsee::getAnnonceProcol Dissolution sur $siren (cas 4)", "L'entreprise, siren $siren, fait l'objet d'une dissolution de type ".current($tabJugements)." en date du $derPr alors que le dernier bilan publié date du $derEx !".EOL."Merci de vérifier et de supprimer le code évènement le cas échéant !".EOL.print_r($tabBilans,true).EOL."Liste des dernieres annonces :".EOL.print_r($tabJugements,true)); + $tabRet=array(); + } + } + //@sendMail('production@scores-decisions.com', 'ylenaour@scores-decisions.com', "MInsee::getAnnonceProcol Debug Fin sur $siren", print_r($tabRet,true)); + return $tabRet; + } + + function getAnnoncesBalo($siren, $idAnnonce=0) { + $siren=$siren*1; + + if ($siren<001000000) $siren='000'.$siren; + elseif ($siren<010000000) $siren='00'.$siren; + elseif ($siren<100000000) $siren='0'.$siren; + + $strIdAnn=''; + $tabRet=array(); + + if ($idAnnonce>0) { + //$idBalo=//.$tabBalo['Num_Affaire'].','.$tabBalo['Num_Parution']; + $tmp=explode('.', $idAnnonce); + //if (strlen($tmp[0])==9 && is_numeric($tmp[0])) $rcs=$tmp[0]; + if (is_numeric($tmp[0])) $num=$tmp[0]; + if (is_numeric($tmp[1])) $par=$tmp[1]; + //$idBaloPdf=basename($tabBalo['Url_Annonce_Pdf']); + $strIdAnn=" AND Num_Affaire='$num' AND Num_Parution='$par' "; + //$idAnnonce + } + + $mBalo=new MBalo(); + + $bodacc=$this->iDb->select('balo', "Societe_Rcs, Categorie, Num_Affaire, Date_Parution, Num_Parution, Url_Annonce_Html, Url_Annonce_Pdf, Annonce_Html, dateInsert", "Societe_Rcs='$siren' AND Date_Parution>='2004-01-01' $strIdAnn ORDER BY Date_Parution DESC, Num_Affaire", false, MYSQL_ASSOC); + // $RP=mysql_select('balo', " ", "Societe_Rcs='$rcs' "); + $k=0; + if (count($bodacc)>0) { + foreach ($bodacc as $k=>$ann) { + $tabRetEven=array(); + $tabRetEven[]=array('CodeEven'=>$mBalo->getLibEven($ann['Categorie']), + 'LibEven'=> $ann['Categorie']); + + $tabRet[$k]=array( 'id'=>$ann['Num_Affaire'].'.'.$ann['Num_Parution'], + 'BodaccCode'=>'BALO', + 'BodaccNum'=>$ann['Num_Parution'], + 'NumAnnonce'=>$ann['Num_Affaire'], + 'DateParution'=>$ann['Date_Parution'], + //'Departement'=>'',$ann['Tribunal_Dept'], + //'Tribunal'=>$ann['triNom'], + //'TribunalSiret'=>$ann['triSiret'], + //'Rubrique'=>$ann['Rubrique'], + 'typeAnnonce'=>'Insertion', + 'dateInsertionSD'=>$ann['dateInsert'], + 'evenements'=>$tabRetEven, + 'Lien_Annonce_Pdf'=>basename($ann['Url_Annonce_Pdf']), + ); + if ($idAnnonce<>0) $tabRet[$k]['texteAnnonce']=strtr( preg_replace('/