$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"]; } $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"); if ($ls_tiporeporte == 1) { $la_cmpret = $io_report->uf_select_rowdata($io_sql, "SELECT DISTINCT max(a.numrecdoc) as numrecdoc,max(a.monobjretaux) as monobjret,SUM(a.monretaux) as monret,max(a.porded) as porded,max(b.codret) as codret,max(b.numcom) as numcom,max(b.iva_retaux) as iva_ret,max(tiptrans) as 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 "); } else { $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,max(tiptrans) as 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 {