%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"); ?>