- validacion

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."

vwd.webinfo

@@ -23,6 +23,8 @@
   
     
   
+    
+  
     <Service ID="{C0C07587-41A7-46C8-8FBD-3F9C8EBE2DDC}"/>
   </StartupServices>
 </VisualWebDeveloper>