Mensaje folio duplicado ClsBancos
This commit is contained in:
@@ -1453,9 +1453,11 @@ Public Class ClsBancos
|
|||||||
_Folio = SqlAdapter.SelectCommand.Parameters("@FolioRegistro").Value.ToString
|
_Folio = SqlAdapter.SelectCommand.Parameters("@FolioRegistro").Value.ToString
|
||||||
|
|
||||||
Catch Ex1 As SqlException
|
Catch Ex1 As SqlException
|
||||||
If Ex1.Message.Contains("Número: 2627;") Or Ex1.Message.Contains("Número: 2601;") Then
|
If Ex1.Message.Contains("Número: 2627;") Then
|
||||||
Me.OnError("Ocurrió un error al Guardar el Movimiento.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
Me.OnError("Ocurrió un error al Guardar el Movimiento.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||||
|
ElseIf Ex1.Message.Contains("Número: 2601;") Then
|
||||||
Alert("Ya existe un movimiento bancario con el mismo Folio: <b>" & Folio & "</b>.", TipoMensaje.MsgAdvertencia)
|
Alert("Ya existe un movimiento bancario con el mismo Folio: <b>" & Folio & "</b>.", TipoMensaje.MsgAdvertencia)
|
||||||
|
Me.OnError("Ocurrió un error al Guardar el Movimiento. Ya existe un movimiento bancario con el mismo Folio: <b>" & Folio & "</b>.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||||
Else
|
Else
|
||||||
Me.OnError("Ocurrió un error al Guardar el Movimiento.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
Me.OnError("Ocurrió un error al Guardar el Movimiento.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||||
End If
|
End If
|
||||||
|
|||||||
Reference in New Issue
Block a user