Merge branch 'master' of http://oirigoyen@192.168.10.111:8383/SIG.git

Bancos/DepositosCaja.aspx

@@ -175,9 +175,7 @@
                 <div class="col-md-2" runat="server" style="text-align: left;">                  
                      
                          <asp:TextBox ID="TxtObservaciones" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="500"></asp:TextBox>
-                         <asp:RequiredFieldValidator ID="RfvTxtObservaciones" runat="server" ControlToValidate="TxtObservaciones" Display="None" ErrorMessage="El campo <b>''Observaciones''</b> es requerido por la aplicación." ValidationGroup="Valida"></asp:RequiredFieldValidator>
-                         <ajax:ValidatorCalloutExtender ID="VceRfvTxtObservaciones" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtObservaciones" Width="350px"></ajax:ValidatorCalloutExtender>                    
-                    
+                         
                 </div>
    
 

Bancos/DepositosCaja.aspx.vb

@@ -38,10 +38,10 @@ Partial Class Bancos_DepositosCaja
     End Sub
 
     Private Sub CargaCuentas()
-        DdlCuentaDeposito.DataSource = GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros("  CveTipoCuenta <> 1", "", {"CveCuenta", "NumCuentaMoneda"})
+        DdlCuentaDeposito.DataSource = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros("  CveTipoCuenta <> 1", "", {"CveCuenta", "NumCuentaMoneda"})
         DdlCuentaDeposito.DataBind()
 
-        DdlCajaChica.DataSource = GlobalDTBancosCuentas(-1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros("  CveTipoCuenta = 1", "", {"CveCuenta", "NumCuentaMoneda"})
+        DdlCajaChica.DataSource = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveEmpresa:=UsuarioActual.CveEmpresa).FiltraParametros("  CveTipoCuenta = 1", "", {"CveCuenta", "NumCuentaMoneda"})
         DdlCajaChica.DataBind()
 
         DdlSubProyectos.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)

Bancos/RepCortes.aspx

@@ -231,7 +231,7 @@
                             <asp:Literal ID="LtlTotalIngreso" runat="server" Text='<%# Eval("TotalIngresos", "{0:N2}") %>'></asp:Literal>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-HorizontalAlign="Center">
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
                     <HeaderTemplate>
                             <asp:Label Text="Devoluciones" runat="server" CausesValidation="false"> </asp:Label>
                             <asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
@@ -240,7 +240,16 @@
                             <asp:Literal ID="LtlDevoluciones" runat="server" Text='<%# Eval("Devoluciones", "{0:#,###.##}") %>'></asp:Literal>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-HorizontalAlign="Center">
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
+                        <HeaderTemplate>
+                            <asp:Label Text="Importe Inicial" runat="server" CausesValidation="false"> </asp:Label>
+                            <asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlImporteInicial" runat="server" Text='<%# Eval("ImporteInicial", "{0:N2}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
                         <HeaderTemplate>
                             <asp:Label Text="Total Caja" runat="server" CausesValidation="false"> </asp:Label>
                             <asp:Literal runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>

Bancos/RepCortes.aspx.vb

@@ -8,10 +8,17 @@ Imports System.Collections.Generic
 
 Partial Class Bancos_RepCortes
     Inherits ClsPaginas
-    Private Shared missing As Object = System.Reflection.Missing.Value
-
+    Private Shared missing As Object = System.Reflection.Missing.Value
+
 #Region "PROPIEDADES"
-
+    Private Property DtCortes As DataTable
+        Get
+            Return CType(ViewState("DtCortes"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtCortes") = value
+        End Set
+    End Property
     Private Property DtCortesVentasResumen As DataTable
         Get
             Return CType(ViewState("DtCortesVentasResumen"), DataTable)
@@ -67,16 +74,20 @@ Partial Class Bancos_RepCortes
 
 
 #Region " C A R G A - D A T O S "
-    Public Sub CargaDatos()
-        Dim ObjPuntoVenta As New ClsPuntoVenta
+    Public Sub CargaDatos()
+
         Dim FechaI As Date = If(txtFechaVI.Text <> "", txtFechaVI.Text.ToDate, MinFecha)
-        Dim FechaF As Date = If(txtFechaVF.Text <> "", txtFechaVF.Text.ToDate, MaxFecha)
+        Dim FechaF As Date = If(txtFechaVF.Text <> "", txtFechaVF.Text.ToDate, MaxFecha)
+
+        Dim ObjPuntoVenta As New ClsPuntoVenta
         If ObjPuntoVenta.GetVta_ReporteCortes(UsuarioActual.CveEmpresa, FechaI, FechaF, DdlSubProyectos.SelectedValue.ToEntero) Then
-            GvDatos.DataSource = ObjPuntoVenta.DtResultados
-            GvDatos.DataBind()
-            UPDatos.Update()
+            DtCortes = ObjPuntoVenta.DtResultados.Copy()
         End If
-        ObjPuntoVenta.Dispose()
+        ObjPuntoVenta.Dispose()
+
+        GvDatos.DataSource = DtCortes
+        GvDatos.DataBind()
+        UPDatos.Update()
     End Sub
 #End Region
 
@@ -85,6 +96,9 @@ Partial Class Bancos_RepCortes
         If e.Row.RowType = DataControlRowType.DataRow Then
             If e.Row.DBCampo("CveCorte").ToString = "" Then
                 e.Row.CssClass = "SubTotales2"
+                If DtCortes IsNot Nothing Then
+                    e.Row.FCLiteral("LtlImporteInicial").Text = DtCortes.SUMD("ImporteInicial").FormatoNumero(2)
+                End If
             End If
         End If
     End Sub

Bancos/RepCxCCliente.aspx

@@ -156,7 +156,7 @@
 
             <asp:GridView ID="GvCxC" ClientIDMode="Static" runat="server" AutoGenerateColumns="False" AlternatingRowStyle-BackColor="" Width="100%" EmptyDataText="No se encontraron Cuentas X Cobrar Pendientes" CssClass="table table-striped table-hover Widthall" GridLines="None">
                 <Columns>
-                    <asp:TemplateField ItemStyle-Width="30%" HeaderText="Cliente">
+                    <asp:TemplateField HeaderText="Cliente">
                         <ItemTemplate>
                             <asp:HyperLink ID="Hpl" runat="server" Text='<%#String.Format("{0}{1}{2}", Eval("NombreComercial"), If(Eval("SucursalCliente").ToString.Length > 0, " - ", " "), Eval("SucursalCliente")) %>' NavigateUrl='<%# String.Format("/Ventas/Clientes.aspx?CveCliente={0}", Eval("CveCliente"))%>'>
                             </asp:HyperLink>
@@ -164,8 +164,8 @@
                     </asp:TemplateField>
                     <asp:BoundField HeaderText="Sucursal" DataField="SubProyecto" ItemStyle-Width="10%" Visible="false" />
                     <asp:BoundField HeaderText="# Fact" DataField="NumFacturas" ItemStyle-HorizontalAlign="center" ItemStyle-Width="5%" />
-                    <asp:BoundField HeaderText="Último Vencimiento" DataField="UltimoVencimiento" ItemStyle-HorizontalAlign="center" ItemStyle-Width="10%" />
-                    <asp:TemplateField HeaderText="Original" ItemStyle-HorizontalAlign="Right">
+                    <asp:BoundField HeaderText="Último Venc." DataField="UltimoVencimiento" ItemStyle-HorizontalAlign="center" ItemStyle-Width="5%" />
+                    <asp:TemplateField HeaderText="Original" ItemStyle-HorizontalAlign="Right"  ItemStyle-Width="15%">
                         <ItemTemplate>
                             <asp:Literal ID="LtlO" runat="server" Text='<%# Eval("Original","{0:C}")  %>'></asp:Literal>
                             <asp:Literal ID="LtlA" runat="server" Text='<%# Eval("Abreviatura","{0:C}")  %>'></asp:Literal>