solocla/ppeasy
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Primo commit: trasferimento del progetto PPEasy

Browse Source
This commit is contained in:
Claudio
2024-09-18 10:30:50 +02:00
commit eb475f257e
4233 changed files with 1043848 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
public/pdfcreation/partstableoriz.php
+121
View File
@@ -0,0 +1,121 @@
<?php
// parse new component
$identpartlist = new WA_MySQLi_RS("identpartlist",$cmctrfdb,0);
$identpartlist->setQuery("SELECT * FROM identificationparts WHERE identificationparts.idtrfdetails='$idtrf' AND identificationparts.kindoftest='new'");
$identpartlist->execute();
$pdf->AddPage('L');
$pdf->SetFont('','B','9');
$pdf->Cell(275,6,'Parti da testare',1,0,'C');
$pdf->Ln();
$pdf->SetFont('','B','8');
$pdf->Cell(55,6,'Parte',1,0,'C');
$pdf->Cell(85,6,'Descrizione',1,0,'C');
$pdf->Cell(80,6,'Articolo',1,0,'C');
$pdf->Cell(55,6,'Colore',1,0,'C');
$pdf->Ln();
$pdf->SetFont('','','8');
$wa_startindex = 0;
while(!$identpartlist->atEnd()) {
$wa_startindex = $identpartlist->Index;
$descpart=$identpartlist->getColumnVal("description_identificationparts");
$pdf->Cell(55,6,$descpart,1,0,'L',TRUE);
$pdf->Cell(85,6,$identpartlist->getColumnVal("material_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(80,6,$identpartlist->getColumnVal("article_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(55,6,$identpartlist->getColumnVal("color_identificationparts"),1,0,'L', TRUE);
$pdf->Ln();
$identpartlist->moveNext();
}
$identpartlist->moveFirst(); //return RS to first record
unset($wa_startindex);
unset($wa_repeatcount);
// parse issue by cmc
$identpartlistcmc = new WA_MySQLi_RS("identpartlist",$cmctrfdb,0);
$identpartlistcmc->setQuery("SELECT * FROM identificationparts WHERE identificationparts.idtrfdetails='$idtrf' AND identificationparts.kindoftest='cmc'");
$identpartlistcmc->execute();
if (!empty($identpartlistcmc->getColumnVal("ididentificationparts"))) {
$pdf->SetFont('','B','8');
$pdf->Cell(275,6,'Parti testate da CIMAC',1,0,'C');
$pdf->Ln();
$pdf->Cell(40,6,'Parte',1,0,'C');
$pdf->Cell(50,6,'Descrizione',1,0,'C');
$pdf->Cell(50,6,'Articolo',1,0,'C');
$pdf->Cell(40,6,'Colore',1,0,'C');
$pdf->Cell(30,6,'Rapporto',1,0,'C');
$pdf->Cell(30,6,'Data',1,0,'C');
$pdf->Cell(35,6,'Intestato',1,0,'C');
$pdf->Ln();
$pdf->SetFont('','','8');
$wa_startindex = 0;
while(!$identpartlistcmc->atEnd()) {
$wa_startindex = $identpartlistcmc->Index;
$descpart=$identpartlistcmc->getColumnVal("description_identificationparts");
$pdf->Cell(40,6,$descpart,1,0,'L',TRUE);
$pdf->Cell(50,6,$identpartlistcmc->getColumnVal("material_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(50,6,$identpartlistcmc->getColumnVal("article_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(40,6,$identpartlistcmc->getColumnVal("color_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(30,6,$identpartlistcmc->getColumnVal("cmcreportnumber_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(30,6,$identpartlistcmc->getColumnVal("cmcreportdate_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(35,6,$identpartlistcmc->getColumnVal("reportof"),1,0,'L',TRUE);
$pdf->Ln();
$identpartlistcmc->moveNext();
}
$identpartlistcmc->moveFirst(); //return RS to first record
unset($wa_startindex);
unset($wa_repeatcount);
}
// parse issue by trd
$identpartlisttrd = new WA_MySQLi_RS("identpartlist",$cmctrfdb,0);
$identpartlisttrd->setQuery("SELECT * FROM identificationparts WHERE identificationparts.idtrfdetails='$idtrf' AND identificationparts.kindoftest='trd'");
$identpartlisttrd->execute();
if (!empty($identpartlisttrd->getColumnVal("ididentificationparts"))) {
$pdf->SetFont('','B','8');
$pdf->Cell(275,6,'Parti testate da altro laboratorio',1,0,'C');
$pdf->Ln();
$pdf->Cell(40,6,'Parte',1,0,'C');
$pdf->Cell(50,6,'Descrizione',1,0,'C');
$pdf->Cell(50,6,'Articolo',1,0,'C');
$pdf->Cell(40,6,'Colore',1,0,'C');
$pdf->Cell(30,6,'Rapporto',1,0,'C');
$pdf->Cell(30,6,'Data',1,0,'C');
$pdf->Cell(35,6,'Intestato',1,0,'C');
$pdf->Ln();
$pdf->SetFont('','','8');
$wa_startindex = 0;
while(!$identpartlisttrd->atEnd()) {
$wa_startindex = $identpartlisttrd->Index;
$descpart=$identpartlisttrd->getColumnVal("description_identificationparts");
$pdf->Cell(40,6,$descpart,1,0,'L',TRUE);
$pdf->Cell(50,6,$identpartlisttrd->getColumnVal("material_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(50,6,$identpartlisttrd->getColumnVal("article_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(40,6,$identpartlisttrd->getColumnVal("color_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(30,6,$identpartlisttrd->getColumnVal("cmcreportnumber_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(30,6,$identpartlisttrd->getColumnVal("cmcreportdate_identificationparts"),1,0,'L', TRUE);
$pdf->Cell(35,6,$identpartlisttrd->getColumnVal("reportof"),1,0,'L',TRUE);
$pdf->Ln();
$identpartlisttrd->moveNext();
}
$identpartlisttrd->moveFirst(); //return RS to first record
unset($wa_startindex);
unset($wa_repeatcount);
}
?>