$ldec_totcomsiniva = 0;
if ($lb_valido) {
    $li = 0;
    while ($row = $io_report->io_sql->fetch_row($rs_resultado)) {
        $li++;
        $ldec_monret = 0;
        $ls_numrecdoc = $row["numrecdoc"];
        $ls_tipproben = $row["tipproben"];
        $ls_codpro = $row["cod_pro"];
        $ls_cedben = $row["ced_bene"];
        $ldec_montoret = $row["monret"];
        $ldec_montodoc = $row["montotdoc"];
        $ldec_mondeddoc = $row["mondeddoc"];
        $ls_codtipdoc = $row["codtipdoc"];
        if ($ls_tipproben == 'P') {
            $la_provben = $io_report->uf_select_rowdata($io_sql, "SELECT * FROM rpc_proveedor WHERE cod_pro='" . $ls_codpro . "'");
            $ls_rif = $la_provben["rifpro"];
            $ls_nombre = $la_provben["nompro"];
        } else {
            $la_provben = $io_report->uf_select_rowdata($io_sql, "SELECT * FROM rpc_beneficiario WHERE ced_bene='" . $ls_cedben . "'");
            $ls_rif = $la_provben["rifben"];
            $ls_nombre = $la_provben["nombene"] . " " . $la_provben["apebene"];
        }
        $la_notas = $io_report->uf_select_rowdata($io_sql, "SELECT * cxp_dc WHERE numrecdoc='" . $ls_numrecdoc . "' AND codtipdoc='" . $ls_codtipdoc . "' AND cod_pro='" . $ls_codpro . "' AND ced_bene='" . $ls_cedben . "'");
        if (count($la_notas) > 0) {
            $ls_codope = $la_notas["codope"];
            $ls_numnota = $la_notas["numdc"];
            if ($ls_codope == 'NC') {
                $ls_numnc = $ls_numnota;
                $ls_numnd = "";
            } else {