}
$pdf->FPDF('L', 'mm', 'A4');
//$pdf->Open();
$pdf->AliasNbPages();
$pdf->SetLeftMargin(15);
$pdf->PageNo();
//$pdf->SetTopMargin(0);
$pdf->AddPage();
$pdf->SetFont('Arial', '', 7);
$numeroreportemensual = $auxiliares->numeroreportemensual_nuevo();
if ($_REQUEST['empresa_remite'] == '0') {
$empresa = "TODOS";
} else {
$empresa = $empresas->devuelve_empresaremite($_REQUEST['empresa_remite']);
}
$cargo->nuevo_reportemensual($numeroreportemensual, $_REQUEST['empresa_remite'], $_REQUEST['fecha'], $_REQUEST['fechaf']);
$pdf->Cell(270, 10, 'REPORTE MENSUAL Nº ' . $numeroreportemensual . '', 0, 0, 'C');
$pdf->Ln(10);
$pdf->Cell(50, 5, 'DE: PERUMAIL EXPRESS S.A.C.', 0, 0, 'L');
//$pdf->Ln(5);
$pdf->Cell(145, 5, 'PARA: ' . $empresa . '', 0, 0, 'L');
//$pdf->Ln(5);
$pdf->Cell(150, 5, 'FECHA: del ' . $_REQUEST['fecha'] . ' al ' . $_REQUEST['fechaf'] . '', 0, 0, 'L');
$pdf->Ln(5);
$pdf->Cell(275, 5, '', 0, 0, 'C');
$pdf->Ln(5);
$pdf->SetWidths(array(10, 15, 24, 38, 12, 20, 15, 18, 20, 18, 18, 18, 18, 18, 18, 18));
//srand(microtime()*1000000);
$pdf->Row(array('Nº', 'Fec. Emis.', 'Zona', 'Destino', 'Nº Guia', 'Tipo de Envio', 'Peso', '1er Kg.', 'Kg. Adicional', 'Volumen', 'Costo Servicio', 'Fragilidad', 'Embalaje', 'Importe'));
$rs = $cargo->cargocourier_listar('', '', $_REQUEST['empresa_remite'], $_REQUEST['fecha'], $_REQUEST['fechaf'], '4', '');
$rs = mysql_query($rs, $cargo->con->cn);
