else
{
$io_msg->message("Ocurrio un error al procesar el comprobante !!!");
$io_sql->rollback();
}
uf_load_data(&$ls_parametros);
break;
case "ELIMINAR":
uf_load_variables();
$io_sql->begin_transaction();
$lb_ulitmo=$io_modcmpret->uf_buscar_ultimo($ls_numcom);
if($lb_ulitmo){
$lb_flag=$io_modcmpret->uf_delete_cmpret($ls_numcom,$la_seguridad);
if($lb_flag)
{
$lb_flag=$io_modcmpret->uf_liberar_rd($ls_probene,$ls_codigo,$li_totrowrecepciones);
if ($lb_flag)
{
$io_msg->message("El comprobante fué eliminado físicamente, por ser el último registro!!");
$io_sql->commit();
uf_limpiarvariables();
}
else
{
$io_msg->message("Se genero un problema al eliminar la retención !!!");
uf_limpiarvariables();
$io_sql->rollback();
}
