From 17b76294fe4542ad69af6ca88c76be07d15b80f3 Mon Sep 17 00:00:00 2001 From: Michael RICOIS Date: Mon, 5 May 2014 07:18:06 +0000 Subject: [PATCH] issue #0001944 : Meilleur gestion du rapport sur chaque siren --- 1.2/scripts/rapportsTextes.php | 560 ++++++++++++++++----------------- 1 file changed, 278 insertions(+), 282 deletions(-) diff --git a/1.2/scripts/rapportsTextes.php b/1.2/scripts/rapportsTextes.php index a7ffd712..8dcfb663 100644 --- a/1.2/scripts/rapportsTextes.php +++ b/1.2/scripts/rapportsTextes.php @@ -187,39 +187,28 @@ for ($iFic=0; isset($tabFichLigneCmd[$iFic]); $iFic++) $dateOut=date("dmy"); foreach ($tabLignesIn as $iLigne=>$ligne) { - $siren=substr($ligne, 0, 9); - $ref =substr($ligne, 9, 10); - if ($iInsee->valideSiren($siren)) { + $siren = substr($ligne, 0, 9); + $ref = substr($ligne, 9, 10); + $rapport = ''; + + //Siren valide + if ( $iInsee->valideSiren($siren) ) { $tabId = $iInsee->getIdentiteEntreprise($siren,0,0,false,false); $tabIndiscore = calculIndiScore($siren, 0, false, 2, false); - $note=$tabIndiscore['Indiscore20']; - $encours=round($tabIndiscore['encours']/1000)*1000; + $note = $tabIndiscore['Indiscore20']; + $encours = round($tabIndiscore['encours']/1000)*1000; $siretOut=$tabId['SiretSiege']; - /* - * Suppression recherche dans l'historique - $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 AND indiScore>0", false, MYSQL_ASSOC); // AND indiscore>0 ajouté car bug sur procol en histo - if (@$tabTmp[0]['siren']*1==$siren) { - echo "$siren, demande le $dateIn, calcul le ".@$tabTmp[0]['dateUpdate'].EOL; - $tabScore=$tabTmp[0]; - $note=$tabScore['indiScore20']; - $encours=round($tabScore['encours']/1000)*1000; - } else { - echo "$siren, demande le $dateIn, pas de calcul !".EOL; - //$tabIndiscore=@calculIndiScore($siren, 0, false, 0, false); - $note=$tabIndiscore['Indiscore20']; - $encours=round($tabIndiscore['encours']/1000)*1000; - } - */ - } else { - // Siren Faux - $siretOut=$note=$encours=0; } + // Siren Faux + else { + $siretOut = $note = $encours = 0; + } + $siretIn=$siren.'00000'; + //Entete $entete ='02'; $entete.=initstr($siretIn, 14, '0', ALIGN_RIGHT); // SIRET demandé $entete.=initstr($siretOut, 14, '0', ALIGN_RIGHT); // SIRET réponse @@ -230,281 +219,288 @@ for ($iFic=0; isset($tabFichLigneCmd[$iFic]); $iFic++) $entete.=initstr('', 2); // Filler 1 $entete.=initstr($encours, 6, '0', ALIGN_RIGHT); // Encours en euros sans décimale $entete.=initstr('00000004S et D', 63); // 7x0 + 4 (code Sté) + Nom Sté RC + //echo $entete.EOL; - echo $entete.EOL; - $rapport =initstr('', 80).EOL; - $rapport.=initstr(' '.$tabId['Nom'], 80).EOL; - $rapport.=initstr(' '.$tabId['Nom2'].' '.$tabId['Sigle'].' '.$tabId['Enseigne'],80).EOL; - $rapport.=initstr(' '.preg_replace('/^0+/','',$tabId['Adresse']), 50). - initstr(' TEL : '.preg_replace('/[^0-9]/','',$tabId['Tel']), 30).EOL; - if (trim($tabId['Adresse2'])<>'') - $rapport.=initstr(' '.$tabId['Adresse2'], 80).EOL; - $rapport.=initstr(' '.$tabId['CP'].' '.$tabId['Ville'], 50). - initstr(' FAX : '.preg_replace('/[^0-9]/','',$tabId['Fax']), 30).EOL; - if ($tabId['PaysIso2']<>'FR') - $rapport.=initstr(' '.$tabId['Pays'], 80).EOL; - if (trim($tabId['Web'])<>'') - $rapport.=initstr(' WEB : '.$tabId['Web'], 80).EOL; - if (trim($tabId['Mail'])<>'') - $rapport.=initstr(' MEL : '.$tabId['Mail'], 80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('SIRET : '. substr($tabId['SiretSiege'],0,3).' '. - substr($tabId['SiretSiege'],3,3).' '. - substr($tabId['SiretSiege'],6,3).' '. - substr($tabId['SiretSiege'],9,5).' '. - ' RCS : '.$tabId['numRC'].' '. - preg_replace('/^(TC |TI |TGI |TGIcc )/i','',$tabId['TribunalLib']), 80).EOL; + //Rapport + if ( intval($siretOut)!=0 ) { - /** Situation Juridique **/ - $dateRadiation=$tabId['dateRad']; - $situationjuridique=$tabId['SituationJuridique']; - $libSituation=''; - if (in_array(substr($situationjuridique,0,1), array('P', 'R')) ) - { - if(isset($dateRadiation) && $dateRadiation!='' && $dateRadiation!='0000-00-00'){ - $dateRad = $tdate->dateT('Ymd', 'd/m/Y', str_replace('-','',$dateRadiation)); - } - if ($situationjuridique=='P') - { - $libSituation.= 'En procédure collective'; - if($dateRad!=''){ $libSituation.= 'Radié du RCS le '.$dateRad; } - } - //Radiation - if($situationjuridique=='RR') - { - $libSituation.= 'Radié du RCS'; - if($dateRad!=''){ $libSituation.= ' le '.$dateRad; } - }elseif($situationjuridique=='RP'){ - $libSituation.= 'Radiation publiée'; - if($dateRad!=''){ $libSituation.= ' le '.$dateRad; } - } - } - elseif($tabId['EntActiveRCS']==1) - $libSituation.= 'Actif au RCS'; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('SITUA. JUR.: '.$libSituation, 80).EOL;//@todo multiligne + $rapport =initstr('', 80).EOL; + $rapport.=initstr(' '.$tabId['Nom'], 80).EOL; + $rapport.=initstr(' '.$tabId['Nom2'].' '.$tabId['Sigle'].' '.$tabId['Enseigne'],80).EOL; + $rapport.=initstr(' '.preg_replace('/^0+/','',$tabId['Adresse']), 50). + initstr(' TEL : '.preg_replace('/[^0-9]/','',$tabId['Tel']), 30).EOL; + if (trim($tabId['Adresse2'])<>'') + $rapport.=initstr(' '.$tabId['Adresse2'], 80).EOL; + $rapport.=initstr(' '.$tabId['CP'].' '.$tabId['Ville'], 50). + initstr(' FAX : '.preg_replace('/[^0-9]/','',$tabId['Fax']), 30).EOL; + if ($tabId['PaysIso2']<>'FR') + $rapport.=initstr(' '.$tabId['Pays'], 80).EOL; + if (trim($tabId['Web'])<>'') + $rapport.=initstr(' WEB : '.$tabId['Web'], 80).EOL; + if (trim($tabId['Mail'])<>'') + $rapport.=initstr(' MEL : '.$tabId['Mail'], 80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('SIRET : '. substr($tabId['SiretSiege'],0,3).' '. + substr($tabId['SiretSiege'],3,3).' '. + substr($tabId['SiretSiege'],6,3).' '. + substr($tabId['SiretSiege'],9,5).' '. + ' RCS : '.$tabId['numRC'].' '. + preg_replace('/^(TC |TI |TGI |TGIcc )/i','',$tabId['TribunalLib']), 80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('FORME JUR. : '.$tabId['FJ'].' '.$tabId['FJ_lib'], 80).EOL;//@todo multiligne + /** Situation Juridique **/ + $dateRadiation=$tabId['dateRad']; + $situationjuridique=$tabId['SituationJuridique']; + $libSituation=''; + if (in_array(substr($situationjuridique,0,1), array('P', 'R')) ) + { + if(isset($dateRadiation) && $dateRadiation!='' && $dateRadiation!='0000-00-00'){ + $dateRad = $tdate->dateT('Ymd', 'd/m/Y', str_replace('-','',$dateRadiation)); + } + if ($situationjuridique=='P') + { + $libSituation.= 'En procédure collective'; + if($dateRad!=''){ $libSituation.= 'Radié du RCS le '.$dateRad; } + } + //Radiation + if($situationjuridique=='RR') + { + $libSituation.= 'Radié du RCS'; + if($dateRad!=''){ $libSituation.= ' le '.$dateRad; } + }elseif($situationjuridique=='RP'){ + $libSituation.= 'Radiation publiée'; + if($dateRad!=''){ $libSituation.= ' le '.$dateRad; } + } + } + elseif($tabId['EntActiveRCS']==1) + $libSituation.= 'Actif au RCS'; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('SITUA. JUR.: '.$libSituation, 80).EOL;//@todo multiligne - if ($tabId['Capital']>0) { - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('CAPITAL : '.number_format($tabId['Capital'],0,'.',' ').' '.$tabId['CapitalDev'], 80).EOL; - } - $rapport.=initstr('', 80).EOL; - $dateImm=str_replace('-','',$tabId['dateImmat']); - if (substr($dateImm,0,4)*1==0) $dateImm=$tabId['DateCreaEn']; - if (substr($dateImm,0,4)*1==0) $dateImm=$tabId['DateCreaEt']; - $rapport.=initstr('CREATION : '.$tdate->dateT('Ymd','M Y',$dateImm), 80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('CODE NAF : '.$tabId['NafEnt'].' '.$tabId['NafEntLib'], 80).EOL;//@todo multiligne - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('ACTIVITE : ',80).EOL; - $rapport.=wordwrap($tabId['Activite'], 80, EOL).EOL;//@todo multiligne - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('ORIGINE DU FOND : '.$tabCreation['a'.$tabId['OrigineCreation']], 80).EOL;//@todo multiligne - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('TYPE D\'EXPLOITATION : '.$tabTypeExploitation[$tabId['TypeExploitation']*1], 80).EOL;//@todo multiligne - $rapport.=initstr('', 80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('FORME JUR. : '.$tabId['FJ'].' '.$tabId['FJ_lib'], 80).EOL;//@todo multiligne - $nbEts=($tabId['NbEtab']*1)-1; - if ($nbEts<0) $nbEts=0; - $rapport.=initstr('NOMBRE D\'ETABLISSEMENTS SECONDAIRES : '.$nbEts, 80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('DIRIGEANT 1: '.strtoupper($tabId['dir1Titre']), 80).EOL; - if (substr($tabId['dir1DateNaiss'],0,4)*1==0) $strNaiss=''; - else $strNaiss=' né(e) le '.$tdate->dateT('Y-m-d','d/m/Y',$tabId['dir1DateNaiss']); - $rapport.=initstr(' '.$tabId['dir1NomPrenom'].$strNaiss,80).EOL; - $rapport.=initstr('DIRIGEANT 2: '.strtoupper($tabId['dir2Titre']), 80).EOL; - if (substr($tabId['dir2DateNaiss'],0,4)*1==0) $strNaiss=''; - else $strNaiss=' né(e) le '.$tdate->dateT('Y-m-d','d/m/Y',$tabId['dir2DateNaiss']); - $rapport.=initstr(' '.$tabId['dir2NomPrenom'].$strNaiss,80).EOL; - $rapport.=initstr('', 80).EOL; + if ($tabId['Capital']>0) { + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('CAPITAL : '.number_format($tabId['Capital'],0,'.',' ').' '.$tabId['CapitalDev'], 80).EOL; + } + $rapport.=initstr('', 80).EOL; + $dateImm=str_replace('-','',$tabId['dateImmat']); + if (substr($dateImm,0,4)*1==0) $dateImm=$tabId['DateCreaEn']; + if (substr($dateImm,0,4)*1==0) $dateImm=$tabId['DateCreaEt']; + $rapport.=initstr('CREATION : '.$tdate->dateT('Ymd','M Y',$dateImm), 80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('CODE NAF : '.$tabId['NafEnt'].' '.$tabId['NafEntLib'], 80).EOL;//@todo multiligne + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('ACTIVITE : ',80).EOL; + $rapport.=wordwrap($tabId['Activite'], 80, EOL).EOL;//@todo multiligne + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('ORIGINE DU FOND : '.$tabCreation['a'.$tabId['OrigineCreation']], 80).EOL;//@todo multiligne + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('TYPE D\'EXPLOITATION : '.$tabTypeExploitation[$tabId['TypeExploitation']*1], 80).EOL;//@todo multiligne + $rapport.=initstr('', 80).EOL; - $rapport.=initstr('GARANTIES',80).EOL; /**@todo MORE*/ - $tabBilans=$tabIndiscore['tabBilan']; - $devise=$tabBilans[0]['MONNAIE']; - //print_r($tabIndiscore);die(); - if (($tabIndiscore['NbBilansScore']*1)==0) { - $rapport.=initstr(' Néant',80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('ELEMENTS FINANCIERS', 80).EOL; - $rapport.=initstr(' Néant',80).EOL; - } else { - $rapport.=initstr(' Elles sont représentées par la valeur brute au bilan',80).EOL; - $rapport.=initstr(' du fonds de commerce pour un montant de : '.sprintf("%27s", number_format($tabBilans[0]['AH'], 0, ',', ' '))." $devise",80).EOL; - $rapport.=initstr(' des constructions pour un montant de : '.sprintf("%27s", number_format($tabBilans[0]['AP'], 0, ',', ' '))." $devise",80).EOL; - $rapport.=initstr('', 80).EOL; + $nbEts=($tabId['NbEtab']*1)-1; + if ($nbEts<0) $nbEts=0; + $rapport.=initstr('NOMBRE D\'ETABLISSEMENTS SECONDAIRES : '.$nbEts, 80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('DIRIGEANT 1: '.strtoupper($tabId['dir1Titre']), 80).EOL; + if (substr($tabId['dir1DateNaiss'],0,4)*1==0) $strNaiss=''; + else $strNaiss=' né(e) le '.$tdate->dateT('Y-m-d','d/m/Y',$tabId['dir1DateNaiss']); + $rapport.=initstr(' '.$tabId['dir1NomPrenom'].$strNaiss,80).EOL; + $rapport.=initstr('DIRIGEANT 2: '.strtoupper($tabId['dir2Titre']), 80).EOL; + if (substr($tabId['dir2DateNaiss'],0,4)*1==0) $strNaiss=''; + else $strNaiss=' né(e) le '.$tdate->dateT('Y-m-d','d/m/Y',$tabId['dir2DateNaiss']); + $rapport.=initstr(' '.$tabId['dir2NomPrenom'].$strNaiss,80).EOL; + $rapport.=initstr('', 80).EOL; - $rapport.=initstr("ELEMENTS FINANCIERS (SOMMES EN $devise)", 80).EOL; - $rapport.=initstr(' '. $tdate->dateT('Ymd','d/m/Y',$tabBilans[0]['DATE_CLOTURE']) - .' '. $tdate->dateT('Ymd','d/m/Y',$tabBilans[1]['DATE_CLOTURE']) - .' '. $tdate->dateT('Ymd','d/m/Y',$tabBilans[2]['DATE_CLOTURE']), 80).EOL; - $rapport.=initstr(' '. $tabBilans[0]['DUREE_MOIS'].' mois' - .' '. $tabBilans[1]['DUREE_MOIS'].' mois' - .' '. $tabBilans[2]['DUREE_MOIS'].' mois', 80).EOL; - $rapport.=initstr('CA : '. sprintf("%14s", number_format($tabBilans[0]['FL'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['FL'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['FL'], 0, ',', ' ')), 80).EOL; - $rapport.=initstr('CA EXPORT : '. sprintf("%14s", number_format($tabBilans[0]['FK'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['FK'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['FK'], 0, ',', ' ')), 80).EOL; - $rapport.=initstr('RESULTAT COURANT : '. sprintf("%14s", number_format($tabBilans[0]['GW'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['GW'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['GW'], 0, ',', ' ')), 80).EOL; - $rapport.=initstr('RESULTAT NET : '. sprintf("%14s", number_format($tabBilans[0]['HN'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['HN'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['HN'], 0, ',', ' ')), 80).EOL; - $rapport.=initstr('FONDS PROPRES : '. sprintf("%14s", number_format($tabBilans[0]['DL'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['DL'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['DL'], 0, ',', ' ')), 80).EOL; - $rapport.=initstr('FRAIS FINANCIERS : '. sprintf("%14s", number_format($tabBilans[0]['GU'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['GU'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['GU'], 0, ',', ' ')), 80).EOL; - $rapport.=initstr('TOTAL DETTES : '. sprintf("%14s", number_format($tabBilans[0]['EC'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['EC'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['EC'], 0, ',', ' ')), 80).EOL; - $rapport.=initstr('EFFECTIFS : '. sprintf("%14s", number_format($tabBilans[0]['YP'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[1]['YP'], 0, ',', ' ')) - .' '. sprintf("%14s", number_format($tabBilans[2]['YP'], 0, ',', ' ')), 80).EOL; - } + $rapport.=initstr('GARANTIES',80).EOL; /**@todo MORE*/ + $tabBilans=$tabIndiscore['tabBilan']; + $devise=$tabBilans[0]['MONNAIE']; + //print_r($tabIndiscore);die(); + if (($tabIndiscore['NbBilansScore']*1)==0) { + $rapport.=initstr(' Néant',80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('ELEMENTS FINANCIERS', 80).EOL; + $rapport.=initstr(' Néant',80).EOL; + } else { + $rapport.=initstr(' Elles sont représentées par la valeur brute au bilan',80).EOL; + $rapport.=initstr(' du fonds de commerce pour un montant de : '.sprintf("%27s", number_format($tabBilans[0]['AH'], 0, ',', ' '))." $devise",80).EOL; + $rapport.=initstr(' des constructions pour un montant de : '.sprintf("%27s", number_format($tabBilans[0]['AP'], 0, ',', ' '))." $devise",80).EOL; + $rapport.=initstr('', 80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('PARTENAIRES FINANCIERS', 80).EOL; - $mBanque=new MBanques(); - $tabBanque=@$mBanque->getListeBanques($siren); - if (count($tabBanque)==0) - $rapport.=initstr(' Aucun partenaire n\'est référencé dans notre base.',80).EOL; - else { - foreach ($tabBanque as $i=>$lien) { - $rapport.=initstr(' '.$lien['libBanque'], 80).EOL; - if ($i>=3) break; - } - } + $rapport.=initstr("ELEMENTS FINANCIERS (SOMMES EN $devise)", 80).EOL; + $rapport.=initstr(' '. $tdate->dateT('Ymd','d/m/Y',$tabBilans[0]['DATE_CLOTURE']) + .' '. $tdate->dateT('Ymd','d/m/Y',$tabBilans[1]['DATE_CLOTURE']) + .' '. $tdate->dateT('Ymd','d/m/Y',$tabBilans[2]['DATE_CLOTURE']), 80).EOL; + $rapport.=initstr(' '. $tabBilans[0]['DUREE_MOIS'].' mois' + .' '. $tabBilans[1]['DUREE_MOIS'].' mois' + .' '. $tabBilans[2]['DUREE_MOIS'].' mois', 80).EOL; + $rapport.=initstr('CA : '. sprintf("%14s", number_format($tabBilans[0]['FL'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['FL'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['FL'], 0, ',', ' ')), 80).EOL; + $rapport.=initstr('CA EXPORT : '. sprintf("%14s", number_format($tabBilans[0]['FK'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['FK'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['FK'], 0, ',', ' ')), 80).EOL; + $rapport.=initstr('RESULTAT COURANT : '. sprintf("%14s", number_format($tabBilans[0]['GW'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['GW'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['GW'], 0, ',', ' ')), 80).EOL; + $rapport.=initstr('RESULTAT NET : '. sprintf("%14s", number_format($tabBilans[0]['HN'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['HN'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['HN'], 0, ',', ' ')), 80).EOL; + $rapport.=initstr('FONDS PROPRES : '. sprintf("%14s", number_format($tabBilans[0]['DL'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['DL'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['DL'], 0, ',', ' ')), 80).EOL; + $rapport.=initstr('FRAIS FINANCIERS : '. sprintf("%14s", number_format($tabBilans[0]['GU'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['GU'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['GU'], 0, ',', ' ')), 80).EOL; + $rapport.=initstr('TOTAL DETTES : '. sprintf("%14s", number_format($tabBilans[0]['EC'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['EC'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['EC'], 0, ',', ' ')), 80).EOL; + $rapport.=initstr('EFFECTIFS : '. sprintf("%14s", number_format($tabBilans[0]['YP'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[1]['YP'], 0, ',', ' ')) + .' '. sprintf("%14s", number_format($tabBilans[2]['YP'], 0, ',', ' ')), 80).EOL; + } - /** § ANNONCES **/ - $bodc=false; - $nbAnn=0; - $tabAnn=$iInsee->getAnnoncesLegales($siren); - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('ANNONCES LEGALES', 80).EOL; - if (count($tabAnn)>0) { - foreach ($tabAnn as $i=>$depot) { - $annDate=$tdate->dateT('Y-m-d','d/m/Y',$depot['DateParution']); - foreach ($depot['evenements'] as $even) { - $annEve=$even['CodeEven']; - if ($annEve>=3000 && $annEve<4000) { - if ($bodc) continue; - $bodc=true; - } - $annLib=$even['LibEven']; - $rapport.=initstr(" $annDate $annLib",80).EOL; - $annDate=' '; - } - $nbAnn++; - if ($nbAnn>=6) break; - } - } else - $rapport.=initstr(' Aucune annonce pour cette entreprise.',80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('PARTENAIRES FINANCIERS', 80).EOL; + $mBanque=new MBanques(); + $tabBanque=@$mBanque->getListeBanques($siren); + if (count($tabBanque)==0) + $rapport.=initstr(' Aucun partenaire n\'est référencé dans notre base.',80).EOL; + else { + foreach ($tabBanque as $i=>$lien) { + $rapport.=initstr(' '.$lien['libBanque'], 80).EOL; + if ($i>=3) break; + } + } - /** § dirigeance **/ - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('DIRIGEANCE', 80).EOL; + /** § ANNONCES **/ + $bodc=false; + $nbAnn=0; + $tabAnn=$iInsee->getAnnoncesLegales($siren); + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('ANNONCES LEGALES', 80).EOL; + if (count($tabAnn)>0) { + foreach ($tabAnn as $i=>$depot) { + $annDate=$tdate->dateT('Y-m-d','d/m/Y',$depot['DateParution']); + foreach ($depot['evenements'] as $even) { + $annEve=$even['CodeEven']; + if ($annEve>=3000 && $annEve<4000) { + if ($bodc) continue; + $bodc=true; + } + $annLib=$even['LibEven']; + $rapport.=initstr(" $annDate $annLib",80).EOL; + $annDate=' '; + } + $nbAnn++; + if ($nbAnn>=6) break; + } + } else + $rapport.=initstr(' Aucune annonce pour cette entreprise.',80).EOL; - /** § Liens **/ - $mLiens = new MLiens2($siren, 'siren'); - $tabAct = $tabPar = array(); - try { - $tabAct = $mLiens->getActionnaires(); - } catch(Exception $e) {} - try { - $tabPart = $mLiens->getParticipations(); - } catch(Exception $e) {} - if (count($tabAct)==0 && count($tabPart)==0) - $rapport.=initstr(' A notre connaissance, l\'entreprise est indépendante.',80).EOL; - else { - foreach ($tabAct as $i=>$lien) { - $rapport.=initstr(' ACTIONNAIRE à '.$lien->PDetention.' % : '.$lien->RS.' ('.$lien->siren.')', 80).EOL; - if ($i>=3) break; - } - foreach ($tabPart as $i=>$lien) { - $rapport.=initstr(' FILIALE à '.$lien->PDetention.' % : '.$lien->RS.' ('.$lien->siren.')', 80).EOL; - if ($i>=3) break; - } - } - $rapport.=initstr('', 80).EOL; + /** § dirigeance **/ + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('DIRIGEANCE', 80).EOL; - /** § commentaires **/ - $nbLiP=$nbLiM=0; - $startLi = false; - $startPaiement = 0; - foreach ($tabIndiscore['tabCommentaires'] as $i=>$txt) { - if ($i==5000) continue; + /** § Liens **/ + $mLiens = new MLiens2($siren, 'siren'); + $tabAct = $tabPar = array(); + try { + $tabAct = $mLiens->getActionnaires(); + } catch(Exception $e) {} + try { + $tabPart = $mLiens->getParticipations(); + } catch(Exception $e) {} + if (count($tabAct)==0 && count($tabPart)==0) + $rapport.=initstr(' A notre connaissance, l\'entreprise est indépendante.',80).EOL; + else { + foreach ($tabAct as $i=>$lien) { + $rapport.=initstr(' ACTIONNAIRE à '.$lien->PDetention.' % : '.$lien->RS.' ('.$lien->siren.')', 80).EOL; + if ($i>=3) break; + } + foreach ($tabPart as $i=>$lien) { + $rapport.=initstr(' FILIALE à '.$lien->PDetention.' % : '.$lien->RS.' ('.$lien->siren.')', 80).EOL; + if ($i>=3) break; + } + } + $rapport.=initstr('', 80).EOL; - if ($i==10001000 || $startPaiement==1) { - $rapport.= initstr('', 80).EOL; - $startPaiement++; - } else { - $startPaiement=0; - } + /** § commentaires **/ + $nbLiP=$nbLiM=0; + $startLi = false; + $startPaiement = 0; + foreach ($tabIndiscore['tabCommentaires'] as $i=>$txt) { + if ($i==5000) continue; - if ($i==10000700 || $i==10000800) { - $rapport.= initstr('', 80).EOL; - $startLi = true; - } else { - $startLi = false; - } + if ($i==10001000 || $startPaiement==1) { + $rapport.= initstr('', 80).EOL; + $startPaiement++; + } else { + $startPaiement=0; + } - $ligneLi = false; - if (preg_match('/LI\+/i', $txt)) { $ligneLi=true; $nbLiP++; } - elseif (preg_match('/LI\-/i', $txt)) { $ligneLi=true; $nbLiM++; } + if ($i==10000700 || $i==10000800) { + $rapport.= initstr('', 80).EOL; + $startLi = true; + } else { + $startLi = false; + } - if (!$startLi && !$ligneLi && $startPaiement==0) { - continue; - } - //Plus de 5 LI, on arrete - if ( ($nbLiP>5 && $ligneLiP) || ($nbLiM>5 && $ligneLiM) ) { - continue; - } - //echo "Ligne : $i => $txt\n"; + $ligneLi = false; + if (preg_match('/LI\+/i', $txt)) { $ligneLi=true; $nbLiP++; } + elseif (preg_match('/LI\-/i', $txt)) { $ligneLi=true; $nbLiM++; } - /*$txt = strtr($txt, array( - ''=>'+', - ''=>'-', - ' '=>' ', - '€'=>'E', - '€'=>'E', - chr(160)=>' ', - ));*/ - //$txt = str_replace(array('','',' ','€','€',chr(160)), array('+','-',' ','E','E',' '), $txt); - $txt = str_replace(array('','','€'), array('+','-','E'), $txt); - //echo ".=> $txt\n"; - $txt = html_entity_decode($txt, ENT_QUOTES, 'UTF-8'); - //echo ".=> $txt\n"; - $txt = wordwrap(strip_tags($txt),80,EOL).EOL; - //echo ".=> $txt\n"; - $rapport.= $txt; - } - //exit; - //unsetGlobals(); - //print_r($tabIndiscore['tabCommentaires']); - //die(); + if (!$startLi && !$ligneLi && $startPaiement==0) { + continue; + } + //Plus de 5 LI, on arrete + if ( ($nbLiP>5 && $ligneLiP) || ($nbLiM>5 && $ligneLiM) ) { + continue; + } + //echo "Ligne : $i => $txt\n"; - /** § scoring **/ - if ($tabIndiscore['Indiscore20']==0) $strTendance=''; - else $strTendance=' (Tendance '.$tabIndiscore['TendanceIndiscore'].')'; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('COTATION INDISCORE : '.$tabIndiscore['Indiscore20'].'/20 '.$strTendance, 80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('LIMITE DE CREDIT : '.(round($tabIndiscore['encours']/1000)*1000).' EUR', 80).EOL; + /*$txt = strtr($txt, array( + ''=>'+', + ''=>'-', + ' '=>' ', + '€'=>'E', + '€'=>'E', + chr(160)=>' ', + ));*/ + //$txt = str_replace(array('','',' ','€','€',chr(160)), array('+','-',' ','E','E',' '), $txt); + $txt = str_replace(array('','','€'), array('+','-','E'), $txt); + //echo ".=> $txt\n"; + $txt = html_entity_decode($txt, ENT_QUOTES, 'UTF-8'); + //echo ".=> $txt\n"; + $txt = wordwrap(strip_tags($txt),80,EOL).EOL; + //echo ".=> $txt\n"; + $rapport.= $txt; + } + //exit; + //unsetGlobals(); + //print_r($tabIndiscore['tabCommentaires']); + //die(); - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('', 80).EOL; - $rapport.=initstr('', 80).EOL; + /** § scoring **/ + if ($tabIndiscore['Indiscore20']==0) $strTendance=''; + else $strTendance=' (Tendance '.$tabIndiscore['TendanceIndiscore'].')'; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('COTATION INDISCORE : '.$tabIndiscore['Indiscore20'].'/20 '.$strTendance, 80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('LIMITE DE CREDIT : '.(round($tabIndiscore['encours']/1000)*1000).' EUR', 80).EOL; - echo $rapport; - //die(print_r($tabIndiscore)); - $rapport = utf8_decode($rapport); + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('', 80).EOL; + $rapport.=initstr('', 80).EOL; + + //echo $rapport; + //die(print_r($tabIndiscore)); + $rapport = utf8_decode($rapport); + + } //Fin rapport + + //Ecriture du fichier file_put_contents($fichierOut, $entete.EOL.$rapport, FILE_APPEND); if ($demandeFtp) { @@ -518,8 +514,8 @@ for ($iFic=0; isset($tabFichLigneCmd[$iFic]); $iFic++) } if (isset($tabDemandeFtp[$fichierIn])) { - copy($fichierOut, BACKUP_DIR.'recv/'.basename($fichierOut)); - if (move($fichierOut,$tabDemandeFtp[$fichierIn])) { + copy($fichierOut, BACKUP_DIR.'recv/'.basename($fichierOut)); + if ( move($fichierOut,$tabDemandeFtp[$fichierIn]) ) { move($fichierIn, BACKUP_DIR.'send/'.basename($fichierIn)); } else { echo date ('Y/m/d - H:i:s')." - Erreur lors du déplacement du fichier $fichierOut vers ".$tabDemandeFtp[$fichierIn].EOL;