2009-02-17 13:14:53 +00:00
< ? php
/** Par d<EFBFBD> faut , l ' identifiant de commande Infogreffe est <EFBFBD> O
**/
$idCommande = 0 ;
2009-02-20 13:23:49 +00:00
//include_once(realpath(dirname(__FILE__). '/../../framework/default/_includes/mysql.php'));
2009-02-20 13:57:51 +00:00
$con = mysql_pconnect ( MYSQL_HOST , MYSQL_USER , MYSQL_PASS );
2009-02-17 13:14:53 +00:00
if ( ! ( $con === false )) {
2009-02-20 13:57:51 +00:00
if ( mysql_select_db ( MYSQL_DB , $con ) === false )
2009-02-17 13:14:53 +00:00
echo ( '<!--Could not select database: ' . mysql_error () . '-->' );
}
//$tab=mysql_select('insee', $fields, $where);
// $etab=$RP[0];
$siret = $_REQUEST [ 'siret' ];
$siren = substr ( $siret , 0 , 9 );
$id = $_REQUEST [ 'id' ];
$source = $_REQUEST [ 'source' ];
$action = $_REQUEST [ 'action' ];
if ( $action <> '' && $action <> 'commande' ) die ( 'Param<61> tres incorrects !' );
$vecteurCommande = $_REQUEST [ 'vecteur' ];
if ( $vecteurCommande <> '' ) {
if ( $vecteurCommande <> 'C' && $vecteurCommande <> 'T' ) die ( 'Param<61> tres incorrects !' );
} else
$vecteurCommande = 'T' ;
$message = '' ;
2009-02-20 13:04:46 +00:00
include_once ( FWK_PATH . '/common/dates.php' );
include_once ( FWK_PATH . '/common/curl.php' );
2009-02-17 13:14:53 +00:00
$tabErrInfoGref = array ( 0 => " ERREUR LORS DE L'ACCES A LA BASE DES PIECES OFFICIELLES. MERCI DE REESSAYER ! " ,
1 => " REQUETE INTERDITE " ,
2 => " CODE EMETTEUR INVALIDE " ,
3 => " CODE ABONNE OU MOT DE PASSE INVALIDE " ,
4 => " MOT DE PASSE INVALIDE " ,
5 => " ABONNE INTERDIT " ,
6 => " DOSSIER NON TROUVE DANS LA BASE DES PIECES OFFICIELLES " ,
7 => " Type d'inscription invalide " ,
8 => " Kbis indisponible pour le siren " ,
9 => " Etat d'endettement indisponible pour le siren " ,
10 => " Impossible de faire aboutir la demande " ,
11 => " IMPOSSIBLITE DE GENERER LE FLUX XML DU KBIS " ,
12 => " IMPOSSIBLITE DE GENERER LE FLUX XML DE L ETAT ENDETTEMENT " ,
13 => " L ETAT ENDETTEMENT NE POSSEDE AUCUN DEBITEUR " ,
14 => " IMPOSSIBILITE DE GENERER LA COMMANDE " ,
15 => " DEMANDE ETAT COMPLET IMPOSSIBLE " ,
16 => " LA PRISE EN CHARGE DU MAIL EST EFFECTIVE " ,
17 => " LA PRISE EN CHARGE DE VOTRE COMMANDE EST EFFECTIVE " , // LA PRISE EN CHARGE DE VOTRE COURRIER EST EFFECTIVE
18 => " DERNIER STATUT A JOUR INDISPONIBLE " ,
19 => " BILAN COMPLET INDISPONIBLE " ,
20 => " PAS DE COMPTES ANNUELS POUR LES CRITERES DONNES<45> : SOIT LE MILLESIME DEMANDE N<> A PAS ETE DEPOSE, SOIT L<> ENTREPRISE N<> EST PAS TENUE DE DEPOSER SES COMPTES " ,
21 => " PAS DE DERNIER STATUT A JOUR " ,
22 => " LES MODES DE DIFFUSIONS DEMANDES SONT FERMES " ,
23 => " SOCIETE NON TENUE DE DEPOSE SES COMPTES " ,
24 => " SIREN INVALIDE " ,
25 => " SIREN NON TROUVE DANS LA BASE DES PIECES OFFICIELLES " ,
26 => " COMPTE NON DEPOSES " ,
27 => " COMPTES DEPOSES MAIS BILAN SAISI INDISPONIBLE<4C> : COMMANDE BILAN COMPLET POSSIBLE " ,
28 => " REQUETE SUR LES SURVEILLANCES REALISEES " ,
29 => " ACCUSES DE RECEPTIONS DISPONIBLES " ,
30 => " REVELATIONS DISPONIBLES " ,
31 => " PORTEFEUILLE DISPONIBLE " ,
32 => " AUCUN ACCUSE DE RECEPTION DISPONIBLE " ,
33 => " AUCUNE REVELATIONS DISPONIBLES " ,
34 => " AUCUN PORTEFEUILLE DISPONIBLE " ,
35 => " TRANCHE HORAIRE DEPASSEE " ,
36 => " BILAN INDISPONIBLE-PERIODE DE CONSERVATION DEPASSEE " ,
37 => " BILAN SAISI INDISPONIBLE " ,
38 => " STATUTS A JOUR INDISPONIBLES POUR ENVOI EMAIL " ,
39 => " BILAN COMPLET INDISPONIBLE POUR TELECHARGEMENT " ,
40 => " STATUTS A JOUR INDISPONIBLES POUR ENVOI EMAIL " ,
41 => " STATUTS A JOUR INDISPONIBLES POUR TELECHARGEMENT " ,
42 => " ACTE INDISPONIBLE " ,
43 => " ACTES INDISPONIBLES POUR ENVOI EMAIL " ,
44 => " ACTES INDISPONIBLES POUR TELECHARGEMENT " ,
45 => " AUCUN ACTE TROUVE POUR CE SIREN " ,
46 => " AUCUN ACTE TROUVE AVEC CES CRITERES " ,
47 => " SERVICE COURRIER INDISPONIBLE " ,
48 => " SERVICE MAIL INDISPONIBLE " ,
49 => " SERVICE TELECHARGEMENT INDISPONIBLE " ,
50 => " UNE PARTIE DE LA COMMANDE INDISPONIBLE EN TELECHARGEMENT ET MAIL " ,
51 => " ADRESSE EMAIL OBLIGATOIRE POUR COMMANDE MAIL " ,
52 => " ADRESSE POSTALE OBLIGATOIRE POUR COMMANDE COURRIER " ,
53 => " LA COMMANDE EN COURRIER SEUL DE L'ETAT EN MATIERE DE PROCEDURE COLLECTIVE N'EST PAS PERMISE " ,
54 => " IMPOSSIBILITE DE GENERER LE FLUX XML DU CERTIFICAT " ,
55 => " SOCIETE NE FAISANT PAS L'OBJET D'UNE PROCEDURE COLLECTIVE " ,
56 => " IDENTIFICATION DU DOCUMENT INVALIDE POUR LA PROCEDURE EN COURS SUR CETTE ENTREPRISE " ,
57 => " DOCUMENT INDISPONIBLE POUR LE NUMERO DE GESTION " ,
58 => " AUCUN DOCUMENT TROUVE POUR LE NUMERO DE GESTION " ,
59 => " DOCUMENT INDISPONIBLE POUR TELECHARGEMENT " ,
60 => " IDENTIFICATION INCOMPLETE DU DOCUMENT " ,
61 => " AUCUNE INSCRITPTION MODIFICATIVE TROUVEE " ,
62 => " HISTORIQUE DES MODIFICATIONS AU RCS INDISPONIBLE " ,
63 => " IMPOSSIBLITE DE GENERER LE FLUX XML D'HISTORIQUE DE MODIFICATIONS AU RCS " ,
64 => " HISTORIQUE DE MODIFICATIONS AU RCS INDISPONIBLE " ,
65 => " LES MODES DE DIFFUSION SPECIFIES SONT INVALIDES " ,
66 => " LE DEPARTMENT SAISI EST INVALIDE " ,
67 => " LA RECHERCHE EST LIMITE A UN VOLUME DE 100 ENTREPRISES " ,
68 => " LE NUMERO DE GESTION N<> EST PAS SUFFISANT POUR CETTE REQUETE " ,
69 => " LE NUMERO DE GESTION EST INVALIDE " ,
70 => " LA SELECTION DES ETABLISSSMENTS RADIES OU SECONDAIRES DOIT UTILISER UNE VALEUR DE TYPE BOOLEAN true OU false " ,
999 => " SERVICE INDISPONIBLE " ,
);
$login = strtolower ( $_SESSION [ 'tabInfo' ][ 'login' ]);
if ( ! $_SESSION [ 'connected' ])
echo ( 'Vous devez <20> tre connect<63> afin de pouvoir utiliser cette fonctionnalit<69> ' );
/* elseif ( $login <> 'jmartory' && $login <> 'bpanaccione' && $login <> 'mheitz' && $login <> 'jmc' &&
$login <> 'rsil' && $login <> 'rsiestidf' && $login <> 'rsirh' && $login <> 'rsic' && $login <> 'rsinat' &&
$login <> 'rsibret' && $login <> 'rsicentre' && $login <> 'rsipdll' && $login <> 'rsireunion' && $login <> 'rsicorse' &&
$login <> 'testreunica' && $login <> 'reunicacsf' ) {
echo ( 'Vous n\'avez pas les droits n<> cessaires pour utiliser cette fonctionnalit<69> (1)' );
} */
elseif ( ! preg_match ( '/ACTES/i' , $_SESSION [ 'tabInfo' ][ 'droits' ]))
echo ( 'Vous n\'avez pas les droits n<> cessaires pour utiliser cette fonctionnalit<69> (2)' );
else { // On est connect<63> !
$client2 = new SoapClient ( null , array ( 'trace' => 1 ,
'soap_version' => SOAP_1_1 ,
'location' => WEBSERVICE_URL ,
'uri' => WEBSERVICE_URI ,
'login' => $_SESSION [ 'tabInfo' ][ 'login' ],
'password' => $_SESSION [ 'tabInfo' ][ 'password' ]));
$raisonSociale = $tabInfo [ 'entrep' ][ 'raisonSociale' ];
$cj = $tabInfo [ 'entrep' ][ 'fj' ];
$dep = substr ( '' . $tabInfo [ 'entrep' ][ 'codeCommune' ], 0 , 2 );
/** Specificit<EFBFBD> s des associations
**/
if ( $cj == 9150 || // Association syndicale libre
$cj == 9220 || // Association d<> clar<61> e
$cj == 9221 || // Association d<> clar<61> e "entreprises d'insertion par l'<27> conomique"
$cj == 9222 || // Association interm<72> diaire
$cj == 9223 || // Groupement d'employeurs
$cj == 9230 || // Association d<> clar<61> e reconnue d'utilit<69> publique
$cj == 9240 || // Congr<67> gation
$cj == 9260 || // Association de droit local
$cj == 9300 ) // Fondation
{
if ( $action == 'commande' ) {
if ( preg_match ( '#^[\w.-]+@[\w.-]+\.[a-zA-Z]{2,5}$#' , $_REQUEST [ 'email' ])) {
$message = 'Commande prise en compte' ;
mail ( 'contact@scores-decisions.com' , " Commande de statuts associations pour $siren <20> " . $_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_asso.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 pi<70> ces " ;
}
}
?>
< table width = " 580 " border = " 0 " align = " left " bgcolor = " #FFFFFF " >
< ? php
if ( $message <> '' ) {
?>
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< h3 >< ? = $message ; ?> </h3></td>
</ tr >
< ? php
}
?>
< tr >
< td colspan = " 3 " align = " center " >< img src = " ./img/rub_pieces.png " width = " 577 " height = " 36 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Num & eacute ; ro identifiant Siren </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = substr ( $siren , 0 , 3 ) . ' ' . substr ( $siren , 3 , 3 ) . ' ' . substr ( $siren , 6 , 3 ) ?> </td>
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Raison Sociale </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = $raisonSociale ?> </td>
</ tr >
< tr >
< td colspan = " 3 " >& nbsp ; </ td >
</ tr >
< tr >
< td colspan = " 3 " >< img src = " ./img/srub_actes.png " width = " 576 " height = " 27 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " > Il n ' est pas possible de visualiser les statuts des associations en ligne .</ td >
</ tr >
< ?
if ( $action <> 'commande' ) {
?>
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< br />< br />< form action = " ./?page=greffes&action=commande&siret=<?= $siret ?>&id=<?= $id ?>&source=<?= $source ?> " method = " POST " >< input type = " checkbox " /> Commander les statuts de l 'association (délai approximatif de 15 jours)<br/><br/>Adresse email du destinataire <input name="email" type="text" value="<? if ($_SESSION[' tabInfo '][' login ']<>' testreunica ' && $_SESSION[' tabInfo '][' login ']<>' reunicacsf ') echo $tabInfo[' email ']?>" size="20"/> <input class="imgButton" type="image" src="./img/boutton_valider_off.gif" name="submit" onmouseover="this.src=' ./ img / boutton_valider_on . gif '" onmouseout="this.src=' ./ img / boutton_valider_off . gif '" title="Commander les statuts de l' association ... " ></form></td>
</ tr >
< ?
}
?>
</ table >
< ?
} elseif ( $dep == '00' || $dep == '57' || $dep == '67' || $dep == '68' || $dep == '97' || $dep == '98' || $vue == 'rcs' ) { // D<> b ALSACE DOM
//if ($login=='ylenaour' || $login=='jmartory' || $login=='mheitz' )
include ( 'inpi.php' );
/* else {
?> <table width="580" border="0" align="left" bgcolor="#FFFFFF">
< tr >
< td colspan = " 3 " align = " center " >< img src = " ./img/rub_pieces.png " width = " 577 " height = " 36 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Num & eacute ; ro identifiant Siren </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = substr ( $siren , 0 , 3 ) . ' ' . substr ( $siren , 3 , 3 ) . ' ' . substr ( $siren , 6 , 3 ) ?> </td>
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Raison Sociale </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = $raisonSociale ?> </td>
</ tr >
< tr >
< td colspan = " 3 " >& nbsp ; </ td >
</ tr >
< tr >
< td colspan = " 3 " >< img src = " ./img/srub_actes.png " width = " 576 " height = " 27 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " > D<EFBFBD> partement non op<EFBFBD> rationnel pour l ' instant . Merci de renouveller votre demande plus tard !</ td >
</ tr >
</ table >
< ? } */
} else { // D<> b hors ALSACE DOM
if ( $action == 'commande' ) {
if ( preg_match ( '#^[\w.-]+@[\w.-]+\.[a-zA-Z]{2,5}$#' , $_REQUEST [ 'email' ])) {
$message = 'Commande prise en compte' ;
mail ( 'contact@scores-decisions.com' , " Commande de pi<70> ces pour $siren <20> " . $_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_greffe.csv' , 'a' );
fwrite ( $fp , date ( 'Y/m/d H:i:s' ) . " ; $siren ; " . $_REQUEST [ 'email' ] . ';' . $tabInfo [ 'login' ] . ';' . $tabInfo [ 'email' ] . ';' . $tabInfo [ 'ip' ] . " \n " );
fclose ( $fp );
$tabCommande = array ( 'emailCommande' => $_REQUEST [ 'email' ] );
mysql_update ( 'commandes' , $tabCommande , " login=' $login ' AND siren=' $siren ' " );
} else {
$message = " ERREUR : Veuillez saisir une adresse email valide pour la commande de pi<70> ces " ;
}
}
/* < td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< br />< br />< form action = " ./?page=greffes&action=commande_piece&siret=<?= $siret ?>&id=<?= $id ?>&source=<?= $source ?> " method = " POST " >< input type = " checkbox " /> Recevoir le document directement par mail ( d & eacute ; lai approximatif de 24 heures ) < br />< br /> Adresse email du destinataire < input name = " email " type = " text " value = " <? if ( $_SESSION['tabInfo'] ['login']<>'testreunica') echo $tabInfo['email'] ?> " size = " 20 " />& nbsp ; & nbsp ; & nbsp ; < input class = " imgButton " type = " image " src = " ./img/boutton_valider_off.gif " name = " submit " onmouseover = " this.src='./img/boutton_valider_on.gif' " onmouseout = " this.src='./img/boutton_valider_off.gif' " title = " Commander le document par e-mail... " ></ form ></ td >
*/
$vue = $_REQUEST [ 'vue' ];
$option = trim ( '' .@ $_REQUEST [ 'option' ]); /* Si acte ou statuts : type_acte-date-greffe-dossier_millesime-dossier_statut-dossier_chrono-num_depot-num_acte */
/** Si on est en commande de courrier, on g<> n<EFBFBD> re une r<> f unique **/
if ( $vecteurCommande == 'C' ) {
$rep = mysql_select ( 'commandes' , ' idCommande, login, dateCommande' , " siren= $siren AND refDocument=' $option ' " );
if ( count ( $rep ) == 0 ) {
$dejaCommande = false ;
/** Aucune commande ne concerne ce document **/
$tabCommande = array ( 'idUser' => $_SESSION [ 'tabInfo' ][ 'id' ],
// emailCommande
'login' => $login ,
'siren' => $siren ,
'refDocument' => $option ,
'dateCommande' => date ( 'YmdHis' ));
$idCommande = mysql_insert ( 'commandes' , $tabCommande );
} else {
$dejaCommande = true ;
/** Document en cours de commande **/
if ( $rep [ 0 ][ 'login' ] == $login )
$message2 = 'Votre commande a d<> j<EFBFBD> <20> t<EFBFBD> prise en compte le ' . WDate :: dateT ( 'Ymd' , 'd/m/Y' , $rep [ 0 ][ 'dateCommande' ]);
}
}
$output =@ $_REQUEST [ 'output' ];
$vecteur = 'XL' ;
switch ( $vue ) {
case 'kbis' : $type = 'KB' ; break ;
case 'histo' : $type = 'HQ' ; break ; //"T"/>'.XL
case 'statuts' : $type = 'ST' ;
$vecteur = $vecteurCommande ; break ;
case 'actes' : $type = 'AC' ;
if ( $option <> '' )
$vecteur = $vecteurCommande ; break ;
case 'LE' : $type = 'ListeEtab' ; break ;
case 'PN' : $type = 'PrivNant' ; break ;
case 'BI' : $type = 'BilanImg' ; break ;
//case 'bilans': $type='BS'; break;
case 'bilans' : $type = 'BI' ;
if ( $option <> '' )
$vecteur = $vecteurCommande ; break ;
case 'FA' : $type = 'PrezProcol' ; break ;
case 'FI' : $type = 'Inventaire' ; break ;
case 'jugements' : $type = 'FJ' ; break ;
case 'FO' : $type = 'Ordonnance' ; break ;
case 'FD' : $type = 'DepotDivers' ; break ;
case 'SD' : $type = 'SurvDemande' ; break ;
case 'SR' : $type = 'SurvRevel' ; break ;
case 'SP' : $type = 'SurvPortef' ; break ;
case 'rcs' : break ;
default :
if ( $action <> 'commande' )
die ( 'Type de pièce officielle inexistante' );
break ;
}
$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 ,
));
$req = '<demande>' .
'<emetteur>' .
'<code_abonne>' . INFOGREFFE_WS_USER . '</code_abonne>' .// 85009006
'<mot_passe>' . INFOGREFFE_WS_PASS . '</mot_passe>' .//
'<reference_client>G' . $idCommande . '</reference_client>' .
'<code_requete>' .
'<type_profil>A</type_profil>' .
'<origine_emetteur>IC</origine_emetteur>' .
'<nature_requete>C</nature_requete>' .
'<type_document>' . $type . '</type_document>' .// KB = Kbis , HQ = Histo , ST = Statut , AC = Acte , LE = Liste <EFBFBD> tab
'<type_requete>S</type_requete>' .
'<media>WS</media>' .
'<mode_diffusion>' ;
if ( $type == 'AC' && $option == '' && $vecteur == 'XL' )
$req .= '<mode type="T"/>' .
'<mode type="C"/>' ;
$req .= '<mode type="' . $vecteur . '"/>' .
'</mode_diffusion>' .
'</code_requete>' .
'</emetteur>' .
'<commande>' .
'<num_siren>' . $siren . '</num_siren>' ;
if ( ( $type == 'BS' || $type == 'BI' ) && $option <> '' ) {
$tabRefActe = explode ( '-' , $option );
$tabMil = explode ( '_' , $tabRefActe [ 0 ]);
//$req.='<millesime>'.$tabMil[0].'</millesime>';
//$req.='<type_comptes>'.$tabMil[1].'</type_comptes>';
$req .= '<greffe>' . $tabRefActe [ 2 ] . '</greffe>' .
'<dossier_millesime>' . $tabRefActe [ 3 ] . '</dossier_millesime>' .
'<dossier_statut>' . $tabRefActe [ 4 ] . '</dossier_statut>' .
'<dossier_chrono>' . $tabRefActe [ 5 ] . '</dossier_chrono>' .
'<num_depot>' . $tabRefActe [ 6 ] . '</num_depot>' .
'<date_cloture>' . WDate :: dateT ( 'Ymd' , 'd/m/Y' , $tabRefActe [ 1 ]) . '</date_cloture>' ;
// '<liste_actes>'.
// '<acte num="'.$tabRefActe[7].'"/>'.
// '</liste_actes>';
}
elseif ( $type == 'AC' && $option <> '' ) {
$tabRefActe = explode ( '-' , $option );
$req .= '<greffe>' . $tabRefActe [ 2 ] . '</greffe>' .
'<dossier_millesime>' . $tabRefActe [ 3 ] . '</dossier_millesime>' .
'<dossier_statut>' . $tabRefActe [ 4 ] . '</dossier_statut>' .
'<dossier_chrono>' . $tabRefActe [ 5 ] . '</dossier_chrono>' .
'<num_depot>' . $tabRefActe [ 6 ] . '</num_depot>' .
'<liste_actes>' .
'<acte num="' . $tabRefActe [ 7 ] . '"/>' .
'</liste_actes>' ;
/*
/* $optionUrl = $bilan [ 'millesime' ] . '_' . $bilan [ 'type_comptes' ] . '-' . $dateRef . '-' . $bilan [ 'num_gest_greffe' ] . '-' . $bilan [ 'num_gest_millesime' ] . '-' . $bilan [ 'num_gest_statut' ] . '-' .
$bilan [ 'num_gest_chrono' ] . '-' . $bilan [ 'num_depot' ];
**/
}
$req .= '</commande></demande>' ;
$success = true ;
/** Par d<EFBFBD> faut les documents avec des liens vers les actes ne sont pas p<EFBFBD> risables
**/
$perisable = false ;
if ( $option == '' ) {
$fichier = " $type - $siren .xml " ;
$perisable = true ; // La liste des documents est p<> risable !
}
else
$fichier = " $type - $siren - $option .xml " ;
if ( $action <> 'commande' && ! $dejaCommande ) {
if ( // Le fichier n'existe pas en cache
2009-02-20 09:40:39 +00:00
! file_exists ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier )) ||
2009-02-17 13:14:53 +00:00
// Le fichier existe en cache mais est p<> risable (liste)
2009-02-23 08:05:19 +00:00
( file_exists ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier )) && $perisable && date ( 'Ymd' , filemtime ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier ))) <> date ( 'Ymd' )) ||
2009-02-17 13:14:53 +00:00
// 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
2009-02-23 08:05:19 +00:00
( file_exists ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier )) && ! $perisable && date ( 'Ymd' , filemtime ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier ))) <> date ( 'Ymd' ) &&
2009-02-20 09:40:39 +00:00
filesize ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier )) <= 200 )
2009-02-17 13:14:53 +00:00
) {
try {
2009-02-23 13:48:18 +00:00
if ( ! file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option . '.pdf' ))) {
2009-02-23 17:19:09 +00:00
$fp =@ fopen ( realpath ( dirname ( __FILE__ ) . '/../www/infogreffe/xml/' ) . '/' . $fichier . '.query' , 'w' );
2009-02-17 13:14:53 +00:00
@ fwrite ( $fp , $req );
@ fclose ( $fp );
$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 ( " <SOAP-ENV:Envelope xmlns:SOAP-ENV='http://schemas.xmlsoap.org/soap/envelope/' xmlns:SOAP-ENC='http://schemas.xmlsoap.org/soap/encoding/' xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xmlns:xsd='http://www.w3.org/2001/XMLSchema'><SOAP-ENV:Body><ns0:getProduitsWebServicesXMLResponse xmlns:ns0='urn:local' SOAP-ENV:encodingStyle='http://schemas.xmlsoap.org/soap/encoding/'><return xsi:type='xsd:string'> " , '' , $response );
$xml = str_replace ( '</return></ns0:getProduitsWebServicesXMLResponse></SOAP-ENV:Body></SOAP-ENV:Envelope>' , '' , $response );
}
/** Enregistrement du fichier XML en provenance des greffes
**/
if ( strlen ( $xml ) <> 0 ) {
2009-02-23 17:19:09 +00:00
$fp =@ fopen ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' ) . '/' . $fichier , 'w' );
2009-02-17 13:14:53 +00:00
@ fwrite ( $fp , $xml );
@ fclose ( $fp );
}
} else {
/** Lecture du fichier XML en provenance des greffes
**/
2009-02-20 09:40:39 +00:00
$xml = file_get_contents ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier ));
2009-02-17 13:14:53 +00:00
}
} else $xml = '' ;
/** Affichage des erreurs Infogreffe **/
if ( strlen ( $xml ) < 200 ) {
$tmp = explode ( '-' , $xml );
$errNum = $tmp [ 0 ] * 1 ;
$errMsg = $xml ;
?>
< table width = " 580 " border = " 0 " align = " left " bgcolor = " #FFFFFF " >
< ? php
if ( $message <> '' && ! $dejaCommande ) {
?>
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< h3 >< ? = $message ; ?> </h3></td>
</ tr >
< ? php
}
?>
< tr >
< td colspan = " 3 " align = " center " >< img src = " ./img/rub_pieces.png " width = " 577 " height = " 36 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Num & eacute ; ro identifiant Siren </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = substr ( $siren , 0 , 3 ) . ' ' . substr ( $siren , 3 , 3 ) . ' ' . substr ( $siren , 6 , 3 ) ?> </td>
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Raison Sociale </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = $raisonSociale ?> </td>
</ tr >
< tr >
< td colspan = " 3 " >& nbsp ; </ td >
</ tr >
< tr >
< td colspan = " 3 " >< img src = " ./img/srub_actes.png " width = " 576 " height = " 27 " /></ td >
</ tr >
< ?
$tabTmp = explode ( '-' , $option );
$option2 = implode ( '-' , array_splice ( $tabTmp , 0 , - 1 ));
2009-02-23 13:48:18 +00:00
if ( $action <> 'commande' && ! file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option . '.pdf' )) &&
! file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option2 . '.pdf' ))
2009-02-17 13:14:53 +00:00
&& ( $errNum == 6 || $errNum == 14 || $errNum == 25 || $errNum == 45 || $errNum == 999 ) )
include ( 'inpi.php' );
2009-02-23 13:48:18 +00:00
elseif ( $action <> 'commande' && ! file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option . '.pdf' )) &&
! file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option2 . '.pdf' ))) {
2009-02-17 13:14:53 +00:00
if ( ! $dejaCommande ) {
?>
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< font color = " Red " >< b >< ? if ( $errNum <> 17 ) { echo " Erreur N° $errNum - " ; } ?> <?=$tabErrInfoGref[$errNum]?><!--<?=$errMsg?>--></b></font></td>
</ tr >
< ?
} elseif ( $dejaCommande ) {
?>
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< font color = " Red " >< b >< ? = $message2 ?> </b></font></td>
</ tr >
< ?
}
if ( ! $dejaCommande && $errNum <> 17 && $errNum <> 23 && $errNum <> 26 && $errNum <> 27 ) {
?>
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< br />< br />< form action = " ./?page=greffes&action=commande&siret=<?= $siret ?>&id=<?= $id ?>&source=<?= $source ?> " method = " POST " >< input type = " checkbox " /> Recevoir le document directement par mail ( d & eacute ; lai approximatif de 24 heures ) < br />< br /> Adresse email du destinataire < input name = " email " type = " text " value = " <? if ( $_SESSION['tabInfo'] ['login']<>'testreunica' && $_SESSION['tabInfo'] ['login']<>'reunicacsf') echo $tabInfo['email'] ?> " size = " 20 " />& nbsp ; & nbsp ; & nbsp ; < input class = " imgButton " type = " image " src = " ./img/boutton_valider_off.gif " name = " submit " onmouseover = " this.src='./img/boutton_valider_on.gif' " onmouseout = " this.src='./img/boutton_valider_off.gif' " title = " Commander le document par e-mail... " ></ form ></ td >
</ tr >
< ?
} elseif ( $errNum == 17 ) {
?>
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 550 " colspan = " 2 " class = " StyleInfoData " >< br />< br />< form action = " ./?page=greffes&action=commande&siret=<?= $siret ?>&id=<?= $id ?>&source=<?= $source ?> " method = " POST " >< input type = " checkbox " /> Merci de pr<EFBFBD> ciser votre mail pour la livraison du document ( d & eacute ; lai approximatif de 24 heures ) < br />< br /> Adresse email du destinataire < input name = " email " type = " text " value = " <? if ( $_SESSION['tabInfo'] ['login']<>'testreunica' && $_SESSION['tabInfo'] ['login']<>'reunicacsf') echo $tabInfo['email'] ?> " size = " 20 " />& nbsp ; & nbsp ; & nbsp ; < input class = " imgButton " type = " image " src = " ./img/boutton_valider_off.gif " name = " submit " onmouseover = " this.src='./img/boutton_valider_on.gif' " onmouseout = " this.src='./img/boutton_valider_off.gif' " title = " Pr<EFBFBD> cisez votre e-mail... " ></ form ></ td >
</ tr >
< ?
}
}
elseif ( $action == 'commande' && ( $errNum == 999 ) )
include ( 'inpi.php' );
2009-02-23 13:48:18 +00:00
elseif ( $type == 'AC' && $option <> '' && ( file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option . '.pdf' )) || file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option2 . '.pdf' ))) ) {
if ( file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option2 . '.pdf' )))
2009-02-17 13:14:53 +00:00
$option = $option2 ;
/** Le document n'est pas dispo chez Infogreffe **/
?>
< tr >
< td width = " 580 " colspan = " 3 " >
< table style = " width:530px;margin-top:5px;margin-bottom:5px;margin-left:10px;margin-right:10px " class = " table-classic " >< tr class = " titre " >< td class = " titre " style = " width:70px " > Date </ td >< td align = " center " class = " titre " style = " width:200px " > Type </ td >< td align = " center " class = " titre " style = " width:260px " > D & eacute ; cisions </ td ></ tr >< ?
//$date=$dom_object->getValueFromTag('date_acte');
$typeActes [ 'a00' ] = 'MODIFICATION' ;
$typeActes [ 'a01' ] = 'MODIFICATION' ;
$typeActes [ 'a03' ] = 'CONSTITUTION' ;
$typeActes [ 'a04' ] = 'STATUTS CONSTITUTIFS' ;
$typeActes [ 'a06' ] = 'STATUTS A JOUR' ;
$typeActes [ 'a07' ] = 'STATUTS A JOUR' ;
$typeActes [ 'a09' ] = 'STATUTS APRES TRANSFERT DE SIEGE' ;
$typeActes [ 'a25' ] = 'AUGMENTATION DE CAPITAL' ;
$typeActes [ 'a39' ] = 'CHANGEMENT DE COMMISSAIRE AUX COMPTES' ;
$typeActes [ 'aAA' ] = 'ACTE' ;
$typeActes [ 'aAC' ] = 'ACTE RECTIFICATIF' ;
$typeActes [ 'aAD' ] = 'ACTE SOUS SEING PRIVE' ;
$typeActes [ 'aAK' ] = 'ATTESTATION BANCAIRE' ;
$typeActes [ 'aCA' ] = 'CERTIFICAT' ;
$typeActes [ 'aCD' ] = 'CONTRAT' ;
$typeActes [ 'aDB' ] = 'DECISION DE L\'ASSOCIE UNIQUE' ;
$typeActes [ 'aDC' ] = 'DECISION DES ASSOCIES' ;
$typeActes [ 'aDE' ] = 'DECLARATION DE CONFORMITE' ;
$typeActes [ 'aDH' ] = 'DECLARATION DE CONFORMITE (ART.374 L24/07/1966)' ;
$typeActes [ 'aDP' ] = 'DECISION DU PRESIDENT' ;
$typeActes [ 'aEB' ] = 'EXPEDITION NOTARIEE' ;
$typeActes [ 'aEC' ] = 'EXTRAIT DU PROCES-VERBAL' ;
$typeActes [ 'aFU' ] = 'PROJET DE FUSION' ;
$typeActes [ 'aLA' ] = 'LETTRE' ;
$typeActes [ 'aLB' ] = 'LISTE DES SIEGES SOCIAUX ANTERIEURS' ;
$typeActes [ 'aLD' ] = 'LETTRE DE NOMINATION' ;
$typeActes [ 'aOA' ] = 'ORDONNANCE' ;
$typeActes [ 'aOC' ] = 'ORDONNANCE DU PRESIDENT' ;
$typeActes [ 'aOD' ] = 'ORDONNANCE SUR REQUETE' ;
$typeActes [ 'aPA' ] = 'PROCES VERBAL' ;
$typeActes [ 'aPD' ] = 'PROCES VERBAL D\'ASSEMBLEE DU DIRECTOIRE' ;
$typeActes [ 'aPE' ] = 'PROCES VERBAL D\'ASSEMBLEE GENERALE' ;
$typeActes [ 'aPF' ] = 'PROCES VERBAL D\'ASSEMBLEE GENERALE EXTRAORDINAIRE' ;
$typeActes [ 'aPG' ] = 'PROCES VERBAL D\'ASSEMBLEE GENERALE ORDINAIRE' ;
$typeActes [ 'aPH' ] = 'PROCES VERBAL D\'ASSEMBLEE MIXTE' ;
$typeActes [ 'aPI' ] = 'PROCES VERBAL D\'ASSEMBLEES ORDINAIRE ET EXTRAORDINAIRE' ;
$typeActes [ 'aPM' ] = 'PROCES VERBAL DU CONSEIL D\'ADMINISTRATION' ;
$typeActes [ 'aPN' ] = 'PROCES VERBAL DU CONSEIL DE SURVEILLANCE' ;
$typeActes [ 'aPU' ] = 'PROJET DE FUSION' ;
$typeActes [ 'aPV' ] = 'PV D\'ASSEMBLEE' ;
$typeActes [ 'aR1' ] = 'CESSION DE PARTS (OU DONATION)' ;
$typeActes [ 'aRB' ] = 'RAPPORT COMMISSAIRE AUX COMPTES' ;
$typeActes [ 'aRE' ] = 'RAPPORT CR/CPTES TRANSFORM. STE' ;
$typeActes [ 'aRG' ] = 'RAPPORT DU COMMISSAIRE A LA FUSION' ;
$typeActes [ 'aRI' ] = 'RAPPORT DU COMMISSAIRE A LA TRANSFORMATION' ;
$typeActes [ 'aRK' ] = 'RAPPORT DU COMMISSAIRE AUX APPORTS' ;
$typeActes [ 'aRQ' ] = 'RAPPORT GERANCE' ;
$typeActes [ 'aTA' ] = 'TRAITE' ;
$typeActes [ 'aTC' ] = 'TRAITE DE FUSION' ;
$tabOptions = explode ( '-' , $option );
$acte = array ();
$acte [ 'type' ] = $typeActes [ 'a' . $tabOptions [ 0 ]];
$acte [ 'depot_num' ] = $tabOptions [ 6 ];
$dateAff = WDate :: dateT ( 'Ymd' , 'd/m/Y' , $tabOptions [ 1 ]);
?> <tr class="ligne"><td style="width:13%" class="titre"><?=$dateAff?></td><td style="width:39%;text-align:center" class="std"><u><a title="Cliquez ici pour visualiser le document correspondant" target="_blank" href="/?page=actes&siret=<?=$siret?>&ref=<?=$option?>"><?=$acte['type']?></a></u></td><td style="width:48%" class="last"><?=$acte['decisions']; if (trim($acte['decisions'])<>'') echo '<br/>';?>D<> p<EFBFBD> t num<75> ro
< ? = $acte [ 'depot_num' ] ?> </td></tr></table></td></tr>
</ table >< ?
// LOG DE LA PAGE
$O2 = $client2 -> setLog ( 'greffe_' . $vue , $siret , 0 , $option );
}
?>
</ table >
< ?
// Log de la page
$O2 = $client2 -> setLog ( 'greffe_' . $vue , $siret , 0 , " Erreur $errNum " );
} else { // Liste des "actes" Infogreffes ou d<> tail acte infogreffe
//if ($output=='pdf') $type=$type.'-pdf';
if ( $type == 'AC' && $option == '' ) { // Liste des actes Infogreffe
$vecteurTinit = false ;
$dom_object = new DomDocument2 ();
2009-02-23 08:05:19 +00:00
//TODO : V<> rfier que le fichier existe
2009-02-20 09:40:39 +00:00
$dom_object -> load ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier ));
2009-02-17 13:14:53 +00:00
$tabActes = array ();
// create DOMXPath object with our DOMObject
$xpath = new Domxpath ( $dom_object );
$result = $xpath -> query ( " //liste_depot_acte/depot_acte/. " );
foreach ( $result as $annonce ) {
// N<> Gestion
$title = $xpath -> query ( " num_gest/greffe " , $annonce );
$num_gest_greffe = $title -> item ( 0 ) -> nodeValue ;
$title = $xpath -> query ( " num_gest/dossier_millesime " , $annonce );
$num_gest_millesime = $title -> item ( 0 ) -> nodeValue ;
$title = $xpath -> query ( " num_gest/dossier_statut " , $annonce );
$num_gest_statut = $title -> item ( 0 ) -> nodeValue ;
$title = $xpath -> query ( " num_gest/dossier_chrono " , $annonce );
$num_gest_chrono = $title -> item ( 0 ) -> nodeValue ;
// Siren
$title = $xpath -> query ( " num_siren " , $annonce );
$num_siren = $title -> item ( 0 ) -> nodeValue ;
// N<> D<> p<EFBFBD> t
$title = $xpath -> query ( " num_depot " , $annonce );
$num_depot = $title -> item ( 0 ) -> nodeValue ;
// Date D<> p<EFBFBD> t
$title = $xpath -> query ( " date_depot " , $annonce );
$date_depot = $title -> item ( 0 ) -> nodeValue ;
// Actes
$actes = $xpath -> query ( " acte/. " , $annonce );
$nbVecteurT = $nbActes = 0 ;
foreach ( $actes as $acte ) {
$nbActes ++ ;
// Date
$title = $xpath -> query ( " date_acte " , $acte );
$date_acte = $title -> item ( 0 ) -> nodeValue ;
// N<>
$title = $xpath -> query ( " num_acte " , $acte );
$num_acte = $title -> item ( 0 ) -> nodeValue ;
// Type
$title = $xpath -> query ( " type_acte " , $acte );
$type_acte = $title -> item ( 0 ) -> nodeValue ;
// Type lib
$title = $xpath -> query ( " type_acte_libelle " , $acte );
$type_acte_libelle = $title -> item ( 0 ) -> nodeValue ;
// Nb Pages
$title = $xpath -> query ( " nbpages_acte " , $acte );
$nbpages_acte = $title -> item ( 0 ) -> nodeValue ;
// decision/nature
$title = $xpath -> query ( " decision/nature " , $acte );
$decision_nature = $title -> item ( 0 ) -> nodeValue ;
// decision/libelle
$title = $xpath -> query ( " decision/libelle " , $acte );
$decision_libelle = $title -> item ( 0 ) -> nodeValue ;
// mode_diffusion
$vecteurT = $vecteurC = false ;
$vecteurs = $xpath -> query ( " mode_diffusion/. " , $acte );
foreach ( $vecteurs as $vecteur ) {
$title = $xpath -> query ( " mode[@type='T'] " , $vecteur );
if ( $title -> length == 1 ) {
$vecteurT = true ;
$vecteurTinit = true ;
$nbVecteurT ++ ;
}
$title = $xpath -> query ( " mode[@type='C'] " , $vecteur );
if ( $title -> length == 1 ) $vecteurC = true ;
}
if ( $date_acte == '' ) $date = $date_depot ; else $date = $date_acte ;
// $index=0;
// while (isset($tabActes[$date.'.'.$index])) $index++;
$tabActes [ '' . $date . '-' . $num_depot . '-' . $num_acte . '-' . $type_acte /*$index*/ ] = array ( 'type' => $type_acte_libelle ,
'decisions' => $decision_libelle ,
'depot_num' => $num_depot ,
'depot_date' => $date_depot ,
'num_gest_greffe' => $num_gest_greffe ,
'num_gest_millesime' => $num_gest_millesime ,
'num_gest_statut' => $num_gest_statut ,
'num_gest_chrono' => $num_gest_chrono ,
'num_depot' => $num_depot ,
'num_acte' => $num_acte ,
'type_acte' => $type_acte ,
'vecteurT' => $vecteurT ,
'vecteurC' => $vecteurC ,
);
}
}
if ( ! $vecteurTinit ) {
$origine = 'G' ;
include ( 'inpi.php' );
}
if ( $vecteurTinit )
{ // Il y a au moins un acte en t<> l<EFBFBD> chargement
?>
< table width = " 580 " border = " 0 " align = " left " bgcolor = " #FFFFFF " >
< tr >
< td colspan = " 3 " align = " center " >< img src = " ./img/rub_pieces.png " width = " 577 " height = " 36 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Num & eacute ; ro identifiant Siren </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = substr ( $siren , 0 , 3 ) . ' ' . substr ( $siren , 3 , 3 ) . ' ' . substr ( $siren , 6 , 3 ) ?> </td>
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Raison Sociale </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = $raisonSociale ?> </td>
</ tr >
< tr >
< td colspan = " 3 " >& nbsp ; </ td >
</ tr >
< tr >
< td colspan = " 3 " >< img src = " ./img/srub_actes.png " width = " 576 " height = " 27 " /></ td >
</ tr >
< tr >
< td width = " 580 " colspan = " 3 " >
< table style = " width:530px;margin-top:5px;margin-bottom:5px;margin-left:10px;margin-right:10px " class = " table-classic " >< tr class = " titre " >< td class = " titre " style = " width:70px " > Date </ td >< td align = " center " class = " titre " style = " width:200px " > Type </ td >< td align = " center " class = " titre " style = " width:260px " > D & eacute ; cisions </ td ></ tr >< ?
krsort ( $tabActes );
foreach ( $tabActes as $date => $acte ) {
$date = WDate :: dateT ( 'Y-m-d' , 'd/m/Y' , substr ( $date , 0 , 10 ));
$dateRef = WDate :: dateT ( 'd/m/Y' , 'Ymd' , substr ( $date , 0 , 10 ));
$optionUrl = $acte [ 'type_acte' ] . " - $dateRef - " . $acte [ 'num_gest_greffe' ] . '-' . $acte [ 'num_gest_millesime' ] . '-' . $acte [ 'num_gest_statut' ] . '-' .
$acte [ 'num_gest_chrono' ] . '-' . $acte [ 'num_depot' ] . '-' . $acte [ 'num_acte' ];
?>
< tr class = " ligne " >
< td style = " width:13% " class = " titre " >< ? = $date ?> </td>
< td style = " width:39%;text-align:center " class = " std " >< ? = $acte [ 'type' ] ?>
< ? if ( $acte [ 'vecteurT' ]) {
2009-02-23 13:48:18 +00:00
if ( file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $optionUrl . '.pdf' )) &&
filesize ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $optionUrl . '.pdf' )) <> 0 ) echo '. ' ;
2009-02-17 13:14:53 +00:00
echo '<a href="./?page=greffes&vue=actes&siret=' . $siret . '&option=' . $optionUrl . '" title="Cliquez ici pour télécharger le document correspondant"><img src="/img/icone_pdf.gif"/></a>' ;
}
elseif ( $acte [ 'vecteurC' ]) {
2009-02-23 13:48:18 +00:00
if ( file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $optionUrl . '.pdf' )) &&
filesize ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $optionUrl . '.pdf' )) <> 0 )
2009-02-17 13:14:53 +00:00
echo '. <a href="./?page=greffes&vue=actes&siret=' . $siret . '&option=' . $optionUrl . '" title="Cliquez ici pour télécharger le document correspondant"><img src="/img/icone_pdf.gif"/></a>' ;
else
echo '<a href="./?page=greffes&vue=actes&siret=' . $siret . '&option=' . $optionUrl . '&vecteur=C" title="Cliquez ici pour commander le document correspondant"><img src="/img/icone_courrier.png"/></a>' ;
}
?> </td>
< td style = " width:48% " class = " last " >< ? = $acte [ 'decisions' ]; if ( trim ( $acte [ 'decisions' ]) <> '' ) echo '<br/>' ; ?> D<EFBFBD> p<EFBFBD> t num<75> ro
< ? = $acte [ 'depot_num' ] ?> du <?=WDate::dateT('Y-m-d','d/m/Y', $acte['depot_date'])?></td></tr>
< ?
}
echo '</table></td></tr>' ;
// LOG DE LA PAGE
$O2 = $client2 -> setLog ( 'greffe_' . $vue , $siret , 0 , $option );
if ( $nbVecteurT < $nbActes ) { // Tous les actes ne sont pas dispo en t<> l<EFBFBD> chargement, on propose donc l'acc<63> s INPI
/* $origine = 'G' ;
include ( 'inpi.php' ); */
?>
< tr >
< td align = " center " class = " StyleInfoData " colspan = " 3 " >< a href = " ./?<?= $_SERVER['QUERY_STRING'] ?>&vue=rcs " > Tous les actes ne sont pas disponibles en t & eacute ; l & eacute ; chargement imm<EFBFBD> diat .< br /> Cliquez - ici pour les commander en t & eacute ; l & eacute ; chargement diff & eacute ; r & eacute ; </ a ></ td >
</ tr >
< ?
}
echo '</table>' ;
}
}
elseif ( $type == 'ST' || ( $type == 'AC' && $option <> '' )) {
?>
< table width = " 580 " border = " 0 " align = " left " bgcolor = " #FFFFFF " >
< tr >
< td colspan = " 3 " align = " center " >< img src = " ./img/rub_pieces.png " width = " 577 " height = " 36 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Num & eacute ; ro identifiant Siren </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = substr ( $siren , 0 , 3 ) . ' ' . substr ( $siren , 3 , 3 ) . ' ' . substr ( $siren , 6 , 3 ) ?> </td>
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Raison Sociale </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = $raisonSociale ?> </td>
</ tr >
< tr >
< td colspan = " 3 " >& nbsp ; </ td >
</ tr >
< tr >
< td colspan = " 3 " >< img src = " ./img/srub_actes.png " width = " 576 " height = " 27 " /></ td >
</ tr >
< tr >
< td width = " 580 " colspan = " 3 " >
< table style = " width:530px;margin-top:5px;margin-bottom:5px;margin-left:10px;margin-right:10px " class = " table-classic " >< tr class = " titre " >< td class = " titre " style = " width:70px " > Date </ td >< td align = " center " class = " titre " style = " width:200px " > Type </ td >< td align = " center " class = " titre " style = " width:260px " > D & eacute ; cisions </ td ></ tr >< ?
$dom_object = new DomDocument2 ();
2009-02-20 09:40:39 +00:00
$dom_object -> load ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier ));
2009-02-17 13:14:53 +00:00
$acte [ 'type' ] = $dom_object -> getValueFromTag ( 'type_acte_libelle' );
$date = $dom_object -> getValueFromTag ( 'date_acte' );
$acte [ 'depot_num' ] = $dom_object -> getValueFromTag ( 'num_depot' );
$acte [ 'depot_date' ] = $dom_object -> getValueFromTag ( 'date_depot' );
$dateAff = WDate :: dateT ( 'Y-m-d' , 'd/m/Y' , substr ( $date , 0 , 10 ));
$acte [ 'url_acces' ] = $dom_object -> getValueFromTag ( 'url_acces' );
if ( substr ( $acte [ 'url_acces' ], 0 , 5 ) == 'null/' ) $acte [ 'url_acces' ] = 'http://webservices.infogreffe.fr/' . substr ( $acte [ 'url_acces' ], 5 , strlen ( $acte [ 'url_acces' ]) - 5 );
$nbPages = $dom_object -> getValueFromTag ( 'nbpages_acte' ) * 1 ;
if ( $nbPages > 0 ) $acte [ 'decisions' ] = " $nbPages pages " ;
?> <tr class="ligne"><td style="width:13%" class="titre"><?=$dateAff?></td><td style="width:39%;text-align:center" class="std"><u><a title="Cliquez ici pour visualiser le document correspondant" target="_blank" href="/?page=actes&siret=<?=$siret?>&ref=<?=$option?>"><?=$acte['type']?></a></u></td><td style="width:48%" class="last"><?=$acte['decisions']; if (trim($acte['decisions'])<>'') echo '<br/>';?>D<> p<EFBFBD> t num<75> ro
< ? = $acte [ 'depot_num' ] ?> du <?=WDate::dateT('Y-m-d','d/m/Y', $acte['depot_date'])?></td></tr></table></td></tr>
</ table >< ?
/* Si l'acte n'a pas encore <20> t<EFBFBD> t<> l<EFBFBD> charg<72> , on le t<> l<EFBFBD> charge */
2009-02-23 13:48:18 +00:00
if ( ! file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option . '.pdf' )) ||
filesize ( realpath ( dirname ( __FILE__ ) . '/../pdf/acte-' . $siren . '-' . $option . '.pdf' )) == 0 ) {
2009-02-17 13:14:53 +00:00
$page = getUrl ( $acte [ 'url_acces' ], '' , '' , '' , false , '' , '' , 0 , 1 );
if ( substr ( $page [ 'body' ], 0 , 4 ) <> '%PDF' ) {
$page2 = parse_response ( $page [ 'body' ]);
$body = $page2 [ 'body' ];
} else
$body = $page [ 'body' ];
2009-02-24 11:07:12 +00:00
$fp =@ fopen ( realpath ( dirname ( __FILE__ ) . '/../pdf/' ) . '/' . 'acte-' . $siren . '-' . $option . '.pdf' , 'w' );
2009-02-17 13:14:53 +00:00
@ fwrite ( $fp , $body );
@ fclose ( $fp );
}
// LOG DE LA PAGE
$O2 = $client2 -> setLog ( 'greffe_' . $vue , $siret , 0 , $option );
}
elseif ( $type == 'BS' || $type == 'BI' ) { // Bilan Image ou saisit
?>
< table width = " 580 " border = " 0 " align = " left " bgcolor = " #FFFFFF " >
< tr >
< td colspan = " 3 " align = " center " >< img src = " ./img/rub_pieces.png " width = " 577 " height = " 36 " /></ td >
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Num & eacute ; ro identifiant Siren </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = substr ( $siren , 0 , 3 ) . ' ' . substr ( $siren , 3 , 3 ) . ' ' . substr ( $siren , 6 , 3 ) ?> </td>
</ tr >
< tr >
< td width = " 30 " >& nbsp ; </ td >
< td width = " 200 " class = " StyleInfoLib " > Raison Sociale </ td >
< td width = " 350 " class = " StyleInfoData " >< ? = $raisonSociale ?> </td>
</ tr >
< tr >
< td colspan = " 3 " >& nbsp ; </ td >
</ tr >
< tr >
< td colspan = " 3 " >< img src = " ./img/srub_comptes_ann.png " width = " 576 " height = " 27 " /></ td >
</ tr >
< tr >
< td width = " 580 " colspan = " 3 " >
< table style = " width:530px;margin-top:5px;margin-bottom:5px;margin-left:10px;margin-right:10px " class = " table-classic " >< tr class = " titre " >< td class = " titre " style = " width:70px " > Date de cl & ocirc ; ture </ td >< td align = " center " class = " titre " style = " width:200px " > Type </ td >< td align = " center " class = " titre " style = " width:260px " > D & eacute ; cisions </ td ></ tr >< ?
$dom_object = new DomDocument2 ();
2009-02-20 09:40:39 +00:00
$dom_object -> load ( realpath ( dirname ( __FILE__ ) . '/../infogreffe/xml/' . $fichier ));
2009-02-17 13:14:53 +00:00
$tabActes = array ();
// create DOMXPath object with our DOMObject
$xpath = new Domxpath ( $dom_object );
if ( $type == 'BS' ) $result = $xpath -> query ( " //listeBilanSaisi/bilanSaisi/. " );
elseif ( $type == 'BI' ) $result = $xpath -> query ( " //bilan_complet/. " );
foreach ( $result as $annonce ) {
// N<> Gestion
$title = $xpath -> query ( " num_gest/greffe " , $annonce );
$num_gest_greffe = $title -> item ( 0 ) -> nodeValue ;
$title = $xpath -> query ( " num_gest/dossier_millesime " , $annonce );
$num_gest_millesime = $title -> item ( 0 ) -> nodeValue ;
$title = $xpath -> query ( " num_gest/dossier_statut " , $annonce );
$num_gest_statut = $title -> item ( 0 ) -> nodeValue ;
$title = $xpath -> query ( " num_gest/dossier_chrono " , $annonce );
$num_gest_chrono = $title -> item ( 0 ) -> nodeValue ;
// Siren
$title = $xpath -> query ( " num_siren " , $annonce );
$num_siren = $title -> item ( 0 ) -> nodeValue ;
// N<> D<> p<EFBFBD> t
$title = $xpath -> query ( " num_depot " , $annonce );
$num_depot = $title -> item ( 0 ) -> nodeValue ;
// Date cl<63> ture
$title = $xpath -> query ( 'date_cloture' , $annonce ); // 2005-12-31
$date_cloture = $title -> item ( 0 ) -> nodeValue ;
// liasse
$title = $xpath -> query ( 'liasse' , $annonce ); // 2033
$liasse = $title -> item ( 0 ) -> nodeValue ;
// type de comptes
$title = $xpath -> query ( 'type_comptes' , $annonce ); // sociaux
$type_comptes = $title -> item ( 0 ) -> nodeValue ;
// millesime
$title = $xpath -> query ( 'millesime' , $annonce ); // 2005
$millesime = $title -> item ( 0 ) -> nodeValue ;
// url_acces
$title = $xpath -> query ( 'url_acces' , $annonce );
$url_acces = $title -> item ( 0 ) -> nodeValue ;
if ( substr ( $url_acces , 0 , 5 ) == 'null/' ) $url_acces = 'http://webservices.infogreffe.fr/' . substr ( $url_acces , 5 , strlen ( $url_acces ) - 5 );
// mode_diffusion
$vecteurT = $vecteurC = false ;
$vecteurs = $xpath -> query ( " mode_diffusion/. " , $annonce );
foreach ( $vecteurs as $vecteur ) {
$title = $xpath -> query ( " mode[@type='T'] " , $vecteur );
if ( $title -> length == 1 ) $vecteurT = true ;
$title = $xpath -> query ( " mode[@type='C'] " , $vecteur );
if ( $title -> length == 1 ) $vecteurC = true ;
}
$tabActes [ '' . $type_comptes . '-' . $date_cloture ] = array ( 'num_gest_greffe' => $num_gest_greffe ,
'num_gest_millesime' => $num_gest_millesime ,
'num_gest_statut' => $num_gest_statut ,
'num_gest_chrono' => $num_gest_chrono ,
'num_depot' => $num_depot ,
'liasse' => $liasse ,
'millesime' => $millesime ,
'type_comptes' => $type_comptes ,
'date_cloture' => $date_cloture ,
'url_acces' => $url_acces ,
'vecteurT' => $vecteurT ,
'vecteurC' => $vecteurC ,
);
}
foreach ( $tabActes as $typeMillesime => $bilan ) {
if ( $type == 'BS' ) $dateClot = WDate :: dateT ( 'Y-m-d' , 'd/m/Y' , $bilan [ 'date_cloture' ]);
elseif ( $type == 'BI' ) $dateClot = $bilan [ 'date_cloture' ];
$dateRef = WDate :: dateT ( 'd/m/Y' , 'Ymd' , $dateClot );
$optionUrl = $bilan [ 'millesime' ] . '_' . $bilan [ 'type_comptes' ] . '-' . $dateRef . '-' . $bilan [ 'num_gest_greffe' ] . '-' . $bilan [ 'num_gest_millesime' ] . '-' . $bilan [ 'num_gest_statut' ] . '-' .
$bilan [ 'num_gest_chrono' ] . '-' . $bilan [ 'num_depot' ];
?>
< tr class = " ligne " >
< td style = " width:13% " class = " titre " >< ? = $dateClot ?> </td>
< td style = " width:39%;text-align:center " class = " std " >< ? php
if ( $option <> '' ) {
/* Si l'acte n'a pas encore <20> t<EFBFBD> t<> l<EFBFBD> charg<72> , on le t<> l<EFBFBD> charge */
2009-02-23 13:48:18 +00:00
if ( ! file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/bilan-' . $siren . '-' . $option . '.pdf' )) ||
filesize ( realpath ( dirname ( __FILE__ ) . '/../pdf/bilan-' . $siren . '-' . $option . '.pdf' )) == 0 ) {
2009-02-17 13:14:53 +00:00
$page = getUrl ( $bilan [ 'url_acces' ], '' , '' , '' , false , '' , '' , 0 , 1 );
//die($bilan['url_acces'].'<br/><br/>'.print_r($page));
if ( substr ( $page [ 'body' ], 0 , 4 ) <> '%PDF' ) {
$page2 = parse_response ( $page [ 'body' ]);
$body = $page2 [ 'body' ];
} else
$body = $page [ 'body' ];
2009-02-24 11:07:12 +00:00
$fp =@ fopen ( realpath ( dirname ( __FILE__ ) . '/../pdf/' ) . '/' . 'bilan-' . $siren . '-' . $option . '.pdf' , 'w' );
2009-02-17 13:14:53 +00:00
@ fwrite ( $fp , $body );
@ fclose ( $fp );
}
?> <u><a title="Cliquez ici pour visualiser la copie intégrale des comptes" target="_blank" href="/?page=actes&siret=<?=$siret?>&ref=bilan-<?=$option?>">Comptes <?=$bilan['type_comptes']?> millésime <?=$bilan['millesime']; if ($type=='BS') echo '<br/>(liasse '.$bilan['liasse'].')';?></a></u><?
} else {
/** Liste des comptes d<EFBFBD> pos<EFBFBD> s
**/
?> Comptes <?=$bilan['type_comptes']?> millésime <?=$bilan['millesime']; if ($type=='BS') echo '<br/>(liasse '.$bilan['liasse'].')';?> <?
if ( $bilan [ 'vecteurT' ]) {
echo '<a href="./?page=greffes&vue=bilans&siret=' . $siret . '&option=' . $optionUrl . '" title="Cliquez ici pour télécharger la copie intégrale des comptes">' ;
2009-02-23 13:48:18 +00:00
if ( file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/bilan-' . $siren . '-' . $optionUrl . '.pdf' )) &&
filesize ( realpath ( dirname ( __FILE__ ) . '/../pdf/bilan-' . $siren . '-' . $optionUrl . '.pdf' )) <> 0 ) echo ' .' ;
2009-02-17 13:14:53 +00:00
echo '<img src="/img/icone_pdf.gif"/></a>' ;
}
elseif ( $bilan [ 'vecteurC' ]) {
2009-02-23 13:48:18 +00:00
if ( file_exists ( realpath ( dirname ( __FILE__ ) . '/../pdf/bilan-' . $siren . '-' . $optionUrl . '.pdf' )) &&
filesize ( realpath ( dirname ( __FILE__ ) . '/../pdf/bilan-' . $siren . '-' . $optionUrl . '.pdf' )) <> 0 )
2009-02-17 13:14:53 +00:00
echo '<a href="./?page=greffes&vue=bilans&siret=' . $siret . '&option=' . $optionUrl . '" title="Cliquez ici pour télécharger la copie intégrale des comptes"> .<img src="/img/icone_pdf.gif"/></a>' ;
else
echo '<a href="./?page=greffes&vue=bilans&siret=' . $siret . '&option=' . $optionUrl . '&vecteur=C" title="Cliquez ici pour commander la copie intégrale des comptes"><img src="/img/icone_courrier.png"/></a>' ;
}
}
?> </td>
< td style = " width:48% " class = " last " > D & eacute ; p & ocirc ; t num & eacute ; ro < ? = $bilan [ 'num_depot' ] ?> .</td></tr>
< ?
}
// LOG DE LA PAGE
echo '</table></td></tr></table>' ;
// LOG DE LA PAGE
$O2 = $client2 -> setLog ( 'greffe_' . $vue , $siret , 0 , $option );
}
2009-02-20 09:40:39 +00:00
elseif ( file_exists ( realpath ( dirname ( __FILE__ ) . " /../infogreffe/xsl/ $type .xsl " ))) {
2009-02-24 15:51:47 +00:00
exec ( " /usr/bin/xsltproc " . realpath ( dirname ( __FILE__ ) . " /../infogreffe/xsl/ $type .xsl " ) . " " . realpath ( dirname ( __FILE__ ) . " /../infogreffe/xml/ $fichier " ), $output );
2009-02-17 13:14:53 +00:00
$output = implode ( '' , $output );
$output = str_replace ( '<html xmlns:fo="http://www.w3.org/1999/XSL/Format"><head><meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1"><link rel="stylesheet" type="text/css" href="/infogreffe/styles/infogreffe_base.css"><link rel="stylesheet" type="text/css" href="/infogreffe/styles/infogreffe.css"><title>Extrait RCS</title><script type="text/javascript" src="/infogreffe/js/tools.js"></script></head><body class="simple" onload="adapterDimensions(\'conteneur\');">' , '' , $output );
$output = str_replace ( '</body></html><script>function PrivoxyWindowOpen(a, b, c){return(window.open(a, b, c));}</script>' , '' , $output );
$output = preg_replace_callback ( " /((?:[0-9] { 9,9})|(?:[0-9] { 3,3} [0-9] { 3,3} [0-9] { 3,3})|(?:[0-9] { 3,3} \ .[0-9] { 3,3} \ .[0-9] { 3,3})|(?:[0-9] { 3,3}-[0-9] { 3,3}-[0-9] { 3,3}))/ " , replace_siren , $output );
echo $output ;
// LOG DE LA PAGE
$O2 = $client2 -> setLog ( 'greffe_' . $vue , $siret , 0 , $option );
}
else {
echo " <pre> $xml </pre> " ;
// LOG DE LA PAGE
$O2 = $client2 -> setLog ( 'greffe_' . $vue , $siret , 0 , $option );
}
}
}
//echo '</table>';
}
class DomDocument2 extends DOMDocument {
function getValueFromTag ( $tagName ) {
$items = $this -> getElementsByTagName ( $tagName );
foreach ( $items as $item ) {
return utf8_decode ( $item -> nodeValue );
}
}
}
?>
