From a4971085d90ce18ce7dce86c3794b2a09818824b Mon Sep 17 00:00:00 2001
From: rrene <rrene@DESKTOP-04EII7E>
Date: Wed, 11 Mar 2020 13:31:21 -0700
Subject: [PATCH] - validacion

---
 Bancos/IE.aspx.vb | 12 ++++++++++++
 vwd.webinfo       |  2 ++
 2 files changed, 14 insertions(+)

diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb
index 6699f469a..a137a7432 100644
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -3295,6 +3295,7 @@ Partial Class Bancos_IE
 
         Else
             ObjIE.RollBack()
+            Alert(MsgError, TipoMensaje.MsgAdvertencia)
         End If
 
         If Msg.ToString <> "" Then
@@ -3331,6 +3332,7 @@ Partial Class Bancos_IE
             End If
         End If
 
+        Msg.Clear()
         RecargaGlobalCuentasBancarias()
         ObjIE.Dispose()
         ObjMov.Dispose()
@@ -4905,6 +4907,16 @@ Partial Class Bancos_IE
                 CveEventoPrincipal = ObjOI.CveEvento
             End If
 
+            If CveEvento = 0 Then
+                ObjOI.Dispose()
+                Return "Ocurrió un error al obtener el evento relacionado"
+            End If
+
+            If CveEventoPrincipal = 0 Then
+                ObjOI.Dispose()
+                Return "Ocurrió un error al obtener el evento relacionado ppal."
+            End If
+
             If Not ObjOI.UpdateEstatusEvento(3, -1, CveEvento, UsuarioActual.CveUsuario) Then
                 ObjOI.Dispose()
                 Return "Ocurrió un error al actualizar el estatus de anticipo de la OC/REQ. Por favor actualice y vuelva a intentar."
diff --git a/vwd.webinfo b/vwd.webinfo
index bfda47f43..a280964b8 100644
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -23,6 +23,8 @@
   
     
   
+    
+  
     <Service ID="{C0C07587-41A7-46C8-8FBD-3F9C8EBE2DDC}"/>
   </StartupServices>
 </VisualWebDeveloper>
\ No newline at end of file