| Current Path : /home/ataenra/www/ATA/INTRANET/GenPDF/1Simulation/TypeProjet/ |
| Current File : /home/ataenra/www/ATA/INTRANET/GenPDF/1Simulation/TypeProjet/Simul_PAC_AE_H.php |
<?php
if(($Info->Emetteurs =="RF")||($Info->Emetteurs=="RAA")||($Info->Emetteurs =="RAR")||($Info->Emetteurs =="RBT")){$Emetteurs = "Radiateurs";}
elseif($Info->Emetteurs =="PC"){$Emetteurs ="Plancher Chauffant";}elseif($Info->Emetteurs =="PCR"){$Emetteurs = "Plancher Chauffant + Rads";}
if($Info->ProdEcsE=="1"){$ecstype ="Instantannee";}
elseif($Info->ProdEcsE== "2"){$ecstype ="Ballon Accumulateur";}elseif($Info->ProdEcsE=="3"){$ecstype = "Ballon Electrique";}
if($Info->ProdChaufE=="CF"){$Ctype ="Chaudiere Fioul";}
elseif($Info->ProdChaufE== "CFC"){$Ctype ="Chaudiere Condens Fioul";}
elseif($Info->ProdChaufE=="CG"){$Ctype = "Chaudiere Gaz";}
elseif($Info->ProdChaufE=="CGC"){$Ctype = "Chaudiere Condens Gaz";}
elseif($Info->ProdChaufE=="CE"){$Ctype = "Chaudiere Electrique";}
elseif($Info->ProdChaufE=="CC"){$Ctype = "Chaudiere Charbon";}
elseif($Info->ProdChaufE=="CB"){$Ctype = "Chaudiere Bois";}
if($Info->EcsNew=="Oui"){$EcsNew ="Integre";}
elseif($Info->EcsNew=="Non"){$EcsNew ="Sans ECS";}
elseif($Info->EcsNew=="RaccoB"){$EcsNew ="Ballon Accumulateur";}
elseif($Info->EcsNew=="RaccoBN"){$EcsNew ="Ballon Accu neuf";}
elseif($Info->EcsNew=="EcsInst"){$EcsNew ="Instantannee par PAC";}
elseif($Info->EcsNew=="TH"){$EcsNew ="Ballon Thermodynamique";}
$pdf->AddPage();
$pdf->setSourceFile('./ATA/INTRANET/GenPDF/1Simulation/Required/Bases/Resultat_PACAE.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
//Numero Simulation
$pdf->SetFont('Helvetica','B','24');
$pdf->SetXY(58, 81.3);
$pdf->Cell(0,8,''.$Info->ID.'',0,1,'L',false);
//Numero Simulation
$pdf->SetFont('Helvetica','B','10');
$pdf->SetXY(130, 63.8);
$pdf->Cell(0,6,''.$Info->nom.'',0,1,'L',false);
$pdf->SetXY(180, 63.8);
$pdf->Cell(0,6,''.$Info->prenom.'',0,1,'L',false);
$pdf->SetXY(135, 69);
$pdf->Cell(0,6,''.$Info->rueC.'',0,1,'L',false);
$pdf->SetXY(140, 74.4);
$pdf->Cell(0,6,''.$Info->CodePC.'',0,1,'L',false);
$pdf->SetXY(175, 74.4);
$pdf->Cell(0,6,''.$Info->VilleC.'',0,1,'L',false);
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(138, 79.6);
$pdf->Cell(0,6,''.$Info->Proptype.' de '.$Info->hab.'',0,1,'L',false);
//Primes
if($Info->PrimeATA == "Oui"){
$pdf->SetFont('Helvetica','B','10');
$pdf->SetXY(180, 100.5);
//Profil Ma Prime Rénov
$pdf->Cell(0,6,''.$Info->CouleurPrimeRenov.'',0,1,'L',false);
$pdf->SetXY(171.2, 106.9);
//Profil CEE
$pdf->Cell(0,6,''.$Info->MPR.' euros',0,1,'L',false);
$pdf->SetXY(162, 113.3);
$pdf->Cell(0,6,''.$Info->ProfilCee.'',0,1,'L',false);
$pdf->SetXY(171.2, 119.6);
//Montant Eligible
$pdf->Cell(0,6,''.$Info->MCEE.' euros',0,1,'L',false);
}
//Situation existante
$pdf->SetFont('Helvetica','','8');
$pdf->SetXY(137, 143.8);
$pdf->Cell(0,6,''.$Info->Deperditions.' Watts',0,1,'L',false);
$pdf->SetXY(173, 143.8);
$pdf->Cell(0,6,''.$Emetteurs.'',0,1,'L',false);
$pdf->SetXY(146.5, 148);
$pdf->Cell(0,6,''.$Ctype.'',0,1,'L',false);
$pdf->SetXY(139.2, 152.2);
$pdf->Cell(0,6,''.$ecstype.'',0,1,'L',false);
//Projet
$pdf->SetXY(141, 164.9);
$pdf->Cell(0,6,''.$Info->typepac.'',0,1,'L',false);
$pdf->SetXY(178, 164.9);
$pdf->Cell(0,6,''.$EcsNew.'',0,1,'L',false);
$pdf->SetXY(146, 169.1);
$pdf->Cell(0,6,''.$Info->PuissancePacF.' Kw',0,1,'L',false);
$pdf->SetXY(182, 169.2);
$pdf->Cell(0,6,''.$Info->PTauxcouv.' %',0,1,'L',false);
//Modifier section Enedis a décalé vers la droite
$pdf->SetXY(146, 173.5);
$pdf->Cell(0,6,''.$Info->messagelec.'',0,1,'L',false);
$pdf->SetXY(182, 173.5);
$pdf->Cell(0,6,''.$Info->messagenedis.'',0,1,'L',false);
//Consommations
$pdf->SetFont('Helvetica','B','10');
$pdf->SetXY(153, 191);
$pdf->Cell(0,6,''.$Info->ConsoTEx.' kwh',0,1,'L',false);
$pdf->SetXY(171, 196.2);
$pdf->Cell(0,6,''.$Info->ConsoPac.' kwh',0,1,'L',false);
if($Info->EcsNew=="Oui"||$Info->EcsNew=="RaccoB"||$Info->EcsNew=="RaccoBN"){
$pdf->SetXY(162, 201.4);
$pdf->Cell(0,6,''.$Info->ConsoPacEcs.' kwh',0,1,'L',false);
}else{
$pdf->SetXY(162, 201.4);
$pdf->Cell(0,6,'0 kwh',0,1,'L',false);//Ajouter selon info
}
$pdf->SetXY(157.2, 206.7);
$pdf->Cell(0,6,''.$Info->EcoPac.' euros',0,1,'L',false);
//Prix
$pdf->SetXY(152.5, 227);
$pdf->Cell(0,6,''.$Info->PrixVentePac.' euros',0,1,'L',false);
if($Info->PrimeATA =="Oui"){
$pdf->SetXY(156.5, 232);
$Primes = $Info->MPR+$Info->MCEE;
$pdf->Cell(0,6,''.$Primes.' euros',0,1,'L',false);
$pdf->SetFont('Helvetica','','12');
$pdf->SetXY(173, 240.5);
$RAC = $Info->PrixVentePac-$Primes;
$pdf->Cell(0,6,''.$RAC.' euros',0,1,'L',false);}else{
$pdf->SetFont('Helvetica','','12');
$pdf->SetXY(173, 240.5);
$RAC = $Info->PrixVentePac;
$pdf->Cell(0,6,''.$RAC.' euros',0,1,'L',false);
}
//Image Pac
$pdf->Image('./ATA/INTRANET/Outils/Produits/projetpacae/'.$Info->Marque.'/'.$Info->IMG.'.jpg',27,212,60);
$pdf->Image('./ATA/INTRANET/Outils/Produits/projetpacae/specs/'.$Info->IDm.'.png',10,103,80);
//Enregistrement
$pdf->Output('F', './ATA/FICHIERS/'.$ID.'/Simulation/Simulation'.$ID.'.pdf');
//$pdf->Output("I", 'test');
?>