AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- cambio en alerta de guardado

Browse Source
This commit is contained in:
rrene
2020-10-08 18:12:28 -07:00
parent 28b42b681f
commit 5264f95b7d
1 changed files with 32 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

59
Contabilidad/RegPrePoliza.aspx.vb
View File

@@ -982,34 +982,39 @@ Partial Class ContabilidadC_RegPrePoliza
Else Else
MsgError = "No se pudo insertar la póliza" MsgError = "No se pudo insertar la póliza"
End If End If
Catch ex As Exception
MsgError = "Error" If MsgError = "" Then
End Try
'MENSAJE IE
If MsgError = "" Then If CveIE > 0 Then
'MENSAJE IE MensajeAlert.AppendFormat("<br/><br/>Folio Bancario: <b><a href = ""/Bancos/IE.aspx?CveIE={0}"" class=""texto"" target=""_blank"" >{1}</a></b>", CveIE, FolioIE)
If CveIE > 0 Then Alert(MensajeAlert.ToString, ModExtensiones.TipoMensaje.MsgInformacion, "window.location.reload()")
MensajeAlert.AppendFormat("<br/><br/>Folio Bancario: <b><a href = ""/Bancos/IE.aspx?CveIE={0}"" class=""texto"" target=""_blank"" >{1}</a></b>", CveIE, FolioIE) Else
Alert(MensajeAlert.ToString, ModExtensiones.TipoMensaje.MsgInformacion, "window.location.reload()") Alert(If(MensajeAlert.ToString = "", "Se registro con exito.", MensajeAlert.ToString), TipoMensaje.MsgInformacion, "window.location.reload()")
Else End If
Alert(If(MensajeAlert.ToString = "", "Se registro con exito.", MensajeAlert.ToString), TipoMensaje.MsgInformacion, "window.location.reload()")
End If ObjIE.Commit()
If Conta IsNot Nothing Then Conta.Commit()
ObjIE.Commit()
If Conta IsNot Nothing Then Conta.Commit() 'UPPDocumento.Update()
'TxtObservaciones.Text = ""
UPPDocumento.Update() 'GvMov.DataBind()
'TxtFecha.Text = ""
TxtObservaciones.Text = "" 'TxtObservaciones.Text = ""
GvMov.DataBind() Else
TxtFecha.Text = "" ObjIE.RollBack()
TxtObservaciones.Text = "" If Conta IsNot Nothing Then Conta.RollBack()
Else End If
ObjIE.RollBack() Catch ex As Exception
ObjIE.RollBack()
If Conta IsNot Nothing Then Conta.RollBack() If Conta IsNot Nothing Then Conta.RollBack()
End If Alert("Ocurrio un error al registrar el movimiento", TipoMensaje.MsgInformacion)
ex.GuardaLog(ex.Message)
End Try
ObjIE.Dispose() ObjIE.Dispose()
ObjMov.Dispose() ObjMov.Dispose()
If Conta IsNot Nothing Then Conta.Dispose() If Conta IsNot Nothing Then Conta.Dispose()