| Current Path : /home/ataenra/www/ATA/INTRANET/GenPDF/12Devis/TypeDevis/ |
| Current File : /home/ataenra/www/ATA/INTRANET/GenPDF/12Devis/TypeDevis/PAC_AE.php |
<?php
use setasign\Fpdi\Fpdi;
require_once('../../Outils/fpdf/fpdf.php');
require_once('../../Outils/FPDI-2.3.7/src/autoload.php');
//RECUP de l'ensemble du projet
$info1 = $dbco->prepare("SELECT * FROM gest_detail_projet P JOIN ".$table_ensemble." E ON E.ID_Ens=P.ID_ens WHERE P.ID_dossier = '".$ID."'");
$info1->execute();$MTmo=0; $MTpack=0; $MTart=0; $MTpro=0;
$R1 = $info1->fetch(PDO::FETCH_OBJ);
$inf1 = $dbco->prepare("SELECT * FROM ".$table_produits." P JOIN gest_detail_projet J ON P.ID_Produit=J.ID_produit WHERE J.ID_ens = '".$R1->ID_ens."' AND J.ID_produit!='0' AND J.ID_dossier = '".$ID."'");
$inf1->execute();
$ent = $dbco->prepare("SELECT * FROM ata_entreprise WHERE ID='1'"); //attention table non rangée
$ent->execute();
$ENT = $ent->fetch(PDO::FETCH_OBJ);
// initiate FPDI
$pdf= new FPDI();
$pdf->SetAutoPageBreak(false);
$pdf->AddPage();
$pdf->setSourceFile('required/FeuilleClient01.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
//EN R LES INFOS DU PROJET / DOSSIER ET PRIMES
//EN ENT lES INFOS DE ENTREPRISE
//TITRE DU DOCUMENT
$pdf->SetFont('Helvetica','B','10');
$pdf->SetXY(5, 65);
$pdf->Cell(0,6,''.$ENT->RaisonSociale.'',0,1,'L',false);
$pdf->SetXY(5, 71);
$pdf->Cell(0,6,''.$ENT->Adresse.'',0,1,'L',false);
$pdf->SetXY(5, 77);
$pdf->Cell(0,6,''.$ENT->CodeP.' '.$ENT->Ville.'',0,1,'L',false);
//Cadre adresse postale
$pdf->SetXY(95, 60);
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(95,32,'',1,0,'L',false);
$pdf->SetXY(5,100);
//Devis Num
$pdf->Cell(25,7,'DEVIS NUM :',1,0,'C',false);
//Num Devis
$pdf->SetFont('Helvetica','','10');
$pdf->Cell(25,7,''.$numdevis.'',1,0,'C',false);
$pdf->SetXY(57,100);
//DATE DEVIS
$DD = date('d-m-Y');
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(20,7,'DATE :',1,0,'C',false);
//DEVIS DATE
$pdf->SetFont('Helvetica','','10');
$pdf->Cell(25,7,''.$DD.'',1,0,'C',false);
$DV = new DateTime($ladateV);
$pdf->SetXY(104,100);
//VALIDITE DEVIS
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(20,7,'VALIDITE :',1,0,'C',false);
//DEVIS VALIDITE
$pdf->SetFont('Helvetica','','10');
$pdf->Cell(25,7,''.$DV->format('d-m-Y').'',1,0,'C',false);
$pdf->SetXY(151,100);
//VALIDITE DEVIS
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(30,7,'VISITE TECH:',1,0,'C',false);
//DEVIS VALIDITE
$dateVT = $R->DateCreation; $DVT = new DateTime($dateVT);
$pdf->SetFont('Helvetica','','10');
$pdf->Cell(24,7,''.$DVT->format('d-m-Y').'',1,0,'C',false);
$pdf->SetXY(5,109);
$pdf->SetFont('Helvetica','','8');
//Objet
$pdf->Cell(25,7,'OBJET :',1,0,'C',false);
//Infos objet
if($R->PrimeATA =='Oui'){
$pdf->Cell(175,7,"Devis pour l'installation d'une pompe a chaleur Air/Eau ".$R1->Fabricant." ".$R1->appel." ".$R1->Puissance." avec Primes de l'Etat. ",1,0,'L',false);}
else{$pdf->Cell(175,7,"Devis pour l'installation d'une pompe a chaleur Air/Eau ".$R1->Fabricant." ".$R1->appel." ".$R1->Puissance."." ,1,0,'L',false);}
//coordonnées client
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(95, 60);
$pdf->Cell(95,10,''.$R->nom.' '.$R->prenom.'',0,1,'C',false);
$pdf->SetXY(95, 70);
$pdf->Cell(95,10,''.$R->rue.'',0,1,'C',false);
$pdf->SetXY(95, 80);
$pdf->Cell(95,10,''.$R->CodeP.' '.$R->Ville.'',0,1,'C',false);
$pdf->SetFont('Helvetica','','8');
//cadres
$pdf->SetXY(5,118);
$pdf->Cell(200,150,'',1,0,'C',false);
$pdf->SetXY(5,124);
$pdf->Cell(130,144,'',1,0,'C',false);
$pdf->SetXY(135,124);
$pdf->Cell(10,144,'',1,0,'C',false);
$pdf->SetXY(145,124);
$pdf->Cell(25,144,'',1,0,'C',false);
$pdf->SetXY(170,124);
$pdf->Cell(25,144,'',1,0,'C',false);
$pdf->SetXY(195,124);
$pdf->Cell(10,144,'',1,0,'C',false);
//DESIGNATION
$pdf->SetXY(5,118);
$pdf->SetFont('Helvetica','','7');
$pdf->Cell(130,6,'DESIGNATION',1,0,'C',false);
$pdf->Cell(10,6,'QTE',1,0,'C',false);
$pdf->Cell(25,6,'PU.HT',1,0,'C',false);
$pdf->Cell(25,6,'MONTANT TTC',1,0,'C',false);
$pdf->Cell(10,6,'TX TVA',1,0,'C',false);
//PIED DE PAGE
$pdf->SetXY(5,280);
$pdf->Cell(0,3,''.$ENT->RaisonSociale.' au Capital de '.$ENT->Capital.' euros. '.$ENT->Adresse.' '.$ENT->CodeP.' '.$ENT->Ville.' Tel/Fax : '.$ENT->Tel.' - Email : '.$ENT->email.' - Internet : '.$ENT->Site.'',0,1,'C',false);
$pdf->Cell(0,3,'RCS de Lille, Siren : '.$ENT->Siren.' - Siret : '.$ENT->Siret.' - Tva Intra : '.$ENT->TvaIntra.' - Compte SG : '.$ENT->Iban.' ',0,1,'C',false);
$pdf->Cell(0,3,'QualitEnr : '.$ENT->QualitEnr.' - Qualibat : '.$ENT->QualiBat.' - Capacite : '.$ENT->Capacite.'',0,1,'C',false);
//CORPS DE DEVIS
$l=0;
$h=124;
$MTart = 0;
//Recup produits de l'ensemble
while ($INF = $inf1->fetch(PDO::FETCH_OBJ)){if(!empty($INF)){
$pdf->SetFont('Helvetica','B','8');
$pdf->SetXY(5, $h);
$PUHT = $INF->simul_pv/$INF->QT_articles;
$PVTTC = round($INF->simul_pv*1.055,2);
$pdf->Cell(130,4,''.$INF->modele.'',0,0,'L',false);
$pdf->Cell(10,4,''.$INF->QT_articles.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PUHT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PVTTC.'',0,0,'C',false);
$pdf->Cell(10,4,'5.5',0,0,'C',false);
$h+=3;
$l+=1;
$MTart += $PVTTC;
//RECUP les infos produits via jointure de l'ensemble
$info2 = $dbco->prepare("SELECT * FROM ".$table_produits." P JOIN ".$table_jointure." J ON J.ID_produit=P.ID_Produit JOIN ".$table_ensemble." E ON E.ID_Ens=J.ID_ens JOIN ".$table_gamme." G ON G.ID_gamme=E.ID_gamme WHERE J.ID_Produit = '".$INF->ID_Produit."'");
$info2->execute();
$INF2 = $info2->fetch(PDO::FETCH_OBJ);
if($INF2->Emp =='UE'){
//Infos de la machine
$pdf->SetFont('Helvetica','','6');
$pdf->SetXY(5, $h);
if($R->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($R->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($R->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','','6');
$pdf->SetXY(5, $h);
$pdf->Cell(0,6,''.$TRegimeau1.', '.$TRegime.''.($INF2->$Puissance/1000).' kW, Performances : Classe energetique : '.$INF2->$CE.'',0,1,'L',false);
$h+=4;$l+=1;
$pdf->SetXY(5, $h);
$pdf->Cell(0,6,'Efficacite saisonniere : '.$INF2->$NS.' %, Scop : '.$INF2->$Scop.' Puissance acoustique : '.$INF2->Pacous.' db(A), Pression acoustique a 1m : '.$INF2->Pacous1m.' db(A).',0,1,'L',false);
$h+=4;$l+=1;
if($INF2->Elec=="Mono"){$Telec = "1P220-240/50Hz";}
if($INF2->Elec=="Tri"){$Telec = "3P380-400/50Hz";}
$pdf->SetXY(5, $h);
$pdf->Cell(0,6,'Plages de fonctionnement : Chauffage : '.$INF2->LimiteFc.'.C. Alimentation : '.$Telec.', resistance electrique : '.($INF2->appoint/1000).' kW',0,1,'L',false);
$h+=4;$l+=1;
$pdf->SetXY(5, $h);
$pdf->Cell(0,6,'Alimentation : '.$Telec.', resistance electrique : '.($INF2->appoint/1000).' kW. Protection electrique : '.$INF2->protecUE.'A. Refrigerant : R'.$INF2->GAZ.', Charge : '.$INF2->ChargeI.' kg.',0,1,'L',false);
$h+=5;$l+=1;
}
if($INF2->Emp=="UI"){
$pdf->SetFont('Helvetica','','6');
$int = $dbco->prepare("SELECT * FROM ".$table_produits." P
JOIN ".$table_jointure." J ON P.ID_Produit=J.ID_produit
WHERE J.ID_ens=".$INF2->ID_Ens." AND P.Emp='UI'");
$int->execute();
$INT=$int->fetch(PDO::FETCH_OBJ);
if($INF2->sectionalim=="3G2.5mm2"||$INF2->sectionalim=="3G6.0mm2"||$INF2->sectionalim=="3G10.0mm2"){$Telec = "1P220-240/50Hz";}
if($INF2->sectionalim=="5G1.5mm2"||$INF2->sectionalim=="5G2.5mm2"||$INF2->sectionalim=="5G4.0mm2"||$INF2->sectionalim=="5G6.0mm2"){$Telec = "3P380-400/50Hz";}
$pdf->SetXY(5, $h);
$pdf->Cell(0,6,'Caracteristiques : Alimentation : '.$Telec.' Protection electrique : '.$INT->protecUI.'A.',0,1,'L',false);
$h+=4;$l+=1;
if($INF2->EcsInt=="Oui"){
$pdf->SetXY(5, $h);
$pdf->Cell(0,6,'Performances : Classe energetique : '.$INT->CEEcs.', Efficacite saisonniere : '.$INT->NSEcs.' %, Scop : '.$INT->ScopEcs.' Volume ECS : '.$INT->Volumeau.' Litres.',0,1,'L',false);
$h+=5;$l+=1;
}
$l+=1;$o=0;
}}}
//Depose
$pdf->SetFont('Helvetica','b','7');
$pdf->SetXY(5, $h);
$pdf->Cell(130,4,'DEPOSE CHAUFFAGE EXISTANT',0,0,'L',false);
$h+=4;
$info1 = $dbco->prepare("SELECT PR.ID_pack, PR.QT_articles, PR.simul_pv, A.pack_designation FROM gest_detail_projet PR JOIN gest_articles_pack A ON A.ID_Pack=PR.ID_pack WHERE ID_dossier = '".$ID."' AND PR.ID_pack!='0' AND A.pack_REFfab LIKE 'DEP.%' AND PR.ID_ens='0' AND PR.ID_produit='0' GROUP BY PR.ID_pack");
$info1->execute();
$R1 = $info1->fetch(PDO::FETCH_OBJ);
$PUHT = round($R1->simul_pv/$R1->QT_articles,2);
$PVTTC = round($PUHT*1.055*$R1->QT_articles,2);
$pdf->SetXY(5, $h);
$pdf->SetFont('Helvetica','','6');
$pdf->Cell(130,4,"".$R1->pack_designation." (Comptabilise en Main d'oeuvre)",0,0,'L',false);
$pdf->Cell(10,4,''.$R1->QT_articles.'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(10,4,'5.5',0,0,'C',false);
$h+=4;$l+=1;
//LISTE DES ARTICLES CATEGORIE PAC
$pdf->SetFont('Helvetica','b','7');
$pdf->SetXY(5, $h);
$pdf->Cell(130,4,'MATERIEL INSTALLATION PAC',0,0,'L',false);
$h+=4;
$info1 = $dbco->prepare("SELECT PR.ID_article, SUM(PR.QT_articles) AS QT, PR.QT_articles, PR.simul_pv, A.DESIGNATION FROM gest_detail_projet PR JOIN gest_articles A ON A.ID_Article=PR.ID_article WHERE ID_dossier = '".$ID."' AND PR.ID_article!='0' AND PR.ID_mo='0' AND PR.ID_ens='0' AND PR.ID_pack!='0' AND PR.ID_produit='0' AND A.Categorie = '1' GROUP BY PR.ID_article");
$info1->execute();
while ($R1 = $info1->fetch(PDO::FETCH_OBJ)){
if($h>260){require "TypeDevis/P2.php";}
if(!empty($R1)){
$pdf->SetFont('Helvetica','b','6');
$pdf->SetXY(5, $h);
$pdf->Cell(0,4,'',0,0,'L',false);
$pdf->SetXY(5, $h);
$PUHT = round($R1->simul_pv/$R1->QT_articles,2);
$PVTTC = round($PUHT*1.055*$R1->QT,2);
$pdf->SetFont('Helvetica','','6');
$pdf->Cell(130,4,''.$R1->DESIGNATION.'',0,0,'L',false);
$pdf->Cell(10,4,''.$R1->QT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PUHT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PVTTC.'',0,0,'C',false);
$pdf->Cell(10,4,'5.5',0,0,'C',false);
$h+=4;$l+=1;
$MTart += $PVTTC;
if($h>260){require "TypeDevis/P2.php";}
}}
//LISTE DES ARTICLES CATEGORIE ELEC
$pdf->SetFont('Helvetica','b','7');
$pdf->SetXY(5, $h);
$pdf->Cell(130,4,'MATERIEL INSTALLATION ELECTRIQUE',0,0,'L',false);
$h+=4;
$inf2 = $dbco->prepare("SELECT PR.ID_article, SUM(PR.QT_articles) AS QT, PR.QT_articles, PR.simul_pv, A.DESIGNATION FROM gest_detail_projet PR JOIN gest_articles A ON A.ID_Article=PR.ID_article WHERE ID_dossier = '".$ID."' AND PR.ID_article!='0' AND PR.ID_mo='0' AND PR.ID_ens='0' AND PR.ID_produit='0' AND A.Categorie = '5' GROUP BY PR.ID_article");
$inf2->execute();
while ($INF1 = $inf2->fetch(PDO::FETCH_OBJ)){if($INF1->ID_article !="0"){
$pdf->SetFont('Helvetica','','6');
$pdf->SetXY(5, $h);
$PUHT = round($INF1->simul_pv/$INF1->QT_articles,2);
$PVTTC = round($PUHT*1.055*$INF1->QT,2);
$pdf->Cell(130,4,''.$INF1->DESIGNATION.'',0,0,'L',false);
$pdf->Cell(10,4,''.$INF1->QT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PUHT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PVTTC.'',0,0,'C',false);
$pdf->Cell(10,4,'5.5',0,0,'C',false);
$h+=4; $l+=1;
$MTart += $PVTTC;
if($h>260){require "TypeDevis/P2.php";}
}}
$pdf->SetFont('Helvetica','b','7');
$pdf->SetXY(5, $h);
$pdf->Cell(130,4,'MATERIEL INSTALLATION PLOMBERIE',0,0,'L',false);
$h+=4;
//LISTE DES ARTICLES CATEGORIE PLOMB
$inf2 = $dbco->prepare("SELECT PR.ID_article, SUM(PR.QT_articles) AS QT, PR.QT_articles, PR.simul_pv, A.DESIGNATION FROM gest_detail_projet PR JOIN gest_articles A ON A.ID_Article=PR.ID_article WHERE ID_dossier = '".$ID."' AND PR.ID_article!='0' AND PR.ID_mo='0' AND PR.ID_ens='0' AND PR.ID_produit='0' AND A.Categorie = '6' GROUP BY PR.ID_article");
$inf2->execute();
while ($INF1 = $inf2->fetch(PDO::FETCH_OBJ)){if($INF1->ID_article !="0"){
$pdf->SetFont('Helvetica','','6');
$pdf->SetXY(5, $h);
$PUHT = round($INF1->simul_pv/$INF1->QT_articles,2);
$PVTTC = round($PUHT*1.055*$INF1->QT,2);
$pdf->Cell(130,4,''.$INF1->DESIGNATION.'',0,0,'L',false);
$pdf->Cell(10,4,''.$INF1->QT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PUHT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PVTTC.'',0,0,'C',false);
$pdf->Cell(10,4,'5.5',0,0,'C',false);
$h+=4; $l+=1;
$MTart += $PVTTC;
if($h>260){require "TypeDevis/P2.php";}
}}
$h+=5;
$pdf->SetXY(5, $h);
$pdf->SetFont('Helvetica','b','8');
$pdf->Cell(130,4,'Sous-Total Materiel TTC : '.$MTart.' euros.',0,0,'R',false);
$pdf->Cell(10,4,'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(10,4,'',0,0,'C',false);
$h+=5;
$MTmo =0;
//LISTE DES MAIN DOUVRE
$pdf->SetFont('Helvetica','b','7');
$pdf->SetXY(5, $h);
$pdf->Cell(130,4,"MAIN D'OEUVRE INSTALLATION",0,0,'L',false);
$h+=4;
$info1 = $dbco->prepare("SELECT PR.ID_mo, SUM(PR.QT_articles) AS QT, PR.QT_articles, PR.simul_pv, A.mo_designation FROM gest_detail_projet PR JOIN gest_mo A ON A.ID_Mo=PR.ID_mo WHERE ID_dossier = '".$ID."' AND PR.ID_article='0' AND PR.ID_mo!='0' AND PR.ID_ens='0' AND PR.ID_produit='0' GROUP BY A.ID_mo");
$info1->execute();
while ($R1 = $info1->fetch(PDO::FETCH_OBJ)){
if($h>260){require "TypeDevis/P2.php";}
if(!empty($R1)){
$pdf->SetFont('Helvetica','b','6');
$pdf->SetXY(5, $h);
$pdf->Cell(0,4,'',0,0,'L',false);
$pdf->SetXY(5, $h);
$PUHT = round($R1->simul_pv/$R1->QT_articles,2);
$PVTTC = round($PUHT*1.055*$R1->QT,2);
$pdf->SetFont('Helvetica','','6');
$pdf->Cell(130,4,''.$R1->mo_designation.'',0,0,'L',false);
$pdf->Cell(10,4,''.$R1->QT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PUHT.'',0,0,'C',false);
$pdf->Cell(25,4,''.$PVTTC.'',0,0,'C',false);
$pdf->Cell(10,4,'5.5',0,0,'C',false);
$h+=4;$l+=1;
$MTmo += $PVTTC;
if($h>260){require "TypeDevis/P2.php";}
}}
$h+=5;
$pdf->SetXY(5, $h);
$pdf->SetFont('Helvetica','b','8');
$pdf->Cell(130,4,"Sous-Total Main d'oeuvre TTC : ".$MTmo.' euros.',0,0,'R',false);
$pdf->Cell(10,4,'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(10,4,'',0,0,'C',false);
$h+=5;
$MT=$MTart+$MTmo;
$pdf->SetXY(5, $h);
$pdf->SetFont('Helvetica','b','8');
$pdf->Cell(130,4,"TOTAL DEVIS : ".$MT.' euros.',0,0,'R',false);
$pdf->Cell(10,4,'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(25,4,'',0,0,'C',false);
$pdf->Cell(10,4,'',0,0,'C',false);
$h+=2;
if($h<200){
//Cadre rappel TVA et base devis
$pdf->SetXY(15,210);
$pdf->Cell(90,5,'',1,0,'C',false);
$pdf->SetXY(15,210);
$pdf->Cell(20,5,'CODE',1,0,'C',false);
$pdf->SetXY(35,210);
$pdf->Cell(25,5,'BASE',1,0,'C',false);
$pdf->SetXY(60,210);
$pdf->Cell(20,5,'Tx TVA',1,0,'C',false);
$pdf->SetXY(80,210);
$pdf->Cell(25,5,'MONTANT',1,0,'C',false);
$MTU = round(($MT/1.055), 2);
$tva = round(($MTU*5.50/100),2);
$pdf->SetXY(15,215);
$pdf->Cell(90,5,'',1,0,'C',false);
$pdf->SetXY(15,215);
$pdf->Cell(20,5,'2',1,0,'C',false);
$pdf->SetXY(35,215);
$pdf->Cell(25,5,''.$MTU.'',1,0,'C',false);
$pdf->SetXY(60,215);
$pdf->Cell(20,5,'5.50',1,0,'C',false);
$pdf->SetXY(80,215);
$pdf->Cell(25,5,''.$tva.'',1,0,'C',false);
//cadre signature
$pdf->SetXY(15,225);
$pdf->Cell(70,30,'',1,0,'C',false);
$pdf->SetXY(15,225);
$pdf->Cell(70,8,'Bon pour accord :',0,0,'L',false);
$pdf->SetXY(15,250);
$pdf->Cell(70,5,'Le : ',0,0,'L',false);
$pdf->SetFont('Helvetica','','8');
//cadre rappel montants totaux
$pdf->SetXY(125,210);
$pdf->Cell(75,40,'',1,0,'L',false);
$pdf->SetXY(125,210);
$pdf->Cell(75,8,'TOTAL HT',1,0,'L',false);
$pdf->SetXY(125,210);
$pdf->Cell(75,8,''.$MTU.'',0,0,'R',false);
$pdf->SetXY(125,218);
$pdf->Cell(75,8,'TOTAL TVA',1,0,'L',false);
$pdf->SetXY(125,218);
$pdf->Cell(75,8,''.$tva.'',0,0,'R',false);
$pdf->SetXY(125,226);
$pdf->Cell(75,8,'TOTAL TTC',1,0,'L',false);
$pdf->SetXY(125,226);
$pdf->Cell(75,8,''.$MT.'',0,0,'R',false);
$pdf->SetXY(125,234);
$pdf->Cell(75,8,'Montant des primes',1,0,'L',false);
if($R->PrimeATA=='Oui'){$Primes = $R->MPR + $R->MCEE; $RAC = $MT-$Primes;
$pdf->SetXY(125,234);
$pdf->Cell(75,8,''.$Primes.'',0,0,'R',false);
$pdf->SetXY(125,242);
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(75,8,'NET A PAYER',1,0,'L',false);
$pdf->SetXY(125,242);
$pdf->Cell(75,8,''.$RAC.'',0,0,'R',false);
}else{
$pdf->SetXY(125,234);
$pdf->Cell(75,8,'0',1,0,'R',false);
$pdf->SetXY(125,242);
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(75,8,'NET A PAYER',1,0,'L',false);
$pdf->SetXY(125,242);
$pdf->Cell(75,8,''.$MT.'',0,0,'R',false);
}
}else{
$p2=1;
$pdf->AddPage();
$pdf->setSourceFile('required/FeuilleClient01.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
//Cadre rappel TVA et base devis
$pdf->SetXY(15,210);
$pdf->Cell(90,5,'',1,0,'C',false);
$pdf->SetXY(15,210);
$pdf->Cell(20,5,'CODE',1,0,'C',false);
$pdf->SetXY(35,210);
$pdf->Cell(25,5,'BASE',1,0,'C',false);
$pdf->SetXY(60,210);
$pdf->Cell(20,5,'Tx TVA',1,0,'C',false);
$pdf->SetXY(80,210);
$pdf->Cell(25,5,'MONTANT',1,0,'C',false);
$MTU = round(($MT/1.055), 2);
$tva = round(($MTU*5.50/100),2);
$pdf->SetXY(15,215);
$pdf->Cell(90,5,'',1,0,'C',false);
$pdf->SetXY(15,215);
$pdf->Cell(20,5,'2',1,0,'C',false);
$pdf->SetXY(35,215);
$pdf->Cell(25,5,''.$MTU.'',1,0,'C',false);
$pdf->SetXY(60,215);
$pdf->Cell(20,5,'5.50',1,0,'C',false);
$pdf->SetXY(80,215);
$pdf->Cell(25,5,''.$tva.'',1,0,'C',false);
//cadre signature
$pdf->SetXY(15,225);
$pdf->Cell(70,30,'',1,0,'C',false);
$pdf->SetXY(15,225);
$pdf->Cell(70,8,'Bon pour accord :',0,0,'L',false);
$pdf->SetXY(15,250);
$pdf->Cell(70,5,'Le : ',0,0,'L',false);
$pdf->SetFont('Helvetica','','8');
//cadre rappel montants totaux
$pdf->SetXY(125,210);
$pdf->Cell(75,40,'',1,0,'L',false);
$pdf->SetXY(125,210);
$pdf->Cell(75,8,'TOTAL HT',1,0,'L',false);
$pdf->SetXY(125,210);
$pdf->Cell(75,8,''.$MTU.'',0,0,'R',false);
$pdf->SetXY(125,218);
$pdf->Cell(75,8,'TOTAL TVA',1,0,'L',false);
$pdf->SetXY(125,218);
$pdf->Cell(75,8,''.$tva.'',0,0,'R',false);
$pdf->SetXY(125,226);
$pdf->Cell(75,8,'TOTAL TTC',1,0,'L',false);
$pdf->SetXY(125,226);
$pdf->Cell(75,8,''.$MT.'',0,0,'R',false);
$pdf->SetXY(125,234);
$pdf->Cell(75,8,'Montant des primes',1,0,'L',false);
if($R->PrimeATA=='Oui'){$Primes = $R->MPR + $R->MCEE; $RAC = $MT-$Primes;
$pdf->SetXY(125,234);
$pdf->Cell(75,8,''.$Primes.'',0,0,'R',false);
$pdf->SetXY(125,242);
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(75,8,'NET A PAYER',1,0,'L',false);
$pdf->SetXY(125,242);
$pdf->Cell(75,8,''.$RAC.'',0,0,'R',false);
}else{
$pdf->SetXY(125,234);
$pdf->Cell(75,8,'0',1,0,'R',false);
$pdf->SetXY(125,242);
$pdf->SetFont('Helvetica','B','10');
$pdf->Cell(75,8,'NET A PAYER',1,0,'L',false);
$pdf->SetXY(125,242);
$pdf->Cell(75,8,''.$MT.'',0,0,'R',false);
}
}
if($p2==1){
$ht=$h-140;
//cadres
$pdf->SetXY(5,66);
$pdf->Cell(200,$ht,'',1,0,'C',false);
$pdf->SetXY(5,66);
$pdf->Cell(130,$ht,'',1,0,'C',false);
$pdf->SetXY(135,66);
$pdf->Cell(10,$ht,'',1,0,'C',false);
$pdf->SetXY(145,66);
$pdf->Cell(25,$ht,'',1,0,'C',false);
$pdf->SetXY(170,66);
$pdf->Cell(25,$ht,'',1,0,'C',false);
$pdf->SetXY(195,66);
$pdf->Cell(10,$ht,'',1,0,'C',false);
}
//require conditions generales
require "TypeDevis/CDG.php";
//UPDATE DES PRIX ET INFOS DEVIS
$UP = $dbco->prepare('UPDATE gest_devis SET MTHT = :MTHT, MTtva = :MTtva, MTTTC = :MTTTC, RAC = :RAC WHERE ID_dossier = :ID');
$UP->bindParam('ID',$ID);
$UP->bindParam('MTHT',$MTU);
$UP->bindParam('MTtva',$tva);
$UP->bindParam('MTTTC',$MT);
$UP->bindParam('RAC',$RAC);
$UP->execute();
if($R->PrimeATA=="Oui"){
//MISE A JOUR DE LA BASE $Devis en Disponible
$Update = $dbco->prepare('UPDATE dossier SET Devis = :Etat WHERE ID = :ID');
$Update->bindvalue(':Etat','Devis Sonergia');
$Update->bindvalue('ID', $ID);
$Update->execute();
}else{
//MISE A JOUR DE LA BASE $Devis en Disponible
$Update = $dbco->prepare('UPDATE dossier SET Devis = :Devis, Etat = :Etat WHERE ID = :ID');
$Update->bindvalue(':Devis','Disponible');
$Update->bindvalue(':Etat','A signer');
$Update->bindvalue('ID', $ID);
$Update->execute();
}