$io_pdf->ezStartPageNumbers(770, 47, 8, '', '', 1);
 // Insertar el número de página
 $li_totrow = $io_report->DS->getRowCount("codigo");
 $li_totaldoc = 0;
 $li_totalcar = 0;
 $li_totalded = 0;
 uf_print_encabezado_pagina($ls_titulo, &$io_pdf);
 for ($li_i = 1; $li_i <= $li_totrow && $lb_valido; $li_i++) {
     $io_encabezado = $io_pdf->openObject();
     $li_numpag = $io_pdf->ezPageCount;
     // Número de página
     $ls_codigo = $io_report->DS->data["codigo"][$li_i];
     $ls_nombre = $io_report->DS->data["nombre"][$li_i];
     $ls_tipproben = $io_report->DS->data["tipproben"][$li_i];
     uf_print_cabecera($ls_codigo, $ls_nombre, $ls_tipproben, $io_encabezado, &$io_pdf);
     $lb_valido = $io_report->uf_select_facturasproben($ls_tipproben, $ls_codigo, $ld_fecregdes, $ld_fecreghas, $li_ordendoc, $li_ordenfec);
     if ($lb_valido) {
         $li_totrowfac = $io_report->ds_detrecdoc->getRowCount("numrecdoc");
         $li_totalfacpro = 0;
         $li_totaldedpro = 0;
         $li_totaldocpro = 0;
         for ($li_j = 1; $li_j <= $li_totrowfac; $li_j++) {
             $ls_numrecdoc = $io_report->ds_detrecdoc->data["numrecdoc"][$li_j];
             $ld_fecregdoc = $io_report->ds_detrecdoc->data["fecregdoc"][$li_j];
             $ld_fecemidoc = $io_report->ds_detrecdoc->data["fecemidoc"][$li_j];
             $ls_dencondoc = $io_report->ds_detrecdoc->data["dencondoc"][$li_j];
             $li_montotdoc = $io_report->ds_detrecdoc->data["montotdoc"][$li_j];
             $li_moncardoc = $io_report->ds_detrecdoc->data["moncardoc"][$li_j];
             $li_mondeddoc = $io_report->ds_detrecdoc->data["mondeddoc"][$li_j];
             $li_montotfac = $li_montotdoc + $li_mondeddoc;
             $ls_numsol = $io_report->ds_detrecdoc->data["numsol"][$li_j];