$ls_nomper = $_POST["txtnomper"];
$ls_estpres = "0";
if ($ls_coduniadmcede == "" || $ls_codresced == "" || $ls_codreserec == "" || $ls_coduniadmrece == "" || $ls_codper == "") {
$io_msg->message("Debe compeltar los campos");
} else {
$ld_fecenacta = $io_fun->uf_convertirdatetobd($ld_fecenacta);
$lb_existe = $io_saf->uf_saf_select_prestamo($ls_codemp, $ls_cmpres, $ld_fecenacta, $ls_coduniadmcede, $ls_coduniadmrece);
if ($lb_existe) {
if ($ls_estpres == "0") {
for ($li_i = 1; $li_i <= $li_totrows; $li_i++) {
$ls_codact = $_POST["txtcodact" . $li_i];
$ls_denact = $_POST["txtdenact" . $li_i];
$ls_idact = $_POST["txtidact" . $li_i];
//$ls_desmov= $_POST["txtdesmov".$li_i];
$li_monact = $_POST["txtmonact" . $li_i];
$lb_valido = $io_saf->uf_saf_update_prestamo($ls_codemp, $ls_cmpres, $ld_fecenacta, $ls_coduniadmcede, $ls_coduniadmrece, $ls_codresced, $ls_codreserec, $ls_codper, $ls_estpres, $la_seguridad);
}
if ($lb_valido) {
$ls_estactpre = "1";
$lb_valido = $io_saf->uf_saf_update_saf_dta($ls_codemp, $ls_codact, $ls_coduniadmcede, $ls_idact, $ls_estactpre, $ld_fecenacta, $ls_coduniadmrece, $la_seguridad);
}
if ($lb_valido) {
$io_msg->message("El registro fue actualizado con exito");
uf_limpiarvariables();
} else {
$io_msg->message("El registro no pudo ser actualizado");
uf_limpiarvariables();
}
}
// fin del if $ls_estpres
} else {
