| Current Path : /home/ataenra/www/ATA/INTRANET/GenPDF/2Synthese/Required/TypeProjet/ |
| Current File : /home/ataenra/www/ATA/INTRANET/GenPDF/2Synthese/Required/TypeProjet/syn_pac_AA_S.php |
<?php
use setasign\Fpdi\Fpdi;
require_once('../../outils/fpdf/fpdf.php');
require_once('../../outils/fpdi-2.3.7/src/autoload.php');
//recuperation des informations selon IDPAC
$sth2 = $dbco->prepare("SELECT * FROM tablepac WHERE id = '$R->IDPAC'");
$sth2->execute();
$R2 = $sth2->fetch(PDO::FETCH_OBJ);
// initiate FPDI
$pdf= new FPDI();
$pdf->AddPage();
$pdf->setSourceFile('required/FeuilleClient01.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
//TITRE DU DOCUMENT
$pdf->SetFont('Helvetica','B','20');
$pdf->SetXY(10, 60);
$pdf->Cell(0,25,'SYNTHESE PROJET NUM : '.$ID.'',1,1,'C',false);
$pdf->SetXY(10, 78);
$pdf->SetFont('Helvetica','B','12');
$pdf->Cell(0,6,'DOSSIER AIDES A CREER : '.$R->PrimeATA.'',0,1,'C',false);
//CADRE DEVIS
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 87);
$pdf->Cell(0,10,'CADRE DEVIS',1,1,'L',false);
//CADRE Apporteur
$pdf->SetFont('Helvetica','B','12');
$pdf->SetXY(130, 87);
$pdf->Cell(0,10,'Apporteur Affaire : '.$R->user.'',0,1,'L',false);
//CADRE Coordonnées client
$pdf->SetXY(10, 97);
$pdf->Cell(0,6,'Coordonnees Client',1,1,'L',false);
$pdf->Cell(0,32,'',1,1,'L',false);
//Données du cadre Coordonnées client
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(10, 103);
$pdf->Cell(95,8,'Titre : '.$R->titre.'',0,0,'L',false);
$pdf->Cell(95,8,'Adresse : '.$R->rue.'',0,1,'L',false);
$pdf->Cell(95,8,'Nom : '.$R->nom.'',0,0,'L',false);
$pdf->Cell(95,8,'Code Postal : '.$R->CodeP.'',0,1,'L',false);
$pdf->Cell(95,8,'Prenom : '.$R->prenom.'',0,0,'L',false);
$pdf->Cell(95,8,'Ville: '.$R->Ville.'',0,1,'L',false);
$pdf->Cell(95,8,'Portable : '.$R->NumP.'',0,0,'L',false);
$pdf->Cell(95,8,'Email : '.$R->email.'',0,0,'L',false);
//CADRE Adrese chantier
$pdf->SetFont('Helvetica','B','12');
$pdf->SetXY(10, 135);
$pdf->Cell(0,6,'Adresse Chantier',1,1,'L',false);
$pdf->Cell(0,16,'',1,1,'L',false);
if($R->adressechantier == 'differente'){
$pdf->SetXY(10, 141);
$pdf->SetFont('Helvetica','','10');
$pdf->Cell(95,8,'Adresse : '.$R->rueC.'',0,0,'L',false);
$pdf->Cell(95,8,'Code Postal : '.$R->CodePC.'',0,1,'L',false);
$pdf->Cell(95,8,'Ville: '.$R->VilleC.'',0,1,'L',false);
}else{
$pdf->SetXY(10, 141);
$pdf->SetFont('Helvetica','','10');
$pdf->Cell(95,8,'Adresse : '.$R->rue.'',0,0,'L',false);
$pdf->Cell(95,8,'Code Postal : '.$R->CodeP.'',0,1,'L',false);
$pdf->Cell(95,8,'Ville: '.$R->Ville.'',0,1,'L',false);
}
//CADRE Technique devis
$pdf->SetFont('Helvetica','B','12');
$pdf->SetXY(10, 160);
$pdf->Cell(0,6,'Technique devis',1,1,'L',false);
$pdf->Cell(0,48,'',1,1,'L',false);
//Données du cadre technique devis
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(10, 166);
$pdf->Cell(95,8,'Type de Chantier : '.$R->TypeF.'',0,0,'L',false);
$pdf->Cell(95,8,'IDPAC : '.$R->IDPAC.'',0,1,'L',false);
$pdf->Cell(95,8,'Type de PAC : '.$R2->typepac.' '.$R2->Liaison.'',0,0,'L',false);
$pdf->Cell(95,8,'Type de Pose : '.$R->TypePose.'',0,1,'L',false);
$pdf->Cell(95,8,'Depose Chauffage Existant : '.$R->ProdChaufE.'',0,0,'L',false);
$pdf->Cell(95,8,'Longueur Liaison : '.$R->DeUeUi.'',0,1,'L',false);
$pdf->Cell(95,8,'PV Electricite : '.$R->TabElecE.'',0,0,'L',false);
$pdf->Cell(95,8,'Longueur Alim : '.$R->DeUe.'',0,1,'L',false);
$pdf->Cell(95,8,'PV Plomberie : '.$R->PlombGE.'',0,0,'L',false);
$pdf->Cell(95,8,'Accessibilite Interieur : '.$R->AccessI.'',0,1,'L',false);
$pdf->Cell(95,8,'Info Abo Elec : '.$R->Electchantier.'',0,0,'L',false);
$pdf->Cell(95,8,'Accessibilite Exterieur : '.$R->AccessE.'',0,1,'L',false);
//CADRE Code devis
$pdf->SetFont('Helvetica','B','12');
$pdf->SetXY(10, 219);
$pdf->Cell(0,6,'Codes devis',1,1,'L',false);
$pdf->Cell(0,50,'attente codes devis',1,1,'L',false);
//ATTENTE CODAGE DES OUVRAGES POUR DEVIS
//Page 2 photos chantier PLOMBERIE
$pdf->AddPage();
//CADRE info ext
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 10);
$pdf->Cell(140,10,'MODULE EXTERIEUR',1,1,'C',false);
//CADRE Remarques ext
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(150, 10);
$pdf->Cell(0,10,'Observations',1,1,'C',false);
//INFO Info ext
$pdf->SetXY(10, 20);
$pdf->Cell(140,110,'',1,0,'C',false);
$pdf->Cell(0,110,'',1,1,'C',false);
$pdf->Image('../../../FICHIERS/'.$ID.'/photos/photoeu.'.$ID.'.jpg',15,25,130);
//INFO Remarques ext
$pdf->SetFont('Helvetica','','8');
$pdf->SetXY(150, 20);
$pdf->Cell(0,8,'Distance UI : '.$R->DeUeUi.' m',0,1,'L',false);
$pdf->SetXY(150, 28);
$pdf->Cell(0,8,'Type liaison : '.$R2->TypeL.' ',0,1,'L',false);
$pdf->SetXY(150, 36);
$pdf->Cell(0,8,'Distance Elec : '.$R->DeUe.' m',0,1,'L',false);
$pdf->SetXY(150, 44);
$pdf->Cell(0,8,'Type Pose : '.$R->TypePose.'',0,1,'L',false);
$pdf->SetXY(150, 52);
$pdf->Cell(0,8,'Accessibilite Exterieur : '.$R->AccessE.'',0,1,'L',false);
//CADRE info int
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 132);
$pdf->Cell(140,10,'MODULE INTERIEUR',1,1,'C',false);
//CADRE Remarques int
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(150, 132);
$pdf->Cell(0,10,'Observations',1,1,'C',false);
//INFO Info int
$pdf->SetXY(10, 142);
$pdf->Cell(140,110,'',1,0,'C',false);
$pdf->Cell(0,110,'',1,1,'C',false);
$pdf->Image('../../../FICHIERS/'.$ID.'/photos/photoint.'.$ID.'.jpg',15,147,130);
//INFO Remarques int
$pdf->SetFont('Helvetica','','8');
$pdf->SetXY(150, 142);
$pdf->Cell(0,8,'Local Technique : '.$R->PLT.'',0,1,'L',false);
$pdf->SetXY(150, 150);
$pdf->Cell(0,8,'Chauffage Centrale : '.$R->ChaufC.'',0,1,'L',false);
$pdf->SetXY(150, 158);
$pdf->Cell(0,8,'Producteur Chauffage : '.$R->ProdChaufE.'',0,1,'L',false);
$pdf->SetXY(150, 166);
$pdf->Cell(0,8,'Producteur ECS : '.$R->ProdEcsE.'',0,1,'L',false);
$pdf->SetXY(150, 174);
$pdf->Cell(0,8,'Emetteurs : '.$R->Emetteurs.'',0,1,'L',false);
$pdf->SetXY(150, 182);
$pdf->Cell(0,8,'Distance UE : '.$R->DeUeUi.' m',0,1,'L',false);
$pdf->SetXY(150, 190);
$pdf->Cell(0,8,'Type liaison : '.$R2->TypeL.' ',0,1,'L',false);
$pdf->SetXY(150, 198);
$pdf->Cell(0,8,'Distance Elec : '.$R->DeUe.' m',0,1,'L',false);
$pdf->SetXY(150, 206);
$pdf->Cell(0,8,'Accessibilite Interieur : '.$R->AccessI.'',0,1,'L',false);
$pdf->SetXY(150, 214);
$pdf->Cell(0,8,'Etat plomberie: '.$R->PlombG.'',0,1,'L',false);
//Page 3 photos chantier ELECTRICITE
$pdf->AddPage();
//CADRE info ext
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 10);
$pdf->Cell(140,10,'COMPTEUR ELECTRIQUE',1,1,'C',false);
//CADRE Remarques ext
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(150, 10);
$pdf->Cell(0,10,'Observations',1,1,'C',false);
//INFO Info ext
$pdf->SetXY(10, 20);
$pdf->Cell(140,110,'',1,0,'C',false);
$pdf->Cell(0,110,'',1,1,'C',false);
$pdf->Image('../../../FICHIERS/'.$ID.'/photos/photocpt.'.$ID.'.jpg',15,25,130);
//INFO Remarques ext
$pdf->SetFont('Helvetica','','8');
$pdf->SetXY(150, 20);
$pdf->Cell(0,8,'Distance UE-UI : '.$R->DeUeUi.' m',0,1,'L',false);
$pdf->SetXY(150, 28);
$pdf->Cell(0,8,'Distance UE : '.$R->DeUe.' m',0,1,'L',false);
$pdf->SetXY(150, 36);
$pdf->Cell(0,8,'Abonnement : '.$R->AboElec.'',0,1,'L',false);
$pdf->SetXY(150, 44);
$pdf->Cell(0,8,'Accessibilite Interieure : '.$R->AccessI.'',0,1,'L',false);
$pdf->SetXY(150, 52);
$pdf->Cell(0,8,'Type de courant : '.$R->Electchantier.'',0,1,'L',false);
//CADRE info int
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 132);
$pdf->Cell(140,10,'TABLEAU ELECTRIQUE',1,1,'C',false);
//CADRE Remarques int
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(150, 132);
$pdf->Cell(0,10,'Observations',1,1,'C',false);
//INFO Info int
$pdf->SetXY(10, 142);
$pdf->Cell(140,110,'',1,0,'C',false);
$pdf->Cell(0,110,'',1,1,'C',false);
$pdf->Image('../../../FICHIERS/'.$ID.'/photos/phototab.'.$ID.'.jpg',15,147,130);
//INFO Remarques int
$pdf->SetFont('Helvetica','','8');
$pdf->SetXY(150, 142);
$pdf->Cell(0,8,'Distance UE : '.$R->DeUeUi.' m',0,1,'L',false);
$pdf->SetXY(150, 150);
$pdf->Cell(0,8,'Distance Elec : '.$R->DeUe.' m',0,1,'L',false);
$pdf->SetXY(150, 158);
$pdf->Cell(0,8,'Accessibilite Interieur : '.$R->AccessI.'',0,1,'L',false);
$pdf->SetXY(150, 166);
$pdf->Cell(0,8,'Etat tableau: '.$R->TabElec.'',0,1,'L',false);
$pdf->SetXY(150, 174);
$pdf->Cell(0,8,'Borne VEI ?: '.$R->BorVei.'',0,1,'L',false);
$pdf->SetXY(150, 182);
$pdf->Cell(0,8,'Plaques cuisson ?: '.$R->PlaCuiss.'',0,1,'L',false);
$pdf->SetXY(150, 190);
$pdf->Cell(0,8,'Ballon ECS Sup ?: '.$R->BalEcsS.'',0,1,'L',false);
$pdf->SetXY(150, 198);
$pdf->Cell(0,8,'Ballon ECS +200L ?: '.$R->BalEcsP.'',0,1,'L',false);
//Page resultat client
$pdf->AddPage();
$pdf->setSourceFile('../../../FICHIERS/'.$ID.'/Simulation/Simulation'.$ID.'.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 70);
if($R->EcsNew == "TH") {
$pdf->AddPage();
$pdf->setSourceFile('../../../FICHIERS/'.$ID.'/Simulation/Simulation'.$ID.'TH.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 70);
}
if($R->PrimeATA == "Oui") {
//Page cadre sonergia
$pdf->AddPage();
$pdf->setSourceFile('required/FeuilleClient01.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
//CADRE SONERGIA
$pdf->SetFont('Helvetica','B','14');
$pdf->SetXY(10, 70);
$pdf->Cell(0,10,'CADRE SONERGIA',1,1,'L',false);
//CADRE Dossier a creer
$pdf->SetFont('Helvetica','B','12');
$pdf->SetXY(10, 80);
$pdf->Cell(0,6,'DOSSIER A CREER : '.$R->PrimeATA.'',1,1,'L',false);
$pdf->Cell(0,48,'',1,1,'L',false);
//Données du cadre Coordonnées client
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(10, 86);
$pdf->Cell(95,8,'Email : '.$R->email.'',0,0,'L',false);
$pdf->Cell(95,8,'Situation : '.$R->Prop.'',0,1,'L',false);
$pdf->Cell(95,8,'Type de logement : '.$R->Proptype.'',0,0,'L',false);
$pdf->Cell(95,8,'Date : '.$R->date.'',0,1,'L',false);
$pdf->Cell(95,8,'Nombre de personne : '.$R->NBPERS.'',0,0,'L',false);
$pdf->Cell(95,8,'Revenus declares: '.$R->revenus.'',0,1,'L',false);
$pdf->Cell(95,8,'Numero Fiscal : '.$R->numfiscal.'',0,0,'L',false);
$pdf->Cell(95,8,'Numero Avis Fiscal : '.$R->numavis.'',0,1,'L',false);
$pdf->Cell(95,8,'Depose Chauffage Existant : '.$R->ProdChaufE.'',0,0,'L',false);
$pdf->Cell(95,8,'Profil Prime Renov : '.$R->CouleurPrimeRenov.'',0,1,'L',false);
$pdf->Cell(95,8,'Numero Portable : '.$R->NumP.'',0,0,'L',false);
$pdf->Cell(95,8,'Profil CEE : '.$R->ProfilCee.'',0,1,'L',false);
$pdf->SetXY(39, 142);
$pdf->Image('../../../FICHIERS/'.$ID.'/aides/AvisImposition.'.$ID.'.jpg',39,142,130);
}
?>