$login=strtolower($_SESSION['tabInfo']['login']);
$siret=$_REQUEST['siret'];
$siren=substr($siret,0,9);
$id=$_REQUEST['id'];
$vue=$_REQUEST['vue']*1;
if (!$_SESSION['connected'])
echo ('Vous devez être connecté afin de pouvoir utiliser cette fonctionnalité');
elseif (!preg_match('/KBIS/i', $_SESSION['tabInfo']['droits']))
echo ('Vous n\'avez pas les droits nécessaires pour utiliser cette fonctionnalité (2)');
else {
$raisonSociale=$tabInfo['entrep']['raisonSociale'];
$cj=$tabInfo['entrep']['fj'];
$dep=substr(''.$tabInfo['entrep']['codeCommune'],0,2);
$errCJ=$errDep=$errNum=false;
if ( ($cj>=91 && $cj<=93) || ($cj>=9110 && $cj<=9300) )
$errCJ=true;
elseif ( $dep=='00' || $dep=='57' || $dep=='67' || $dep=='68' || $dep=='97' || $dep=='98')
$errDep=true;
else {
$client = new SoapClient(null, array( 'location' => INFOGREFFE_WS_URL,
'uri' => INFOGREFFE_WS_URI,
'soap_version' => SOAP_1_1,
'trace' => 1,
'style' => SOAP_RPC,
'use' => SOAP_ENCODED,
));
$type='AC';
$req= ''.
''.
''.INFOGREFFE_WS_USER.''.//85009006
''.INFOGREFFE_WS_PASS.''.//
''.INFOGREFFE_WS_REF.''.
''.
'A'.
'IC'.
'C'.
''.$type.''.// KB=Kbis, HQ=Histo, ST=Statut, AC=Acte, LE=Liste étab
'S'.
'WS'.
''.
''.
''.
''.
''.
''.
''.$siren.''.
'';
$fichier="$type-$siren.xml";
$perisable=true;
if (// Le fichier n'existe pas en cache
!file_exists(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier)) ||
// Le fichier existe en cache mais est périsable (liste)
(file_exists(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier)) && $perisable && date('Ymd', filemtime(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier)))<>date('Ymd')) ||
// Le fichier existe en cache, n'est pas périsable (acte) mais contient un message d'erreur
// (file_exists('/var/www/site_extranet/www/infogreffe/xml/'.$fichier) && !$perisable && date('Ymd', filemtime(('/var/www/site_extranet/www/infogreffe/xml/'.$fichier)))<>date('Ymd')) &&
// filesize('/var/www/site_extranet/www/infogreffe/xml/'.$fichier)<=200
(file_exists(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier)) && !$perisable && date('Ymd', filemtime(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier)))<>date('Ymd') &&
filesize(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier))<=200)
) {
try {
$O=$client->getProduitsWebServicesXML(utf8_encode($req));
$xml=implode('', (array)$O);
}
catch (SoapFault $soapFault) {// echo "ERROR :\n", var_dump($soapFault), "\n"; echo "Request :\n", $client->__getLastRequest(), "\n";
$success=false;
$response=$client->__getLastResponse();
$response=str_replace("",'', $response);
$xml=str_replace('','', $response);
}
/** Enregistrement du fichier XML en provenance des greffes
**/
if (strlen($xml)<>0) {
$fp=@fopen(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier), 'w');
@fwrite($fp, $xml);
@fclose($fp);
}
} else {
/** Lecture du fichier XML en provenance des greffes
**/
$xml=file_get_contents(realpath(dirname(__FILE__) . '/../infogreffe/xml/'.$fichier));
}
/** Affichage des erreurs Infogreffe **/
if (strlen($xml)<200) {
$tmp=explode('-', $xml);
$errNum=$tmp[0]*1;
$errMsg=$xml;
if ($errNum==0) $errNum=-1;
elseif ($errNum==45 ||
$errNum==14
) $errNum=false;
}
}
if ($errCJ || $errDep || $errNum) {
?>
|
|
Numéro identifiant Siren |
=substr($siren,0,3).' '.substr($siren,3,3).' '.substr($siren,6,3)?> |
|
Raison Sociale |
=$raisonSociale?> |
|
|
|
if ($errCJ) echo 'K-Bis inexistant pour cette forme juridique.';
elseif ($errDep) echo 'K-Bis inexistant dans ce département.';
else echo 'Retour Greffe : '.$errMsg.'';
?> |
} else {
if ($action=='commande') {
if (preg_match('#^[\w.-]+@[\w.-]+\.[a-zA-Z]{2,5}$#',$_REQUEST['email'])) {
$message='Commande de K-Bis prise en compte';
mail( 'contact@scores-decisions.com',"Commande de KBIS pour $siren à ".$_REQUEST['email'],
'REQUEST='.EOL.print_r($_REQUEST,true).'EOL'.
'SERVER='.EOL.print_r($_SERVER,true).'EOL'.
'SESSION='.EOL.print_r($_SESSION,true).'EOL'.
'ENV='.EOL.print_r($_ENV,true).'EOL'.
'tabInfo='.print_r($tabInfo,true));
$fp=fopen(PATH_LOGS.'commande_kbis.csv', 'a');
fwrite($fp, date('Y/m/d H:i:s').";$siren;".$_REQUEST['email'].';'.$tabInfo['login'].';'.$tabInfo['email'].';'.$tabInfo['ip']."\n");
fclose($fp);
} else {
$message="ERREUR : Veuillez saisir une adresse email valide pour la commande de K-Bis";
}
}
if (file_exists(realpath(dirname(__FILE__) . "/../pdf/kbis-$siren.pdf")) &&
date('Ymd', filemtime(realpath(dirname(__FILE__) . "/../pdf/kbis-$siren.pdf")))==date('Ymd') &&
filesize(realpath(dirname(__FILE__) . "/../pdf/kbis-$siren.pdf"))>500 )
$vue=2;
if ($vue==0) { ?>
1,
'soap_version' => SOAP_1_1,
'location' => WEBSERVICE_URL,
'uri' => WEBSERVICE_URI,
'login' => $_SESSION['tabInfo']['login'],
'password' => $_SESSION['tabInfo']['password']));
try {
$O = $client->getKbis($siren, 1,0);
$kbis=$O['result'];
//sleep(5);
} catch (SoapFault $fault) {
echo ''.$client->__getLastResponse().'
';
echo 'ERREUR SOAP :'.EOL;
print_r($fault);
die();
}
$page=getUrl($kbis['Url'], '', '', '', false);
$body=$page['body'];
$fp=@fopen(realpath(dirname(__FILE__) . "/../pdf/kbis-$siren.pdf"), 'w');
@fwrite($fp, $body);
@fclose($fp);
}
$raisonSociale=$tabInfo['entrep']['raisonSociale'];
?>
'') {
?>
|
=$message;?> |
|
|
Numéro identifiant Siren |
=substr($siren,0,3).' '.substr($siren,3,3).' '.substr($siren,6,3)?> |
|
Raison Sociale |
=$raisonSociale?> |
|
|
if ($vue==0) {
?>
} elseif (!( file_exists(realpath(dirname(__FILE__) . "/../pdf/kbis-$siren.pdf"))
&& date('Ymd', filemtime(realpath(dirname(__FILE__) . "/../pdf/kbis-$siren.pdf")))==date('Ymd')
&& filesize(realpath(dirname(__FILE__) . "/../pdf/kbis-$siren.pdf"))>500 )) {
?>
} else {
echo 'Visualiser le Kbis ';
$message='Commande de K-Bis prise en compte';
mail( 'ylenaour@scores-decisions.com',"Commande de KBIS pour $login ($siren)",
'REQUEST='.EOL.print_r($_REQUEST,true).'EOL'.
'SERVER='.EOL.print_r($_SERVER,true).'EOL'.
'SESSION='.EOL.print_r($_SESSION,true).'EOL'.
'ENV='.EOL.print_r($_ENV,true).'EOL'.
'tabInfo='.print_r($tabInfo,true));
}
?>
|
}
?>
}
?>