'.
''.
''.$infogreffe_ws_user.''.
''.$infogreffe_ws_pass.''.
''.INFOGREFFE_WS_REF.''.
''.
'A'.
'IC'.
'C'.
'KB'.
'S'.
'WS'.
''.
''.
''.
''.
''.
''.
''.$siren.''.
'';
FB::log($req, 'req');
$post = ''.$req.'';
$ch = curl_init();
curl_setopt($ch, CURLOPT_URL, $infogreffe_ws_url);
curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, FALSE);
curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, FALSE);
curl_setopt($ch, CURLOPT_COOKIEFILE,TRUE);
curl_setopt($ch, CURLOPT_POST, TRUE);
curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
curl_setopt($ch, CURLOPT_POSTFIELDS, $post);
$output = curl_exec($ch);
$xml = str_replace("",'', $output);
$xml = str_replace('','', $xml);
return $xml;
}
function infogreffe_kbisToHTML ( $fichier ) {
// Load the XML source
$xmlDoc = new DOMDocument;
$xmlDoc->load($fichier);
$xsl = new DOMDocument;
$xsl->load(realpath(dirname(__FILE__).'/KbisWebService.xsl'));
$proc = new XSLTProcessor;
$proc->importStyleSheet($xsl); // attach the xsl rules
$html = $proc->transformToXML($xmlDoc);
$fichierHTML = str_replace('.xml', '.html', $fichier);
file_put_contents($fichierHTML, $html);
return $fichierHTML;
}
function infogreffe_kbisErreur ( $xml ) {
if (!empty($xml)){
$doc = new DOMDocument();
$load = $doc->loadXML($xml, LIBXML_NOERROR | LIBXML_NOWARNING);
if (!$load) {
return true;
} else {
return false;
}
} else {
return true;
}
}
$fichierPDF = '';
$erreur = '';
$fichier = 'kbis-'.$siren.'.xml';
// Le fichier n'existe pas en cache
if ( !file_exists(INFOGREFFE_PATH.$fichier)
// Le fichier existe en cache
|| ( file_exists(INFOGREFFE_PATH.$fichier) &&
date('Ymd', filemtime(INFOGREFFE_PATH.$fichier)+INFOGREFFE_FILETIME ) < date('Ymd') )
// Le fichier existe en cache mais contient un message d'erreur
|| ( file_exists(INFOGREFFE_PATH.$fichier)
&& date('Ymd', filemtime(INFOGREFFE_PATH.$fichier)+INFOGREFFE_FILETIME ) < date('Ymd')
&& filesize(INFOGREFFE_PATH.$fichier)<=2000) ){
//Génération du fichier PDF
$xml = infogreffe_kbis($siren);
FB::log($xml, 'xml');
if ( !infogreffe_kbisErreur($xml) )
{
file_put_contents(INFOGREFFE_PATH.$fichier, $xml);
$fichierHTML = infogreffe_kbisToHTML(INFOGREFFE_PATH.$fichier);
$fichierPDF = wkhtmltopdf($fichierHTML);
} else {
$erreur = str_replace("",
'', $xml);
}
} else {
if ( file_exists(INFOGREFFE_PATH.'/kbis-'.$siren.'.pdf') ) {
$fichierPDF = INFOGREFFE_PATH.'/kbis-'.$siren.'.pdf';
}
}
FB::log($fichierPDF, 'fichierPDF');
?>
PIECES OFFICIELLES
|
Numéro identifiant Siren |
=substr($siren,0,3).' '.substr($siren,3,3).' '.substr($siren,6,3)?> |
|
Raison Sociale |
=$raisonSociale?> |
|
Extrait RCS