addHTMLHeadJs(array("../js/script.js"));
// GET ========================================================================
if (isset ($_GET['validation'])){
$validation=$_GET['validation'];
}else{
$validation=0;
}
if (isset ($_GET['idx'])){
$idx=$_GET['idx'];
}else{
$idx=0;
}
/**
* Description de la page
*/
$description = _("Cette page vous permet de Transmettre les PC au cadastre DGI (procedure LASCOT.");
$f->displayDescription($description);
// =============================================================================
// validation = 0
// =============================================================================
if($validation==0){
$validation=1;
echo "";
}else { // ===================== extraction =================================
$correct=true;
if($_POST["datedebut"]=="") $correct=false;
if($_POST["datefin"]=="") $correct=false;
if (isset ($_POST['typeavis'])){ // ***
$typeavis=$_POST['typeavis'];
}else{
$typeavis="";
} // *
if ($correct==true){
$departement =$f->collectivite["departement"];
$commune =$f->collectivite["commune"];
$sql= "select date_depot,annee, dossier.dossier, demandeur_civilite,
demandeur_nom,demandeur_societe,demandeur_adresse,demandeur_ville,demandeur_cp,
parcelle, terrain_numero,terrain_numero_complement,
terrain_adresse,terrain_adresse_complement, terrain_ville,
shon,logement_nombre,codelascot
from dossier left join travaux on dossier.travaux=travaux.travaux";
if($typeavis!="" or $typeavis=='T'){ // ***
$sql.=" left join avis on avis.avis = dossier.avis";
} //*
$sql.= " where dossier.nature = 'PC'";
if($typeavis!="" or $typeavis=='T'){ // ***
$sql.=" AND typeavis ='".$typeavis."'";
}//*
$sql.= " AND 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)."'";
$res = $f->db -> query ($sql);
$f->isDatabaseError($res);
$export="";
$bl="";
while ($row=& $res->fetchRow(DB_FETCHMODE_ASSOC)){
$export.= $departement;
$export.= $commune;
$export.= $row['annee'];
$export.=substr($row['dossier'],4,5);// numero dossier 5
// modificatif sur 2 caracteres et non sur 1
$export.=str_pad(substr($row['dossier'],10,1),1," ", STR_PAD_RIGHT);// modificatif 9,2
// dossier precedent ? annee numero modificatif
$export.=" "." "." "; // 2-5-1
// maitre ouvrage
$export.= str_pad(substr($row['demandeur_civilite'],0,5),5," ", STR_PAD_RIGHT); //nom du maitre d ouvrage
$export.= str_pad(substr($row['demandeur_nom'],0,27),27," ", STR_PAD_RIGHT); //nom du maitre d ouvrage
$export.= str_pad(substr($row['demandeur_societe'],0,32),32," ", STR_PAD_RIGHT); //1ere ligne
$export.= str_pad(substr($row['demandeur_adresse'],0,32),32," ", STR_PAD_RIGHT); // adresse
$export.= str_pad($bl,32," ", STR_PAD_RIGHT); //2eme ligne
$export.= str_pad($bl,32," ", STR_PAD_RIGHT); //3eme Ligne
$export.= str_pad($row['demandeur_cp'],5," ", STR_PAD_RIGHT);
$export.= str_pad(substr($row['demandeur_ville'],0,26),26," ", STR_PAD_RIGHT);
$export.= str_pad ($bl, 20, " ", STR_PAD_RIGHT); // telephone
// terrain
$export.= str_pad(substr($row['parcelle'],0,7),7," ", STR_PAD_RIGHT); //nom du maitre d ouvrage
$export.= str_pad($bl,32," ", STR_PAD_RIGHT); //1ere ligne
$export.= str_pad(substr($row['terrain_numero'].
" ".$row['terrain_numero_complement']." ".
$row['terrain_adresse'],0,32),32," ", STR_PAD_RIGHT);
$export.= str_pad(substr($row['terrain_adresse_complement'],0,32),32," ", STR_PAD_RIGHT);
$export.= str_pad(substr($row['terrain_cp'],0,5),5," ", STR_PAD_RIGHT);
$export.= str_pad(substr($row['terrain_ville'],0,26),26," ", STR_PAD_RIGHT);
// decision format yyyymm
$temp= substr($row['date_depot'],0,4).substr($row['date_depot'],5,2);
if($temp=='000000') $temp=' '; // date vide si 0000/00/00
$export.=$temp;// numero dossier 5
// categorie
$export.= str_pad ($bl, 1, " ", STR_PAD_RIGHT);
// Nature de travaux
$export.= str_pad ($row['codelascot'], 1, " ", STR_PAD_RIGHT);
//type annexe habitation
$export.= str_pad ($bl, 1, " ", STR_PAD_RIGHT);
// shon total autorisée ?
$export.= str_pad (substr($row['shon'],0,6), 6, " ", STR_PAD_LEFT);
// shon habitation autorisé ?
$export.= str_pad (substr($row['shon'],0,6), 6, " ", STR_PAD_LEFT);
// mode utilisation principal locaux hab
$export.= str_pad ($bl, 1, " ", STR_PAD_RIGHT);
// mode utilisation autre locaux autre que hab
$export.= str_pad ($bl, 1, " ", STR_PAD_RIGHT);
// destination principale des logements
// table destination 1 a plusieurs
$export.= str_pad ($bl, 1, " ", STR_PAD_RIGHT);
// nb logement
$export.= str_pad (substr($row['logement_nombre'],0,3), 3, " ", STR_PAD_LEFT);
// nb batiment individuel ?
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// nb batiment collectif ?
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// nb batiments autorisés
$export.= str_pad (substr($row['batiment_nombre'],0,3), 3, " ", STR_PAD_LEFT);
// nb log 1 piece
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// nb log 2 piece
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// nb log 3 piece
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// nb log 4 piece
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// nb log 5 piece
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// nb log 6 piece +
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
// shon non hab autorise
$export.= str_pad ($bl, 6, " ", STR_PAD_LEFT);
// 1er type d ouvrage
$export.= str_pad ($bl, 2, " ", STR_PAD_LEFT);
// shon ass au 1er type ouvrage
$export.= str_pad ($bl, 6, " ", STR_PAD_LEFT);
// code APET
$export.= str_pad ($bl, 4, " ", STR_PAD_LEFT);
// Nature des logements
$export.= str_pad ($bl, 1, " ", STR_PAD_RIGHT);
// capacite accueil locaux hebergt
$export.= str_pad ($bl, 3, " ", STR_PAD_LEFT);
$export.="\n";
}
}
// ecriture des fichiers en tmp
$fichier = "../tmp/LO".substr($_POST["datedebut"],3,2).
"".substr($_POST["datedebut"],8,4)."PC.132";
$inf = fopen($fichier,"w");
//$export=substr($export,0,strlen($export)-1); // un \n en trop
fwrite($inf,$export);
fclose($inf);
echo "
Fichier ".$fichier." sauvegarde
";
echo "
Pour telecharger le fichier, cliquer ici : ";
echo "![\"Telecharger](\"../app/img/ico_trace.png\" "\\"Telecharger")
";
echo " avec le bouton droit et enregistrer la cible du lien sous.
";
}//validation
?>