Your IP : 216.73.216.65

Current Path : /home/ataenra/www/ATA/INTRANET/GenPDF/1Simulation/TypeProjet/
Upload File :
Current File : /home/ataenra/www/ATA/INTRANET/GenPDF/1Simulation/TypeProjet/Simul_PAC_AE_S.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('../../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);



//Modele selectionne

$pdf->SetFont('Helvetica','B','14');

$pdf->SetXY(20, 104);

$pdf->Cell(0,6,''.$Info->Fabricant.' '.$Info->appel.' '.$Info->Puissance.'',0,1,'L',false);

$pdf->SetFont('Helvetica','','10');

$pdf->SetXY(20, 110);

$pdf->Cell(0,6,''.$Info->modele.'',0,1,'L',false);

if($Info->Regimeau == "BT35"){$TRegimeau1="Regime d'eau utilise : 35.C"; 

$TRegime='Puissance : a Air -7.C_Eau 30/35.C : ';$CE="CE35"; $NS="NS35"; $Scop="ScopBT35"; $Puissance="P7m35";}

if($Info->Regimeau == "MT55"){$TRegimeau1="Regime d'eau utilise : 55.C"; 

$TRegime='Puissance : a Air -7.C_Eau 50/55.C : ';$CE="CE55"; $NS="NS55"; $Scop="ScopMT55"; $Puissance="P7m55";}

if($Info->Regimeau == "HT70"){$TRegimeau1="Regime d'eau utilise : +60.C"; 

$TRegime='Puissance : a Air -7.C_Eau 55/60.C : ';$CE="CE70"; $NS="NS70"; $Scop="ScopHT70"; $Puissance="P7m70";}



$pdf->SetFont('Helvetica','','8');

$pdf->SetXY(20, 114);

$pdf->Cell(0,6,"".$TRegimeau1."",0,1,'L',false);

$pdf->SetXY(20, 118);

$pdf->Cell(0,6,''.$TRegime.''.($Info->$Puissance/1000).' kW',0,1,'L',false);

$pdf->SetXY(20, 122);

$pdf->Cell(0,6,'Performances : Classe energetique : '.$Info->$CE.',',0,1,'L',false);

$pdf->SetXY(20, 126);

$pdf->Cell(0,6,'Efficacite saisonniere : '.$Info->$NS.' %, Scop : '.$Info->$Scop.'',0,1,'L',false);

$pdf->SetXY(20, 130);

$pdf->Cell(0,6,'Puissance acoustique : '.$Info->Pacous.' db(A), Pression acoustique a 1m : '.$Info->Pacous1m.' db(A).',0,1,'L',false);

$pdf->SetXY(20, 134);

$pdf->Cell(0,6,'Plages de fonctionnement : Chauffage : '.$Info->LimiteFc.'.C',0,1,'L',false);

$pdf->SetXY(20, 138);

if($Info->Elec=="Mono"){$Telec = "1P220-240/50Hz";}

if($Info->Elec=="Tri"){$Telec = "3P380-400/50Hz";}

$pdf->Cell(0,6,'Alimentation : '.$Telec.', resistance electrique : '.($Info->appoint/1000).' kW',0,1,'L',false);

$pdf->SetXY(20, 142);

$pdf->Cell(0,6,'Protection electrique : '.$Info->protecUE.'A.',0,1,'L',false);

$pdf->SetXY(20, 146);

$pdf->Cell(0,6,'Refrigerant : R'.$Info->GAZ.', Charge : '.$Info->ChargeI.' kg.',0,1,'L',false);



if($Info->TypePac=="Split"){

$int = $dbco->prepare("SELECT * FROM ".$table_produits." P 

                                JOIN ".$table_jointure." J ON P.ID_Produit=J.ID_produit

                                WHERE J.ID_ens=".$Info->ID_Ens." AND P.Emp='UI'");

$int->execute();

$INT=$int->fetch(PDO::FETCH_OBJ); 



$pdf->SetFont('Helvetica','','10');

$pdf->SetXY(20, 152);

$pdf->Cell(0,6,''.$INT->modele.'',0,1,'L',false);

$pdf->SetFont('Helvetica','','8');

$pdf->SetXY(20, 156);

$pdf->Cell(0,6,'Caracteristiques : ',0,1,'L',false);

if($Info->sectionalim=="3G2.5mm2"||$Info->sectionalim=="3G6.0mm2"||$Info->sectionalim=="3G10.0mm2"){$Telec = "1P220-240/50Hz";}

if($Info->sectionalim=="5G1.5mm2"||$Info->sectionalim=="5G2.5mm2"||$Info->sectionalim=="5G4.0mm2"||$Info->sectionalim=="5G6.0mm2"){$Telec = "3P380-400/50Hz";}

$pdf->SetXY(20, 160);

$pdf->Cell(0,6,'Alimentation : '.$Telec.'',0,1,'L',false);

$pdf->SetXY(20, 164);

$pdf->Cell(0,6,'Protection electrique : '.$INT->protecUI.'A.',0,1,'L',false);

if($Info->EcsInt=="Oui"){

$pdf->SetXY(20, 168);

$pdf->Cell(0,6,'Performances : Classe energetique : '.$INT->CEEcs.',',0,1,'L',false);

$pdf->SetXY(20, 172);

$pdf->Cell(0,6,'Efficacite saisonniere : '.$INT->NSEcs.' %, Scop : '.$INT->ScopEcs.'',0,1,'L',false);

$pdf->SetXY(20, 176);

$pdf->Cell(0,6,'Volume ECS : '.$INT->Volumeau.' Litres.',0,1,'L',false);

}



}

//Infos client

$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','','8');

$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->Puissance.'',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(148, 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('../../Outils/produits/PAC_AE/'.$Info->Fabricant.'/'.$Info->Ref_img.'.png',27,212,60);



//Enregistrement

$pdf->Output('F', '../../../FICHIERS/'.$ID.'/Simulation/Simulation'.$ID.'.pdf'); 

//$pdf->Output("I", 'test');

?>