} else {
$lb_valido = $io_modcmpret->uf_anular_cmpret($ls_numcom, $la_seguridad);
if ($lb_valido && $ls_bdorigen != "") {
$lb_valido = $io_modcmpret->uf_anular_cmpret_consolida($ls_codret, $ls_numcom, $ls_probene, $ls_codigo);
}
if ($lb_valido) {
$io_msg->message("El comprobante fue anulado, ya que no es el ultimo registro!!");
uf_limpiarvariables();
$io_sql->commit();
} else {
$io_msg->message("Se genero un problema al anular la retencion");
uf_limpiarvariables();
$io_sql->rollback();
}
}
uf_load_data(&$ls_parametros);
break;
}
?>
<table width="799" border="0" align="center" cellpadding="0" cellspacing="0" class="contorno">
<tr>
<td height="30" colspan="11" class="cd-logo"><img src="../shared/imagebank/header.jpg" width="808" height="40"></td>
</tr>
<tr>
<td height="20" colspan="11" bgcolor="#E7E7E7"><table width="762" border="0" align="center" cellpadding="0" cellspacing="0">
<td width="432" height="20" bgcolor="#E7E7E7" class="descripcion_sistema">Cuentas por Pagar </td>
<td width="346" bgcolor="#E7E7E7"><div align="right"><span class="letras-pequeñas"><b><?php
print date("j/n/Y") . " - " . date("h:i a");
?>
</b></span></div></td>
<tr>
if ($lb_valido)
{
$in_classcmp->io_int_scg->io_sql->commit();
$ls_existe="C";
$io_msg->message(" El Comprobante se registro Exitosamente......" );
}
else
{
$in_classcmp->io_int_scg->io_sql->rollback();
$io_msg->message($in_classcmp->is_msg_error);
$io_msg->message(" Error al guardar Comprobante" );
}
}// fin del else
$ls_parametros="";
uf_load_data($ls_parametros,$ls_comprobante2, $ls_comprobante);
}// fin del guardar
if($ls_operacion=="ELIMINAR")
{
$lb_valido=false;
$ls_codemp=$la_emp["codemp"];
$ls_comprobante=$_POST["txtcomprobante"];
$ld_fecha=$_POST["txtfecha"];
$ls_procedencia=$_POST["txtproccomp"];
$ls_descripcion=$_POST["txtdesccomp"];
$ls_tipo=$_POST["tipo"];
$in_classcmp->io_int_int->is_tipo=$ls_tipo;
$in_classcmp->io_int_int->is_cod_prov=$_POST["txtprovbene"];
$in_classcmp->io_int_int->is_ced_ben=$_POST["txtprovbene"];
