.

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

Compras/RepCxPDetalle.aspx

@@ -75,7 +75,7 @@
                         <div class="row text-size-12">
                             <div class="col-md-1"><span>Proveedor:</span></div>
                             <div class="col-md-1">
-                                <ADS:Dropdownlost runat="server" ID="DdlProveedores" CssStyle="width: 100%;" CssClassDdl="select2me " DataTextField="RazonSocial" DataValueField="CveProveedor">
+                                <ADS:Dropdownlost runat="server" ID="DdlProveedores" CssStyle="width: 100%;" Width="100%" CssClassDdl="select2me " DataTextField="RazonSocial" DataValueField="CveProveedor">
                                 </ADS:Dropdownlost>
                             </div>
                             <div class="col-md-1"><span>Clasificaciones:</span></div>
@@ -394,7 +394,7 @@
                                                     <td style="text-align: left;">
                                                         <asp:CheckBox ID="ChkFolio" runat="server" Text="Folio" Checked="true" /></td>
                                                     <td style="text-align: left;">
-                                                        <asp:CheckBox ID="ChkSubTotal" runat="server" Text="SubTotal" Checked="true" /></td>
+                                                        <asp:CheckBox ID="ChkSubTotal" runat="server" Text="SubTotal" Checked="false" /></td>
                                                     <td style="text-align: left;">
                                                         <asp:CheckBox ID="ChkProveedor" runat="server" Text="Proveedor" Checked="true" /></td>
                                                 </tr>
@@ -422,7 +422,7 @@
                                                     <td style="text-align: left;">
                                                         <asp:CheckBox ID="ChkFechaVencimiento" runat="server" Text="Fecha Venc." Checked="true" /></td>
                                                     <td style="text-align: left;">
-                                                        <asp:CheckBox ID="ChkTotal" runat="server" Text="Total" Checked="false" /></td>
+                                                        <asp:CheckBox ID="ChkTotal" runat="server" Text="Total" Checked="true" /></td>
                                                 </tr>
                                             </table>
                                         </td>

Compras/eFacturas.aspx

@@ -550,11 +550,9 @@
                         </table>
 
                         <hr style="border: 0; height: 1px; background-image: linear-gradient(to right, rgba(0, 0, 0, 0), rgba(0, 0, 0, 0.75), rgba(0, 0, 0, 0));" />
-
+                        
-
-
                         <asp:GridView ID="GVPDocumentosRelacionadosPagos" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD mysmallbtn"
-                            DataKeyNames="CveFactura,CveCompra,CveIE"
+                            DataKeyNames="CveFactura,CveCompra,CveIE,Fecha,FechaPago"
                             data-sort="true" Width="100%" EmptyDataText="No se encontró registros con la información del complemento de pago"
                             ShowHeaderWhenEmpty="true" AutoGenerateColumns="False">
                             <Columns>

Compras/eFacturas.aspx.vb

@@ -2838,24 +2838,21 @@ Partial Class Compras_eFacturas
             BtnVincularPago.Visible = False
         End If
 
+        For Each GvRowF As GridViewRow In GVPDocumentosRelacionadosPagos.Rows
 
-
+            Dim FechaDocumento As Date = GvRowF.DataKey("FechaPago").ToString.ToDate
-
+            Dim FechaDoRecibo As Date = GvRowF.DataKey("Fecha").ToString.ToDate
-        For Each drow As DataRow In ObjCompras.DtResultados.FiltraParametros("CveIE > 0 AND FechaDocumento IS NOT NULL", "", {"FechaDocumento"}).Rows
-
-            Dim FechaDocumento As Date = drow("FechaDocumento").ToString.ToDate
 
             Dim FT1 As Date = FechaDocumento.AddDays(-6)
             Dim FT2 As Date = FechaDocumento.AddDays(7)
 
-            If Not (FechaPago >= FT1 And FechaPago < FT2) Then
+            If Not (FechaDoRecibo >= FT1 And FechaDoRecibo < FT2) Then
 
                 BtnVincularPago.Visible = False
                 MSGComplemento = MSGComplemento & " Existen mas de 3 días de diferencia entre la fecha del documento y la fecha de complemento. "
 
                 Exit For
             End If
-
         Next
 
         If MSGComplemento.Trim.Length > 0 Then

Contabilidad2/RepAnexoCatalogo.aspx.vb

@@ -213,7 +213,7 @@ Partial Class AC2_RepAnexoCatalogo
             CargaGrid()
         Else
             DtDatos = Nothing
-            Alert("Ocurrio un error al cargar los datos del Anexo del Catálogo", TipoMensaje.MsgError)
+            Alert("Ocurrio un error al cargar los datos del Anexo del Catálogo.", TipoMensaje.MsgError)
         End If
 
         ObjConta.Dispose()

Inventarios/EntradasSalidas.aspx.vb

@@ -629,7 +629,7 @@ Partial Class Inventarios_EntradasSalidas
             End If
 
             If (DdlAlmacen.Items.FindByValue(Mov.CveAlmacen.ToString()) Is Nothing) Then
-                Dim dr As DataRow = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimero(String.Format("CveAlmacen = {0}", Mov.CveAlmacen))
+                Dim dr As DataRow = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveEstatus:=-1).FiltroPrimero(String.Format("CveAlmacen = {0}", Mov.CveAlmacen))
                 If dr IsNot Nothing Then
                     DdlAlmacen.Items.Insert(0, New ListItem(dr("Almacen").ToString, dr("CveAlmacen").ToString)) ' lo genera Obj.SelectedValue = Valor.ToString
                     DdlAlmacen.Enabled = False

Ventas/MetasVendedores.aspx

@@ -37,6 +37,14 @@
             padding-right: 4px !important;
             padding-left: 4px !important;
         }
+        .Vendedor{
+            background-color:#000077;
+            color:white;
+            font-weight:bold;
+        }
+        .Vendedor:hover{
+            background-color:#000077;
+        }
     </style>
 </asp:Content>
 <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
@@ -132,7 +140,7 @@
         <asp:UpdatePanel ID="UPDatos" runat="server" RenderMode="Inline" UpdateMode="Conditional">
             <ContentTemplate>
                 <asp:GridView ID="GV" runat="server" GridLines="None" BorderWidth="0" UseAccessibleHeader="true" DataKeyNames="Titulo,Etiqueta,RealMes,VtaMesAA,RealAcumulado,RealMesPorcentaje"
-                    CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true"
+                    CssClass="table table-striped table-advance Widthall ScrollAD" data-sort="true" ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true"
                     AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False">
                     <Columns>
                         <asp:TemplateField HeaderText="Grupo" ItemStyle-HorizontalAlign="Left">

Ventas/MetasVendedores.aspx.vb

@@ -76,6 +76,8 @@ Partial Class MetasVendedores
     Protected Sub GV_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GV.RowDataBound
         If e.Row.RowType = DataControlRowType.DataRow Then
             Select Case e.Row.DataKey("Etiqueta")
+                Case "Vendedor"
+                    e.Row.CssClass = "Vendedor"
                 Case "Categoria"
                     e.Row.CssClass = "Totales"
                 Case "Clasificacion"

vwd.webinfo

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