print "<script language=JavaScript>";
print " alert('No hay nada que Reportar');";
print " close();";
print "</script>";
} else {
error_reporting(E_ALL);
set_time_limit(1800);
$io_pdf = new Cezpdf('LEGAL', 'landscape');
$io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm');
$io_pdf->ezSetCmMargins(3.5, 3, 3, 3);
$lb_valido = true;
for ($li_z = 0; $li_z < $li_totrow && $lb_valido; $li_z++) {
uf_print_encabezadopagina($ls_titulo, &$io_pdf);
$io_pdf->ezStartPageNumbers(950, 50, 10, '', '', 1);
$ls_numcom = $la_datos[$li_z];
$lb_valido = $io_report->uf_retencionesiva_proveedor($ls_numcom);
if ($lb_valido) {
$li_total = $io_report->DS->getRowCount("numcom");
for ($li_i = 1; $li_i <= $li_total; $li_i++) {
$ls_numcon = $io_report->DS->data["numcom"][$li_i];
$ls_codret = $io_report->DS->data["codret"][$li_i];
$ls_fecrep = $io_funciones->uf_convertirfecmostrar($io_report->DS->data["fecrep"][$li_i]);
$ls_perfiscal = $io_report->DS->data["perfiscal"][$li_i];
$ls_codsujret = $io_report->DS->data["codsujret"][$li_i];
$ls_nomsujret = $io_report->DS->data["nomsujret"][$li_i];
$ls_rif = $io_report->DS->data["rif"][$li_i];
$ls_dirsujret = $io_report->DS->data["dirsujret"][$li_i];
$li_estcmpret = $io_report->DS->data["estcmpret"][$li_i];
}
uf_print_cabecera($ls_agenteret, $ls_rifagenteret, $ls_perfiscal, $ls_codsujret, $ls_nomsujret, $ls_rif, $ls_diragenteret, $ls_numcon, $ls_fecrep, $li_estcmpret, &$io_pdf);
$lb_valido = $io_report->uf_retencionesiva_detalle($ls_numcom);
