/[openfoncier]/trunk/app/sitadel.php
ViewVC logotype

Diff of /trunk/app/sitadel.php

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 186 by fraynaud, Tue Oct 11 10:48:12 2011 UTC revision 190 by fraynaud, Wed Oct 12 10:33:29 2011 UTC
# Line 47  if($validation==0){ Line 47  if($validation==0){
47      echo "</select>";      echo "</select>";
48      echo "<br><br><input type='submit' value='export SITADEL'>";      echo "<br><br><input type='submit' value='export SITADEL'>";
49      echo "<br><br></form>";      echo "<br><br></form>";
50      }else{   // ===================== extraction =================================
 }else {   // ===================== extraction =================================  
   
51      $correct=true;      $correct=true;
52      $longueurenregistrement= 0 ; // a calculer      $longueurenregistrement= 0 ; // a calculer
53      //$nombreenregistrement=1; // l entete est compt�e dans le nombre enregistrement      //$nombreenregistrement=1; // l entete est compt�e dans le nombre enregistrement
54      if($_POST["datedebut"]=="")$correct=false;      if($_POST["datedebut"]=="")
55      if($_POST["datefin"]=="") $correct=false;          $correct=false;
56      $correct=true; // a enlever apres test      else
57            $datedebut = substr($_POST["datedebut"],6,4).
58                        "-".substr($_POST["datedebut"],3,2)."-".
59                        substr($_POST["datedebut"],0,2);
60        if($_POST["datefin"]=="")
61            $correct=false;
62        else
63            $datefin = substr($_POST["datefin"],6,4).
64                        "-".substr($_POST["datefin"],3,2)."-".
65                        substr($_POST["datefin"],0,2);
66        //$correct=true; // a enlever apres test
67      if ($correct==true){ // ***      if ($correct==true){ // ***
68      // dossiers concern�s          // dossiers concern�s
69      $sql= "select * from dossier";          $sql= "select * from dossier";
70      $sql.= " where (nature='PC' or nature = 'PD' or nature = 'PA' or nature = 'DP')";          $sql.= " where (nature='PC' or nature = 'PD' or nature = 'PA' or nature = 'DP')";
71            //$sql.= " AND ((date_depot>='".$this->datedebut."' AND date_depot<='".$this->datefin."')";          $sql.= " AND ((date_depot >='".$datedebut."' AND date_depot<='".$datefin."')";
72            //$sql.= " OR (date_decision>='".$this->datedebut."' AND date_decision<='".$this->datefin."'))";          $sql.= " OR (date_decision>='".$datedebut."' AND date_decision<='".$datefin."')";
73      $sql.= " and dossier = 'PC11R0004'";          $sql.= " OR (date_chantier>='".$datedebut."' AND date_chantier<='".$datefin."'))";
74      $res = $f->db -> query ($sql);          $sql.= " order by date_depot";
75      $f->isDatabaseError($res);          //$sql.= " and dossier = 'PC11R000402'";
76      while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){          $res = $f->db -> query ($sql);
77          // initialisation          $f->isDatabaseError($res);
78          $g = new sitadel($row['dossier']);          $export="";
79          $g->row=$row;          while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
80          // sitadel              // initialisation
81          $g->val=$val;              $g = new sitadel($row['dossier']);
82          // parametre              $g->row=$row;
83          $sql = "select parametre, valeur from statistique where dossier ='".$row['dossier']."'";              // sitadel
84          $res1 = $f->db -> query ($sql);              $g->val=$val;
85          $f->isDatabaseError($res1);              // parametre
86          while ($row1=& $res1->fetchRow(DB_FETCHMODE_ASSOC)){              $sql = "select parametre, valeur from statistique where dossier ='".$row['dossier']."'";
87              $g->parametre[$row1['parametre']]=$row1['valeur'];              $res1 = $f->db -> query ($sql);
88          }              $f->isDatabaseError($res1);
89          print_r($g->parametre);                            while ($row1=& $res1->fetchRow(DB_FETCHMODE_ASSOC)){
90          $departement =$f->collectivite["departement"];                  $g->parametre[$row1['parametre']]=$row1['valeur'];
91          $commune =$f->collectivite["commune"];              }            
92          $region =$f->collectivite["region"];              $departement =$f->collectivite["departement"];
93          // depot              $commune =$f->collectivite["commune"];
94          $depot="";              $region =$f->collectivite["region"];
95          // type different de transfert              // depot
96          if($row['types']!='Transfert'){              $depot="";
97              $depot.=$g->entete("DEPOT",$departement,$commune);              // type different de transfert
98              $depot.=$g->etatcivil();              if($row['types']!='Transfert'
99              $depot.=$g->adresse();                  and (($row['date_depot'] >= $datedebut
100              $depot.=$g->delegataire();                  and $row['date_depot']<=$datefin)
101              $depot.=$g->adresse_terrain();                              or  ($row['date_decision'] >= $datedebut
102              $depot.=$g->parcelle();                  and $row['date_decision']<=$datefin))){
103              // ===========================                  $depot.=$g->entete("DEPOT",$departement,$commune);
104              // contrat maison individuelle                  $depot.=$g->etatcivil();
105              // ===========================                  $depot.=$g->adresse();
106              // sitadel : contrat|                  $depot.=$g->delegataire();
107              // openfoncier : non renseigne                  $depot.=$g->meltel($row['types']);
108              $depot.= $g->p('contrat')."|";                  $depot.=$g->adresse_terrain();            
109              // ==========                  $depot.=$g->parcelle();
110              // architecte                  // ===========================
111              // ==========                  // contrat maison individuelle
112              // sitadel : architecte|                  // ===========================
113              // openfoncier : architecte >0                          // sitadel : contrat|
114              if($row['architecte']>0)                  // openfoncier : non renseigne
115                  $depot.= "1|";                  $depot.= $g->p('contrat')."|";
116              else                  // ==========
117                  $depot.= "0|";                  // architecte
118              // =====================                  // ==========
119              // utilisation data cnil                  // sitadel : architecte|
120              // ======================                  // openfoncier : architecte >0        
121              // sitadel : cnil                  if($row['architecte']>0)
122              // openfoncier : non renseigne                      $depot.= "1|";
123              $depot.= $g->p('cnil');                  else
124              // fin d enregistrement depot                              $depot.= "0|";
125              $depot.="\n";                  // =====================
126          }                  // utilisation data cnil
127                    // ======================
128          //decision                  // sitadel : cnil
129          // type different de modificatif                  // openfoncier : non renseigne
130          if($row['types']!='Modificatif'){                  $depot.= $g->p('cnil');
131                    // fin d enregistrement depot        
132                    $depot.="\n";
133                }
134        
135                // transfert
136                $transfert ="";
137                if($row['types']=='Transfert'
138                    and $row['date_depot'] >= $datedebut
139                    and $row['date_depot']<=$datefin){
140                    $transfert.=$g->entete("TRANSFERT",$departement,$commune);
141                    $transfert.=$g->etatcivil();
142                    $transfert.=$g->adresse();
143                    $transfert.=$g->meltel($row['types']);
144                    $transfert.="\n";
145                }
146        
147        
148                //decision
149                // type different de modificatif
150              $decision="";              $decision="";
151              $avis_sitadel="";              if($row['types']!='Modificatif' and $row['types']!='Transfert'){
152              $avis_sitadel_motif="";                  $avis_sitadel="";
153              // enregistrement decision dans tous les cas                  $avis_sitadel_motif="";
154              $decision.=$g->entete("DECISION",$departement,$commune);                  // enregistrement decision dans tous les cas
155              //if ($row['date_decision']== '0000-00-00'                  $decision.=$g->entete("DECISION",$departement,$commune);
156              //    or !isset($row['date_decision'])){                  //if ($row['date_decision']== '0000-00-00'
157              if(isset($row['date_decision']) or $row['date_decision']==""){                  //    or !isset($row['date_decision'])){
158                  // avis_sitadel et avis_sitadel_motif                  //if(isset($row['date_decision']) and $row['date_decision']!=""){
159                  if($row['avis']!=''){                      // avis_sitadel et avis_sitadel_motif
160                      $avis_sitadel = 0;                      if($row['avis']!=''){
161                      $avis_sitadel_motif=0 ;                          $avis_sitadel = "0";
162                      $sql="select sitadel, sitadel_motif from avis where avis ='".                          $avis_sitadel_motif="0" ;
163                              $row['avis']."'";                          $sql="select sitadel, sitadel_motif from avis where avis ='".
164                      $res1 = $f->db -> query ($sql);                                  $row['avis']."'";
165                      $f->isDatabaseError($res1);                          $res1 = $f->db -> query ($sql);
166                      while ($row1=& $res1->fetchRow(DB_FETCHMODE_ASSOC)){                          $f->isDatabaseError($res1);
167                          $avis_sitadel = $row1['sitadel'];                          while ($row1=& $res1->fetchRow(DB_FETCHMODE_ASSOC)){
168                          $avis_sitadel_motif = $row1['sitadel_motif'];                              $avis_sitadel = $row1['sitadel'];
169                      }                              $avis_sitadel_motif = $row1['sitadel_motif'];
170                      $decision.= $g->decision_groupe1($avis_sitadel,$avis_sitadel_motif);                          }
171                  }                          $decision.= $g->decision_groupe1($avis_sitadel,$avis_sitadel_motif);
172                  // si la decision est favorable, envoi des informations statistiques                      }else
173                  if($avis_sitadel==2  or $avis_sitadel==4                          $decision.= $g->decision_groupe1("0",""); // pas d avis
174                         or $avis_sitadel==5){                      // si la decision est favorable, envoi des informations statistiques
175                      // si decision favorable, expresse ou tacite GROUPE 2                      if($avis_sitadel==2  or $avis_sitadel==4
176                      $decision.= $g->amenagement();                             or $avis_sitadel==5){
177                      if($row['travaux']!=''){                          // si decision favorable, expresse ou tacite GROUPE 2
178                          $sql= "select codelascot,libelle                          $decision.= $g->terrain();
179                              from travaux where travaux=".$row['travaux'];                          $decision.= $g->amenagement();
180                          $res2 = $f->db -> query ($sql);                          if($row['travaux']!=''){
181                          $f->isDatabaseError($res2);                              $sql= "select codelascot,libelle
182                          while ($row2=& $res2->fetchRow(DB_FETCHMODE_ASSOC)){                                  from travaux where travaux=".$row['travaux'];
183                              $travaux = $row2['libelle'];                              $res2 = $f->db -> query ($sql);
184                              $lascot = $row2['codelascot'];                              $f->isDatabaseError($res2);
185                                while ($row2=& $res2->fetchRow(DB_FETCHMODE_ASSOC)){
186                                    $travaux = $row2['libelle'];
187                                    $lascot = $row2['codelascot'];
188                                }
189                                $decision.= $g->travaux($travaux,$lascot, $row['types']);
190                          }                          }
191                          $decision.= $g->travaux($travaux,$lascot);                          $sql3="select * from destination_shon where dossier = '".
192                                    $row['dossier']."' order by destination";
193                            $res3 = $f->db -> query ($sql3);
194                            $f->isDatabaseError($res3);
195                            $temp = array();
196                            while ($row3=& $res3->fetchRow(DB_FETCHMODE_ASSOC)){
197                                $shonant[$row3['destination']]=$row3["shon_anterieure"];
198                                $shondem[$row3['destination']]=$row3["shon_demolie"];
199                                $shonanttr[$row3['destination']]=$row3["shon_anterieure_supprimee"];
200                                $shonprojtr[$row3['destination']]=$row3["shon_nouvelle_transformee"];
201                                $shoncr1[$row3['destination']]=$row3["shon_nouvelle"];
202                                $shoncr2[$row3['destination']]=$row3["shon_shob_transformee"];
203                            }
204                            $decision.= $g->destination($shonant);
205                            $decision.= $g->destination($shondem);
206                            $decision.= $g->destination($shonanttr);
207                            $decision.= $g->destination($shonprojtr);
208                            $decision.= $g->destination($shoncr1);
209                            $decision.= $g->destination($shoncr2);
210                            
211                            $decision.= $g->descriptif($row['types']);  
212                      }                      }
213                      $sql3="select * from destination_shon where dossier = '".                  //}else
214                              $row['dossier']."' order by destination";                  //    $decison.= "|0***"; // avis = 0 si pas de decision      
215                      $res3 = $f->db -> query ($sql3);              $decision.="\n";
216                      $f->isDatabaseError($res3);              }
217                      $temp = array();      
218                      while ($row3=& $res3->fetchRow(DB_FETCHMODE_ASSOC)){              // modificatif
219                          $shonant[$row3['destination']]=$row3["shon_anterieure"];              $modificatif='';
220                          $shondem[$row3['destination']]=$row3["shon_demolie"];              if($row['types']=='Modificatif'
221                          $shonanttr[$row3['destination']]=$row3["shon_anterieure_supprimee"];                  and $row['date_depot'] >= $datedebut
222                          $shonprojtr[$row3['destination']]=$row3["shon_nouvelle_transformee"];                  and $row['date_depot']<=$datefin){  
223                          $shoncr1[$row3['destination']]=$row3["shon_nouvelle"];                  $modificatif.=$g->entete("MODIFICATIF",$departement,$commune);
224                          $shoncr2[$row3['destination']]=$row3["shon_shob_transformee"];                  if(isset($row['date_decision']) or $row['date_decision']==""){
225                        // avis_sitadel et avis_sitadel_motif
226                        if($row['avis']!=''){
227                            $avis_sitadel = 0;
228                            $avis_sitadel_motif=0 ;
229                            $sql="select sitadel, sitadel_motif from avis where avis ='".
230                                    $row['avis']."'";
231                            $res1 = $f->db -> query ($sql);
232                            $f->isDatabaseError($res1);
233                            while ($row1=& $res1->fetchRow(DB_FETCHMODE_ASSOC)){
234                                $avis_sitadel = $row1['sitadel'];
235                                $avis_sitadel_motif = $row1['sitadel_motif'];
236                            }
237                            $modificatif.= $g->decision_groupe1($avis_sitadel,$avis_sitadel_motif);
238                      }                      }
239                      $decision.= $g->destination($shonant);                      // si la decision est favorable, envoi des informations statistiques
240                      $decision.= $g->destination($shondem);                      if($avis_sitadel==2  or $avis_sitadel==4
241                      $decision.= $g->destination($shonanttr);                             or $avis_sitadel==5){
242                      $decision.= $g->destination($shonprojtr);                          // si decision favorable, expresse ou tacite GROUPE 2
243                      $decision.= $g->destination($shoncr1);                          $modificatif.=$g->adresse_terrain();    //***
244                      $decision.= $g->destination($shoncr2);                          $modificatif.=$g->parcelle();    //***
245                                                $modificatif.=$g->terrain();    //***
246                      $decision.= $g->descriptif();                          if($row['travaux']!=''){
247                      $decision.="\n";                              $sql= "select codelascot,libelle
248                 }                                  from travaux where travaux=".$row['travaux'];
249              }                                $res2 = $f->db -> query ($sql);
250          }                              $f->isDatabaseError($res2);
251                                        while ($row2=& $res2->fetchRow(DB_FETCHMODE_ASSOC)){
252          // suivi DOC : mettre le test date                                  $travaux = $row2['libelle'];
253          $suivi1="";                                  $lascot = $row2['codelascot'];
254          // enregistrement decision dans tous les cas                              }
255          // $nombreenregistrement++;                              $modificatif.= $g->travaux($travaux,$lascot, $row['types']);
256          $suivi1.=$g->entete("SUIVI",$departement,$commune);                          }
257          $suivi1.=$g->chantier();                          $sql3="select * from destination_shon where dossier = '".
258          $suivi1.="\n";                                  $row['dossier']."' order by destination";
259                                    $res3 = $f->db -> query ($sql3);
260          // suivi DAT : mettre le test date                          $f->isDatabaseError($res3);
261          $suivi2="";                          $temp = array();
262          // enregistrement decision dans tous les cas                          while ($row3=& $res3->fetchRow(DB_FETCHMODE_ASSOC)){
263          // $nombreenregistrement++;                              $shonant[$row3['destination']]=$row3["shon_anterieure"];
264          $suivi2.=$g->entete("SUIVI",$departement,$commune);                              $shondem[$row3['destination']]=$row3["shon_demolie"];
265          $suivi2.=$g->achevement();                              $shonanttr[$row3['destination']]=$row3["shon_anterieure_supprimee"];
266          $suivi2.="\n";                              $shonprojtr[$row3['destination']]=$row3["shon_nouvelle_transformee"];
267                                $shoncr1[$row3['destination']]=$row3["shon_nouvelle"];
268          // transfert                              $shoncr2[$row3['destination']]=$row3["shon_shob_transformee"];
269          $transfert ="";                          }
270                            $modificatif.= $g->destination($shonant);
271          // modificatif                          $modificatif.= $g->destination($shondem);
272          $modificatif='';                          $modificatif.= $g->destination($shonanttr);
273                            $modificatif.= $g->destination($shonprojtr);
274                            $modificatif.= $g->destination($shoncr1);
275                            $modificatif.= $g->destination($shoncr2);
276                            
277                            $modificatif.= $g->descriptif($row['types']);
278                            $modificatif.="\n";
279                       }
280                    }  
281                }
282                
283                // suivi DOC
284                $suivi1="";
285                if($row['date_chantier'] >= $datedebut and $row['date_chantier']<=$datefin){  
286                    $suivi1.=$g->entete("SUIVI",$departement,$commune);
287                    $suivi1.=$g->chantier();
288                    $suivi1.="\n";
289                }
290                // suivi DAT
291                $suivi2="";
292                if($row['date_achevement'] >= $datedebut and $row['date_achevement']<=$datefin){  
293                    $suivi2.=$g->entete("SUIVI",$departement,$commune);
294                    $suivi2.=$g->achevement();
295                    $suivi2.="\n";
296                }
297                // export      
298                $export.=$depot.$decision.$transfert.$modificatif.$suivi1.$suivi2;
299            } // fin while  
300          // ***************************************          // ***************************************
301          // entete de l enregistrement page 8 et 9          // entete de l enregistrement page 8 et 9
302          // ***************************************            // ***************************************  
# Line 216  if($validation==0){ Line 306  if($validation==0){
306          $fichiertransmis = date('ymj').$departement.$commune;          $fichiertransmis = date('ymj').$departement.$commune;
307          $longueurenregistrement= 0 ; // a calculer ***  enregistrement le plus long          $longueurenregistrement= 0 ; // a calculer ***  enregistrement le plus long
308          $entete = "SITADEL|".$departement."|".$commune."|".$region."|".$fichiertransmis."|".$numero."|";          $entete = "SITADEL|".$departement."|".$commune."|".$region."|".$fichiertransmis."|".$numero."|";
309          // calcul enregistrement le plus long          // calcul enregistrement le plus long      
         $export="";  
         $export=$depot.$decision.$suivi1.$suivi2.$transfert.$modificatif;  
310          if(CHARSET=='UTF8'){          if(CHARSET=='UTF8'){
311              $export=utf8_decode($export);              $export=utf8_decode($export);
312          }          }
# Line 229  if($validation==0){ Line 317  if($validation==0){
317          for($i=0;$i<sizeof($nbenr);$i++){          for($i=0;$i<sizeof($nbenr);$i++){
318                // mb_strlen( variable,encoding) PHP 4 >= 4.0.6, PHP 5                // mb_strlen( variable,encoding) PHP 4 >= 4.0.6, PHP 5
319                // Le param�tre encoding est l'encodage des caract�res.                // Le param�tre encoding est l'encodage des caract�res.
320                // S'il est omis, l'encodage de caractres interne sera utilis�.                // S'il est omis, l'encodage de caracteres interne sera utilis�.
321                $tmp[$i] = strlen($nbenr[$i]);                $tmp[$i] = strlen($nbenr[$i]);
322                //echo strlen($nbenr[$i])." ".$nbenr[$i]."<br>";                //echo strlen($nbenr[$i])." ".$nbenr[$i]."<br>";
323                $cpt++;                $cpt++;
# Line 261  if($validation==0){ Line 349  if($validation==0){
349              $affiche="";              $affiche="";
350              $affiche= str_replace("\n","<br>",$export);              $affiche= str_replace("\n","<br>",$export);
351              echo $affiche;              echo $affiche;
352          }                  }              
           
   
   
         //if($DEBUG==1){  
         //    echo $depot."<br>";  
         //    echo $decision."<br>";  
         //    echo $suivi1."<br>";  
         //    echo $suivi2."<br>";  
         //}  
       
           
     }  
       
       
           
       
 /*  
353    
         while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){  
   
   
   
   
         // ==================================================================================  
         // evenement de decision sur une p�riode      *** DECISION ***  
         // ==================================================================================  
         $sql= "select annee, dossier.dossier, dossier.nature,  
                terrain_surface, amenagement, travaux.libelle as travaux_libelle,  
                shon,logement_nombre, piece_nombre,  
                date_decision, avis.sitadel as avis_sitadel, avis.sitadel_motif as avis_sitadel_motif,  
                travaux.codelascot as lascot  
                from dossier left join travaux on dossier.travaux=travaux.travaux  
                left join avis on avis.avis= dossier.avis";  
         $sql.= " where date_decision>='".substr($_POST["datedebut"],6,4).  
                "-".substr($_POST["datedebut"],3,2)."-".  
                substr($_POST["datedebut"],0,2)."'";  
         $sql.= " AND date_decision<='".substr($_POST["datefin"],6,4).  
                "-".substr($_POST["datefin"],3,2)."-".  
                substr($_POST["datefin"],0,2)."'";  
         $sql.= " AND (dossier.nature='PC' or dossier.nature = 'PD' or dossier.nature = 'PA' or dossier.nature = 'DP')";  
         $sql.= " AND types != 'Modificatif'";  
         echo "<BR><br><font style='background-color:#ffffff;border : 1px solid #000000'>DECISION</font> ".$sql;  
         $res = $f->db -> query ($sql);  
         $f->isDatabaseError($res);  
   
         // ==================================================================================  
         // suivi DOC      *** suivi DOC ***  
         // ==================================================================================  
         // Evenement declancheur DATE OUVERTURE DE CHANTIER  
         $sql= "select annee, dossier.dossier, dossier.nature, annee,  
                date_chantier, shon  
                from dossier ";  
         $sql.= " where date_chantier>='".substr($_POST["datedebut"],6,4).  
                "-".substr($_POST["datedebut"],3,2)."-".  
                substr($_POST["datedebut"],0,2)."'";  
         $sql.= " AND date_chantier<='".substr($_POST["datefin"],6,4).  
                "-".substr($_POST["datefin"],3,2)."-".  
                substr($_POST["datefin"],0,2)."'";  
         echo "<BR><br><font style='background-color:#ffffff;border : 1px solid #000000'>SUIVI</font> ".$sql;  
         // faut il en faire suivi 1 et suivi 2 ou dans une meme requete  
         $res = $f->db -> query ($sql);  
         $f->isDatabaseError($res);  
         $suivi1="";  
   
         
         
         // ==================================================================================  
         // Transfert                                    TRANSFERT  
         // ==================================================================================  
         // element declancheur : Transfert  
         // zone types= Transfert  
         $sql= "select date_achevement, annee, dossier.dossier, demandeur_civilite, dossier.nature,demandeur_categorie,  
                 categorie_demandeur.libelle as categorie_libelle,demandeur_nom,demandeur_societe,demandeur_adresse,  
                 demandeur_ville,demandeur_cp,demandeur_email,delegataire,parcelle, terrain_numero,  
                 terrain_numero_complement,terrain_adresse,terrain_adresse_complement, terrain_ville, terrain_cp,  
                architecte from dossier  
                left join categorie_demandeur on demandeur_categorie= categorie_demandeur.categorie_demandeur";  
         $sql.= " where date_depot>='".substr($_POST["datedebut"],6,4).  
                "-".substr($_POST["datedebut"],3,2)."-".  
                substr($_POST["datedebut"],0,2)."'";  
         $sql.= " AND date_depot<='".substr($_POST["datefin"],6,4).  
                "-".substr($_POST["datefin"],3,2)."-".  
                substr($_POST["datefin"],0,2)."'";  
         $sql.= " AND types= 'Transfert'";            
        echo "<BR><br><font style='background-color:#ffffff;border : 1px solid #000000'>TRANSFERT</font> ".$sql;  
         // date du transfert ?  
         $res = $f->db -> query ($sql);  
         $f->isDatabaseError($res);  
         $transfert="";  
         while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){  
             $nombreenregistrement++;  
             $cpt_transfert++;  
             // sitadel : mouv|typpermis|equivalence|dep|commune|andepnumpc|indmod  
             // typepermis = dossier.nature  
             // annee = dossier.annee  
             // andepnumpc|indmod = substr dossier.dossier  
             $transfert.="TRANSFERT|".$row['nature']."||".$departement."|".$commune."|".$row['annee']."|".  
                                  substr($row['dossier'],4,5)."|".substr($row['dossier'],9,2)."|";    
            //ajout aout2010-----IDEM DEPOT codedemo � suivi (---- sauf civtiers|*prenomtier*|nomtier|*numvoietiers*|*typvoietiers*|  
            // libvoietiers|lieudittier|communetier|codpostier|*bptier*|*cedextier*|*paystier*|  
            // *divtertier et telmo----)  
            // codemo|  
            if($row['demandeur_categorie']==9 or $row['demandeur_categorie']=="")  
               $codemo=1;// personne physique  
            else  
               $codemo=2;// personne morale      
            $transfert.=$codemo."|"; // 1 personne physique ; 2 sinon  
            // openfoncier civilite (5/8 ok), nom (80/30-> substr), societe (80/50->substr)  
            // civpart|prenompart|nompart|denopm|rspm|siret|catjur|civrep|prenomrep|nomrep|  
            // suivant codemo = 1 (personne physique) ou 2 (personne morale)  
            // attention : $row['demandeur_civilite']. non standart  
             
            if($codemo==1){  
               // civpart|*prenompart*|nompart||||||  
                 
               $transfert.= "||";  
               $transfert.= maj(substr($row['demandeur_nom'],0,30))."|||||||";  
            }else{  
               //denopm|rspm|*siret*|*catjur*|civrep|*prenomrep*|nomrep|          
               $transfert.="|||".maj(substr($row['demandeur_societe'],0,50))."|";  
               $transfert.=maj(substr($row['categorie_libelle'],0,30))."|";  
               $transfert.="||||".  
                     maj(substr($row['demandeur_nom'],0,30))."|"; // pas de prenom  
            }  
            // openfoncier : adresse (80/ 26+38 -> substr sur 2 zones) - cp (5/5 OK) - ville (30/36 -> OK)  
            // *numvoiemo*|*typvoiemo*|libvoiemo|lieuditmo(+)|communemo|codposmo|*bpmo*|*cedexmo*|*paysmo*|*divetermo|  
            $transfert.= "|||".maj(substr($row['demandeur_adresse'],0,26))."|".  
                       maj(substr($row['demandeur_adresse'],26,38))."|";  
            $transfert.= maj($row['demandeur_ville'])."|".$row['demandeur_cp']."|||||";  
            // sitadel : melmo|  
            $transfert.= $row['demandeur_email']."|";  
            // sitadel: suivi  
             if($row['delegataire']=='Oui'){  
                 $transfert.= "1";  
             }else{  
                 $transfert.= "0";  
             }  
             //-------------------  
             $transfert.="\n";  
         }// fin while transfert  
         //$res -> free ();  
         if($DEBUG==1){  
             $temp=explode("\n",$transfert);  
             $temp1=sizeof($temp)-1;  
             for($g=0;$g<$temp1;$g++){  
                 $temp2=array();  
                 $temp2 = explode("|",$temp[$g]);  
                 $v=$g+1;  
                 echo "<br><br> DAT : ".$v."  ============== <br>";  
                 for($k=0;$k<sizeof($temp2);$k++){  
                     $t=$k+1;  
                     echo $t." : ".$temp2[$k]."<br>";  
                 }  
             }  
         } // debug    
           
         // ==================================================================================  
         // modificatif                                   MODIFICATIF  
         // ==================================================================================  
         // element declancheur : modificatif  
         // zone types= Modificatif  
         // suivant date-depot et dcision du modificatif  
        $sql= "select annee, dossier.dossier, dossier.nature,  
                dossier.date_decision, avis.sitadel as avis_sitadel, avis.sitadel_motif as avis_sitadel_motif,  
                dossier.terrain_numero,dossier.terrain_adresse,dossier.terrain_cp,dossier.terrain_ville,  
                dossier.parcelle,  
                dossier.terrain_surface,  
                travaux.codelascot as lascot,  
                date_achevement, shon, hauteur, piece_nombre, logement_nombre, batiment_nombre  
                from dossier left join avis on avis.avis= dossier.avis  
                left join travaux on dossier.travaux=travaux.travaux";  
        $sql.= " where (date_depot>='".substr($_POST["datedebut"],6,4).  
                "-".substr($_POST["datedebut"],3,2)."-".  
                substr($_POST["datedebut"],0,2)."'";  
        $sql.= " AND date_depot<='".substr($_POST["datefin"],6,4).  
                "-".substr($_POST["datefin"],3,2)."-".  
                substr($_POST["datefin"],0,2)."'";  
        $sql.= " AND types= 'Modificatif')";  
        $sql.= " or (date_decision>='".substr($_POST["datedebut"],6,4).  
                "-".substr($_POST["datedebut"],3,2)."-".  
                substr($_POST["datedebut"],0,2)."'";  
        $sql.= " AND date_decision<='".substr($_POST["datefin"],6,4).  
                "-".substr($_POST["datefin"],3,2)."-".  
                substr($_POST["datefin"],0,2)."'";            
         $sql.= " AND types= 'Modificatif')";    
         echo "<BR><br><font style='background-color:#ffffff;border : 1px solid #000000'>MODIFICATIF</font>".$sql;  
         // ou dat ???  
         $res = $f->db -> query ($sql);  
         $f->isDatabaseError($res);  
         $modificatif="";  
         // aout 2010 -------------------------------------------------------------------  
         while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){  
             $nombreenregistrement++;  
              $cpt_modificatif++;  
             // sitadel : mouv|typpermis|equivalence|dep|commune|andepnumpc|indmod  
             // typepermis = dossier.nature  
             // annee = dossier.annee  
             // andepnumpc|indmod = substr dossier.dossier  
             $modificatif.="MODIFICATIF|".$row['nature']."||".$departement."|".$commune."|".$row['annee']."|".  
                                  substr($row['dossier'],4,5)."|".substr($row['dossier'],9,2)."|";  
             // sitadel : collectivite|natdec|datredec|motifannul   difference avec decision  -> *** dateredec  a la place de datedec  
             $modificatif.= '1|'; // au nom de la commune  
             // zone supplementaire dans avis  
             // ALTER TABLE `avis` ADD `sitadel_motif` VARCHAR( 1 ) NOT NULL ;  
             // 0 � 8  
             $modificatif.= $row['avis_sitadel']."|";  
             // date au format francais 8 caracteres  
             if ($row['date_decision']!= '0000-00-00' and isset($row['date_decision']))  
                 $modificatif.= substr($row['date_decision'],8,2).''.substr($row['date_decision'],5,2)."".substr($row['date_decision'],0,4)."|";  
             else  
                 $modificatif.= "|";  
             // Motif d annulation  
             // zone supplementaire dans avis;  
             // ALTER TABLE `avis` ADD `sitadel_motif` VARCHAR( 1 ) NOT NULL ;  
             $modificatif.= $row['avis_sitadel_motif']."";  
             if(isset($row['avis_sitadel']))  
                  $avis = $row['avis_sitadel'];  
             else  
                  $avis =0;  
             // =============================================================  
             // GROUPE 2  si decision favorable, expresse ou tacite GROUPE 2  
             // =============================================================  
             if($avis==2   or $avis==4  or $avis==5 or $avis==0){// decision positive ou encours  
                 // sitadel : |numvoiete|*typvoiete*|libvoiete|lieudite|communete|codposte|*bpte*|*cedexte*|  
                 $modificatif.= "|".substr($row['terrain_numero'],0,4)."|"; // typevoie  
                 $modificatif.= "|".maj(substr($row['terrain_adresse'],0,26))."|".  
                            maj(substr($row['terrain_adresse'],26,38))."|";  
                 $modificatif.= maj($row['terrain_ville'])."|";  
                 $modificatif.= $row['terrain_cp']."|";  
                 $modificatif.= "||";  
                 // sitadel : scadastre1|ncadastre1|*scadastre2*|*ncadastre2*|*scadastre3*|*ncadastre3*|  
                 $modificatif.= substr($row['parcelle'],0,2)."|";  
                 $modificatif.= substr($row['parcelle'],2,4)."|||||";  
                 //terrain/libmotif/natrav/annexe/nvmax  
                 $modificatif.= floor($row['terrain_surface'])."|";  
                 //libmotif  
                 $modificatif.= '|';  
                 //natrav  
                 $nattrav="0000";  
                 if($row['lascot']=='2') $nattrav="1000";  
                 if($row['lascot']=='3') $nattrav="0100";  
                 $modificatif.= $nattrav."|";  
                 //annexe  
                 $modificatif.= "00000|";  
                 //nvmax  
                 $modificatif.= "|";  
                 //  shon avant travaux  shionnnant1 a 9 -> non renseigne  
                 $modificatif.= "|||||||||";  
                 //shondem1 � 9| shonanttr1 � 9| shonprojtr 1 � 9|shoncr1 a 9 |shon2cr1 a 9  
                 // table destination  
                 $sql1="select destination, shon from destination_shon where dossier = '". $row['dossier']."'";  
                 // faire une boucle et remplir  
                 //**************************************************************  
                 $res1 = $f->db -> query ($sql1);  
                 $f->isDatabaseError($res);  
                  //  
                  $tmpPD = array(); //  shon existante demolie  
                 for($i=0;$i<=9;$i++)  
                 {  
                   $tmpPD[$i]='';  
                 }  
                 //  
                 $tmplascot4 = array(); //   shon changement de destination  
                 for($i=0;$i<=9;$i++)  
                 {  
                   $tmplascot4[$i]='';  
                 }  
                 //  
                 $tmplascot1 = array(); //   shon nouvellement construite  
                 for($i=0;$i<=9;$i++)  
                 {  
                   $tmplascot1[$i]='';  
                 }  
                 //  
                 $tmplascot2 = array(); //   shon cree par transformation  
                 for($i=0;$i<=9;$i++)  
                 {  
                   $tmplascot2[$i]='';  
                 }  
                 while ($row1=& $res1->fetchRow(DB_FETCHMODE_ASSOC)){  
                     // shonprojtr1 a 9 / shoncr1 a 9 /  
                     if($row['nature']== 'PD') {  
                       $tmpPD[$row1['destination']] = $row1['shon']; //  shon existante demolie -> a remplir  
                     }  
                     if($row['lascot']== '4') {  
                        $tmplascot4[$row1['destination']] = $row1['shon'];//  shon changement de destination -> a remplir  
                     }  
                     if($row['lascot']== '1'){  
                        $tmplascot1[$row1['destination']] = $row1['shon'];//  shon nouvellement construite -> a remplir  
                     }  
                     if($row['lascot']== '2') {  
                        $tmplascot2[$row1['destination']] = $row1['shon'];//  shon cree par transformation -> a remplir  
                     }  
                 }  
                 //  shon existante demolie -> a remplir  
                 for($i=1;$i<=9;$i++)  
                 {  
                   $modificatif.=$tmpPD[$i].'|';  
                 }  
                 //  
                 $modificatif.= "|||||||||";//  shon supprimmee par changement de destination -> non renseigne  
                 //  
                 //$row['lascot']== '4' shon changement de destination  
                 for($i=1;$i<=9;$i++)  
                 {  
                   $modificatif.=$tmplascot4[$i].'|';  
                 }  
                 //shon nouvellement construite  
                 for($i=1;$i<=9;$i++)  
                 {  
                   $modificatif.=$tmplascot1[$i].'|';  
                 }  
                 //shon cree par transformation  
                 for($i=1;$i<=9;$i++)  
                 {  
                   $modificatif.=$tmplascot2[$i].'|';  
                 }  
                //**************************************************************  
                // cpublic : non renseignee N par defaut  
                // O/N transport/enseignement/sante/social/special/culture  
                 $modificatif.= "000000";  
                 // nbmaison : nombre de maison  
                 $modificatif.= "|".$row['batiment_nombre'];  
                  // nblogcoll : nombre de logement collectif  
                 $modificatif.= "|".$row['logement_nombre'];  
                  // nbtotlog : nombre de logement total  
                 $modificatif.= "|".$row['logement_nombre'];  
                  // natres : nature des residences  
                  // O/N 1=ages, 2=etudiant, 3=tourisme, 4=hotel, 5=social, 6= handicap, 7=autres  
                 $modificatif.= "|0000000";  
                  // libres= si autre residence (long max 1000 c)  
                 $modificatif.= "|";  
                 // util : O/N personnel, principale, secondaire, vente, location  
                 $modificatif.= "|00000";  
                 //chambres  
                 $modificatif.= "|";  
                 //finis (nb logement locatif sociaux)/finaa(nb logementfinancement aid�)  
                 //finptz (nb logement pret taux 0)/finaf (nb logement autrement)/  
                 //piec1 � 6 (nb logement 1 a 6pieces )  
                 $modificatif.= "||||||||||";  
             }//fin GROUPE 2  
             $modificatif.="\n";  
         }// fin while modificatif  
               
         if($DEBUG==1){  
             $temp=explode("\n",$modificatif);  
             $temp1=sizeof($temp)-1;  
             for($g=0;$g<$temp1;$g++){  
                 $temp2=array();  
                 $temp2 = explode("|",$temp[$g]);  
                 $v=$g+1;  
                 echo "<br><br> DAT : ".$v."  ============== <br>";  
                 for($k=0;$k<sizeof($temp2);$k++){  
                     $t=$k+1;  
                     echo $t." : ".$temp2[$k]."<br>";  
                 }  
             }  
         } // fin debug    
                 
         // ***************************************  
         // entete de l enregistrement page 8 et 9  
         // ***************************************    
         // numero  
         //$numero= $db -> nextId('sitadel');          
         $numero=$_POST["numero"];  
         $fichiertransmis = date('ymj').$departement.$commune;  
         $longueurenregistrement= 0 ; // a calculer ***  enregistrement le plus long  
         $entete = "SITADEL|".$departement."|".$commune."|".$region."|".$fichiertransmis."|".$numero."|";  
         // calcul enregistrement le plus long  
         $tmpenr="";  
         $tmpenr=$depot.$decision.$suivi1.$suivi2.$transfert.$modificatif;  
         if($flag_utf8_decode==1){  
             $tmpenr=utf8_decode($tmpenr);  
         }else{  
            if($flag_utf8_encode==1){  
                $tmpenr=utf8_encode($tmpenr);  
            }  
         }  
         $nbenr = explode("\n",$tmpenr);  
         $tmp=array();  
         $cpt=0;  
          for($i=0;$i<sizeof($nbenr);$i++){  
               // mb_strlen( variable,encoding) PHP 4 >= 4.0.6, PHP 5  
               // Le param�tre encoding est l'encodage des caract�res.  
               // S'il est omis, l'encodage de caractres interne sera utilis�.  
               $tmp[$i] = strlen($nbenr[$i]);  
               //echo strlen($nbenr[$i])." ".$nbenr[$i]."<br>";  
               $cpt++;  
         }  
         $longueurenregistrement=max($tmp);  
         //tri tableau  
         array_multisort($tmp,SORT_DESC);  
         //exact cpt-1+1 (cpt -1( tableau 0 � n ) +1(enregistrement entete) )  
         echo "<BR><br>Nombre Total Enregistrement : ".$cpt." <->  ".$nombreenregistrement."<br><br>";  
         echo "Detail :<BR>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;- DEPOT : ".$cpt_depot."<br>";  
         echo "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;- DECISION vide suite DEPOT: ".$cpt_decisionsuivantdepot."<br>";  
         echo "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;- DECISION : ".$cpt_decision."<br>";  
         echo "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;- SUIVI 1 : ".$cpt_suivi1."<br>";  
         echo "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;- SUIVI 2 : ".$cpt_suivi2."<br>";  
         echo "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;- TRANSFERT : ".$cpt_transfert."<br>";  
         echo "&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;- MODIFICATIF : ".$cpt_modificatif."<br>";  
         echo "TOTAL : ".($cpt_depot+$cpt_decisionsuivantdepot+$cpt_decision+$cpt_suivi1+$cpt_suivi2+$cpt_transfert+$cpt_modificatif)." + 1 enregistrement(entete)";  
         echo "<br><br>Longueur Enregistrement le plus long : ".max($tmp)." <-> ".$tmp[0];  
       
         // Date de modification  
         $datemodification = date('y').str_pad (DATE('m'), 2, "0", STR_PAD_LEFT).str_pad (DATE('j'), 2, "0", STR_PAD_LEFT);  
354    
355        }else // correct = false
           
         $entete.= $longueurenregistrement."|".$datemodification."|".$nombreenregistrement."|openFoncier|".$versionapplicatif."\n";  
         $export=$entete.$depot.$decision.$suivi1.$suivi2.$transfert.$modificatif;  
       
         if($flag_utf8_decode==1){  
             $export=utf8_decode($export);  
         }else{  
            if($flag_utf8_encode==1){  
                $export=utf8_encode($export);  
            }  
         }  
         //$str = htmlentities($str, ENT_QUOTES);  
         // ecriture des fichiers en tmp  
         $fichier = "../tmp/SITADEL".substr($_POST["datedebut"],3,2).  
                "".substr($_POST["datedebut"],8,4)."_test";  
         $inf = fopen($fichier,"w");  
         //$export=substr($export,0,strlen($export)-1); // un \n en trop  
         fwrite($inf,$export);  
         fclose($inf);  
         echo "<table class='dossier' width='95%'>";  
         echo "<tr class='dossier'><td>";  
         echo "<br>Fichier ".$fichier." sauvegarde<br><br><br>";  
         $affiche="";  
         if($DEBUG==1)  
             $affiche= str_replace("\n","<br>",$export);  
         // affichage  
         echo "<br /><br />Pour telecharger le fichier, cliquer ici : <a href=\"".$fichier."\" target=\"_blank\">";  
         echo "<img src=\"../app/img/ico_trace.png\" alt=\"Telecharger le fichier CNEN\" title=\"Telecharger le fichier CNEN\" />";  
         echo "</a> avec le bouton droit et enregistrer la cible du lien sous. <br /><br />";  
         echo $affiche;  
           //echo"<img src='../img/retour.png' align='top'  border='0'>";  
          // echo "</a></center>";  
           echo "</td></tr></table>";  
  */  
     }else  
356          echo "remplissez les 2 dates";          echo "remplissez les 2 dates";
357  }//validation  }//validation
358  ?>  ?>
Legend:
Removed from v.186  
changed lines
  Added in v.190
[email protected]
 ViewVC Help
Powered by ViewVC 1.1.26