Your IP : 216.73.216.65


Current Path : /home/a/t/a/ataenra/www/ATA/INTRANET/GenPDF/6Qualitenr/
Upload File :
Current File : /home/a/t/a/ataenra/www/ATA/INTRANET/GenPDF/6Qualitenr/genpdfqualitenrNR.php

<?php
    use setasign\Fpdi\Fpdi;
    //require_once('../fpdf/fpdf.php');
    require_once('../Outils/fpdf/fpdf.php');
    //require_once('../fpdi-2.3.7/src/autoload.php');
    require_once('../Outils/fpdi-2.3.7/src/autoload.php');
    //require('required/modelepdf/grid.php');
    
//RECUPERATION DES DONNEES

//connexion a la base de donnée
//require_once './ATA/INTRANET/Outils/co.php';
require_once '../Outils/co.php';
//recuperation les informations selon ID en get (page?ID=)
//$ID = $_GET['ID'];
$sth = $dbco->prepare("SELECT * FROM dossier D JOIN client C ON D.IDclient=C.IDc JOIN ".$Tp." P ON D.IDprojet=P.IDp WHERE D.ID = $ID"); 
$sth->execute();
$R = $sth->fetch(PDO::FETCH_OBJ);

//recuperation des informations selon IDPAC 
$sth2 = $dbco->prepare("SELECT * FROM tablepac WHERE IDm = '$R->IDmateriel'"); 
$sth2->execute();
$R2 = $sth2->fetch(PDO::FETCH_OBJ);


$ent = $dbco->prepare("SELECT * FROM entreprise WHERE  ID = '1'"); 
$ent->execute();
$ent1 = $ent->fetch(PDO::FETCH_OBJ);

$DF = $R->DateFinalisation; 
$DF1 = new DateTime($DF);

    // initiate FPDI

    $pdf= new FPDI();

    
if(($R->typeprojet =='PAC_AE_M')||($R->typeprojet =='PAC_AE_S')) {//ajouter hybride

    // Information chantier PAGE12 Nouvelle reference
    $pdf->AddPage();
    
    $pdf->setSourceFile('../Genpdf/6qualitenr/required/NR.pdf'); 
    $tplIdx = $pdf->importPage(1);
    $pdf->useTemplate($tplIdx, 0, 0, 210);
    
    //Information entreprise 
    //Raison Sociale
    $pdf->SetFont('Helvetica','b','9');
    $pdf->SetXY(100, 58.7);
    $pdf->Cell(0,8,''.$ent1->RaisonSociale.'',0,1,'L',false);
    
    //Identifiant
    $pdf->SetXY(32, 63.3);
    $pdf->Cell(0,8,''.$ent1->Qualipac.'',0,1,'L',false);
    
    //Type de pompe a chaleur Fichier PACAE donc AIR/EAU
    $pdf->SetXY(50, 86);
    $pdf->Cell(0,8,'X',0,1,'L',false);
    
    //Puissance nominative
    $pdf->SetXY(150, 81);
    $pdf->Cell(0,8,''.$R2->Puissance.' kW',0,1,'L',false);
    
    
    //Nom et prenom client
    $pdf->SetXY(55, 93.5);
    $pdf->Cell(0,8,''.$R->nom.' '.$R->prenom.' ',0,1,'L',false);
    
    //Rue installation
    $pdf->SetXY(48, 100);
    $pdf->Cell(0,8,''.$R->rueC.'',0,1,'L',false);
    
    //Ville installation
    $pdf->SetXY(24, 107);
    $pdf->Cell(0,8,''.$R->VilleC.'',0,1,'L',false);
    
    //Date de formulaire
    $DateForm = date('d/m/Y');
    $pdf->SetFont('Helvetica','b','10');
  
    $pdf->SetXY(24, 215);
    $pdf->Cell(0,8,''.$DateForm.'',0,1,'L',false);

    //Date de mise en service
    $pdf->SetXY(52, 112.2);
    $pdf->Cell(0,10,': '.$DF1->format('d/m/Y').'',0,1,'L',false);

    //Nom signataire
    $pdf->SetXY(48, 220.7);
    $pdf->Cell(0,8,''.$R->nom.' '.$R->prenom.' ',0,1,'L',false);
    

}


//Sortie du fichier
//$pdf->Output("I", 'test');
$pdf->Output('F', '../../FICHIERS/'.$ID.'/A_Signer/QualitenrNR'.$ID.'.pdf'); 

?>