diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb index 6ee358672..1bd0ca8fa 100644 --- a/App_Code/ClsContabilidad.vb +++ b/App_Code/ClsContabilidad.vb @@ -5925,7 +5925,11 @@ Public Class ClsContabilidad SqlAdapter.Fill(Data) Retorno = SqlAdapter.SelectCommand.Parameters("@CvePrePoliza").Value.ToString.ToEntero Catch ex As Exception - Me.OnError("Ocurrió un error al eliminar el catálogo de Conta Ejercicios", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + If ex.Message.Contains("50000") Then + Me.OnError("No se puede registrar una prepóliza en un periodo cerrado.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + Else + Me.OnError("Ocurrió un error al cerrar el Ejercicio", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End If End Try Return Retorno diff --git a/App_Code/ClsEdocumentacion.vb b/App_Code/ClsEdocumentacion.vb index b06f629cf..dc764e2bb 100644 --- a/App_Code/ClsEdocumentacion.vb +++ b/App_Code/ClsEdocumentacion.vb @@ -237,7 +237,11 @@ Public Class ClsEdocumentacion SqlAdapter.Fill(Data) Retorno = True Catch ex As Exception - OnError("Ocurrió un error al consultar el catalogo de documentación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + If ex.Message.Contains("FK_Edoc_DocumentacionParametros_Edoc_Documentacion") Then + Alert("Este documento tiene parametros registrados", TipoMensaje.MsgAdvertencia) + Else + OnError("Ocurrió un error al eliminar la documentacion", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo) + End If End Try Return Retorno diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx index df3cbc36c..f294cf4bf 100644 --- a/Bancos/DepositosCaja.aspx +++ b/Bancos/DepositosCaja.aspx @@ -4,6 +4,33 @@ + @@ -95,22 +122,22 @@ - - - +
+ + -
+
- +
@@ -136,23 +163,23 @@
-
-
- +
+
+
-