diff --git a/includes/infogreffe/kbis.php b/includes/infogreffe/kbis.php new file mode 100644 index 000000000..373581bdd --- /dev/null +++ b/includes/infogreffe/kbis.php @@ -0,0 +1,44 @@ + 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.''. + ''; + + try { + $O = $client2->getProduitsWebServicesXML(utf8_encode($req)); + $xml = implode('', (array)$O); + }catch (SoapFault $soapFault) { + $success = false; + $response = $client2->__getLastResponse(); + $response = str_replace("",'', $response); + $xml = str_replace('','', $response); + } + return $xml; +} \ No newline at end of file diff --git a/www/pages/kbis2.php b/www/pages/kbis2.php new file mode 100644 index 000000000..b12982717 --- /dev/null +++ b/www/pages/kbis2.php @@ -0,0 +1,324 @@ +=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 + { + $fichier=$type.'-'.$siren.'.xml'; + $perisable=true; + if (!file_exists(PATH_DATA.'/infogreffe/xml/'.$fichier) // Le fichier n'existe pas en cache + || ( file_exists(PATH_DATA.'/infogreffe/xml/'.$fichier) && $perisable && date('Ymd', filemtime(PATH_DATA.'/infogreffe/xml/'.$fichier))<>date('Ymd') ) // Le fichier existe en cache mais est périsable (liste) + || ( file_exists(PATH_DATA.'/infogreffe/xml/'.$fichier) && !$perisable && date('Ymd', filemtime(PATH_DATA.'/infogreffe/xml/'.$fichier))<>date('Ymd') && filesize(PATH_DATA.'/infogreffe/xml/'.$fichier)<=200) // Le fichier existe en cache, n'est pas périsable (acte) mais contient un message d'erreur + ){ + require_once 'infogreffe/kbis.php'; + $xml = infogreffeProduits(); + /** Enregistrement du fichier XML en provenance des greffes **/ + if (strlen($xml)!=0) { + $fp=@fopen(PATH_DATA.'/infogreffe/xml/'.$fichier, 'w'); + @fwrite($fp, $xml); + @fclose($fp); + } + } else { + /** Lecture du fichier XML en provenance des greffes **/ + $xml = file_get_contents(PATH_DATA.'/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) { + ?> + + + + + + + + + + + + + + + + + + + + + + + + + 500 + ) $vue=2; + + if ($vue==0) { + ?> + + getKbis($siren, 1,0); + $kbis = $O['result']; + sleep(5); + } catch (SoapFault $fault) { + require_once 'soaperror.php'; + processSoapFault($client,$fault,$tabInfo); + //echo '
'.$client->__getLastResponse().'
'; + //echo 'ERREUR SOAP :'.EOL; + //print_r($fault); + //die(); + } + $page=getUrl($kbis['Url'], '', '', '', false); + $body=$page['body']; + $fp=@fopen(PATH_DATA.'/pdf/kbis-'.$siren.'.pdf', 'w'); + @fwrite($fp, $body); + @fclose($fp); + + $message='Commande de K-Bis en cours'; + mail( 'ylenaour@scores-decisions.com',"KBIS en cours pour $login ($siren, vue=$vue)", + '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).EOL. + 'O='.print_r($O,true).EOL); + } // Fin vue=1 + + $raisonSociale=$tabInfo['entrep']['raisonSociale']; + ?> +
 Numéro identifiant Siren
 Raison Sociale
 
  +

+ '; + ?> +

+
+ '') { + ?> + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
 

 Numéro identifiant Siren
 Raison Sociale
 
+ + + +
+ 500 )){ + try { + $O = $client->getKbis($siren, 1,0); + $kbis=$O['result']; + sleep(5); + } catch (SoapFault $fault) { + require_once 'soaperror.php'; + processSoapFault($client,$fault,$tabInfo); + //echo '
'.$client->__getLastResponse().'
'; + //echo 'ERREUR SOAP :'.EOL; + //print_r($fault); + //die(); + } + $page=getUrl($kbis['Url'], '', '', '', false); + $body=$page['body']; + $fp=@fopen(PATH_DATA.'/pdf/kbis-'.$siren.'.pdf', 'w'); + @fwrite($fp, $body); + @fclose($fp); + + if ( file_exists(PATH_DATA.'/pdf/kbis-'.$siren.'.pdf') + && date('Ymd', filemtime(PATH_DATA.'/pdf/kbis-'.$siren.'.pdf'))==date('Ymd') + && filesize(PATH_DATA.'/pdf/kbis-'.$siren.'.pdf')>500 ) + { + 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).EOL. + 'O='.print_r($O,true).EOL); + } else { + ?> + +
+ Visualiser le Kbis '; + + $message='Commande de K-Bis prise en compte'; + mail( 'ylenaour@scores-decisions.com',"Commande de KBIS pour $login ($siren, vue=$vue)", + '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).EOL. + 'O='.print_r($O,true).EOL); + } + ?> +
+ \ No newline at end of file