%PDF- %PDF-
| Direktori : /home/tjamichg/intranet.tjamich.gob.mx/intranet/sistemas/compras/ |
| Current File : /home/tjamichg/intranet.tjamich.gob.mx/intranet/sistemas/compras/pdfcompra.php |
<?php
//Biblioteca en uso, contiene:
// -FlowingBlock: Permite justificar y cargar estilos al texto encapsulados.
// -WriteHMTL: Permite cargar etiquestas HTML de estilos de texto.
// -Justify: Permite justificar sin cargar estilos de texto.
require 'flowing_block.php';
// Variables y campos de insersión
// Usuario, fecha y lugar
$comision ="SELECT p.id_articulo,p.codigo,p.articulo,pe.precio,pe.cantidad_comprada
FROM compras_papeleria p
JOIN compras_papeleria_existencia pe ON (p.id_articulo = pe.id_articulo)
WHERE pe.id_compra = $id_compra";
$rst1 = $con->consulta($comision);
//COMIENZA CONSTRUCIÓN DE PDF
$pdf = new PDF_FlowingBlock();
$pdf->AddPage();
// Determinar guardado de registro y/o membretado
// REGISTRO
$pdf->Image('../membretadaC.png',0,0,-300);
$fechaP = date('d-m-Y');
$anioP = date('Y');
$acronimo = $rst1[0]["acronimo"];
// Cabecera derecha-superior
$pdf->SetTextColor(50 , 50, 50);
$pdf->SetFont('helvetica','B',8);
$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Fecha: '.$fechaP), 1, 1, 'FJ');
$pdf->Cell(135, 5, utf8_decode(' '), 0, 0, 'FJ');
$pdf->Cell(45, 5, utf8_decode('Compra: '.str_pad($id_compra, 3, "0", STR_PAD_LEFT).'/'.$anioP), 1, 1, 'FJ');
$pdf->Cell(180, 5, ' ', 0, 1, 'R');
$pdf->SetFont('helvetica','B',9);
$pdf->Cell(180, 0, utf8_decode('RELACIÓN COMPRA y ACTUALIZACIÓN DE PRODUCTOS POR UNIDAD - PRECIO'), 0, 1, 'C', 0);
$pdf->WriteHTML('<br>');
$pdf->WriteHTML('<br>');
//Presentación y cuerpo de documento
$pdf->WriteHTML('<br>');
//BLOQUE TABLA
$pdf->SetFont('Arial','B',11);
$pdf->Cell(20, 5, utf8_decode('Cantidad'), 1, 0, 'C', 0);
$pdf->Cell(100, 5, utf8_decode('Descripción'), 1, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode('Precio Unitario'), 1, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode('Importe'), 1, 1, 'C', 0);
$pdf->SetFont('Arial','',10);
$suma = 0.0;
for($i = 0; $i < count($rst1); $i++)
{
if(strlen($rst1[$i]["articulo"]) > 45)
$art_nombre = substr($rst1[$i]["articulo"], 0, 45);
else
$art_nombre = $rst1[$i]["articulo"];
$precio_individual = $rst1[$i]["precio"]/1.16;
$suma_individual = $precio_individual*$rst1[$i]["cantidad_comprada"];
$suma = $suma_individual + $suma;
$pdf->Cell(20, 5, $rst1[$i]["cantidad_comprada"], 1, 0, 'C', 0);
$pdf->Cell(100, 5, utf8_decode($art_nombre), 1, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode(formatMoney($precio_individual)), 1, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode(formatMoney($suma_individual)), 1, 1, 'C', 0);
}
$pdf->Cell(20, 5, utf8_decode(''), 0, 0, 'C', 0);
$pdf->Cell(100, 5, utf8_decode(''), 0, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode('SUB-TOTAL $'), 1, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode(formatMoney($suma)), 1, 1, 'C', 0);
$pdf->Cell(120,8,utf8_decode(''),0,0,'L',0);
$iva = $suma*0.16;
$total = $suma + $iva;
$pdf->Cell(30, 5, 'IVA', 1, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode(formatMoney($iva)), 1, 1, 'C', 0);
$pdf->Cell(20, 5, utf8_decode(''), 0, 0, 'C', 0);
$pdf->Cell(100, 5, utf8_decode(''), 0, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode('TOTAL'), 1, 0, 'C', 0);
$pdf->Cell(30, 5, utf8_decode(formatMoney($total)), 1, 1, 'C', 0);
//FIRMA Y PIE DE PAGINA
$pdf->WriteHTML('<br><br><br><br>');
$pdf->SetFont('helvetica','',9);
$pdf->Cell(95,4,"_______________________________",0,0,'C');
$pdf->Cell(95,4,"_______________________________",0,0,'C');
$pdf->Ln();
$pdf->Cell(95,4,utf8_decode('LIC. JESUS ESTEBAN RIVERA ORTIZ'),0,0,'C');
$pdf->Cell(95,4,utf8_decode("C. LUCIO ISBOSET LOPEZ ARELLANO"),0,0,'C');
$pdf->Ln();
$pdf->Cell(95,4,utf8_decode("VO. BO. COORDINADOR DE SERVICIOS GENERALES"),0,0,'C');
$pdf->Cell(95,4,utf8_decode("ESCRIBIENTE"),0,0,'C');
$token = md5(uniqid(rand(), true));
$file_name = $token.'.pdf';
$dia = date("d");
$mes = date("m");
$anio = date("Y");
$db_url_img = $anio.'/'.$mes.'/'.$dia.'/'.$file_name;
$SQLsave = "UPDATE compras_compras SET url_compra = '$db_url_img'
WHERE id_compra = $id_compra";
$con->actualizacion($SQLsave);
$targetDir = "../documentos/$anio/$mes/$dia/";
@rmdir($targetDir);
// Create target dir
if (!file_exists($targetDir)) {
@mkdir($targetDir,0777, true);
}
$con->desconectarDB();
$ruta = $targetDir.$file_name;
$pdf->Output($ruta,"F");
?>