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

Bancos/CreditosPagoMultiple.aspx.vb

@@ -216,7 +216,7 @@ Partial Class Bancos_CreditosPagoMultiple
         Dim filemove As String = ""
         Dim Comprobante As String = ""
         For Each fileItem As Archivo In filesgral
-            Comprobante = IO.Path.GetExtension(String.Format("{0}Temp\{1}", ModExtensiones.DirectorioBaseEmpresas, fileItem.filename)).Replace(".", "")
+            Comprobante = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "")
             filemove = fileItem.filename
         Next
 

Bancos/RepIE.aspx.vb

@@ -535,8 +535,9 @@ Partial Class Bancos_RepIE
     End Sub
     Private Sub Imprimir(Formato As String)
 
+        Dim LogoRutaFisica As String = String.Format("Empresas\{0}\Logo.png", UsuarioActual.CveEmpresa)
+        Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
         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 params As New List(Of ReportParameter)
 

Bancos/RepSaldosDetalle.aspx

@@ -6,25 +6,49 @@
 </asp:Content>
 <asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
     <li>
-    <asp:LinkButton ID="ImgExcel" runat="server"   ><img src="/Imagenes/IconoExcel.gif" /> Generar</asp:LinkButton></li>
+    <asp:LinkButton ID="ImgExcel" runat="server"   ><img src="/Imagenes/IconoExcel.gif" /> Excel</asp:LinkButton></li>
 </asp:Content>
 <asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
-    Reporte de Saldos Bancarios Detalle&nbsp;-&nbsp;<asp:Label ID="LblCuenta" runat="server" Text=""></asp:Label>
+    Reporte de Saldos Bancarios Detalle
 </asp:Content>
 <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
       <li>
-        <asp:LinkButton ID="LinkPDF" runat="server"> <i class="fa fa-ad-pdf"></i> Imprimir</asp:LinkButton>
+        <asp:LinkButton ID="LinkPDF" runat="server"> <i class="fa fa-ad-pdf"></i> PDF</asp:LinkButton>
     </li>
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
 
     <br />
     <div class="row">
-        <div class="col-md-11">
+        <div class="col-md-1" >
+            <asp:Label runat="server" Width="100%" Style="text-align: right;">Banco: </asp:Label>
+        </div>
+        <div class="col-md-1">
+            <asp:Label runat="server" Font-Bold="true" ID="lbBancoNombre"></asp:Label>
+        </div>
+        <div class="col-md-1">
+            <asp:Label runat="server" ID="lblBancoCuenta" Width="100%" Style="text-align: right;">Cuenta: </asp:Label>
+        </div>
+        <div class="col-md-1">
+            <asp:Label ID="LblCuenta" Font-Bold="true" runat="server" Text=""></asp:Label>
+        </div>
+        <div class="col-md-1" >
+            <asp:Label runat="server" Width="100%" Style="text-align: right;">Fecha Inicial: </asp:Label>
+        </div>
+        <div class="col-md-1">
+            <asp:Label runat="server" Font-Bold="true" ID="LblFechaI"></asp:Label>
+        </div>
+        <div class="col-md-1" >
+            <asp:Label runat="server" Width="100%" Style="text-align: right;">Fecha Fin: </asp:Label>
+        </div>
+        <div class="col-md-1">
+            <asp:Label runat="server" Font-Bold="true" ID="LblFechaF"></asp:Label>
+        </div>
+        <div class="col-md-3">
             <asp:Label ID="LblTextoSaldoInicial" runat="server" Text="Saldo Inicial: $ " Width="100%" Style="text-align: right;"></asp:Label>
         </div>
         <div class="col-md-1">
-            <asp:Label ID="LblSaldoInicial" Font-Bold="true" runat="server" Text="" Width="100%" Style="text-align: right;"></asp:Label>
+            <asp:Label ID="LblSaldoInicial" Font-Bold="true" runat="server" Text="" Width="100%" ></asp:Label>
         </div>
     </div>
     <br />

Bancos/RepSaldosDetalle.aspx.vb

@@ -155,6 +155,9 @@ Partial Class Bancos_RepSaldosDetalle
                 Cuenta = dr("NumCuenta").ToString
                 CLABE = dr("CLABE").ToString
                 Banco = dr("Banco").ToString
+                lbBancoNombre.Text = Banco
+                LblFechaI.Text = FechaInicio
+                LblFechaF.Text = FechaFin
                 If CveCuenta > 0 Then
                     LblCuenta.Text = dr("NumCuenta").ToString
                     LblSaldoInicial.Text = dr("SaldoInicial").ToString.ToDouble.FormatoNumero
@@ -174,13 +177,15 @@ Partial Class Bancos_RepSaldosDetalle
     End Sub
 
     Protected Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
-        GvS.ExportToExcel("ReporteSaldos" & Now.ToShortDateString)
+        ImprimirReporte("Excel")
     End Sub
 
-
-
 #Region "P D F"
     Private Sub LinkPDF_Click(sender As Object, e As EventArgs) Handles LinkPDF.Click
+        ImprimirReporte("PDF")
+    End Sub
+
+    Private Sub ImprimirReporte(formato As String)
         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)
 
@@ -215,7 +220,7 @@ Partial Class Bancos_RepSaldosDetalle
             params.Add(New ReportParameter("LogoPath", ""))
         End If
 
-        ImprimirPDF("Empresas/Grales/Formatos/RepSaldosDetalle.rdlc", dt, params, "RepSaldosDetalle")
+        ImprimirPDF("Empresas/Grales/Formatos/RepSaldosDetalle.rdlc", dt, params, "RepSaldosDetalle", Formato:=formato)
 
         Ban.Dispose()
     End Sub

Bancos/Reportes.aspx.vb

@@ -141,13 +141,17 @@ Partial Class Bancos_Reportes
                         rv.LocalReport.DataSources.Clear()
                         rv.LocalReport.DataSources.Add(rds)
                         rv.LocalReport.DataSources.Add(rds2)
-                        rv.LocalReport.ReportPath = ModExtensiones.DirectorioBaseEmpresas & "Bancos\Reportes\rptChequeMovimientos.rdlc"
+                        rv.LocalReport.ReportPath = ModExtensiones.DirectorioBaseEmpresas & "Empresas\Grales\Formatos\rptChequeMovimientos.rdlc"
                         rv.LocalReport.Refresh()
 
                         Dim paramList As New List(Of ReportParameter)
                         With paramList
-                            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 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 LogoRutaFisica As String = String.Format("Empresas\{0}\Logo.png", UsuarioActual.CveEmpresa)
+                            Dim logouri = String.Format("{0}://{1}:{2}/ashx/sigfiles.ashx?P={3}", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, Encripta(LogoRutaFisica))
+                            Dim Imagen As New System.IO.FileInfo(String.Format("{0}Logo.png", UsuarioActual.Empresa.Ruta))
                             .Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
                             .Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString))
                             .Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))