Your IP : 216.73.216.65

Current Path : /home/ataenra/www/ATA/INTRANET/GenPDF/2Synthese/
Upload File :
Current File : /home/ataenra/www/ATA/INTRANET/GenPDF/2Synthese/liste_articles.php

<?php


//RECUP de l'ensemble du projet
$info1 = $dbco->prepare("SELECT ID_ens FROM gest_detail_projet WHERE ID_dossier = '".$ID."'"); 
$info1->execute();$MTmo=0; $MTpack=0; $MTart=0; $MTpro=0;
$R1 = $info1->fetch(PDO::FETCH_OBJ);
//RECUP les infos produits via jointure de l'ensemble
$info2 = $dbco->prepare("SELECT * FROM ".$table_produits." P JOIN ".$table_jointure." J ON P.ID_Produit=J.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_ens = '".$R1->ID_ens."'"); 
$info2->execute();
$INF2 = $info2->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'"); 
$inf1->execute();

$pdf->SetAutoPageBreak(false);

$pdf->AddPage();     
$pdf->setSourceFile('Required/FeuilleClient01.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
     
//TITRE DU DOCUMENT
$pdf->SetFont('Helvetica','B','16');
$pdf->SetXY(10, 60);
$pdf->Cell(0,8,'DETAIL ARTICLES PROJET NUM : '.$ID.'',1,1,'C',false);

    
//CADRE DEVIS
$pdf->SetFont('Helvetica','B','12');
$pdf->SetXY(10, 68);
$pdf->Cell(0,8,'LISTE DES ARTICLES',1,1,'C',false);

//CADRE Materiel  
$pdf->SetFont('Helvetica','B','8');
$pdf->SetXY(10, 76);
$pdf->Cell(0,6,'',1,0,'L',false);
$pdf->SetXY(10, 76);
$pdf->Cell(25,6,'Materiel : ',0,0,'L',false);
$pdf->Cell(165,6,''.$INF2->Fabricant.' '.$INF2->appel.' '.$INF2->Puissance.'',0,1,'L',false);

$pdf->SetFont('Helvetica','B','6');
$pdf->SetXY(10, 82);
$pdf->Cell(10,4,'ID',0,0,'L',false);
$pdf->Cell(100,4,'Designation',0,0,'L',false);
$pdf->Cell(50,4,'Reference',0,0,'L',false);
$pdf->Cell(10,4,'Quantite',0,0,'L',false);
$pdf->Cell(20,4,'Prix Vente',0,0,'L',false);

$h=86;
$l=0;
 
//Recup produits de l'ensemble
while ($INF = $inf1->fetch(PDO::FETCH_OBJ)){if(!empty($INF)){

$pdf->SetFont('Helvetica','','6');
$pdf->SetXY(10, $h);
$pdf->Cell(10,4,''.$INF->ID_Produit.'',0,0,'L',false);
$pdf->Cell(100,4,''.$INF->modele.'',0,0,'L',false);
$pdf->Cell(50,4,''.$INF->Ref.'',0,0,'L',false);
$pdf->Cell(10,4,''.$INF->QT_articles.'',0,0,'L',false);
$pdf->Cell(20,4,''.$INF->simul_pv.'',0,0,'L',false);

$h+=4;
$MTpro +=$INF->simul_pv;

}}

//prepa recup des packs
$info1 = $dbco->prepare("SELECT PR.ID_pack, PR.QT_articles, PR.simul_pv 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 PR.ID_article='0' AND PR.ID_mo='0' AND PR.ID_ens='0' AND PR.ID_produit='0'"); 
$info1->execute();

//CADRE Packs 
$pdf->SetXY(10, $h);
$pdf->SetFont('Helvetica','','8');
$pdf->Cell(0,4,'Packs',1,1,'L',false);
              
$h+=4;

//Listes des packs

$o=0;

while ($R1 = $info1->fetch(PDO::FETCH_OBJ)){

    if($l>20&&$o=0){
        $pdf->AddPage(); 
        $pdf->setSourceFile('Required/FeuilleClient01.pdf');    
        $tplIdx = $pdf->importPage(1);
        $pdf->useTemplate($tplIdx, 0, 0, 210);

        $l=0;
        $h=60;
        $o=1;

    }elseif($l>50&&$o=1){

        $pdf->AddPage(); 
        $pdf->setSourceFile('Required/FeuilleClient01.pdf');    
        $tplIdx = $pdf->importPage(1);
        $pdf->useTemplate($tplIdx, 0, 0, 210);
        $l=0;
        $h=60;

    }


if(!empty($R1)){


$inf1 = $dbco->prepare("SELECT pack_REFfab, pack_designation FROM gest_articles_pack WHERE ID_Pack = '".$R1->ID_pack."'"); 
$inf1->execute();
$INF = $inf1->fetch(PDO::FETCH_OBJ);

$pdf->SetFont('Helvetica','b','6');
$pdf->SetXY(10, $h);
$pdf->Cell(0,4,'',1,0,'L',false);
$pdf->SetXY(10, $h);
$pdf->Cell(10,4,''.$R1->ID_pack.'',0,0,'L',false);
$pdf->Cell(100,4,''.$INF->pack_designation.'',0,0,'L',false);
$pdf->Cell(50,4,''.$INF->pack_REFfab.'',0,0,'L',false);
$pdf->Cell(10,4,''.$R1->QT_articles.'',0,0,'L',false);
$pdf->Cell(20,4,''.$R1->simul_pv.'',0,0,'L',false);

$h+=4;
$MTpack += $R1->simul_pv;
$l+=1;

$inf2 = $dbco->prepare("SELECT PR.simul_pv, A.DESIGNATION, PR.ID_article, PR.QT_articles, A.REFfrs FROM gest_detail_projet PR JOIN gest_articles A ON A.ID_Article=PR.ID_article WHERE PR.ID_pack = '".$R1->ID_pack."' AND PR.ID_article !='0' AND PR.ID_mo ='0' AND PR.ID_dossier='".$ID."' 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(10, $h);
$pdf->Cell(10,4,''.$INF1->ID_article.'',0,0,'L',false);
$pdf->Cell(100,4,''.$INF1->DESIGNATION.'',0,0,'L',false);
$pdf->Cell(50,4,''.$INF1->REFfrs.'',0,0,'L',false);
$pdf->Cell(10,4,''.$INF1->QT_articles.'',0,0,'L',false);
$pdf->Cell(20,4,''.$INF1->simul_pv.'',0,0,'L',false);

$h+=4; 
$MTart += $INF1->simul_pv;
$l+=1;

}} 

$inf2 = $dbco->prepare("SELECT A.mo_pv, A.mo_designation, PR.ID_mo, PR.QT_articles, PR.simul_pv FROM gest_detail_projet PR JOIN gest_mo A ON A.ID_Mo=PR.ID_mo WHERE PR.ID_pack = '".$R1->ID_pack."' AND PR.ID_article ='0' AND PR.ID_mo !='0' AND PR.ID_dossier='".$ID."' GROUP BY PR.ID_mo"); 
$inf2->execute();

while ($INF1 = $inf2->fetch(PDO::FETCH_OBJ)){if($INF1->ID_mo !="0"){
                    
$pdf->SetFont('Helvetica','','6');
$pdf->SetXY(10, $h);
$pdf->Cell(10,4,''.$INF1->ID_mo.'',0,0,'L',false);
$pdf->Cell(100,4,''.$INF1->mo_designation.'',0,0,'L',false);
$pdf->Cell(50,4,'',0,0,'L',false);
$pdf->Cell(10,4,''.$INF1->QT_articles.'',0,0,'L',false);
$pdf->Cell(20,4,''.$INF1->simul_pv.'',0,0,'L',false);

$h+=4;                        
$MTmo += $INF1->simul_pv;
$l+=1;
}} 

if($h>260){
$pdf->AddPage(); 
$pdf->setSourceFile('Required/FeuilleClient01.pdf');    
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);

$l=0;
$h=60;
$o=1;
}

}}

$info1 = $dbco->prepare("SELECT PR.ID_article, PR.QT_articles, PR.simul_pv 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_pack='0' AND PR.ID_mo='0' AND PR.ID_ens='0' AND PR.ID_produit='0'"); 
$info1->execute();

while ($INF1 = $info1->fetch(PDO::FETCH_OBJ)){if($INF1->ID_article !="0"){
        
    $pdf->SetFont('Helvetica','','6');
    $pdf->SetXY(10, $h);
    $pdf->Cell(10,4,''.$INF1->ID_article.'',0,0,'L',false);
    $pdf->Cell(100,4,''.$INF1->DESIGNATION.'',0,0,'L',false);
    $pdf->Cell(50,4,''.$INF1->REFfrs.'',0,0,'L',false);
    $pdf->Cell(10,4,''.$INF1->QT_articles.'',0,0,'L',false);
    $pdf->Cell(20,4,''.$INF1->simul_pv.'',0,0,'L',false);
    
    $h+=4; 
    $MTart += $INF1->simul_pv;
    $l+=1;

if($h>260){
$pdf->AddPage(); 
$pdf->setSourceFile('Required/FeuilleClient01.pdf');    
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);
    
$l=0;
$h=60;
$o=1;
}

}}


//CADRE Materiel  
$pdf->SetXY(10, $h);
$pdf->Cell(100,4,'',0,0,'R',false);
$pdf->Cell(40,4,'Total Produits ',1,0,'R',false);
$pdf->Cell(50,4,''.$MTpro.' euros',1,1,'R',false);

$pdf->Cell(100,4,'',0,0,'R',false);
$pdf->Cell(40,4,'Total Packs ',1,0,'R',false);
$pdf->Cell(50,4,''.$MTpack.' euros',1,1,'R',false);

$pdf->Cell(100,4,'',0,0,'R',false);
$pdf->Cell(40,4,'Total Articles ',1,0,'R',false);
$pdf->Cell(50,4,''.$MTart.' euros',1,1,'R',false);

$pdf->Cell(100,4,'',0,0,'R',false);
$pdf->Cell(40,4,'Total Main d oeuvre ',1,0,'R',false);
$pdf->Cell(50,4,''.$MTmo.' euros',1,1,'R',false);

$TOTAL=$MTpro+$MTpack+$MTart+$MTmo;

$pdf->Cell(100,4,'',0,0,'R',false);
$pdf->Cell(40,4,'TOTAL ',1,0,'R',false);
$pdf->Cell(50,4,''.$TOTAL.' euros HT',1,1,'R',false);

$TOTALTTC=round($TOTAL*1.055,2);

$pdf->Cell(100,4,'',0,0,'R',false);
$pdf->Cell(40,4,'TOTAL ',1,0,'R',false);
$pdf->Cell(50,4,''.$TOTALTTC.' euros TTC',1,1,'R',false);