1022 lines
58 KiB
PHP
1022 lines
58 KiB
PHP
#!/usr/bin/php -c/var/www/batch/config/php_batch_sd.ini
|
|
<?php
|
|
|
|
if (!defined('VERSION_FICHIER_BODACC'))
|
|
define('VERSION_FICHIER_BODACC','0106');
|
|
|
|
/**
|
|
* @todo
|
|
* 2. Pouvoir faire du multiligne avec : 106 Libellé du Périmètre de la vente
|
|
* 5. JugesCommissaires à intégrer correctement
|
|
*/
|
|
include_once(FWK_PATH.'common/chiffres.php');
|
|
include_once(FWK_PATH.'common/dates.php');
|
|
include_once(INCLUDE_PATH.'bodacc/classMBodacc.php');
|
|
include_once(INCLUDE_PATH.'insee/classMInsee.php');
|
|
|
|
$repProduction='/mnt/samba/partage/production/';
|
|
|
|
$incrementationDesTour=true;
|
|
$typePrestaton='diffusionBodacc';
|
|
$ignoreDateDerExec=$retroActivite=false;
|
|
$codeAdherent='';
|
|
|
|
$strInfoScript='Usage : '.basename($argv[0]). " [OPTION]
|
|
Génère les fichiers des clients en surveillance ou diffusion des annonces BODACC.
|
|
|
|
Options :
|
|
-d Clients en Diffusion Bodacc (par défaut)
|
|
-s Clients en Surveillance Bodacc
|
|
-e Ne pas tenir compte de la date de dernière exécution du script
|
|
-i Ne pas exécuter en réel (pas de MAJ des infos d'exécution: n°tour, dates trt, fichier en rép tempo...)
|
|
-c:AAA Limiter le traitement au fichier de l'abonné AAA
|
|
-r:XX Faire une rétroactivté de XX jours
|
|
";
|
|
|
|
$argv=$_SERVER['argv'];
|
|
if ($_SERVER['argc']>1)
|
|
{
|
|
for ($i=1; isset($argv[$i]); $i++) {
|
|
if (substr($argv[$i],0,1)=='-') {
|
|
switch (substr($argv[$i],1,1)) {
|
|
case 'i':
|
|
$incrementationDesTour=false;
|
|
$repProduction=REP_TEMP;
|
|
break;
|
|
case 's':
|
|
$typePrestaton='surveillanceBodacc';
|
|
break;
|
|
case 'd':
|
|
$typePrestaton='diffusionBodacc';
|
|
break;
|
|
case 'e':
|
|
$ignoreDateDerExec=true;
|
|
break;
|
|
case 'r':
|
|
$retroActivite=substr($argv[$i],3,strlen($argv[$i])-3);
|
|
break;
|
|
case 'c':
|
|
$codeAdherent=substr($argv[$i],3,strlen($argv[$i])-3);
|
|
break;
|
|
case '-':
|
|
case '?':
|
|
die($strInfoScript);
|
|
break;
|
|
default:
|
|
die('Option '. $argv[$i] . " inconnue !\n");
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
$iDb=new WDB('jo');
|
|
$iDb2=new WDB('jo');
|
|
$iInsee=new MInsee();
|
|
$iBodacc=new MBodacc();
|
|
|
|
function genereMultiLigne($typeLigne, $enteteLigne, $chaine, $eol="\r\n", &$nbLignes=0) {
|
|
$lonLigne=LONGUEUR_LIGNE_SORTIE-90;
|
|
$str='';
|
|
$chaine=preg_replace('/ +/', ' ', strtr($chaine, array("\n"=>' ',"\r"=>' ',";"=>' ')));
|
|
switch ($typeLigne) {
|
|
case '102': // Activité déclarée au Bodacc
|
|
case '103': // Texte rectificatif
|
|
case '104': // Annonce Bodacc Complète
|
|
case '105': // Structure dirigeants
|
|
$tabLigne=str_split($chaine, $lonLigne);
|
|
foreach ($tabLigne as $i=>$ligne) {
|
|
$str.=initstr($typeLigne.$enteteLigne.$ligne, LONGUEUR_LIGNE_SORTIE).$eol;
|
|
$nbLignes++;
|
|
}
|
|
break;
|
|
default:
|
|
die("ERREUR : Structure de sortie n°$typeLigne non prise en charge !\n");
|
|
break;
|
|
}
|
|
return $str;
|
|
}
|
|
function getListeAdherents($prestation, $codeAdherent='') {
|
|
$strCodeAdherent='';
|
|
if ($codeAdherent<>'') $strCodeAdherent.=" AND q.loginprestation_c='$codeAdherent' ";
|
|
$iDbCrm=new WDB('sugarcrm');
|
|
$rep=$iDbCrm->select('cases_cstm q, accounts a, cases p LEFT JOIN contacts_cases k ON p.id = k.case_id LEFT JOIN contacts c ON k.contact_id = c.id LEFT JOIN contacts_cstm s ON c.id = s.id_c',
|
|
'p.id, p.case_number, p.name, p.account_id, a.name, q.typeprestation_c, q.datemiseenplace_c, q.datefinprestation_c, q.prestatest_c, q.loginprestation_c, q.passwordprestation_c, q.supportprestation_c, q.optionsupport_c, q.freqenvois_c, q.formatdesenvois_c, q.trtnumerotour_c, q.trtdatederniereexec_c*1 as derniereExec, q.optionsprestation_c, k.contact_id, k.deleted as lienContactDeleted, c.deleted as ContactDeleted, c.salutation, c.first_name, c.last_name, c.title, c.department, c.phone_mobile, c.phone_work, c.phone_fax, c.email1, c.email2, c.primary_address_street, c.primary_address_city, c.primary_address_postalcode, s.typedecontact_c', "p.deleted=0 AND p.id=q.id_c AND q.typeprestation_c='$prestation' AND q.prestationactive_c=1 AND p.account_id=a.id AND a.deleted=0 $strCodeAdherent ORDER BY p.case_number ASC", true, MYSQL_ASSOC);
|
|
//print_r($rep);
|
|
$tabPrestation=array();
|
|
foreach ($rep as $i=>$contacts) {
|
|
$numPrestation=$contacts['case_number'];
|
|
if ($contacts['lienContactDeleted']==0 && $contacts['ContactDeleted']==0) {
|
|
if ($contacts['email1']<>'') $email=$contacts['email1'];
|
|
else $email=$contacts['email2'];
|
|
if (!isset($tabPrestation[$numPrestation])) {
|
|
// echo "Ligne $i, prestation $numPrestation : ".$contacts['last_name']."\n";
|
|
$tabPrestation[$numPrestation]=array(
|
|
'id'=>$contacts['case_number'],
|
|
'idPrestationBdd'=>$contacts['id'],
|
|
'nomClient'=>$contacts['name'],
|
|
'typePrestation'=>$contacts['typeprestation_c'],
|
|
'dateDebut'=>$contacts['datemiseenplace_c'],
|
|
'dateFin'=>$contacts['datefinprestation_c'],
|
|
'test'=>$contacts['prestatest_c'],
|
|
'loginPrestation'=>$contacts['loginprestation_c'],
|
|
'passwPrestation'=>$contacts['passwordprestation_c'],
|
|
'supportPrestation'=>$contacts['supportprestation_c'],
|
|
'optionSupport'=>$contacts['optionsupport_c'],
|
|
'freqEnvois'=>$contacts['freqenvois_c'],
|
|
'formatEnvois'=>$contacts['formatdesenvois_c'],
|
|
'numeroDeTour'=>$contacts['trtnumerotour_c'],
|
|
'dateDerniereExec'=>$contacts['derniereExec']*1,
|
|
'optionPrestation'=>$contacts['optionsprestation_c'],
|
|
'contacts'=>array(array( 'salutation'=>$contacts['salutation'],
|
|
'prenom'=>$contacts['first_name'],
|
|
'nom'=>$contacts['last_name'],
|
|
'fonction'=>$contacts['title'],
|
|
'tel_por'=>$contacts['phone_mobile'],
|
|
'tel_bur'=>$contacts['phone_work'],
|
|
'tel_fax'=>$contacts['phone_fax'],
|
|
'email'=>$email,
|
|
'adresse'=>$contacts['primary_address_street'],
|
|
'ville'=>$contacts['primary_address_city'],
|
|
'codePos'=>$contacts['primary_address_postalcode'],
|
|
'typeContact'=>$contacts['typedecontact_c'])));
|
|
} else {
|
|
// echo "Ligne $i, prestation $numPrestation : ".$contacts['last_name']."\n";
|
|
$tabPrestation[$numPrestation]['contacts']=array_merge($tabPrestation[$numPrestation]['contacts'], array(
|
|
array( 'salutation'=>$contacts['salutation'],
|
|
'prenom'=>$contacts['first_name'],
|
|
'nom'=>$contacts['last_name'],
|
|
'fonction'=>$contacts['title'],
|
|
'tel_por'=>$contacts['phone_mobile'],
|
|
'tel_bur'=>$contacts['phone_work'],
|
|
'tel_fax'=>$contacts['phone_fax'],
|
|
'email'=>$email,
|
|
'adresse'=>$contacts['primary_address_street'],
|
|
'ville'=>$contacts['primary_address_city'],
|
|
'codePos'=>$contacts['primary_address_postalcode'],
|
|
'typeContact'=>$contacts['typedecontact_c'])));
|
|
}
|
|
}}
|
|
return $tabPrestation;
|
|
}
|
|
|
|
echo date ('Y/m/d - H:i:s')." - Début du traitement diffusion BODACC.\n";
|
|
|
|
/** On récupère la liste des Adhérents **/
|
|
|
|
//die(print_r(getListeAdherents('extranet')));
|
|
$tabAdherents=getListeAdherents($typePrestaton, $codeAdherent);
|
|
//print_r($tabAdherents);die();
|
|
$nbClients=count($tabAdherents);
|
|
echo date ('Y/m/d - H:i:s')." - Il y a $nbClients client(s) à servir en diffusion BODACC.".EOL;
|
|
//print_r($tabAdherents);die();
|
|
foreach ($tabAdherents as $i=>$tabAdherent) // On boucle sur les prestations
|
|
{
|
|
$clientNumTourFichier=($tabAdherent['numeroDeTour']*1)+1;
|
|
$clientIdentifiant=trim($tabAdherent['loginPrestation']);
|
|
$nomClient=trim($tabAdherent['nomClient']);
|
|
$numPrestation=$tabAdherent['id'];
|
|
/** Le client souhaite une compression du fichier ? **/
|
|
if (strpos($tabAdherent['optionSupport'], 'gzip')) $optionZip='gzip';
|
|
elseif (strpos($tabAdherent['optionSupport'], 'zip')) $optionZip='zip';
|
|
else $optionZip='none';
|
|
|
|
/** Le client préfère un paramétrage UNIX ou Window pour ses fins de lignes **/
|
|
if (strpos($tabAdherent['optionSupport'], 'os=dos')) $optionEOL="\r\n";
|
|
elseif (strpos($tabAdherent['optionSupport'], 'os=unix')) $optionEOL="\n";
|
|
else $optionEOL=EOL;
|
|
|
|
$tabOptOutput=array();
|
|
|
|
if($tabAdherent['dateDebut']<>'' && $tabAdherent['dateDebut']<>'0000-00-00')
|
|
$dateDebutPrestation=WDate::dateT('Y-m-d', 'Ymd', $tabAdherent['dateDebut']);
|
|
else
|
|
$dateDebutPrestation=false;
|
|
|
|
if($tabAdherent['dateFin']<>'' && $tabAdherent['dateFin']<>'0000-00-00')
|
|
$dateFinPrestation=WDate::dateT('Y-m-d', 'Ymd', $tabAdherent['dateFin']);
|
|
else
|
|
$dateFinPrestation=false;
|
|
|
|
//die($tabAdherent['dateDerniereExec']);
|
|
if ($ignoreDateDerExec)
|
|
$dateDernierTraitement=false;
|
|
elseif ($tabAdherent['dateDerniereExec']<>0)
|
|
$dateDernierTraitement=$tabAdherent['dateDerniereExec'];//WDate::dateT('Y-m-d', 'Ymd', $tabAdherent['dateDerniereExec']);
|
|
else
|
|
$dateDernierTraitement=false;
|
|
|
|
|
|
if ($dateDebutPrestation && $dateDebutPrestation>DATE) // La date de démarrage de la prestation n'est pas encore arrivée
|
|
{
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : La prestation démarre le $dateDebutPrestation !".EOL;
|
|
continue;
|
|
}
|
|
|
|
if ($dateFinPrestation && DATE>$dateFinPrestation) // La date de fin de la prestation est révolue
|
|
{
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : Fin de la prestation le $dateFinPrestation (Dernière exécution le $dateDernierTraitement) !".EOL;
|
|
continue;
|
|
}
|
|
|
|
if ($dateDernierTraitement && substr($dateDernierTraitement,0,8)*1==DATE*1)
|
|
{ echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : Traitement déjà exécuté aujourd'hui !".EOL;
|
|
continue;
|
|
} elseif ($dateDernierTraitement==0) {
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : Jamais exécutée pour ce client !".EOL;
|
|
$dateDernierTraitement=false;
|
|
/* Il faudra vérifier si on génère le stocke et depuis quand sinon on prond le dernier Bodacc */
|
|
}// Bloc a décommenter
|
|
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : Export des annonces en cours... (dernier traitement le $dateDernierTraitement)".EOL;
|
|
|
|
/**
|
|
** On génère la ligne d'entête
|
|
**/
|
|
$fp=fopen(REP_TEMP . $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt', 'w');
|
|
if ($fp==false) die('ERREUR : Impossible de créer le fichier !');
|
|
error_reporting(E_ALL ^ E_NOTICE);
|
|
$str= initstr('001', 3, '0', ALIGN_RIGHT) . // Type de ligne
|
|
initstr(date('YmdHis'), 14) . // Date de génération du fichier
|
|
initstr($clientNumTourFichier, 10, '0', ALIGN_RIGHT) . // Numéro de tour du fichier pour le client
|
|
initstr($clientIdentifiant, 36) . // Identifiant Client
|
|
initstr($typePrestaton, 32) . // Type de prestation
|
|
initstr(VERSION_FICHIER_BODACC, 4) . // Type de prestation
|
|
initstr(FILLER, 1901) . // FILLER
|
|
'';
|
|
fwrite($fp, initstr($str,LONGUEUR_LIGNE_SORTIE).$optionEOL);
|
|
$nbLignes=1;
|
|
|
|
/**
|
|
** On génère les lignes de détail
|
|
**/
|
|
$strRubrique='';
|
|
$tabRubCollecte=array();
|
|
if (strpos($tabAdherent['optionPrestation'], 'comptes')) { // Export du Bodacc C - Dépôt des comptes
|
|
$strRubrique.="'comptes',";
|
|
$tabRubCollecte[]=" typeEven LIKE '3%' ";
|
|
}
|
|
if (strpos($tabAdherent['optionPrestation'], 'creations')) { // Export des créations
|
|
$strRubrique.="'creations',";
|
|
$tabRubCollecte[]=" typeEven LIKE '4%' ";
|
|
}
|
|
if (strpos($tabAdherent['optionPrestation'], 'mmd')) { // Export des MMD
|
|
$strRubrique.="'mmd',";
|
|
$tabRubCollecte[]=" typeEven LIKE '2%' ";
|
|
}
|
|
if (strpos($tabAdherent['optionPrestation'], 'procol')) { // Export des ProCol
|
|
$strRubrique.="'procol',";
|
|
$tabRubCollecte[]=" typeEven LIKE '1%' ";
|
|
}
|
|
if (strpos($tabAdherent['optionPrestation'], 'radiations')) { // Export des radiations
|
|
$strRubrique.="'radiations',";
|
|
$tabRubCollecte[]=" typeEven LIKE '6%' ";
|
|
}
|
|
if (strpos($tabAdherent['optionPrestation'], 'ventes')) { // Export des ventes cessions
|
|
$strRubrique.="'ventes',";
|
|
$tabRubCollecte[]=" typeEven LIKE '5%' ";
|
|
}
|
|
|
|
if (strpos($tabAdherent['optionPrestation'], '101')) // Commentaire inclus dans l'annonce si nécessaire
|
|
$tabOptOutput[101]=true; else $tabOptOutput[101]=false;
|
|
if (strpos($tabAdherent['optionPrestation'], '102')) // Activite déclaré au Bodacc
|
|
$tabOptOutput[102]=true; else $tabOptOutput[102]=false;
|
|
if (strpos($tabAdherent['optionPrestation'], '104')) // Annonce complète au format texte
|
|
$tabOptOutput[104]=true; else $tabOptOutput[104]=false;
|
|
if (strpos($tabAdherent['optionPrestation'], '105')) // Structure Dirigeants BODACC
|
|
$tabOptOutput[105]=true; else $tabOptOutput[105]=false;
|
|
|
|
$tabNaf=array();
|
|
$posNaf=stripos($tabAdherent['optionPrestation'], 'NAF=');
|
|
if ($posNaf!==false) {
|
|
if (preg_match('/NAF=(.*)(?:$|\n|\r)/i',$tabAdherent['optionPrestation'],$matches))
|
|
$tabNaf=preg_split('(;|,)', $matches[1]);
|
|
//die(print_r($tabNaf));
|
|
}
|
|
|
|
$versionEvenClient=0;
|
|
if (preg_match('/^versionEven=(.*)$/mUi', $tabAdherent['optionPrestation'], $matches))
|
|
$versionEvenClient=$matches[1]*1;
|
|
|
|
$collecte=false;
|
|
if (preg_match('/^collecte=oui/mUi', $tabAdherent['optionPrestation'], $matches))
|
|
$collecte=true;
|
|
|
|
/*$tabSiren2=array();
|
|
foreach ($tabSiren as $siren) {
|
|
$tabSiren2[]=$siren['siren'];
|
|
}
|
|
sort($tabSiren2);
|
|
$tabSiren=$tabSiren2;
|
|
unset($tabSiren2);
|
|
//die();*/
|
|
|
|
$fields ="d.id, d.siren, d.sirenValide, CONCAT('BOD-',SUBSTRING(d.Rubrique_Bodacc,1,1)) as source, d.Bodacc_Num, d.Bodacc_Date_Parution, d.Num_Annonce, d.Rubrique_Bodacc, d.Rubrique, d.typeAnnonce, d.corrNum_Annonce, d.corrBodacc_Date_Parution, d.corrPage, d.corrNumParution, d.corrTexteRectificatif, RC, d.raisonSociale, nomCommercial, d.enseigne, nationalite, FJ, Capital, CapitalDev, d.Tribunal_Code, adresse, adrNum, adrIndRep, adrTypVoie, adrLibVoie, adrComp1, adrComp2, codePostal, d.ville, adresseSiege, adrSiegeNum, adrSiegeIndRep, adrSiegeTypVoie, adrSiegeLibVoie, adrSiegeComp1, adrSiegeComp2, codePostalSiege, villeSiege, administration, activite, typeEven, commentaires, dateEffet, publication, publicationNom, publicationDate, fusion, dateDebutActivite, dateCessationActivite, dateCessationPaiement, dateJugement, Numero, VenteMt, VenteDev, bienAcqui, 'M' As inter1type, 0 AS inter1id, Mandataire, mandNom, mandRepr, mandAdresse, mandCP, mandVille, JugeCommissaire, jugeCommissaireSuppleant, 'R' As inter2type, 0 AS inter2id, ReprCreanciers, creaNom, creaRepr, creaAdresse, creaCP, creaVille, 'A' As inter3type, 0 AS inter3id, administrateur, admNom, admRepr, admAdresse, admCP, admVille, 'O' AS inter4type, 0 AS inter4id, oppositions, oppoNom, oppoRepr, oppoAdresse, oppoCP, oppoVille, perimetre, dateFinDepotCreances, delaiDepotCreances, dateFinObservation, FinObservationBodacc, d.dateInsert";
|
|
$fieldsCol="a.id, a.siren, a.sirenValide, CONCAT(a.source,'-',a.parutionIdJal) as source, 0 as Bodacc_Num, a.dateSource as Bodacc_Date_Parution, 0 as Num_Annonce, '' as Rubrique_Bodacc, '' as Rubrique, 'Insertion' as typeAnnonce, '' as corrNum_Annonce, '' as corrBodacc_Date_Parution, '' as corrPage, '' as corrNumParution, '' AS corrTexteRectificatif, '' as RC, a.raisonSociale, '' AS nomCommercial, '' AS enseigne, '' AS nationalite, '' AS FJ, '' AS Capital, '' AS CapitalDev, a.tribunal as Tribunal_Code, adresse, '' AS adrNum, '' AS adrIndRep, '' AS adrTypVoie, '' AS adrLibVoie, '' AS adrComp1, '' AS adrComp2, a.codePostal*1 AS codePostal, a.ville, adresse AS adresseSiege, '' AS adrSiegeNum, '' AS adrSiegeIndRep, '' AS adrSiegeTypVoie, '' AS adrSiegeLibVoie, '' AS adrSiegeComp1, '' AS adrSiegeComp2, a.codePostal*1 as codePostalSiege, a.ville as villeSiege, nouvDir AS administration, nouvActivite as activite, CONCAT(a.typeEven,'',REPLACE(strEven,';','')) AS typeEven, '' AS commentaires, a.dateEffetFinP as dateEffet, '' AS publication, '' AS publicationNom, '' AS publicationDate, '' AS fusion, '' AS dateDebutActivite, '' as dateCessationActivite, a.dateCessationPaiement, a.dateJugement, '' AS Numero, montant AS VenteMt, 'EUR' AS VenteDev, '' AS bienAcqui, inter1type, inter1id, inter1nom AS Mandataire, inter1nom AS mandNom, '' AS mandRepr, '' AS mandAdresse, '' AS mandCP, '' AS mandVille, '' AS JugeCommissaire, '' AS jugeCommissaireSuppleant, inter2type, inter2id, inter2nom AS ReprCreanciers, inter2nom AS creaNom, '' AS creaRepr, '' AS creaAdresse, '' AS creaCP, '' AS creaVille, inter3type, inter3id, inter3nom AS administrateur, inter3nom AS admNom, '' AS admRepr, '' AS admAdresse, '' AS admCP, '' AS admVille, 'O' AS inter4type, 0 AS inter4id, '' AS oppositions, '' AS oppoNom, '' AS oppoRepr, '' AS oppoAdresse, '' AS oppoCP, '' AS oppoVille, '' AS perimetre, '' AS dateFinDepotCreances, '' AS delaiDepotCreances, '' AS dateFinObservation, '' AS FinObservationBodacc, a.dateInsert";
|
|
|
|
$where=$whereCol='1';
|
|
// On filtre les rubriques demandées
|
|
if ($strRubrique<>'') {
|
|
$where.=' AND Rubrique IN('. substr($strRubrique,0,strlen($strRubrique)-1) .') ';
|
|
if (count($tabRubCollecte)>0)
|
|
$whereCol.=' AND ('.implode(' OR ', $tabRubCollecte).') ';
|
|
}
|
|
// On ne prend que les dernières annonces depuis la dernière exécution de la prestation pour le client
|
|
if ($dateDernierTraitement) {
|
|
if (!$retroActivite) {
|
|
$where.=" AND (d.dateInsert>$dateDernierTraitement OR d.dateUpdate>$dateDernierTraitement) ";
|
|
$whereCol.=" AND a.dateInsert>$dateDernierTraitement ";
|
|
}
|
|
else {
|
|
$where.=" AND (d.dateInsert>$dateDernierTraitement OR d.dateUpdate>$dateDernierTraitement OR (d.dateInsert>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateConf=0 AND s.dateSuppr=0) OR (d.dateUpdate>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateConf=0 AND s.dateSuppr=0) ) ";
|
|
$whereCol.=" AND (a.dateInsert>$dateDernierTraitement OR (a.dateInsert>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateConf=0 AND s.dateSuppr=0) OR (d.dateUpdate>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateConf=0 AND s.dateSuppr=0) ) ";
|
|
}
|
|
}
|
|
// ... sinon on prend les annonces depuis la date de début de la prestation
|
|
elseif ($dateDebutPrestation)
|
|
if (!$retroActivite) {
|
|
$where.=" AND (d.dateInsert>'$dateDebutPrestation' OR d.dateUpdate>'$dateDebutPrestation') ";
|
|
$whereCol.=" AND a.dateInsert>'$dateDebutPrestation' ";
|
|
} else {
|
|
$where.=" AND (d.dateInsert>'$dateDebutPrestation' OR d.dateUpdate>'$dateDebutPrestation' OR (d.dateInsert>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateSuppr=0) OR (d.dateUpdate>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateSuppr=0) ) ";
|
|
$whereCol.=" AND (a.dateInsert>'$dateDebutPrestation' OR (a.dateInsert>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateSuppr=0) OR (d.dateUpdate>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateSuppr=0) ) ";
|
|
}
|
|
else {
|
|
$where.=" AND (d.dateInsert>='MAX(DATE_FORMAT(d.dateInsert,'%Y-%m-%d'))' OR d.dateUpdate>='MAX(DATE_FORMAT(d.dateUpdate,'%Y-%m-%d'))') ";
|
|
$whereCol.=" AND a.dateInsert>='MAX(DATE_FORMAT(a.dateInsert,'%Y-%m-%d'))' ";
|
|
}
|
|
|
|
/*if (!$retroActivite)
|
|
$where.=" AND (d.dateInsert>$dateDernierTraitement OR d.dateUpdate>$dateDernierTraitement) ";
|
|
else {
|
|
$where.=" AND (d.dateInsert>$dateDernierTraitement OR d.dateUpdate>$dateDernierTraitement OR (d.dateInsert>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateConf=0 AND s.dateSuppr=0) OR (d.dateUpdate>DATE_SUB(s.dateAjout, INTERVAL $retroActivite DAY) AND s.dateConf=0 AND s.dateSuppr=0) ) ";
|
|
}*/
|
|
|
|
|
|
// $where.=" AND Bodacc_Date_Parution>'2007-11-01' "; // Mederic a supprimer après la rétro du 22 mai 2008
|
|
|
|
if ($typePrestaton=='diffusionBodacc') {
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : diffusion...".EOL;
|
|
$tables='bodacc_detail d';
|
|
$tablesCol='annonces a';
|
|
// Credit safe
|
|
// if ($numPrestation==11)
|
|
// $where=" d.siren<>0 AND d.sirenValide=1 AND Bodacc_Date_Parution BETWEEN '2007-01-01' AND '2007-12-31' ";
|
|
|
|
if (count($tabNaf)>0) {
|
|
$strNaf="'".implode("','",$tabNaf)."'";
|
|
$fields='d.id';
|
|
$fieldsCol='a.id';
|
|
$tables='bodacc_detail d, etablissements e';
|
|
$tablesCol='annonces a, etablissements e';
|
|
$where.=" AND d.siren=e.siren AND d.siren<>0 AND (e.ape_etab IN ($strNaf) OR e.ape_entrep IN ($strNaf)) AND DATEDIFF(NOW(), Bodacc_Date_Parution)<=60 GROUP BY d.id;";
|
|
$whereCol.=" AND a.siren=e.siren AND a.siren<>0 AND (e.ape_etab IN ($strNaf) OR e.ape_entrep IN ($strNaf)) AND DATEDIFF(NOW(), dateJugement)<=60 GROUP BY a.id;";
|
|
// OR (d.siren<>e.siren AND d.siren=0 AND (d.activite LIKE '%pharmacie%' OR d.activite LIKE '%officine%')) GROUP BY d.id
|
|
}
|
|
}
|
|
elseif ($typePrestaton=='surveillanceBodacc') {
|
|
$tabSiren=$iDb->select('surveillances_listes', 'siren, ref', "idClient='$clientIdentifiant' AND dateSuppr='0000-00-00'", true, MYSQL_ASSOC);
|
|
$nbSirenClient=count($tabSiren);
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : $nbSirenClient unités en surveillance...".EOL;
|
|
$fields.=', s.ref';
|
|
$fieldsCol.=', s.ref';
|
|
$tables='bodacc_detail d, surveillances_listes s';
|
|
$tablesCol='annonces a, surveillances_listes s';
|
|
$where.=" AND d.siren=s.siren AND s.siren<>0 AND s.idClient='$clientIdentifiant' AND s.dateSuppr='0000-00-00' ";
|
|
$whereCol.=" AND a.siren=s.siren AND a.siren<>0 AND s.idClient='$clientIdentifiant' AND s.dateSuppr='0000-00-00' ";
|
|
if (!$retroActivite) {
|
|
$where.=" AND DATEDIFF(NOW(), Bodacc_Date_Parution)<=60 ";
|
|
$whereCol.=" AND DATEDIFF(NOW(), dateJugement)<=60 ";
|
|
}
|
|
/*dateAjout dateConf dateSuppr rs cp ville indTrt dateDerEnvoi
|
|
Modifier SURBODPRDFTSMEDERIC 484968573 00010 201278081 2008-04-04 0000-00-00 0000-00-00*/
|
|
}
|
|
else die('Type de prestation non gérée : '.$typePrestaton.EOL);
|
|
|
|
//$where.=" AND DATEDIFF(NOW(), Bodacc_Date_Parution)<=60 "; // NE PAS ENVOYER D'ANNONCES DONT LES DELAIS DE FORCLUSION SONT PASSEES
|
|
|
|
if ($collecte) {
|
|
$query ="SELECT $fields FROM $tables WHERE $where UNION SELECT $fieldsCol FROM $tablesCol WHERE $whereCol";
|
|
echo date ('Y/m/d - H:i:s')." - $query;".EOL;
|
|
$res=$iDb->query($query);
|
|
$nbAnnonces=mysql_num_rows($res);
|
|
$strCollecte='(avec Collecte)';
|
|
} else {
|
|
echo date ('Y/m/d - H:i:s')." - SELECT $fields FROM $tables WHERE $where".EOL;
|
|
$nbAnnonces=$iDb->select($tables, $fields, $where, true, MYSQL_ASSOC, true); // Gérer la table surveillance
|
|
$strCollecte='(Bodacc seul)';
|
|
}
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : $nbAnnonces annonces à traiter $strCollecte...".EOL;
|
|
//echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : Début de génération du fichier client en version $versionEvenClient...".EOL;
|
|
|
|
//if ($collecte) die();
|
|
|
|
if (count($tabNaf)>0) {
|
|
$fields='d.id, d.siren, sirenValide, Bodacc_Num, Bodacc_Date_Parution, Num_Annonce, Rubrique_Bodacc, Rubrique, typeAnnonce, corrNum_Annonce, corrBodacc_Date_Parution, corrPage, corrNumParution, corrTexteRectificatif, RC, d.raisonSociale, nomCommercial, d.enseigne, nationalite, FJ, Capital, CapitalDev, adresse, adrNum, adrIndRep, adrTypVoie, adrLibVoie, adrComp1, adrComp2, codePostal, d.ville, adresseSiege, adrSiegeNum, adrSiegeIndRep, adrSiegeTypVoie, adrSiegeLibVoie, adrSiegeComp1, adrSiegeComp2, codePostalSiege, villeSiege, administration, activite, typeEven, commentaires, dateEffet, publication, publicationNom, publicationDate, fusion, dateDebutActivite, dateCessationActivite, dateCessationPaiement, dateJugement, Numero, VenteMt, VenteDev, bienAcqui, Mandataire, mandNom, mandRepr, mandAdresse, mandCP, mandVille, JugeCommissaire, jugeCommissaireSuppleant, ReprCreanciers, creaNom, creaRepr, creaAdresse, creaCP, creaVille, administrateur, admNom, admRepr, admAdresse, admCP, admVille, oppositions, oppoNom, oppoRepr, oppoAdresse, oppoCP, oppoVille, perimetre, dateFinDepotCreances, delaiDepotCreances, dateFinObservation, FinObservationBodacc, d.dateInsert';
|
|
$tables='bodacc_detail d';
|
|
$where='d.id IN (0';
|
|
while ($annonce=$iDb->fetch(MYSQL_ASSOC)) {
|
|
$where.=','.$annonce['id'];
|
|
}
|
|
$where.=')';
|
|
|
|
echo date ('Y/m/d - H:i:s')." - SELECT $fields FROM $tables WHERE $where".EOL;
|
|
$nbAnnonces=$iDb->select($tables, $fields, $where, true, MYSQL_ASSOC, true);
|
|
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : $nbAnnonces liens entrep/annonces à traiter...".EOL;
|
|
}
|
|
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : Début de génération du fichier client en version $versionEvenClient...".EOL;
|
|
|
|
//echo date ('Y/m/d - H:i:s')." - SELECT $fields FROM $tables WHERE $where".EOL;
|
|
|
|
//while(=$iDb->fetch(MYSQL_ASSOC)) {
|
|
while ($annonce=$iDb->fetch(MYSQL_ASSOC)) {
|
|
|
|
/** Marquer les liens REF/SIREN envoyées à chaque client
|
|
**/
|
|
|
|
$numInter=0;
|
|
$inter=$interType=array();
|
|
/*if ($annonce['mandNom']<>'' || $annonce['mandCP']<>0) {
|
|
$inter[$numInter]['type']='M'; // Type d'intervenant A : Mand/Adm/ReprCre/Oppo
|
|
$inter[$numInter]['SIRET']=0;
|
|
$inter[$numInter]['Nom']=$annonce['mandNom'];
|
|
$inter[$numInter]['Repr']=$annonce['mandRepr'];
|
|
$inter[$numInter]['adrNum']='';
|
|
$inter[$numInter]['adrBis']='';
|
|
$inter[$numInter]['adrType']='';
|
|
$inter[$numInter]['adrLib']=$annonce['mandAdresse'];
|
|
$inter[$numInter]['CP']=$annonce['mandCP'];
|
|
$inter[$numInter]['Ville']=$annonce['mandVille'];
|
|
$inter[$numInter]['Tel']='';
|
|
$numInter++;
|
|
//$interType[]='M';
|
|
}
|
|
if ($annonce['creaNom']<>'' || $annonce['creaCP']<>0) {
|
|
$inter[$numInter]['type']='R'; // Type d'intervenant A : Mand/Adm/ReprCre/Oppo
|
|
$inter[$numInter]['SIRET']=0;
|
|
$inter[$numInter]['Nom']=$annonce['creaNom'];
|
|
$inter[$numInter]['Repr']=$annonce['creaRepr'];
|
|
$inter[$numInter]['adrNum']='';
|
|
$inter[$numInter]['adrBis']='';
|
|
$inter[$numInter]['adrType']='';
|
|
$inter[$numInter]['adrLib']=$annonce['creaAdresse'];
|
|
$inter[$numInter]['CP']=$annonce['creaCP'];
|
|
$inter[$numInter]['Ville']=$annonce['creaVille'];
|
|
$inter[$numInter]['Tel']='';
|
|
$numInter++;
|
|
//$interType[]='R';
|
|
}
|
|
if ($annonce['admNom']<>'' || $annonce['admCP']<>0) {
|
|
$inter[$numInter]['type']='A'; // Type d'intervenant A : Mand/Adm/ReprCre/Oppo
|
|
$inter[$numInter]['SIRET']=0;
|
|
$inter[$numInter]['Nom']=$annonce['admNom'];
|
|
$inter[$numInter]['Repr']=$annonce['admRepr'];
|
|
$inter[$numInter]['adrNum']='';
|
|
$inter[$numInter]['adrBis']='';
|
|
$inter[$numInter]['adrType']='';
|
|
$inter[$numInter]['adrLib']=$annonce['admAdresse'];
|
|
$inter[$numInter]['CP']=$annonce['admCP'];
|
|
$inter[$numInter]['Ville']=$annonce['admVille'];
|
|
$inter[$numInter]['Tel']='';
|
|
$numInter++;
|
|
//$interType[]='A';
|
|
}
|
|
/* if ($annonce['oppoNom']<>'' || $annonce['oppoCP']<>0) {
|
|
$inter[$numInter]['type']='O'; // Type d'intervenant A : Mand/Adm/ReprCre/Oppo
|
|
$inter[$numInter]['SIRET']=0;
|
|
$inter[$numInter]['Nom']=$annonce['oppoNom'];
|
|
$inter[$numInter]['Repr']=$annonce['oppoRepr'];
|
|
$inter[$numInter]['adrNum']='';
|
|
$inter[$numInter]['adrBis']='';
|
|
$inter[$numInter]['adrType']='';
|
|
$inter[$numInter]['adrLib']=$annonce['oppoAdresse'];
|
|
$inter[$numInter]['CP']=$annonce['oppoCP'];
|
|
$inter[$numInter]['Ville']=$annonce['oppoVille'];
|
|
$inter[$numInter]['Tel']='';
|
|
$numInter++;
|
|
//$interType[]='O';
|
|
|
|
}*/
|
|
|
|
$avecMand=false;
|
|
$tabEven2=explode(';',$annonce['typeEven']);
|
|
if ($annonce['siren']*1>100 && (count($interType)==0 || $collecte))
|
|
foreach ($tabEven2 as $even)
|
|
if (substr($even,0,1)*1==1 || substr($even,0,1)*1==5)
|
|
$avecMand=true;
|
|
|
|
if ($avecMand) {
|
|
/** On doit recherche des mandataires absent ou non décodés de l'annonce Bodacc Texte **/
|
|
$tabTypes=array('A','C','L','M','R','O');
|
|
for($iInter=1; $iInter<4; $iInter++) {
|
|
$tabMand=$iDb2->select('annonces', 'inter'.$iInter.'type, inter'.$iInter.'id, inter'.$iInter.'nom, complement', 'siren='.$annonce['siren']." AND inter".$iInter."type IN ('".implode("','", $tabTypes)."') AND (inter".$iInter."id>0 OR inter".$iInter."nom<>'' OR complement LIKE 'Mandataire%') ORDER BY dateInsert DESC", false, MYSQL_ASSOC);
|
|
$interNom=$interTel=$interCp=$interVille='';
|
|
$interSiren=0;
|
|
foreach ($tabMand as $mand) {
|
|
// As t'on déjà traité ce type de mandataire ?
|
|
if (in_array($mand['inter'.$iInter.'type'],$interType)) continue;
|
|
|
|
//print_r($annonce);
|
|
$mandId=$mand['inter'.$iInter.'id'];
|
|
if ($mandId>0) {
|
|
// Il y a un mandataire avec un identifiant numérique
|
|
$tabTmp=$iDb2->select( 'tabMandataires', 'id, sirenGrp, sirenMand, Nom, Prenom, type, adresse, adresseComp, cp, ville, tel, fax, email, web', 'id='.$mandId, true, MYSQL_ASSOC);
|
|
$mand2=$tabTmp[0];
|
|
$adr=$iInsee->structureVoie($mand2['adresse']);
|
|
$interNom=$mand2['Nom'];
|
|
$interSiren=$mand2['sirenMand']*1;
|
|
if ($interSiren==0) $interSiren=$mand2['sirenGrp']*1;
|
|
$interCp=$mand2['cp']*1;
|
|
$interVille=strtoupper($mand2['ville']);
|
|
$interTel=strtr($mand2['tel'],array(' '=>'',','=>'','.'=>'', '-'=>'/','-'=>''))*1;
|
|
} else {
|
|
// Il y a un mandataire sans identifiant numérique
|
|
|
|
if (trim($mand['inter'.$iInter.'nom'])=='' && substr($mand['complement'],0,10)=='Mandataire')
|
|
// Uniquement avec le nom du mandataire en complément
|
|
$interNom=substr($mand['complement'],13,strlen($mand['complement'])-13);
|
|
else {
|
|
if (preg_match('/^(.*), Téléphone \: (.*)$/Ui', $mand['inter'.$iInter.'nom'], $matches)) {
|
|
$interTel=strtr($matches[2],array(' '=>'',','=>'','.'=>'', '-'=>'/','-'=>''))*1;
|
|
$mand['inter'.$iInter.'nom']=$matches[1];
|
|
}
|
|
$tabTmp=explode(' ', $mand['inter'.$iInter.'nom']);
|
|
if (count($tabTmp)>1) {
|
|
$interNom=$tabTmp[0];
|
|
unset($tabTmp[0]);
|
|
$adr=$iInsee->structureVoie(trim(implode(' ', $tabTmp)));
|
|
$interCp=$adr['cp']*1;
|
|
$interVille=$adr['ville'];
|
|
}
|
|
// echo $mand['inter'.$iInter.'nom']." : Nom=$interNom, Tél=$interTel, Adresse=";
|
|
// print_r($adr);
|
|
}
|
|
$inter[$numInter]['type']=$mand['inter'.$iInter.'type']; // Type d'intervenant A : Mand/Adm/ReprCre/Oppo
|
|
$inter[$numInter]['SIRET']=$interSiren.'00000';
|
|
$inter[$numInter]['Nom']=trim(strtoupper($interNom));
|
|
$inter[$numInter]['Repr']='';
|
|
$inter[$numInter]['adrNum']=$adr['num'];
|
|
$inter[$numInter]['adrBis']=$adr['indRep'];
|
|
$inter[$numInter]['adrType']=trim(strtoupper($adr['typeVoie']));
|
|
$inter[$numInter]['adrLib']=trim(strtoupper($adr['libVoie']));
|
|
$inter[$numInter]['CP']=$interCp;
|
|
$inter[$numInter]['Ville']=trim(strtoupper($interVille));
|
|
$inter[$numInter]['Tel']=$interTel;
|
|
$numInter++;
|
|
$interType[]=$mand['inter'.$iInter.'type'];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
$tribunalCode=$annonce['Tribunal_Code'];
|
|
$refLigneClient=@$annonce['ref'];
|
|
|
|
$tabEven=array();
|
|
foreach ($tabEven2 as $even) {
|
|
$versionEven=$iBodacc->getVersionEvenement($even);
|
|
if ($versionEven==0 || $versionEven<=$versionEvenClient)
|
|
$tabEven[]=$even;
|
|
else {
|
|
if ($even<2000) $even2=1999;
|
|
elseif ($even<3000) $even2=2312;
|
|
elseif ($even<4000) $even2=3999;
|
|
elseif ($even<5000) $even2=4999;
|
|
elseif ($even<6000) $even2=5999;
|
|
elseif ($even<7000) $even2=6700;
|
|
else $even2=1999;
|
|
$tabEven[]=$even2;
|
|
// echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient : Evènement $even non géré en v$versionEvenClient : $even2".EOL;
|
|
}
|
|
}
|
|
$tabTmp=explode('-', $annonce['source']);
|
|
$source=$tabTmp[0];
|
|
if ($source=='BOD')
|
|
$codeSourceBodacc=substr($annonce['Rubrique_Bodacc'],0,1);
|
|
else {
|
|
switch (substr($annonce['source'],0,1)) {
|
|
case 'G': // G=Greffes
|
|
case 'P': // P=Inpi
|
|
case 'J': // J=Journal d'Annonces Légales
|
|
case 'T': // T=Tribunal
|
|
$codeSourceBodacc=substr($annonce['source'],0,1); break;
|
|
default: $codeSourceBodacc='J'; break;
|
|
}
|
|
}
|
|
$str= initstr('100', 3, '0', ALIGN_RIGHT) . // Type de ligne
|
|
initstr($annonce['id'], 10, '0', ALIGN_RIGHT) . // Numéro unique d'identification interne d'une annonce
|
|
initstr($annonce['siren'], 9, '0', ALIGN_RIGHT) . // Siren de l'entreprise concernée par l'annonce
|
|
initstr(FILLER, 5) . // On garde la place pour le NIC
|
|
initstr($annonce['Bodacc_Num'], 3, '0', ALIGN_RIGHT) . // Numéro de parution du Bodacc dans l'année
|
|
initstr($codeSourceBodacc, 1) . // Code Bodacc (A, B ou C)
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['Bodacc_Date_Parution']), 8) . // Date de parution du Bodacc
|
|
initstr($annonce['Num_Annonce'], 5, '0', ALIGN_RIGHT) . // Numéro de l'annonce dans le Bodacc
|
|
initstr(substr($annonce['Rubrique_Bodacc'],1,3), 3, '0') . // Rubrique dans le Bodacc
|
|
initstr($annonce['typeAnnonce'], 1) . // Type d'annonce Bodacc : I=Insertion, A=Additif,
|
|
// R=Rectif, S=Suppression
|
|
initstr($annonce['corrNum_Annonce'], 5, '0', ALIGN_RIGHT) . // Si annonce diff. de I, numéro de l'annonce corrigée
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['corrBodacc_Date_Parution']), 8) . // Si diff. I, date du Bodacc de l'annonce corrigée
|
|
initstr($annonce['corrPage'], 6, '0', ALIGN_RIGHT) . // Si diff. I, page du Bodacc de l'annonce corrigée
|
|
initstr($annonce['corrNumParution'], 4, '0', ALIGN_RIGHT) . // Si diff. I, Num parut°/année de annonce corrigée
|
|
// (ex: 230A, 001B)
|
|
// initstr($annonce['corrTexteRectificatif'], XXXXXX, '0', ALIGN_RIGHT) . // Si diff. I,
|
|
// initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateInsert']), 8, '0') . // Date de l'intégration en bae S&D
|
|
|
|
initstr($refLigneClient, 18) . // REFERENCE DU CLIENT
|
|
initstr($tribunalCode, 6) .
|
|
initstr($annonce['RC'], 9) . // Numéro de RC (Registre du Commerce) de l'entreprise
|
|
initstr($annonce['raisonSociale'], 150) . // Raison sociale de l'entreprise
|
|
initstr($annonce['nomCommercial'], 100) . // Nom commercial de l'entreprise
|
|
initstr($annonce['enseigne'], 100) . // Enseigne de l'établissement
|
|
initstr($annonce['nationalite'], 30) . // Nationalité si Personne physique
|
|
//initstr(MInsee::getFJInsee($annonce['siren']), 4) . // FJ codification Insee
|
|
initstr('0000', 4) . // FJ codification Insee
|
|
initstr($annonce['FJ'], 90) . // Forme juridique de l'entreprise déclarée au BODACC
|
|
initstr($annonce['Capital'], 15, '0', ALIGN_RIGHT) . // Capital
|
|
initstr($annonce['CapitalDev'], 3) . // Devise du capital (format ISO)
|
|
// Adresse / 150 car
|
|
initstr($annonce['adrNum'], 4, '0', ALIGN_RIGHT) . //
|
|
initstr($annonce['adrIndRep'], 1) . //
|
|
initstr($annonce['adrTypVoie'], 5) .
|
|
initstr($annonce['adrLibVoie'], 50) .
|
|
initstr($annonce['adrComp1'], 50) .
|
|
initstr($annonce['adrComp2'], 40) .
|
|
initstr($annonce['codePostal'], 5, '0', ALIGN_RIGHT) . // Code Postal de l'établissement
|
|
initstr($annonce['villeSiege'], 45) . // Ville de l'établissement
|
|
// Adresse du siège / 150 car
|
|
initstr($annonce['adrNumSiege'], 4, '0', ALIGN_RIGHT) . //
|
|
initstr($annonce['adrIndRepSiege'], 1) . //
|
|
initstr($annonce['adrTypVoieSiege'], 5) .
|
|
initstr($annonce['adrLibVoieSiege'], 50) .
|
|
initstr($annonce['adrComp1Siege'], 50) .
|
|
initstr($annonce['adrComp2Siege'], 40) .
|
|
initstr($annonce['codePostalSiege'], 5, '0', ALIGN_RIGHT) . // Code Postal de l'établissement
|
|
initstr($annonce['villeSiege'], 45) . // Ville de l'établissement
|
|
initstr(implode('',$tabEven), 32, '0', ALIGN_RIGHT) . // Code Evènement Bodacc n°1 à 8
|
|
initstr($annonce['publicationNom'], 100) . // NOM du JAL si publication
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['publicationDate']), 8) . // Date de publication du JAL si publication
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateCessationPaiement']), 8) . // Date de cessation des paiements
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateJugement']), 8) . // Date du jugement
|
|
initstr(FILLER, 1) . // FILLER (Replace type de création)
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateDebutActivite']), 8) . // Date de début d'activité
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateEffet']), 8) . // Date d'effet (Ventes/MMD)
|
|
// ou Date clôture exercice si ann dépôt comptes
|
|
initstr($annonce['VenteMt'], 15, '0', ALIGN_RIGHT) . // Montant de la vente
|
|
initstr($annonce['VenteDev'], 3) . // Devise de la ventre
|
|
initstr($annonce['Numero'], 35) . // Numéro de l'affaire au greffe
|
|
initstr($inter[0]['type'], 1) . // Type d'intervenant A : Mand/Adm/ReprCre/Oppo
|
|
initstr($inter[0]['SIRET'], 14, '0', ALIGN_RIGHT) . // Intervenant A : Siret
|
|
initstr($inter[0]['Nom'], 80) . // Raison sociale
|
|
initstr($inter[0]['Repr'], 80) . // Représentant
|
|
initstr($inter[0]['adrNum'], 4, '0', ALIGN_RIGHT) . // Adresse, numéro dans la voie
|
|
initstr($inter[0]['adrBis'], 1) . // Adresse, Bis/Ter
|
|
initstr($inter[0]['adrType'], 4) . // Adresse, type de voie
|
|
initstr($inter[0]['adrLib'], 32) . // Adresse, libellé de la voie
|
|
initstr($inter[0]['CP'], 5, '0', ALIGN_RIGHT) . // Adresse, code Postal
|
|
initstr($inter[0]['Ville'], 45) . // Adresse, commune
|
|
initstr($inter[0]['Tel'], 10, '0', ALIGN_RIGHT) . // Téléphone
|
|
initstr($inter[1]['type'], 1) . // Type d'intervenant A : Mand/Adm/ReprCre/Oppo
|
|
initstr($inter[1]['SIRET'], 14, '0', ALIGN_RIGHT) . // Intervenant A : Siret
|
|
initstr($inter[1]['Nom'], 80) . // Raison sociale
|
|
initstr($inter[1]['Repr'], 80) . // Représentant
|
|
initstr($inter[1]['adrNum'], 4, '0', ALIGN_RIGHT) . // Adresse, numéro dans la voie
|
|
initstr($inter[1]['adrBis'], 1) . // Adresse, Bis/Ter
|
|
initstr($inter[1]['adrType'], 4) . // Adresse, type de voie
|
|
initstr($inter[1]['adrLib'], 32) . // Adresse, libellé de la voie
|
|
initstr($inter[1]['CP'], 5, '0', ALIGN_RIGHT) . // Adresse, code Postal
|
|
initstr($inter[1]['Ville'], 45) . // Adresse, commune
|
|
initstr($inter[1]['Tel'], 10, '0', ALIGN_RIGHT) . // Téléphone
|
|
initstr(FILLER/*$annonce['JugeCommissaireNom']*/, 30) . // NOM du JugeCommissaire
|
|
initstr(FILLER/*$annonce['JugeCommissairePrenom']*/, 30) . // Prénom du JugeCommissaire
|
|
initstr(FILLER/*$annonce['JugeCommissaireSupplNom']*/, 30) . // NOM du JugeCommissaire suppléant
|
|
initstr(FILLER/*$annonce['JugeCommissaireSupplPrenom']*/, 30) . // Prénom du JugeCommissaire suppléant
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateFinDepotCreances']), 8) . // Date limite pour le dépôt des créances
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateFinObservation']), 8) . // Date de fin de la période d'observation
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['dateInsert']), 8) . // Date d'insertion dans la base S&D
|
|
'';
|
|
fwrite($fp, initstr($str,LONGUEUR_LIGNE_SORTIE).$optionEOL);
|
|
$nbLignes++;
|
|
// if ($tabOptOutput['commentaire']==true && $annonce['commentaires']<>'')
|
|
// fwrite($fp, '101'.initsrt($annonce['commentaires'],1500).$eol); // Commentaire textuel si nécessaire
|
|
$enteteL= initstr($annonce['id'], 10, '0', ALIGN_RIGHT) . // Numéro unique d'identification interne d'une annonce
|
|
initstr($annonce['siren'], 9, '0', ALIGN_RIGHT) . // Siren de l'entreprise concernée par l'annonce
|
|
initstr(FILLER, 5) . // On garde la place pour le NIC
|
|
initstr($annonce['Bodacc_Num'], 3, '0', ALIGN_RIGHT) . // Numéro de parution du Bodacc dans l'année
|
|
initstr($codeSourceBodacc, 1) . // Code Bodacc (A, B ou C)
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['Bodacc_Date_Parution']), 8) . // Date de parution du Bodacc
|
|
initstr($annonce['Num_Annonce'], 5, '0', ALIGN_RIGHT) . // Numéro de l'annonce dans le Bodacc
|
|
initstr(substr($annonce['Rubrique_Bodacc'],1,3), 3, '0') . // Rubrique dans le Bodacc
|
|
initstr($annonce['typeAnnonce'], 1) . // Type d'annonce Bodacc : I=Insertion, A=Additif,
|
|
// R=Rectificatif, S=Suppression
|
|
initstr($annonce['corrNum_Annonce'], 5, '0', ALIGN_RIGHT) . // Si annonce différent de I, numéro de l'annonce corrigée
|
|
initstr(WDate::dateT('Y-m-d','Ymd',$annonce['corrBodacc_Date_Parution']), 8) . // Si diff. I, date du Bodacc de l'annonce corrigée
|
|
initstr($annonce['corrPage'], 6, '0', ALIGN_RIGHT) . // Si diff. I, page du Bodacc de l'annonce corrigée
|
|
initstr($annonce['corrNumParution'], 4, '0', ALIGN_RIGHT) . // Si diff. I, Num parution dans l'année de annonce corri(ex: 230A, 001B)
|
|
initstr($refLigneClient, 18) . // REF CLI
|
|
'';
|
|
|
|
if ($tabOptOutput[101]==true && $annonce['commentaires']<>'') // Commentaires
|
|
fwrite($fp, genereMultiLigne('101', $enteteL, $annonce['commentaires'], $optionEOL, $nbLignes));
|
|
if ($tabOptOutput[102]==true && $annonce['activite']<>'') // Activité déclarée au Bodacc
|
|
fwrite($fp, genereMultiLigne('102', $enteteL, $annonce['activite'], $optionEOL, $nbLignes));
|
|
if ($annonce['corrTexteRectificatif']<>'') // Texte rectificatif
|
|
fwrite($fp, genereMultiLigne('103', $enteteL, $annonce['corrTexteRectificatif'], $optionEOL, $nbLignes));
|
|
if ($tabOptOutput[104]==true) { // Annonce Bodacc Complète
|
|
if ($collecte && substr($annonce['source'],0,3)<>'BOD' ) {
|
|
$tabCollecte=$iInsee->getProColPart($annonce['siren']);
|
|
foreach ($tabCollecte as $annCollecte) {
|
|
$idAnn2=('0.'.$annonce['id'])*1.0;
|
|
if ($annCollecte['id']==$idAnn2) {
|
|
$annoncetxt=str_replace(' RCS Tribunal inconnu.',' RCS.', $annCollecte['texteAnnonce']);
|
|
break;
|
|
}
|
|
}
|
|
} else {
|
|
$annoncetxt=$iDb2->select('bodacc', 'annonce', 'id='.$annonce['id'], false);
|
|
$annoncetxt=$annoncetxt[0][0];
|
|
}
|
|
fwrite($fp, genereMultiLigne('104', $enteteL, $annoncetxt, $optionEOL, $nbLignes));
|
|
}
|
|
if ($tabOptOutput[105]==true) { // Liste des dirigeants
|
|
$annonceDir=$iDb2->select('bodacc_dirigeants', 'id, num, dateEffet, fonction, rs, nom, prenom, nomUsage', 'id='.$annonce['id'], true);
|
|
$strDir='';
|
|
foreach ($annonceDir as $k=>$dir) {
|
|
$strDir.=initstr(WDate::dateT('Y-m-d','Ymd',$dir['dateEffet']), 8, '0', ALIGN_RIGHT) . // Date de la prise de fonction
|
|
initstr($dir['fonction'], 4) . // Code Fonction S&D
|
|
initstr($dir['rs'], 80) . // Raison Sociale du dirigeant
|
|
initstr($dir['nom'], 50) . // NOM du dirigeant
|
|
initstr($dir['prenom'], 100) . // Prenom
|
|
initstr($dir['usage'], 50); // Nom d'usage
|
|
if ($k%6==0) $strDir.=initstr(' ', 28);
|
|
else $strDir.=initstr(' ', 26);
|
|
}
|
|
fwrite($fp, genereMultiLigne('105', $enteteL, $strDir, $optionEOL, $nbLignes));
|
|
}
|
|
if ($nbLignes%1000==1) echo date ('Y/m/d - H:i:s')." - Nb lignes=$nbLignes\n";
|
|
}
|
|
|
|
/**
|
|
** On génère la ligne de fin de fichier
|
|
**/
|
|
$nbLignes++;
|
|
$str= initstr('999', 3, '0', ALIGN_RIGHT) . // Type de ligne
|
|
initstr(date('YmdHis'), 14) . // Date & Heure de fin génération du fichier
|
|
initstr($clientNumTourFichier, 10, '0', ALIGN_RIGHT) . // Numéro de tour du fichier pour le client
|
|
initstr($clientIdentifiant, 36) . // Identifiant Client
|
|
initstr($typePrestaton, 32) . // Type de prestation
|
|
initstr($nbLignes, 10, '0', ALIGN_RIGHT) . // Nombre de lignes Total du fichier
|
|
'';
|
|
fwrite($fp, initstr($str,LONGUEUR_LIGNE_SORTIE)); // Pas de fin de ligne sur la dernière ligne
|
|
fclose($fp);
|
|
echo date ('Y/m/d - H:i:s')." - Prestation n°$numPrestation, Client $nomClient :Fichier client terminé.".EOL;
|
|
|
|
/** Mise à jour des numéros de tour et des date de dernières exécutions
|
|
**/
|
|
if ($incrementationDesTour) {
|
|
$iDbCrm=new WDB('sugarcrm');
|
|
$rep=$iDbCrm->update('cases_cstm', array('trtdatederniereexec_c'=>date('YmdHis'), 'trtnumerotour_c'=> $clientNumTourFichier),
|
|
"id_c='".$tabAdherent['idPrestationBdd']."'");
|
|
}
|
|
|
|
/** Conversion du fichier si nécessaire en CSV
|
|
**/
|
|
if ($tabAdherent['formatEnvois']=='csv') {
|
|
$ligneOut='';
|
|
$ligne001=$ligne100=$ligne104=$ligne999=0;
|
|
$tabLignes=file(REP_TEMP. $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt');
|
|
$fichier_csv=$typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.csv';
|
|
$fp=fopen(REP_TEMP . $fichier_csv, 'w');
|
|
foreach ($tabLignes as $i=>$ligne) {
|
|
$ecrireLignePre=false;
|
|
$typeLigne=substr($ligne, 0, 3)*1;
|
|
switch ($typeLigne) {
|
|
case 1: // Ligne ignorée
|
|
// Ecriture de l'entête
|
|
$siren ='Siren';
|
|
$nic ='Nic';
|
|
$ref ='Référence';
|
|
$numPar ='Parution';
|
|
$bodacc ='Bodacc';
|
|
$datePar='Date parution';
|
|
$numAnn ='Numéro Annonce';
|
|
$cor ='Type Annonce';
|
|
$libTri ='Tribunal';
|
|
$numRC ='Numéro RCS';
|
|
$raisonS='Raison sociale';
|
|
$catEven='Chapitre';
|
|
$txtEven='Evènement(s)';
|
|
$dateEve='Date évènement';
|
|
$txtAnn ='Texte Annonce';
|
|
$ligne001++;
|
|
break;
|
|
case 100: // Structure Bodacc
|
|
$ligneOut="$siren;$nic;$ref;$numPar;$bodacc;$datePar;$numAnn;$cor;$libTri;$numRC;$raisonS;$catEven;$txtEven;$dateEve;$txtAnn";
|
|
$ligne100++;
|
|
$siren = substr($ligne, 13 , 9 ); // Siren de l'entreprise concernée par l'annonce
|
|
$nic = trim(substr($ligne, 22, 5 )); // 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= WDate::dateT('Ymd','d/M/Y',substr($ligne,31,8)); // 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
|
|
$dateEve1=substr($ligne, 1144, 8 ); // Date de jugezment
|
|
$dateEve2=substr($ligne, 1161, 8 ); // Date d'effet, etc...
|
|
if ($dateEve1>0)
|
|
$dateEve=WDate::dateT('Ymd','d/M/Y',$dateEve1);
|
|
elseif ($dateEve2>0)
|
|
$dateEve=WDate::dateT('Ymd','d/M/Y',$dateEve2);
|
|
else
|
|
$dateEve='';
|
|
$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);
|
|
|
|
$numRC = trim(substr($ligne, 95 , 9 )); // Numéro de RC (Registre du Commerce) de l'entreprise
|
|
$raisonS= trim(substr($ligne, 104 , 150 )); // Raison sociale de l'entreprise
|
|
$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) {
|
|
$txtEven.=$iBodacc->getEvenement($codeEven)." ($codeEven), ";
|
|
$catEven=$iBodacc->getChapitreEvenement($codeEven);
|
|
}
|
|
else
|
|
$txtEven.='';
|
|
$txtEven=substr($txtEven,0,strlen($txtEven)-2);
|
|
$txtAnn='';
|
|
$ecrireLignePre=true;
|
|
break;
|
|
case 104: // Annonce
|
|
$ligne104++;
|
|
$txtAnn=trim($txtAnn.' '.str_replace(';','.',trim(substr($ligne, 89 , 1910)))); // Texte Annonce
|
|
break;
|
|
case 999: // Ligne ignorée
|
|
$ligneOut="$siren;$nic;$ref;$numPar;$bodacc;$datePar;$numAnn;$cor;$libTri;$numRC;$raisonS;$catEven;$txtEven;$dateEve;$txtAnn";
|
|
$ligne999++;
|
|
$ecrireLignePre=true;
|
|
break;
|
|
default: // Ligne non gérée
|
|
break;
|
|
}
|
|
if ($ecrireLignePre) fwrite($fp, $ligneOut.EOL);
|
|
}
|
|
fclose($fp);
|
|
echo date ('Y/m/d - H:i:s')." - Conversion du fichier $fichier_csv terminée !".EOL;
|
|
}
|
|
|
|
/*Gzip ou zip zt envoi par mail ou dépot sur le site FTP*/
|
|
switch ($optionZip) {
|
|
case 'zip':
|
|
$zip = new ZipArchive;
|
|
$ficProduction=$typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.zip';
|
|
$res = $zip->open($repProduction.$ficProduction, ZipArchive::CREATE);
|
|
if ($res === TRUE) {
|
|
// $zip->addFromString('test.txt', 'file content goes here');
|
|
$zip->addFile( REP_TEMP. $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt',
|
|
$typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt');
|
|
if ($tabAdherent['formatEnvois']=='csv')
|
|
$zip->addFile(REP_TEMP. $fichier_csv, $fichier_csv);
|
|
$zip->close();
|
|
echo date ('Y/m/d - H:i:s')." - Compression du fichier ". $typePrestaton .'_'. $clientIdentifiant .'.zip OK...'.EOL;
|
|
} else {
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Compression Zip du fichier ". $typePrestaton .'_'. $clientIdentifiant .'.txt impossible !'.EOL;
|
|
}
|
|
break;
|
|
case 'gzip':
|
|
$ficProduction= $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt.gz';
|
|
$string=file_get_contents(REP_TEMP. $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt');
|
|
$gz = gzopen($repProduction.$ficProduction,'w9');
|
|
if (!$gz) {
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Compression Gzip du fichier ". $typePrestaton .'_'. $clientIdentifiant .'.txt impossible !'.EOL;
|
|
} else {
|
|
gzwrite($gz, $string);
|
|
gzclose($gz);
|
|
echo date ('Y/m/d - H:i:s')." - Compression du fichier ". $typePrestaton .'_'. $clientIdentifiant .'.txt.gz OK...'.EOL;
|
|
}
|
|
|
|
if ($tabAdherent['formatEnvois']=='csv') {
|
|
$ficProduction_csv= $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.csv.gz';
|
|
$string=file_get_contents(REP_TEMP. $fichier_csv);
|
|
$gz = gzopen($repProduction.$ficProduction_csv,'w9');
|
|
if (!$gz) {
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Compression Gzip du fichier $fichier_csv impossible !".EOL;
|
|
} else {
|
|
gzwrite($gz, $string);
|
|
gzclose($gz);
|
|
echo date ('Y/m/d - H:i:s')." - Compression du fichier $ficProduction_csv OK...".EOL;
|
|
}
|
|
}
|
|
break;
|
|
case 'bzip2':
|
|
$ficProduction=$typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt.bz2';
|
|
$string=file_get_contents(REP_TEMP. $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt');
|
|
$bz = bzopen($repProduction.$ficProduction,'w');
|
|
// Ne sait pas si le niveau de compression 1 à 9 est implémenté pour cette fonction
|
|
if (!$bz) {
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Compression Bzip2 impossible pour ". $typePrestaton .'_'. $clientIdentifiant .'.txt impossible !'.EOL;
|
|
} else {
|
|
bzwrite($bz, $string, strlen($string));
|
|
bzclose($bz);
|
|
echo date ('Y/m/d - H:i:s')." - Compression du fichier ". $typePrestaton .'_'. $clientIdentifiant .'.txt.bz2 OK...'.EOL;
|
|
}
|
|
if ($tabAdherent['formatEnvois']=='csv') {
|
|
$ficProduction_csv= $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.csv.bz2';
|
|
$string=file_get_contents(REP_TEMP. $fichier_csv);
|
|
$bz = bzopen($repProduction.$ficProduction_csv,'w');
|
|
if (!$bz) {
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Compression Bzip2 du fichier $fichier_csv impossible !".EOL;
|
|
} else {
|
|
bzwrite($bz, $string, strlen($string));
|
|
bzclose($bz);
|
|
echo date ('Y/m/d - H:i:s')." - Compression du fichier $ficProduction_csv OK...".EOL;
|
|
}
|
|
}
|
|
break;
|
|
default:
|
|
$ficProduction= $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.txt';
|
|
$ficProduction_csv= $typePrestaton.'_'.$clientIdentifiant.'_'.DATETIME.'.csv';
|
|
if (!copy(REP_TEMP.$ficProduction, $repProduction.$ficProduction))
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Déplacement du fichier $ficProduction impossible !".EOL;
|
|
else
|
|
echo date ('Y/m/d - H:i:s')." - Le fichier $ficProduction a été créé...".EOL;
|
|
if ($tabAdherent['formatEnvois']=='csv') {
|
|
if (!copy(REP_TEMP.$ficProduction_csv, $repProduction.$ficProduction_csv))
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Déplacement du fichier $ficProduction_csv impossible !".EOL;
|
|
else
|
|
echo date ('Y/m/d - H:i:s')." - Le fichier $ficProduction_csv a été créé...".EOL;
|
|
}
|
|
break;
|
|
}
|
|
|
|
/** Sauvegarde des fichiers dans clients **/
|
|
$repBakClient='/home/data/clients/'.strtolower($tabAdherent['nomClient']);
|
|
if (!file_exists($repBakClient)) {
|
|
echo date ('Y/m/d - H:i:s')." - ATTENTION : Les dossiers BACKUP du client ne sont pas correctement créés !".EOL;
|
|
if (!file_exists($repBakClient) && mkdir($repBakClient))
|
|
echo date ('Y/m/d - H:i:s')." - Le dossier Backup du client a été créé ($repBakClient)".EOL;
|
|
// if (!file_exists($repFtpClient.'/recv') && mkdir($repFtpClient.'/recv'))
|
|
// echo date ('Y/m/d - H:i:s')." - Le dossier FTP/RECV du client a été créé ($repFtpClient/recv)".EOL;
|
|
}
|
|
if (!copy($repProduction.$ficProduction, $repBakClient.'/'.$ficProduction))
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Copy du fichier $ficProduction dans Backup impossible !".EOL;
|
|
else
|
|
echo date ('Y/m/d - H:i:s')." - Le fichier $ficProduction a été historisé...".EOL;
|
|
|
|
if ($tabAdherent['formatEnvois']=='csv') {
|
|
if (!copy($repProduction.$ficProduction_csv, $repBakClient.'/'.$ficProduction_csv))
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Historisation du fichier $ficProduction_csv impossible !".EOL;
|
|
else
|
|
echo date ('Y/m/d - H:i:s')." - Le fichier $ficProduction_csv a été historisé...".EOL;
|
|
}
|
|
|
|
/** Si FTP, déplacement dans les dossiers adéquats **/
|
|
if ($tabAdherent['supportPrestation']=='ftp' || $tabAdherent['supportPrestation']=='web') {//$repProduction.$ficProduction
|
|
$repFtpClient='/home/data/ftp/'.strtolower($tabAdherent['nomClient']);
|
|
if (!file_exists($repFtpClient) || !file_exists($repFtpClient.'/recv')) {
|
|
echo date ('Y/m/d - H:i:s')." - ATTENTION : Les dossiers FTP du client ne sont pas correctement créés !".EOL;
|
|
if (!file_exists($repFtpClient) && mkdir($repFtpClient))
|
|
echo date ('Y/m/d - H:i:s')." - Le dossier FTP du client a été créé ($repFtpClient)".EOL;
|
|
if (!file_exists($repFtpClient.'/recv') && mkdir($repFtpClient.'/recv'))
|
|
echo date ('Y/m/d - H:i:s')." - Le dossier FTP/RECV du client a été créé ($repFtpClient/recv)".EOL;
|
|
}
|
|
if (!move($repProduction.$ficProduction, $repFtpClient.'/recv/'.$ficProduction))
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Déplacement du fichier $ficProduction dans FTP/RECV impossible !".EOL;
|
|
else
|
|
echo date ('Y/m/d - H:i:s')." - Le fichier $ficProduction a été déplacé dans FTP/RECV...".EOL;
|
|
|
|
if ($tabAdherent['formatEnvois']=='csv') {
|
|
if (!move($repProduction.$ficProduction_csv, $repFtpClient.'/recv/'.$ficProduction_csv))
|
|
echo date ('Y/m/d - H:i:s')." - ERREUR : Déplacement du fichier $ficProduction_csv dans FTP/RECV impossible !".EOL;
|
|
else
|
|
echo date ('Y/m/d - H:i:s')." - Le fichier $ficProduction_csv a été déplacé dans FTP/RECV...".EOL;
|
|
}
|
|
}
|
|
|
|
|
|
}
|
|
echo date ('Y/m/d - H:i:s')." - Fin du traitement diffusion BODACC.\n";
|
|
die();
|
|
?>
|