0 && strlen($as_dato)<9){
for($i=strlen($as_dato); $i<9; $i++)
$as_dato="0".$as_dato;}
return $as_dato;
}
function str_squeeze($test) {
return trim(ereg_replace( ' +', '', $test));
}
$codigos=$_GET['codigos'];
//$codigos=str_replace(" ", "", $codigos);
//-----------------LLIUREX 07/03/2018-----------
$per=$_GET['percentaje_combobox'];
//-----------------FIN LLIUREX 07/03/2018-------------
switch ($codigos){
case '':{
//---------------------LLIUREX 12/02/2015 -------------------------
//require_once ("$base_path/includes/init.inc.php");
//--------------------- FIN LLIUREX 12/02/2015 -------------------------
//-----------------------LLIUREX 07/03/2018-----------------------
//echo "";
echo "";
//------------------------FIN LLIUREX 07/03/2018--------------------------
break;}
default:{
$matriz=array();
$base_noheader = 1;
//------------------------------LLIUREX 07/03/2018--------------------
$BARCODE_HEIGHT=(54*$per); // en pixels
$BARCODE_WIDTH=(175*$per); // en pixels
$LABEL_WIDTH2=((70.8*CONVERSION)*$per); // en mm
$LABEL_HEIGHT2=((36.5*CONVERSION)*$per); // en mm
$font_size1=10*$per;
$font_size2=25*$per;
//--------------------------------FIN LLIUREX 07/03/2018--------------------
require_once ("$base_path/includes/init.inc.php");
$codigos=str_squeeze($codigos);
require("$base_path/includes/db_param.inc.php");
$link2 = @mysql_connect(SQL_SERVER, USER_NAME, USER_PASS) OR die("Error MySQL");
$size = count($matriz);
//Determinamos margenes de los barcode
//----------------------LLIUREX 07/03/2018-----------------
//$barcode_h_margin = ((LABEL_WIDTH-(BARCODE_WIDTH/72))/2);
//$barcode_v_margin = ((LABEL_HEIGHT-(BARCODE_HEIGHT/72))/2);
$barcode_h_margin = (($LABEL_WIDTH2-($BARCODE_WIDTH/72))/2);
$barcode_v_margin = (($LABEL_HEIGHT2-($BARCODE_HEIGHT/72))/2);
//---------------------FIN LLIUREX 07/03/2018--------------------
//----------------LLIUREX 26/02/2018-------------------
// Se comenta la declaración pq ya se realiza en require_once ("$base_path/includes/init.inc.php");
// Creamos objeto PDF
//----------------------- LLIUREX 14/03/2016-------------------------
//require '/usr/share/php/fpdf/fpdf.php';
//------------------------FIN LLIUREX 14/03/2016---------------------
//--------------- FIN LLIUREX 26/02/2018------------------------
$pdf=new FPDF('P','in','A4');
// Metadata
$pdf->SetAuthor('Lliurex');
$pdf->SetTitle('Tejuelo Lliurex');
//Otras características
$pdf->SetDisplayMode('real'); // Mostramos el zoom al 100%
// Añadimos una pagina al documento PDF
$pdf->AddPage();
// Fijamos los márgenes
$pdf->SetMargins(H_MARGIN, V_MARGIN);
// Manejamos nosotros cuando la pagina debe acabar
$pdf->SetAutoPageBreak(false);
$pdf->AddFont('barcode', '', "barcode.php");
$y = V_MARGIN; //Esta variable sigue la posición y (vertical)
$x = H_MARGIN; // Nueva fila, reseteamos x-position
$new_row=1;
$new_col=1;
//------------LLIUREX 26/10/2018-----------
// Añadimos distinct para evitar duplicados---
//------------FIN LLIUREX 26/10/2018------
$q = 'SELECT distinct expl_cote, expl_cb,autor.value
FROM exemplaires, notices_fields_global_index,(SELECT `id_notice` , value
FROM `notices_fields_global_index`
WHERE `code_champ` =27
AND `code_ss_champ` =1) as autor
WHERE expl_notice = notices_fields_global_index.id_notice and expl_notice=autor.id_notice
AND code_champ =25
AND notices_fields_global_index.value LIKE \''.$codigos.'\'
order by autor.value';
$resultData = @mysql_query($q, $link2);
if (@mysql_num_rows($resultData) != 0) {
//Recuperamos los datos de cada solicitud confirmada
while ($rowData = mysql_fetch_array($resultData)) {
//dato cote
$cote=$rowData['expl_cote'];
if (is_numeric($exe_cote)) {
if (is_numeric($rowData['expl_cb'])) {
if ((int) $exe_cote === (int) $rowData['expl_cb']) $cb=(int)$rowData['expl_cb'];
else continue;
} else continue;
} else $cb=$rowData['expl_cb'];
if ($new_row > 8) // Nueva pagina, reseteamos x-position
{
// Creamos una nueva pagina
$pdf->AddPage();
$pdf->SetMargins(H_MARGIN, V_MARGIN);
$pdf->SetAutoPageBreak(false);
$y = V_MARGIN;
$x = H_MARGIN;
$new_row=1;
$new_col=1;
}
$matriz2=explode(" ",$cote);
//--------------------------------LLIUREX 07/03/2018------------------
/* $pdf->SetFont('Arial','B',10);
$pdf->SetY($y);
$pdf->SetX($x);
if (strlen($matriz2[0])>6) $align="";
else $align="C";
$pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[0],"LT", 0, $align);
$pdf->Cell(LABEL_WIDTH-1, ($barcode_v_margin*1),"","TR", 0,'C');
$pdf->Ln();
$pdf->SetX($x);
$pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[1],"L", 0,'C');
$pdf->setFont('barcode',"",25);
$pdf->Cell(LABEL_WIDTH-1, ($barcode_v_margin*1),"*".f_rellena_ceros($cb)."*","R", 0,'C');
$pdf->SetFont('Arial','B',10);
$pdf->Ln();
$pdf->SetX($x);
$pdf->Cell(LABEL_WIDTH/5, ($barcode_v_margin*1),$matriz2[2],"LB", 0,'C');
$pdf->Cell(LABEL_WIDTH-1, ($barcode_v_margin*1),f_rellena_ceros($cb),"BR", 0,'C');
if (($new_col%COLS_PER_PAGE)==0) {
$x = H_MARGIN;
$y += LABEL_HEIGHT-0.03;
$new_row++;
$new_col=1;
} else {
$new_col++;
$x += LABEL_WIDTH-0.10;
}
}
*/
$pdf->SetFont('Arial','B',$font_size1);
$pdf->SetY($y+((LABEL_HEIGHT-$LABEL_HEIGHT2)/3));
$pdf->SetX($x+((LABEL_WIDTH-$LABEL_WIDTH2)/3));
if (strlen($matriz2[0])>6) $align="";
else $align="C";
//Dibuja la linea superior de la caja correspndiente al 1º parametro
$pdf->Cell(LABEL_WIDTH/(5+(1-$per)), ($barcode_v_margin*1),$matriz2[0],"LT", 0, 'L');
//Dibuja el borde vertica de la caja correspondiente al 1º parametro
$pdf->Cell($LABEL_WIDTH2-(1-(1-$per)), ($barcode_v_margin*1),"","TR", 0,'C');
$pdf->Ln();
$pdf->SetX($x+((LABEL_WIDTH-$LABEL_WIDTH2)/3));
$pdf->Cell(LABEL_WIDTH/(5+(1-$per)), ($barcode_v_margin*1),$matriz2[1],"L", 0,'L');
$pdf->setFont('barcode',"",$font_size2);
$pdf->Cell($LABEL_WIDTH2-(1-(1-$per)), ($barcode_v_margin*1),"*".f_rellena_ceros($cb)."*","R", 0,'C');
$pdf->SetFont('Arial','B',$font_size1);
$pdf->Ln();
$pdf->SetX($x+((LABEL_WIDTH-$LABEL_WIDTH2)/3));
$pdf->Cell(LABEL_WIDTH/(5+(1-$per)), ($barcode_v_margin*1),$matriz2[2],"LB", 0,'L');
$pdf->Cell($LABEL_WIDTH2-(1-(1-$per)), ($barcode_v_margin*1),f_rellena_ceros($cb),"BR", 0,'C');
if (($new_col%COLS_PER_PAGE)==0) {
$x = H_MARGIN;
$y += LABEL_HEIGHT-0.03;
$new_row++;
$new_col=1;
} else {
$new_col++;
$x += LABEL_WIDTH-0.10;
}
}
//-------------------------FIN LLIUREX 07/03/2018-----------------
@mysql_free_result($resultData);
}
//else continue;
// Desconexión de la Base de Datos
mysql_close();
// Limpiar (ELIMINAR) el búfer de salida y Deshabilitar el Almacenamiento en El Mismo -12/02/2015
ob_end_clean();
$pdf->Output('tejuelo_categoria.pdf', 'D'); // Salida es un pdf descargable
}
}
?>