$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 {
$ls_numnd = $ls_numnota;
$ls_numnc = "";
}
} else {
$ls_numnc = "";
$ls_numnd = "";
}
$ls_cheque = $io_report->uf_select_data($io_sql, "SELECT distinct cxp_sol_banco.numdoc AS numdoc" . " FROM cxp_dt_solicitudes, cxp_sol_banco" . " WHERE cxp_dt_solicitudes.codemp='" . $ls_codemp . "'" . " AND cxp_dt_solicitudes.numrecdoc='" . $ls_numrecdoc . "'" . " AND cxp_dt_solicitudes.cod_pro='" . $ls_codpro . "'" . " AND cxp_dt_solicitudes.ced_bene='" . $ls_cedben . "'" . " AND cxp_dt_solicitudes.codemp=cxp_sol_banco.codemp" . " AND cxp_dt_solicitudes.numsol=cxp_sol_banco.numsol", "numdoc");
$la_cmpret = $io_report->uf_select_rowdata($io_sql, "SELECT DISTINCT max(a.numrecdoc) as numrecdoc,max(a.monobjret) as monobjret,SUM(a.monret) as monret,max(a.porded) as porded,max(b.codret) as codret,max(b.numcom) as numcom,max(b.iva_ret) as iva_ret,tiptrans" . " FROM cxp_rd_deducciones a,scb_dt_cmp_ret b " . " WHERE a.codemp=b.codemp AND a.numrecdoc=b.numfac AND a.codemp='" . $ls_codemp . "' AND a.numrecdoc='" . $ls_numrecdoc . "' AND " . " a.cod_pro='" . $ls_codpro . "' AND a.ced_bene='" . $ls_cedben . "' " . " GROUP BY a.numrecdoc ");
if (count($la_cmpret) > 0) {
$ls_codret = $la_cmpret["codret"];
if ($ls_codret == '0000000001') {
$ldec_monret = $la_cmpret["monret"];
$ls_cmpret = $la_cmpret["numcom"];
$ldec_monobjret = $la_cmpret["monobjret"];
$ldec_porded = $la_cmpret["porded"];
$ldec_ivaret = $la_cmpret["iva_ret"];
$ls_tiptrans = $la_cmpret["tiptrans"];
} else {
$ldec_monret = 0;
$ls_cmpret = '';
$ldec_monobjret = 0;
$ldec_porded = 0;
