$io_pdf = new Cezpdf('LETTER', 'landscape'); $io_pdf->selectFont('../../shared/ezpdf/fonts/Helvetica.afm'); $io_pdf->ezSetCmMargins(4.4, 3, 3, 3); uf_print_encabezado_pagina($ls_titulo, $ld_fecdes, $ld_fechas, &$io_pdf); $li_rowcargos = $io_report->DS->getRowCount("codded"); //print"s"; $io_report->DS->sortData("codded"); $lb_existe = false; for ($li_j = 1; $li_j <= $li_rowcargos; $li_j++) { $ls_codded = $io_report->DS->data["codded"][$li_j]; $ls_dended = $io_report->DS->data["dended"][$li_j]; $li_islr = $io_report->DS->data["islr"][$li_j]; $li_iva = $io_report->DS->data["iva"][$li_j]; $li_estretmun = $io_report->DS->data["estretmun"][$li_j]; $li_retaposol = $io_report->DS->data["retaposol"][$li_j]; $lb_valido = $io_report->uf_retencionesespecifico($ls_codded, $ls_coddedhas, $ls_tipproben, $ls_codprobenhas, $ls_codprobendes, $ld_fecdes, $ld_fechas, $ls_tipper); $li_totbase = 0; $li_totcargos = 0; $li_totrow = $io_report->ds_detalle->getRowCount("numsol"); for ($li_i = 1; $li_i <= $li_totrow; $li_i++) { $ls_codded = $io_report->ds_detalle->data["codded"][$li_i]; $ls_numsol = $io_report->ds_detalle->data["numsol"][$li_i]; $ls_nombre = $io_report->ds_detalle->data["nombre"][$li_i]; $ls_numcomiva = $io_report->ds_detalle->data["numcomiva"][$li_i]; $ls_numcommun = $io_report->ds_detalle->data["numcommun"][$li_i]; $ls_numcomapo = $io_report->ds_detalle->data["numcomapo"][$li_i]; $li_porded = $io_report->ds_detalle->data["porded"][$li_i] * 100; if ($li_porded > 100) { $li_porded = number_format($io_report->ds_detalle->data["porded"][$li_i], 2, ',', '.'); } else { $li_porded = number_format($li_porded, 2, ',', '.');