Your IP : 216.73.216.65

Current Path : /home/ataenra/www/ATA/INTRANET/Tech/MesSav/
Upload File :
Current File : /home/ataenra/www/ATA/INTRANET/Tech/MesSav/FgazGen.php

<?php
 
    use setasign\Fpdi\Fpdi;
    require_once('./ATA/INTRANET/Outils/fpdf/fpdf.php');
    require_once('./ATA/INTRANET/Outils/FPDI-2.3.7/src/autoload.php');


$ID = $_GET['ID'];
require ('./ATA/INTRANET/Outils/co.php');

$sth1 = $dbco->prepare("SELECT * FROM gest_mes G JOIN gest_mes_detail D ON G.ID_Mes=D.ID_mes WHERE G.ID_Mes = '$ID'"); 
$sth1->execute();
$mes1 = $sth1->fetch(PDO::FETCH_OBJ);


$sth2 = $dbco->prepare("SELECT * FROM fgaz WHERE ID = '$mes1->ID_Fgaz'"); 
$sth2->execute();
$G1 = $sth2->fetch(PDO::FETCH_OBJ);


$projet ="./ATA/FICHIERS/MES/".$ID."/Cerfa";
    if (!is_dir($projet)) {mkdir($projet, 0777,true);}

// initiate FPDI
$pdf= new FPDI();
$pdf->SetAutoPagebreak(False);
$pdf->AddPage();
$pdf->setSourceFile('./ATA/INTRANET/GenPDF/10Fgaz/required/cerfa_15497_03.pdf');
$tplIdx = $pdf->importPage(1);
$pdf->useTemplate($tplIdx, 0, 0, 210);   


//Numero de fiche
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(10, 35);
$pdf->Cell(50,8,''.$G1->NumFiche.'',0,0,'L',false);

//Operateur
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(50, 32);
$pdf->Cell(50,8,'SAS ATA ENRGIES',0,0,'L',false);
$pdf->SetXY(50, 36);
$pdf->Cell(50,8,'4 Rue Leruste 59150 WATTRELOS',0,0,'L',false);
$pdf->SetXY(50, 40);
$pdf->Cell(50,8,'SIRET : 984.510.875.00011',0,0,'L',false);

//Detendeur
$pdf->SetXY(130, 32);
$pdf->Cell(50,8,''.$G1->nomD.'',0,0,'L',false);
$pdf->SetXY(130, 36);
$pdf->Cell(50,8,''.$G1->adresseD.'',0,0,'L',false);
$pdf->SetXY(130, 40);
$pdf->Cell(50,8,''.$G1->codepV.'',0,0,'L',false);
$pdf->SetXY(130, 44);
$pdf->Cell(50,8,''.$G1->SiretD.'',0,0,'L',false);

//Numero de capacite
$pdf->SetXY(75, 48);
$pdf->Cell(50,8,''.$G1->NumCapacite.'',0,0,'L',false);

//Equipement
$pdf->SetXY(42, 60);
$pdf->Cell(50,8,''.$G1->Equipement.'',0,0,'L',false);
$pdf->SetXY(42, 64);
$pdf->Cell(50,8,''.$G1->NumS.'',0,0,'L',false);
//Fluide
$pdf->SetXY(175, 54.5);
$pdf->Cell(50,8,''.$G1->Fluide.'',0,0,'L',false);

//ChargeT
$pdf->SetXY(175, 60);
$pdf->Cell(50,8,''.$G1->ChargeT.'',0,0,'L',false);


//Tco2
$tco2 = round($G1->TCo2,2);
$pdf->SetXY(172, 65);
$pdf->Cell(50,8,''.$tco2.'',0,0,'L',false);

//INTERVENTION
if($G1->Interv =="Installation"){
    $pdf->SetFont('Helvetica','','10');
    $pdf->SetXY(53.5, 70);
    $pdf->Cell(50,8,'X',0,0,'L',false);
}

if($G1->Interv =="Installation avec mise en service"){
    $pdf->SetFont('Helvetica','','10');
    $pdf->SetXY(53.5, 70);
    $pdf->Cell(50,8,'X',0,0,'L',false);
    $pdf->SetXY(53.5, 75);
    $pdf->Cell(50,8,'X',0,0,'L',false);
}

if($G1->Interv =="MES"){
    $pdf->SetFont('Helvetica','','10');
    $pdf->SetXY(53.5, 75);
    $pdf->Cell(50,8,'X',0,0,'L',false);
}    

//Détecteur fuite
$pdf->SetXY(80, 96);
$pdf->Cell(50,8,''.$G1->IdetectF.'',0,0,'L',false);

$test = $G1->DControle;
$dateTime = new DateTime($test);

//Controle Le
$pdf->SetXY(155, 96);
$pdf->Cell(50,8,''.$dateTime->format('d     m        Y').'',0,0,'L',false);

//Presence detecteur de fuite 
if($G1->PDfuite =="Oui"){
$pdf->SetXY(117, 103);
$pdf->Cell(50,8,'X',0,0,'L',false);}elseif($G1->PDfuite =="Non")

{
$pdf->SetXY(149, 103);
$pdf->Cell(50,8,'X',0,0,'L',false);
}

//Quantite de fluide HFC / PFC
if($G1->TCo2 < 5 ){
$pdf->SetXY(107, 116.8);
$pdf->Cell(50,8,'X',0,0,'L',false);


}elseif(($G1->TCo2 >5 )&&($G1->TCo2 <30)){
$pdf->SetXY(107, 116.8);
$pdf->Cell(50,8,'X',0,0,'L',false);
$pdf->SetXY(107, 121.5);
$pdf->Cell(50,8,'X',0,0,'L',false);
}

//Fuite sur installation ?

if($G1->Cfuites =="Oui"){
    $pdf->SetXY(20.5, 148.6);
    $pdf->Cell(50,8,'X',0,0,'L',false);
}elseif($G1->Cfuites =="Non"){
    $pdf->SetXY(20.5, 152.3);
    $pdf->Cell(50,8,'X',0,0,'L',false);

}
//Quantite de fluide charge

if($G1->QA != "0"){
    $pdf->SetXY(90, 168.5);
    $pdf->Cell(50,8,''.$G1->QA.'',0,0,'L',false);
    $pdf->SetXY(90, 163.7);
    $pdf->Cell(50,8,''.$G1->QA.'',0,0,'L',false);
}else{
    $pdf->SetXY(90, 163.7);
    $pdf->Cell(50,8,'0',0,0,'L',false);
}

//Observations
if($G1->Observations != "0"){
    $pdf->SetFont('Helvetica','','8');
    $pdf->SetXY(15, 230);
    $pdf->Cell(50,8,''.$G1->Observations.'',0,0,'L',false);
}

//Nom signataire
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(50, 258.5);
$pdf->Cell(50,8,''.$G1->OPnom.'',0,0,'L',false);
$pdf->SetXY(50, 265.5);
$pdf->Cell(50,8,''.$G1->OPqualite.'',0,0,'L',false);
$pdf->SetXY(50, 275);
$pdf->Cell(50,8,''.$G1->DateA.'',0,0,'L',false);

//Nom Detendeur
$pdf->SetFont('Helvetica','','10');
$pdf->SetXY(120, 258.5);
$pdf->Cell(50,8,''.$G1->nomD.'',0,0,'L',false);
$pdf->SetXY(120, 265.5);
$pdf->Cell(50,8,'Client',0,0,'L',false);
$pdf->SetXY(120, 275);
$pdf->Cell(50,8,''.$G1->DateA.'',0,0,'L',false);

//Sortie du fichier
$pdf->Output('F', './ATA/FICHIERS/MES/'.$ID.'/Cerfa/Cerfa'.$ID.'.pdf'); 


//Update base gest_mes_detail
$Update = $dbco->prepare('UPDATE gest_mes_detail SET ID_mes = :id, Etat = :Etat WHERE ID_mes = :id'); 
    
$Update->bindvalue('id', $ID);
$Update->bindvalue('Etat',"Start");
$Update->execute();
//$pdf->Output("I", 'test');

header("location: ../../../index.php/tmes");