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

App_Code/ClsProductosServicios.vb

@@ -1858,7 +1858,7 @@ Public Class ClsProductosServicios
         Return Retorno
     End Function
 
-    Public Function AddPorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal, CveUsuario As Integer) As Boolean
+    Public Function AddPorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal, CveUsuario As Integer, Optional ProntoPago As Decimal = -1, Optional Plazo As Integer = -1) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Vta_PorcentajeMarcasAdd")
 
@@ -1870,6 +1870,8 @@ Public Class ClsProductosServicios
             .Add("@PorcentajeProducto2", SqlDbType.SmallMoney).Value = PorcentajeProducto2
             .Add("@PorcentajeProducto3", SqlDbType.SmallMoney).Value = PorcentajeProducto3
             .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@ProntoPago", SqlDbType.SmallMoney).Value = ProntoPago
+            .Add("@Plazo", SqlDbType.SmallInt).Value = Plazo
 
         End With
         Try
@@ -1881,7 +1883,7 @@ Public Class ClsProductosServicios
 
         Return Retorno
     End Function
-    Public Function UpdatePorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal) As Boolean
+    Public Function UpdatePorcentajeMarcas(CveCliente As Integer, CveMarca As Integer, PorcentajeProducto As Decimal, PorcentajeProducto2 As Decimal, PorcentajeProducto3 As Decimal, Optional ProntoPago As Decimal = -1, Optional Plazo As Integer = -1) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Vta_PorcentajeMarcasUpdate")
 
@@ -1892,6 +1894,8 @@ Public Class ClsProductosServicios
             .Add("@PorcentajeProducto", SqlDbType.SmallMoney).Value = PorcentajeProducto
             .Add("@PorcentajeProducto2", SqlDbType.SmallMoney).Value = PorcentajeProducto2
             .Add("@PorcentajeProducto3", SqlDbType.SmallMoney).Value = PorcentajeProducto3
+            .Add("@ProntoPago", SqlDbType.SmallMoney).Value = ProntoPago
+            .Add("@Plazo", SqlDbType.SmallInt).Value = Plazo
 
         End With
         Try

Compras/Proveedores.aspx

@@ -1175,15 +1175,27 @@
                                     <i class="icon-pin font-green"></i>
                                     <span class="caption-subject bold uppercase">Historial de Compras</span>
                                 </div>
-                                <div class="actions">
-                                    <div class="btn-group">
-                                    </div>
-                                </div>
 
                                 <div class="tools">
                                     <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
                                     <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
                                 </div>
+
+                                <div class="actions">
+                                    <div class="btn-group">
+                                        <asp:UpdatePanel UpdateMode="Conditional" runat="server" ID="UpdatePanel3">
+                                            <ContentTemplate>
+                                                <asp:LinkButton ID="LnkHistorialComprasPDF" runat="server" data-toggle="tooltip" Title="PDF"> <i class="fa fa-file-pdf-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                <asp:LinkButton ID="LnkHistorialComprasExcel" runat="server" data-toggle="tooltip" Title="Excel"><i class="fa fa-file-excel-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                            </ContentTemplate>
+                                            <Triggers>
+                                                <asp:PostBackTrigger ControlID="LnkHistorialComprasPDF" />
+                                                <asp:PostBackTrigger ControlID="LnkHistorialComprasExcel" />
+                                            </Triggers>
+                                        </asp:UpdatePanel>
+                                    </div>
+                                </div>
+
                             </div>
                             <div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">
                                 <div class="row" style="margin-right: 10px; margin-top: 18px;" align="right">
@@ -1406,6 +1418,22 @@
                                             <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
                                             <a href="javascript:;" class="remove" data-original-title="" title=""></a>
                                         </div>
+
+                                        <div class="actions">
+                                            <div class="btn-group">
+                                                <asp:UpdatePanel UpdateMode="Conditional" runat="server" ID="UpdatePanel4">
+                                                    <ContentTemplate>
+                                                        <asp:LinkButton ID="LnkCxPActivasPDF" runat="server" data-toggle="tooltip" Title="PDF"> <i class="fa fa-file-pdf-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                        <asp:LinkButton ID="LnkCxPActivasExcel" runat="server" data-toggle="tooltip" Title="Excel"><i class="fa fa-file-excel-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                    </ContentTemplate>
+                                                    <Triggers>
+                                                        <asp:PostBackTrigger ControlID="LnkCxPActivasPDF" />
+                                                        <asp:PostBackTrigger ControlID="LnkCxPActivasExcel" />
+                                                    </Triggers>
+                                                </asp:UpdatePanel>
+                                            </div>
+                                        </div>
+
                                     </div>
                                     <div class="portlet-body ">
                                         <div class="row" style="margin-right: 10px;" align="right">
@@ -1490,14 +1518,26 @@
                                             <span class="caption-subject bold uppercase">Historial de Compras Pagadas</span>
 
                                         </div>
-                                        <div class="actions">
-                                            <div class="btn-group">
-                                            </div>
-                                        </div>
 
                                         <div class="tools">
                                             <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
                                         </div>
+
+                                        <div class="actions">
+                                            <div class="btn-group">
+                                                <asp:UpdatePanel UpdateMode="Conditional" runat="server" ID="UpdatePanel6">
+                                                    <ContentTemplate>
+                                                        <asp:LinkButton ID="LnkHistorialComprasPagadasPDF" runat="server" data-toggle="tooltip" Title="PDF"> <i class="fa fa-file-pdf-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                        <asp:LinkButton ID="LnkHistorialComprasPagadasExcel" runat="server" data-toggle="tooltip" Title="Excel"><i class="fa fa-file-excel-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                    </ContentTemplate>
+                                                    <Triggers>
+                                                        <asp:PostBackTrigger ControlID="LnkHistorialComprasPagadasPDF" />
+                                                        <asp:PostBackTrigger ControlID="LnkHistorialComprasPagadasExcel" />
+                                                    </Triggers>
+                                                </asp:UpdatePanel>
+                                            </div>
+                                        </div>
+
                                     </div>
                                     <div class="portlet-body ">
                                         <div class="row" style="margin-right: 10px;" align="right">
@@ -1656,16 +1696,27 @@
                                             <span class="caption-subject bold uppercase">Notas de Crédito por aplicar / Anticipos por Comprobar</span>
 
                                         </div>
-                                        <div class="actions">
-                                            <div class="btn-group">
-                                            </div>
-                                        </div>
 
                                         <div class="tools">
                                             <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
                                             <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
                                             <a href="javascript:;" class="remove" data-original-title="" title=""></a>
                                         </div>
+
+                                        <div class="actions">
+                                            <div class="btn-group">
+                                                <asp:UpdatePanel UpdateMode="Conditional" runat="server" ID="UpdatePanel7">
+                                                    <ContentTemplate>
+                                                        <asp:LinkButton ID="LnkNCxAplicarPDF" runat="server" data-toggle="tooltip" Title="PDF"> <i class="fa fa-file-pdf-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                        <asp:LinkButton ID="LnkNCxAplicarExcel" runat="server" data-toggle="tooltip" Title="Excel"><i class="fa fa-file-excel-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                    </ContentTemplate>
+                                                    <Triggers>
+                                                        <asp:PostBackTrigger ControlID="LnkNCxAplicarPDF" />
+                                                        <asp:PostBackTrigger ControlID="LnkNCxAplicarExcel" />
+                                                    </Triggers>
+                                                </asp:UpdatePanel>
+                                            </div>
+                                        </div>
                                     </div>
                                     <div class="portlet-body ">
                                         <div class="row" style="margin-right: 10px;" align="right">
@@ -1727,16 +1778,27 @@
                                             <span class="caption-subject bold uppercase">Historial</span>
 
                                         </div>
-                                        <div class="actions">
-                                            <div class="btn-group">
-                                            </div>
-                                        </div>
 
                                         <div class="tools">
                                             <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
                                             <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
                                             <a href="javascript:;" class="remove" data-original-title="" title=""></a>
                                         </div>
+                                        
+                                        <div class="actions">
+                                            <div class="btn-group">
+                                                <asp:UpdatePanel UpdateMode="Conditional" runat="server" ID="UpdatePanel8">
+                                                    <ContentTemplate>
+                                                        <asp:LinkButton ID="LnkNCxAplicarHistorialPDF" runat="server" data-toggle="tooltip" Title="PDF"> <i class="fa fa-file-pdf-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                        <asp:LinkButton ID="LnkNCxAplicarHistorialExcel" runat="server" data-toggle="tooltip" Title="Excel"><i class="fa fa-file-excel-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                    </ContentTemplate>
+                                                    <Triggers>
+                                                        <asp:PostBackTrigger ControlID="LnkNCxAplicarHistorialPDF" />
+                                                        <asp:PostBackTrigger ControlID="LnkNCxAplicarHistorialExcel" />
+                                                    </Triggers>
+                                                </asp:UpdatePanel>
+                                            </div>
+                                        </div>
                                     </div>
                                     <div class="portlet-body ">
                                         <div class="row" style="margin-right: 10px;" align="right">
@@ -1814,6 +1876,22 @@
                                             <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
                                             <a href="javascript:;" class="remove" data-original-title="" title=""></a>
                                         </div>
+
+                                        <div class="actions">
+                                            <div class="btn-group">
+                                                <asp:UpdatePanel UpdateMode="Conditional" runat="server" ID="UpdatePanel5">
+                                                    <ContentTemplate>
+                                                        <asp:LinkButton ID="LnkCtasBancariasPDF" runat="server" data-toggle="tooltip" Title="PDF"> <i class="fa fa-file-pdf-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                        <asp:LinkButton ID="LnkCtasBancariasExcel" runat="server" data-toggle="tooltip" Title="Excel"><i class="fa fa-file-excel-o" style="margin-right: 10px; font-size:15px; font-weight:bold; color:dimgray;"></i>  </asp:LinkButton>
+                                                    </ContentTemplate>
+                                                    <Triggers>
+                                                        <asp:PostBackTrigger ControlID="LnkCtasBancariasPDF" />
+                                                        <asp:PostBackTrigger ControlID="LnkCtasBancariasExcel" />
+                                                    </Triggers>
+                                                </asp:UpdatePanel>
+                                            </div>
+                                        </div>
+
                                     </div>
                                     <div class="portlet-body ">
                                         <asp:UpdatePanel ID="UpCuentasBancos" runat="server" UpdateMode="Conditional">
@@ -1967,7 +2045,12 @@
                                         <div class="caption font-green">
                                             <i class="icon-pin font-green"></i>
                                             <span class="caption-subject bold uppercase">Pagos Realizados</span>
+                                        </div>
 
+                                        <div class="tools">
+                                            <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
+                                            <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
+                                            <a href="javascript:;" class="remove" data-original-title="" title=""></a>
                                         </div>
 
                                         <div class="actions">
@@ -1984,11 +2067,7 @@
                                                 </asp:UpdatePanel>
                                             </div>
                                         </div>
-<%--                                        <div class="tools">
+
-                                            <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
-                                            <a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
-                                            <a href="javascript:;" class="remove" data-original-title="" title=""></a>
-                                        </div>--%>
                                     </div>
                                     <div class="portlet-body ">
                                         <div class="row" style="margin-right: 10px; margin-top: 18px;" align="right">

Compras/Proveedores.aspx.vb

@@ -289,6 +289,38 @@ Partial Class Compras_Proveedores
             ViewState("DTCobrosRealizados") = value
         End Set
     End Property
+    Private Property DtProveedoresHistorial As DataTable
+        Get
+            DtProveedoresHistorial = CType(ViewState("DtProveedoresHistorial"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtProveedoresHistorial") = value
+        End Set
+    End Property
+    Private Property DtCxPHistorial As DataTable
+        Get
+            DtCxPHistorial = CType(ViewState("DtCxPHistorial"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtCxPHistorial") = value
+        End Set
+    End Property
+    Private Property DtAntNC As DataTable
+        Get
+            DtAntNC = CType(ViewState("DtAntNC"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtAntNC") = value
+        End Set
+    End Property
+    Private Property DtAntNCH As DataTable
+        Get
+            DtAntNCH = CType(ViewState("DtAntNCH"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtAntNCH") = value
+        End Set
+    End Property
 #End Region
 
     Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
@@ -809,16 +841,19 @@ Partial Class Compras_Proveedores
                 LtlMaxima.Text = ObjProveedores.DtResultados.Rows(0)("MAX_Total").ToString.FormatoNumero(2)
                 'Carga Grid
 
-                GVHistorial.DataSource = ObjProveedores.DtResultados
+                DtProveedoresHistorial = ObjProveedores.DtResultados
+                GVHistorial.DataSource = DtProveedoresHistorial
             Else
                 LtlCantidad.Text = "0.00"
                 LtlTotalVendido.Text = "0.00"
                 LtlMinima.Text = "0.00"
                 LtlPromedio.Text = "0.00"
                 LtlMaxima.Text = "0.00"
+                DtProveedoresHistorial = Nothing
                 GVHistorial.DataSource = Nothing
             End If
         Else
+            DtProveedoresHistorial = Nothing
             GVHistorial.DataSource = Nothing
         End If
         ObjProveedores.Dispose()
@@ -851,23 +886,31 @@ Partial Class Compras_Proveedores
 
             If SelectTop > 0 Then
                 If ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'").Rows.Count > 0 Then
+                    DtAntNC = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'")
                     GvA.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'").AsEnumerable.Take(SelectTop).CopyToDataTable
                 Else
+                    DtAntNC = Nothing
                     GvA.DataSource = Nothing
                 End If
 
                 If ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'").Rows.Count > 0 Then
+                    DtAntNCH = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
                     GvAH.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'").AsEnumerable.Take(SelectTop).CopyToDataTable
                 Else
+                    DtAntNCH = Nothing
                     GvAH.DataSource = Nothing
                 End If
             Else
-                GvA.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'")
+                DtAntNC = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'")
-                GvAH.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
+                GvA.DataSource = DtAntNC
+                DtAntNCH = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
+                GvAH.DataSource = DtAntNCH
             End If
         Else
             GvA.DataSource = Nothing
             GvAH.DataSource = Nothing
+            DtAntNC = Nothing
+            DtAntNCH = Nothing
         End If
         ObjMovtos.Dispose()
         GvA.DataBind()
@@ -2243,6 +2286,7 @@ Partial Class Compras_Proveedores
             End If
             'solo tomo los 10 ultimos mas el totalizador general
             dtt = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
+            DtCxPHistorial = dtt
             If dtt IsNot Nothing AndAlso dtt.Rows.Count > 0 And Top = -1 Then
                 GvCxPHistorial.DataSource = dtt.AsEnumerable().Take(10).CopyToDataTable()
 
@@ -5621,44 +5665,76 @@ Partial Class Compras_Proveedores
 
     End Sub
 
-#Region "C L I E N T E S   P A G O S  R E A L I Z A D O S   I M P R I M I R   P D F/Excel"
+#Region "P R O V E D O R E S    G R I D S   I M P R I M I R   P D F/Excel"
-    Private Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkPagosProveedoresBancosExcel.Click
+    Private Sub LnkExportarPagos_Click(sender As Object, e As EventArgs) Handles LnkPagosProveedoresBancosExcel.Click
-        GenerarPDF("Excel")
+        ImprimeGridsProveedores("Excel", DTCobrosRealizados, "RepProveedoresPagosBancos")
     End Sub
-    Private Sub LinkPDF_Click(sender As Object, e As EventArgs) Handles LnkPagosProveedoresBancosPDF.Click
+    Private Sub LinkPDFPagos_Click(sender As Object, e As EventArgs) Handles LnkPagosProveedoresBancosPDF.Click
-        GenerarPDF()
+        ImprimeGridsProveedores("PDF", DTCobrosRealizados, "RepProveedoresPagosBancos")
+    End Sub
+
+    Private Sub LnkCtasBancariass_Click(sender As Object, e As EventArgs) Handles LnkCtasBancariasExcel.Click
+        ImprimeGridsProveedores("Excel", DTCuentasBancos, "RepProveedoresCtasBancarias")
+    End Sub
+    Private Sub LinkCtasBancarias_Click(sender As Object, e As EventArgs) Handles LnkCtasBancariasPDF.Click
+        ImprimeGridsProveedores("PDF", DTCuentasBancos, "RepProveedoresCtasBancarias")
+    End Sub
+
+    Private Sub LnkExportarHistorialCompras_Click(sender As Object, e As EventArgs) Handles LnkHistorialComprasExcel.Click
+        ImprimeGridsProveedores("Excel", DtProveedoresHistorial, "RepProveedoresHistorialCompras")
+    End Sub
+    Private Sub LinkPDFHistorialCompras_Click(sender As Object, e As EventArgs) Handles LnkHistorialComprasPDF.Click
+        ImprimeGridsProveedores("PDF", DtProveedoresHistorial, "RepProveedoresHistorialCompras")
+    End Sub
+
+    Private Sub LnkCxPActivas_Click(sender As Object, e As EventArgs) Handles LnkCxPActivasExcel.Click
+        ImprimeGridsProveedores("Excel", DTCxP, "RepProveedoresCxPActivas")
+    End Sub
+    Private Sub LinkCxPActivas_Click(sender As Object, e As EventArgs) Handles LnkCxPActivasPDF.Click
+        ImprimeGridsProveedores("PDF", DTCxP, "RepProveedoresCxPActivas")
+    End Sub
+
+    Private Sub LnkComprasPagadas_Click(sender As Object, e As EventArgs) Handles LnkHistorialComprasPagadasExcel.Click
+        ImprimeGridsProveedores("Excel", DtCxPHistorial, "RepProveedoresComprasPagadas")
+    End Sub
+    Private Sub LinkComprasPagadas_Click(sender As Object, e As EventArgs) Handles LnkHistorialComprasPagadasPDF.Click
+        ImprimeGridsProveedores("PDF", DtCxPHistorial, "RepProveedoresComprasPagadas")
+    End Sub
+
+    Private Sub LnkNCxAplicar_Click(sender As Object, e As EventArgs) Handles LnkNCxAplicarExcel.Click
+        ImprimeGridsProveedores("Excel", DtAntNC, "RepProveedoresNCxAplicar")
+    End Sub
+    Private Sub LinkNCxAplicar_Click(sender As Object, e As EventArgs) Handles LnkNCxAplicarPDF.Click
+        ImprimeGridsProveedores("PDF", DtAntNC, "RepProveedoresNCxAplicar")
+    End Sub
+
+    Private Sub LnkNCxAplicarHistorial_Click(sender As Object, e As EventArgs) Handles LnkNCxAplicarHistorialExcel.Click
+        ImprimeGridsProveedores("Excel", DtAntNCH, "RepProveedoresNCxAplicar")
+    End Sub
+    Private Sub LinkNCxAplicarHistorial_Click(sender As Object, e As EventArgs) Handles LnkNCxAplicarHistorialPDF.Click
+        ImprimeGridsProveedores("PDF", DtAntNCH, "RepProveedoresNCxAplicar")
     End Sub
-    Private Sub GenerarPDF(Optional Formato As String = "PDF")
-        Dim ObjTareas As New ClsOIEventos
 
-        Dim params As New List(Of ReportParameter)
+    Private Sub ImprimeGridsProveedores(Formato As String, DtTemp As DataTable, NombreFormato As String)
-
+        If DtTemp IsNot Nothing And DtTemp.Rows.Count > 0 Then
-
+            Dim params As New List(Of ReportParameter)
-
+
-        Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
+            Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
-        Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+            Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
-
+
-        ' Dim Filtros As String = "<b>Filtros: </b> "
+            params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
-
+            params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
-
+            params.Add(New ReportParameter("AgrupadoPor", "Proveedor: " & LtlProveedor.Text))
-
+
-        'Dim FechaI, FechaF As String
+            If Imagen.Exists Then
-
+                params.Add(New ReportParameter("LogoPath", logouri))
-        ' params.Add(New ReportParameter("AgrupadoPor", Filtros))
+            Else
-        params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
+                params.Add(New ReportParameter("LogoPath", ""))
-        'params.Add(New ReportParameter("FechaInicio", FechaI))
+            End If
-        'params.Add(New ReportParameter("FechaFin", FechaF))
+            ImprimirPDF("Empresas\Grales\Formatos\" & NombreFormato & ".rdlc", DtTemp, params, NombreFormato & "_" & Now.ToString("yyyyMMddhhmmss"), Formato:=Formato)
-        params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
+        Else
-        params.Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString))
+            Alert("No se encontró información.", TipoMensaje.MsgAdvertencia)
-
-        If Imagen.Exists Then
-            params.Add(New ReportParameter("LogoPath", logouri))
-        Else
-            params.Add(New ReportParameter("LogoPath", ""))
         End If
-        ImprimirPDF("Empresas\Grales\Formatos\RepProveedoresPagosBancos.rdlc", DTCobrosRealizados, params, "RepProveedoresPagosBancos_" & Now.ToString("yyyyMMddhhmmss"), Formato:=Formato)
-
-
     End Sub
 #End Region
 End Class

Contabilidad/RegPrePoliza.aspx.vb

@@ -165,9 +165,9 @@ Partial Class ContabilidadC_RegPrePoliza
         Set(value As Integer)
             ViewState("IdPoliza") = value
         End Set
-    End Property
+    End Property
 #End Region
-
+
     Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
 
         If Not Page.IsPostBack Then
@@ -186,79 +186,80 @@ Partial Class ContabilidadC_RegPrePoliza
 
             Dim dt As DataTable = Nothing
             '   If UsuarioActual.Empresa.UsaContabilidad Then
-            Dim Conta As New ClsContPAQi(UsuarioActual.Empresa)
+            Dim Conta As New ClsContPAQi(UsuarioActual.Empresa)
-
+
-                If Conta.GetCuentas(-1, "-1", 1) Then
+            If Conta.GetCuentas(-1, "-1", 1) Then
-                    dt = Conta.DtResultados
+                dt = Conta.DtResultados
-                    DtCuentasContables = Conta.DtResultados
+                DtCuentasContables = Conta.DtResultados
-                    Session("DtCuentas") = Conta.DtResultados
+                Session("DtCuentas") = Conta.DtResultados
-                End If
+            End If
-                Conta.Dispose()
+            Conta.Dispose()
-
+
-                If IfNull(Request("Tipo"), "").ToString = "NOMPROV" Then
+            If IfNull(Request("Tipo"), "").ToString = "NOMPROV" Then
-                    DivTipoGasto.Visible = True
+                DivTipoGasto.Visible = True
-                    ThTipoGasto.Visible = True
+                ThTipoGasto.Visible = True
-                    CargaTiposGasto()
+                CargaTiposGasto()
-                End If
+            End If
-
+
-                If Request("CvePrePoliza") IsNot Nothing AndAlso IsNumeric(Request("CvePrePoliza")) AndAlso Request("CvePrePoliza").ToEntero > 0 Then
+            If Request("CvePrePoliza") IsNot Nothing AndAlso IsNumeric(Request("CvePrePoliza")) AndAlso Request("CvePrePoliza").ToEntero > 0 Then
-                    ViewState("CvePrePoliza") = Request("CvePrePoliza").ToEntero
+                ViewState("CvePrePoliza") = Request("CvePrePoliza").ToEntero
-                    CreaDT()
+                CreaDT()
-                    CargaPrePoliza()
+                CargaPrePoliza()
-                    If IfNull(Request("Tipo"), "").ToString <> "NOMPROV" Then
+                If IfNull(Request("Tipo"), "").ToString <> "NOMPROV" Then
-                        GvPrePoliza.Columns(4).Visible = False
+                    GvPrePoliza.Columns(4).Visible = False
-                        GvConcepto.Columns(4).Visible = False
+                    GvConcepto.Columns(4).Visible = False
-                        GvMov.Columns(5).Visible = False
+                    GvMov.Columns(5).Visible = False
-                    End If
+                End If
-                    Exit Sub
+                Exit Sub
-                Else
+            Else
-                    CreaDT()
+                CreaDT()
-                    BtnEliminar.Visible = False
+                BtnEliminar.Visible = False
-                End If
+            End If
-
+
-
+
-                TipoPlantilla = 0
+            TipoPlantilla = 0
-                If IfNull(Request("Tipo"), "").ToString = "Ing" Then
+
-                    TipoPlantilla = 1
+            If IfNull(Request("Tipo"), "").ToString = "Ing" Then
-                    LblEncabezado.Text = "Otros Ingresos"
+                TipoPlantilla = 1
-                End If
+                LblEncabezado.Text = "Otros Ingresos"
-
+            End If
-                CargaPlantillas(TipoPlantilla)
+
-
+            CargaPlantillas(TipoPlantilla)
-                If UsuarioActual.CveRol = 1 Then trNotificar.Visible = True
+
-
+            If UsuarioActual.CveRol = 1 Then trNotificar.Visible = True
-                CargaConceptos()
+
-                CargaSubProyectos()
+            CargaConceptos()
-                CargaCuentasContables()
+            CargaSubProyectos()
-
+            CargaCuentasContables()
-                'crea tabla temporal
+
-                ArregloMovs = New ArrayList
+            'crea tabla temporal
-
+            ArregloMovs = New ArrayList
-                CargaCuentas()
+
-
+            CargaCuentas()
-                If Request("CvePeriodo") IsNot Nothing AndAlso IsNumeric(Request("CvePeriodo")) AndAlso Request("CvePeriodo").ToEntero > 0 Then
+
-                    ViewState("CvePeriodo") = Request("CvePeriodo").ToEntero
+            If Request("CvePeriodo") IsNot Nothing AndAlso IsNumeric(Request("CvePeriodo")) AndAlso Request("CvePeriodo").ToEntero > 0 Then
-                    ViewState("CveProyecto") = Request("CveProyecto").ToEntero
+                ViewState("CvePeriodo") = Request("CvePeriodo").ToEntero
-                    ViewState("CveSubProyecto") = Request("CveSubProyecto").ToEntero
+                ViewState("CveProyecto") = Request("CveProyecto").ToEntero
-                    ViewState("CveTurno") = Request("CveTurno").ToEntero
+                ViewState("CveSubProyecto") = Request("CveSubProyecto").ToEntero
-
+                ViewState("CveTurno") = Request("CveTurno").ToEntero
-                    DdlPlantilla.Items.Add(New ListItem("Pago Nomina", "61"))
+
-                    DdlPlantilla.SelectedValue = "61"
+                DdlPlantilla.Items.Add(New ListItem("Pago Nomina", "61"))
-                    DdlPlantilla.Enabled = False
+                DdlPlantilla.SelectedValue = "61"
-                    DivAgregarConceptos.Visible = False
+                DdlPlantilla.Enabled = False
-
+                DivAgregarConceptos.Visible = False
-                    CargaNomina()
+
-
+                CargaNomina()
-                    RegistraScript("$(document).ready(function () { calculateCargo(); Sys.Application.add_load(function (s, e) { calculateCargo(); }); } );", 1)
+
-                    RegistraScript("$(document).ready(function () { calculateAbono(); Sys.Application.add_load(function (s, e) { calculateAbono(); }); } );", 2)
+                RegistraScript("$(document).ready(function () { calculateCargo(); Sys.Application.add_load(function (s, e) { calculateCargo(); }); } );", 1)
-                    RegistraScript("$(document).ready(function () { comparar(); Sys.Application.add_load(function (s, e) { comparar(); }); } );", 3)
+                RegistraScript("$(document).ready(function () { calculateAbono(); Sys.Application.add_load(function (s, e) { calculateAbono(); }); } );", 2)
-                End If
+                RegistraScript("$(document).ready(function () { comparar(); Sys.Application.add_load(function (s, e) { comparar(); }); } );", 3)
-
+            End If
-                If IfNull(Request("Tipo"), "").ToString <> "NOMPROV" Then
+
-                    GvPrePoliza.Columns(3).Visible = False
+            If IfNull(Request("Tipo"), "").ToString <> "NOMPROV" Then
-                    GvConcepto.Columns(3).Visible = False
+                GvPrePoliza.Columns(3).Visible = False
-                    GvMov.Columns(4).Visible = False
+                GvConcepto.Columns(3).Visible = False
-                End If
+                GvMov.Columns(4).Visible = False
+            End If
 
             'Else
             '    Alert("Este módulo requiere el uso de Contabilidad.", TipoMensaje.MsgAdvertencia)
@@ -271,6 +272,7 @@ Partial Class ContabilidadC_RegPrePoliza
 
     End Sub
 
+
     Private Sub CreaDT()
         DtMovimientos = New DataTable("Movimientos")
         Dim IDMov As DataColumn = DtMovimientos.Columns.Add("IdMov", Type.GetType("System.Int32")) : IDMov.AutoIncrement = True
@@ -502,7 +504,13 @@ Partial Class ContabilidadC_RegPrePoliza
         'GvPlantillas.DataSource = GlobalDTContaPlantillasPolizas(UsuarioActual.CveEmpresa, TipoPlantilla)
         'GvPlantillas.DataBind()
 
-        DdlPlantilla.DataSource = GlobalDTContaPlantillasPolizas(UsuarioActual.CveEmpresa, TipoPlantilla)
+        If UsuarioActual.CveEmpresa.Contiene(120) Then
+            DdlPlantilla.DataSource = GlobalDTContaPlantillasPolizas(UsuarioActual.CveEmpresa, -1)
+        Else
+            DdlPlantilla.DataSource = GlobalDTContaPlantillasPolizas(UsuarioActual.CveEmpresa, TipoPlantilla)
+        End If
+
+
         DdlPlantilla.DataBind()
         DdlPlantilla.Items.Insert(0, New ListItem("Plantilla Personalizada", "53"))
     End Sub

Empresas/Grales/Formatos/RepProveedoresNCxAplicar.rdlc

@@ -0,0 +1,867 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Report xmlns="http://schemas.microsoft.com/sqlserver/reporting/2008/01/reportdefinition" xmlns:rd="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner">
+  <Body>
+    <ReportItems>
+      <Textbox Name="Textbox12">
+        <CanGrow>true</CanGrow>
+        <KeepTogether>true</KeepTogether>
+        <Paragraphs>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>=Parameters!AgrupadoPor.Value</Value>
+                <MarkupType>HTML</MarkupType>
+                <Style>
+                  <FontSize>9pt</FontSize>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style />
+          </Paragraph>
+        </Paragraphs>
+        <rd:DefaultName>Textbox9</rd:DefaultName>
+        <Top>0.0441cm</Top>
+        <Height>0.63675cm</Height>
+        <Width>19.97078cm</Width>
+        <Style>
+          <Border>
+            <Style>None</Style>
+          </Border>
+          <PaddingLeft>2pt</PaddingLeft>
+          <PaddingRight>2pt</PaddingRight>
+          <PaddingTop>2pt</PaddingTop>
+          <PaddingBottom>2pt</PaddingBottom>
+        </Style>
+      </Textbox>
+      <Line Name="Line1">
+        <Top>0.84237cm</Top>
+        <Left>0.15558cm</Left>
+        <Height>0cm</Height>
+        <Width>19.84166cm</Width>
+        <ZIndex>1</ZIndex>
+        <Style>
+          <Border>
+            <Style>Solid</Style>
+          </Border>
+        </Style>
+      </Line>
+      <Tablix Name="Tablix1">
+        <TablixBody>
+          <TablixColumns>
+            <TablixColumn>
+              <Width>5.2227cm</Width>
+            </TablixColumn>
+            <TablixColumn>
+              <Width>3.89002cm</Width>
+            </TablixColumn>
+            <TablixColumn>
+              <Width>4.04001cm</Width>
+            </TablixColumn>
+            <TablixColumn>
+              <Width>4.18893cm</Width>
+            </TablixColumn>
+            <TablixColumn>
+              <Width>2.5cm</Width>
+            </TablixColumn>
+          </TablixColumns>
+          <TablixRows>
+            <TablixRow>
+              <Height>0.6cm</Height>
+              <TablixCells>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Textbox3">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>NC/Anticipo</Value>
+                              <Style>
+                                <FontWeight>Bold</FontWeight>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Center</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Textbox3</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Color>Silver</Color>
+                          <Style>Solid</Style>
+                        </Border>
+                        <TopBorder>
+                          <Width>1pt</Width>
+                        </TopBorder>
+                        <RightBorder>
+                          <Style>None</Style>
+                        </RightBorder>
+                        <BackgroundColor>Silver</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Textbox15">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>Fecha</Value>
+                              <Style>
+                                <FontWeight>Bold</FontWeight>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Center</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Textbox15</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Color>Silver</Color>
+                          <Style>Solid</Style>
+                        </Border>
+                        <BackgroundColor>Silver</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Textbox17">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>Original</Value>
+                              <Style>
+                                <FontWeight>Bold</FontWeight>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Center</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Textbox17</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Color>Silver</Color>
+                          <Style>Solid</Style>
+                        </Border>
+                        <BackgroundColor>Silver</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Textbox19">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>Saldo</Value>
+                              <Style>
+                                <FontWeight>Bold</FontWeight>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Right</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Textbox19</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Color>Silver</Color>
+                          <Style>Solid</Style>
+                        </Border>
+                        <BackgroundColor>Silver</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Textbox21">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value />
+                              <Style>
+                                <FontWeight>Bold</FontWeight>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Center</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Textbox21</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Color>Silver</Color>
+                          <Style>Solid</Style>
+                        </Border>
+                        <BackgroundColor>Silver</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+              </TablixCells>
+            </TablixRow>
+            <TablixRow>
+              <Height>0.6cm</Height>
+              <TablixCells>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="SerieFolio">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>=IIf(Fields!SerieFolio.Value = "", Fields!TipoDocto.Value, Fields!SerieFolio.Value)</Value>
+                              <Style>
+                                <FontSize>9pt</FontSize>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style />
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>SerieFolio</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Style>None</Style>
+                        </Border>
+                        <BackgroundColor>=  IIF( IsNothing(Fields!CveCompra.Value), IIf(Fields!SerieFolio.Value = "" And (Fields!TipoDocto.Value = "Egsc" Or Fields!TipoDocto.Value = "DEV" Or Fields!TipoDocto.Value = "Ant" Or Fields!TipoDocto.Value = "NC"), "#9cacc1","Silver"),"White")</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Fecha">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>=Fields!Fecha.Value</Value>
+                              <Style>
+                                <FontSize>9pt</FontSize>
+                                <Format>d</Format>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Center</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Fecha</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Style>None</Style>
+                        </Border>
+                        <BackgroundColor>=  IIF( IsNothing(Fields!CveCompra.Value), IIf(Fields!SerieFolio.Value = "" And (Fields!TipoDocto.Value = "Egsc" Or Fields!TipoDocto.Value = "DEV" Or Fields!TipoDocto.Value = "Ant" Or Fields!TipoDocto.Value = "NC"), "#9cacc1","Silver"),"White")</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Original">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>=Fields!Original.Value</Value>
+                              <Style>
+                                <FontSize>9pt</FontSize>
+                                <Format>'$'#,0.00</Format>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Right</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Original</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Style>None</Style>
+                        </Border>
+                        <BackgroundColor>=  IIF( IsNothing(Fields!CveCompra.Value), IIf(Fields!SerieFolio.Value = "" And (Fields!TipoDocto.Value = "Egsc" Or Fields!TipoDocto.Value = "DEV" Or Fields!TipoDocto.Value = "Ant" Or Fields!TipoDocto.Value = "NC"), "#9cacc1","Silver"),"White")</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                        <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Saldo">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>=Fields!Saldo.Value</Value>
+                              <Style>
+                                <FontSize>9pt</FontSize>
+                                <Format>'$'#,0.00</Format>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style>
+                            <TextAlign>Right</TextAlign>
+                          </Style>
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Saldo</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Style>None</Style>
+                        </Border>
+                        <BackgroundColor>=  IIF( IsNothing(Fields!CveCompra.Value), IIf(Fields!SerieFolio.Value = "" And (Fields!TipoDocto.Value = "Egsc" Or Fields!TipoDocto.Value = "DEV" Or Fields!TipoDocto.Value = "Ant" Or Fields!TipoDocto.Value = "NC"), "#9cacc1","Silver"),"White")</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                        <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
+                      </Style>
+                    </Textbox>
+                    <rd:Selected>true</rd:Selected>
+                  </CellContents>
+                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="Abreviatura">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>=Fields!Abreviatura.Value</Value>
+                              <Style>
+                                <FontSize>9pt</FontSize>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style />
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>Abreviatura</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Style>None</Style>
+                        </Border>
+                        <BackgroundColor>=  IIF( IsNothing(Fields!CveCompra.Value), IIf(Fields!SerieFolio.Value = "" And (Fields!TipoDocto.Value = "Egsc" Or Fields!TipoDocto.Value = "DEV" Or Fields!TipoDocto.Value = "Ant" Or Fields!TipoDocto.Value = "NC"), "#9cacc1","Silver"),"White")</BackgroundColor>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
+              </TablixCells>
+            </TablixRow>
+          </TablixRows>
+        </TablixBody>
+        <TablixColumnHierarchy>
+          <TablixMembers>
+            <TablixMember />
+            <TablixMember />
+            <TablixMember />
+            <TablixMember />
+            <TablixMember />
+          </TablixMembers>
+        </TablixColumnHierarchy>
+        <TablixRowHierarchy>
+          <TablixMembers>
+            <TablixMember>
+              <KeepWithGroup>After</KeepWithGroup>
+            </TablixMember>
+            <TablixMember>
+              <Group Name="Detalles" />
+            </TablixMember>
+          </TablixMembers>
+        </TablixRowHierarchy>
+        <DataSetName>DataSet1</DataSetName>
+        <Top>1.00112cm</Top>
+        <Left>0.12912cm</Left>
+        <Height>1.2cm</Height>
+        <Width>19.84166cm</Width>
+        <ZIndex>2</ZIndex>
+        <Style>
+          <Border>
+            <Style>None</Style>
+          </Border>
+        </Style>
+      </Tablix>
+    </ReportItems>
+    <Height>0.99158in</Height>
+    <Style />
+  </Body>
+  <Width>7.87293in</Width>
+  <Page>
+    <PageHeader>
+      <Height>2.25008cm</Height>
+      <PrintOnFirstPage>true</PrintOnFirstPage>
+      <PrintOnLastPage>true</PrintOnLastPage>
+      <ReportItems>
+        <Textbox Name="Textbox1">
+          <CanGrow>true</CanGrow>
+          <KeepTogether>true</KeepTogether>
+          <Paragraphs>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>=Parameters!NombreEmpresa.Value</Value>
+                  <Style>
+                    <FontWeight>Bold</FontWeight>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style>
+                <TextAlign>Center</TextAlign>
+              </Style>
+            </Paragraph>
+          </Paragraphs>
+          <rd:DefaultName>Textbox1</rd:DefaultName>
+          <Top>0.18521cm</Top>
+          <Left>3.21468cm</Left>
+          <Height>0.6cm</Height>
+          <Width>14.02238cm</Width>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+            <PaddingLeft>2pt</PaddingLeft>
+            <PaddingRight>2pt</PaddingRight>
+            <PaddingTop>2pt</PaddingTop>
+            <PaddingBottom>2pt</PaddingBottom>
+          </Style>
+        </Textbox>
+        <Textbox Name="Textbox2">
+          <CanGrow>true</CanGrow>
+          <KeepTogether>true</KeepTogether>
+          <Paragraphs>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>NOTAS DE CRÉDITO POR APLICAR / ANTICIPOS POR COMPROBAR</Value>
+                  <Style>
+                    <FontSize>10.5pt</FontSize>
+                    <FontWeight>Bold</FontWeight>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style>
+                <TextAlign>Center</TextAlign>
+              </Style>
+            </Paragraph>
+          </Paragraphs>
+          <rd:DefaultName>Textbox2</rd:DefaultName>
+          <Top>1.10271cm</Top>
+          <Left>3.21468cm</Left>
+          <Height>0.52945cm</Height>
+          <Width>14.02238cm</Width>
+          <ZIndex>1</ZIndex>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+            <PaddingLeft>2pt</PaddingLeft>
+            <PaddingRight>2pt</PaddingRight>
+            <PaddingTop>2pt</PaddingTop>
+            <PaddingBottom>2pt</PaddingBottom>
+          </Style>
+        </Textbox>
+        <Image Name="Logo">
+          <Source>External</Source>
+          <Value>=Parameters!LogoPath.Value</Value>
+          <Sizing>FitProportional</Sizing>
+          <Left>0.06614cm</Left>
+          <Height>2.22362cm</Height>
+          <Width>2.33715cm</Width>
+          <ZIndex>2</ZIndex>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+          </Style>
+        </Image>
+      </ReportItems>
+      <Style>
+        <Border>
+          <Style>None</Style>
+        </Border>
+      </Style>
+    </PageHeader>
+    <PageFooter>
+      <Height>0.76376cm</Height>
+      <PrintOnFirstPage>true</PrintOnFirstPage>
+      <PrintOnLastPage>true</PrintOnLastPage>
+      <ReportItems>
+        <Textbox Name="Textbox7">
+          <CanGrow>true</CanGrow>
+          <KeepTogether>true</KeepTogether>
+          <Paragraphs>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>="Página " &amp; Globals.PageNumber &amp; " de " &amp; Globals.TotalPages</Value>
+                  <Style>
+                    <FontStyle>Italic</FontStyle>
+                    <FontSize>8pt</FontSize>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style>
+                <TextAlign>Right</TextAlign>
+              </Style>
+            </Paragraph>
+          </Paragraphs>
+          <rd:DefaultName>Textbox3</rd:DefaultName>
+          <Top>0.08291cm</Top>
+          <Left>17.90491cm</Left>
+          <Height>0.68085cm</Height>
+          <Width>2.09233cm</Width>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+            <PaddingLeft>2pt</PaddingLeft>
+            <PaddingRight>2pt</PaddingRight>
+            <PaddingTop>2pt</PaddingTop>
+            <PaddingBottom>2pt</PaddingBottom>
+          </Style>
+        </Textbox>
+        <Textbox Name="Textbox8">
+          <CanGrow>true</CanGrow>
+          <KeepTogether>true</KeepTogether>
+          <Paragraphs>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>Usuario:</Value>
+                  <Style>
+                    <FontSize>9pt</FontSize>
+                    <FontWeight>Bold</FontWeight>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style />
+            </Paragraph>
+          </Paragraphs>
+          <rd:DefaultName>Textbox8</rd:DefaultName>
+          <Top>0.08291cm</Top>
+          <Left>0.06614cm</Left>
+          <Height>0.68085cm</Height>
+          <Width>1.60042cm</Width>
+          <ZIndex>1</ZIndex>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+            <PaddingLeft>2pt</PaddingLeft>
+            <PaddingRight>2pt</PaddingRight>
+            <PaddingTop>2pt</PaddingTop>
+            <PaddingBottom>2pt</PaddingBottom>
+          </Style>
+        </Textbox>
+        <Textbox Name="Textbox9">
+          <CanGrow>true</CanGrow>
+          <KeepTogether>true</KeepTogether>
+          <Paragraphs>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>=Parameters!UsuarioImprimio.Value</Value>
+                  <Style>
+                    <FontSize>9pt</FontSize>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style />
+            </Paragraph>
+          </Paragraphs>
+          <rd:DefaultName>Textbox9</rd:DefaultName>
+          <Top>0.08291cm</Top>
+          <Left>1.61047cm</Left>
+          <Height>0.68085cm</Height>
+          <Width>5.14936cm</Width>
+          <ZIndex>2</ZIndex>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+            <PaddingLeft>2pt</PaddingLeft>
+            <PaddingRight>2pt</PaddingRight>
+            <PaddingTop>2pt</PaddingTop>
+            <PaddingBottom>2pt</PaddingBottom>
+          </Style>
+        </Textbox>
+        <Textbox Name="Textbox10">
+          <CanGrow>true</CanGrow>
+          <KeepTogether>true</KeepTogether>
+          <Paragraphs>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>Fecha Impresión:</Value>
+                  <Style>
+                    <FontSize>9pt</FontSize>
+                    <FontWeight>Bold</FontWeight>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style>
+                <TextAlign>Right</TextAlign>
+              </Style>
+            </Paragraph>
+          </Paragraphs>
+          <rd:DefaultName>Textbox10</rd:DefaultName>
+          <Top>0.08291cm</Top>
+          <Left>8.20622cm</Left>
+          <Height>0.68085cm</Height>
+          <Width>2.92333cm</Width>
+          <ZIndex>3</ZIndex>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+            <PaddingLeft>2pt</PaddingLeft>
+            <PaddingRight>2pt</PaddingRight>
+            <PaddingTop>2pt</PaddingTop>
+            <PaddingBottom>2pt</PaddingBottom>
+          </Style>
+        </Textbox>
+        <Textbox Name="Textbox11">
+          <CanGrow>true</CanGrow>
+          <KeepTogether>true</KeepTogether>
+          <Paragraphs>
+            <Paragraph>
+              <TextRuns>
+                <TextRun>
+                  <Value>=Globals!ExecutionTime</Value>
+                  <Style>
+                    <FontSize>9pt</FontSize>
+                    <Format>g</Format>
+                  </Style>
+                </TextRun>
+              </TextRuns>
+              <Style>
+                <TextAlign>Left</TextAlign>
+              </Style>
+            </Paragraph>
+          </Paragraphs>
+          <rd:DefaultName>Textbox11</rd:DefaultName>
+          <Top>0.08291cm</Top>
+          <Left>11.11544cm</Left>
+          <Height>0.68085cm</Height>
+          <Width>4.32745cm</Width>
+          <ZIndex>4</ZIndex>
+          <Style>
+            <Border>
+              <Style>None</Style>
+            </Border>
+            <PaddingLeft>2pt</PaddingLeft>
+            <PaddingRight>2pt</PaddingRight>
+            <PaddingTop>2pt</PaddingTop>
+            <PaddingBottom>2pt</PaddingBottom>
+          </Style>
+        </Textbox>
+      </ReportItems>
+      <Style>
+        <Border>
+          <Style>None</Style>
+        </Border>
+      </Style>
+    </PageFooter>
+    <PageHeight>29.7cm</PageHeight>
+    <PageWidth>21cm</PageWidth>
+    <LeftMargin>0.25cm</LeftMargin>
+    <RightMargin>0.25cm</RightMargin>
+    <TopMargin>1cm</TopMargin>
+    <BottomMargin>1cm</BottomMargin>
+    <ColumnSpacing>0.13cm</ColumnSpacing>
+    <Style />
+  </Page>
+  <AutoRefresh>0</AutoRefresh>
+  <DataSources>
+    <DataSource Name="DataSet">
+      <ConnectionProperties>
+        <DataProvider>System.Data.DataSet</DataProvider>
+        <ConnectString>/* Local Connection */</ConnectString>
+      </ConnectionProperties>
+      <rd:DataSourceID>f55ecc33-47ff-4fc5-a233-35ea9bb1f578</rd:DataSourceID>
+    </DataSource>
+  </DataSources>
+  <DataSets>
+    <DataSet Name="DataSet1">
+      <Query>
+        <DataSourceName>DataSet</DataSourceName>
+        <CommandText>/* Local Query */</CommandText>
+      </Query>
+      <Fields>
+        <Field Name="Factura">
+          <DataField>Factura</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="Fecha">
+          <DataField>Fecha</DataField>
+          <rd:TypeName>System.Date</rd:TypeName>
+        </Field>
+        <Field Name="Original">
+          <DataField>Original</DataField>
+          <rd:TypeName>System.Decimal</rd:TypeName>
+        </Field>
+        <Field Name="Saldo">
+          <DataField>Saldo</DataField>
+          <rd:TypeName>System.Decimal</rd:TypeName>
+        </Field>
+        <Field Name="Abreviatura">
+          <DataField>Abreviatura</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="CveCompra">
+          <DataField>CveCompra</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="SerieFolio">
+          <DataField>SerieFolio</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+        <Field Name="TipoDocto">
+          <DataField>TipoDocto</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
+      </Fields>
+      <rd:DataSetInfo>
+        <rd:DataSetName>DataSet</rd:DataSetName>
+        <rd:SchemaPath>C:\Users\Caudillo\Documents\Visual Studio 2013\WebSites\WebSite9\App_Code\DataSet.xsd</rd:SchemaPath>
+        <rd:TableName>DataTable1</rd:TableName>
+        <rd:TableAdapterFillMethod />
+        <rd:TableAdapterGetDataMethod />
+        <rd:TableAdapterName />
+      </rd:DataSetInfo>
+    </DataSet>
+  </DataSets>
+  <ReportParameters>
+    <ReportParameter Name="NombreEmpresa">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="FechaInicio">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="FechaFin">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="UsuarioImprimio">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="LogoPath">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="FechaImpresion">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="AgrupadoPor">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="Filtros">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+  </ReportParameters>
+  <Language>es-MX</Language>
+  <rd:ReportUnitType>Cm</rd:ReportUnitType>
+  <rd:ReportID>40c94aad-a12a-44fb-ab0d-ea36a9656792</rd:ReportID>
+</Report>

Empresas/Grales/Formatos/RepProveedoresPagosBancos.rdlc

@@ -261,7 +261,7 @@
                         <Paragraph>
                           <TextRuns>
                             <TextRun>
-                              <Value>Abreviatura</Value>
+                              <Value />
                               <Style>
                                 <FontWeight>Bold</FontWeight>
                               </Style>
@@ -754,7 +754,9 @@
                   </Style>
                 </TextRun>
               </TextRuns>
-              <Style />
+              <Style>
+                <TextAlign>Right</TextAlign>
+              </Style>
             </Paragraph>
           </Paragraphs>
           <rd:DefaultName>Textbox10</rd:DefaultName>
@@ -780,14 +782,16 @@
             <Paragraph>
               <TextRuns>
                 <TextRun>
-                  <Value>=Parameters!FechaImpresion.Value</Value>
+                  <Value>=Globals!ExecutionTime</Value>
                   <Style>
                     <FontSize>9pt</FontSize>
-                    <Format>D</Format>
+                    <Format>g</Format>
                   </Style>
                 </TextRun>
               </TextRuns>
-              <Style />
+              <Style>
+                <TextAlign>Left</TextAlign>
+              </Style>
             </Paragraph>
           </Paragraphs>
           <rd:DefaultName>Textbox11</rd:DefaultName>
@@ -964,6 +968,7 @@
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
   </ReportParameters>
+  <Language>es-MX</Language>
   <rd:ReportUnitType>Cm</rd:ReportUnitType>
   <rd:ReportID>40c94aad-a12a-44fb-ab0d-ea36a9656792</rd:ReportID>
 </Report>

Ventas/Clientes.aspx

@@ -5501,9 +5501,9 @@
                                             <th style="width: 200px">Marca</th>
                                             <%--                                            <th width="73px">Precio<br />
                                                 General </th>--%>
-                                            <th width="73px">%</th>
+                                            <th width="73px">DCTO COM</th>
-                                            <th width="73px">%</th>
+                                            <th width="73px">DCTO ADIC 1</th>
-                                            <th width="73px">%</th>
+                                            <th width="73px">DCTO ADIC 2</th>
                                             <%--                                            <th width="73px">Precio<br />
                                                 Aplicado </th>--%>
                                             <th style="width: 73px;"></th>