Merge branch 'master' of http://192.168.10.111:8383/SIG

App_Code/ClsBancos.vb

@@ -3267,13 +3267,18 @@ Public Class ClsBancos
 
     '    Return Retorno
     'End Function
-    Public Function UpdateCuentaDepositoPagoElectronico(CveCuentaDeposito As Integer) As Boolean
+    Public Function UpdateCuentaDepositoPagoElectronico(CveCuentaDeposito As Integer, Optional Opcion As Integer = 1, Optional FechaEliminacion As Date = MinFecha) As Boolean
+
+        'Opcion 1: Bancomer, Opcion  2: Bajio, Opcion 3: Scotia
+
         Dim Retorno As Boolean = False
 
         DataAdapter("PA_Banc_LayoutCuentaDepositoUpdate")
 
         With SqlAdapter.SelectCommand.Parameters
             .Add("@CveCuentaDeposito", SqlDbType.Int).Value = CveCuentaDeposito
+            .Add("@Opcion", SqlDbType.Int).Value = Opcion
+            .Add("@FechaEliminacion", SqlDbType.Date).Value = FechaEliminacion
         End With
 
         Try

Bancos/PagoElectronico.aspx

@@ -105,11 +105,17 @@
                                                                 <td>
                                                                     <asp:Label runat="server" ID="LbNumeroInterbancarias" Width="80px"></asp:Label></td>
                                                             </tr>
-                                                            <tr>
+                                                            <tr runat="server" id="TRNumBancomer" visible="true">
                                                                 <td>Bancomer:</td>
                                                                 <td>
                                                                     <asp:Label runat="server" ID="LbNumeroBancomer" Width="80px"></asp:Label></td>
                                                             </tr>
+
+                                                            <tr runat="server" id="TRNumScotia" visible="false">
+                                                                <td>Scotia Bank:</td>
+                                                                <td>
+                                                                    <asp:Label runat="server" ID="LbNumeroScotia" Width="80px"></asp:Label></td>
+                                                            </tr>
                                                             <tr>
                                                                 <td colspan="2" align="center">
                                                                     <asp:Button runat="server" ID="BtnGenerarAlta" Text="Generar Alta" OnClick="BtnAltas_Click" class="btn btn-primary" />
@@ -619,6 +625,71 @@
         </tr>
     </table>
 
+
+      <div id="ModalDescarga" class="modal ADS fade" role="dialog">        
+        <div class="modal-dialog">            
+
+                <div class="modal-content">
+                    
+                    <div class="modal-header ">
+                        <button type="button" class="close" data-dismiss="modal">&times;</button>
+                        <asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
+                            <ContentTemplate>
+                                <h4 class="modal-title">
+                                    <asp:Literal ID="LtlModalTituloDescarga" runat="server">Descarga Layout</asp:Literal></h4>
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+                    </div>
+
+                    <div class="modal-body">
+
+                        <asp:UpdatePanel runat="server" ID="UpModalDescarga" UpdateMode="Conditional">
+                            <ContentTemplate>
+                                <div class="row">
+                                    
+                                    <div class="col-md-12" runat="server" id="DVDescargaPagos" visible=" false" >
+                                        <p> Pagos Descarga <asp:LinkButton runat="server" ID="LnkDescarga" OnClick="LnkDescarga_Click" CssClass="Texto"></asp:LinkButton> </p>
+                                    </div>
+                                    
+                                    <div class="col-md-12" runat="server" id="DVDescargaCuentas1" visible=" false" >
+                                        <p><asp:Label runat="server" ID="LblCuentas" Text="Cuentas Bancomer"></asp:Label> <asp:LinkButton runat="server" ID="LnkDescargaCuentas1" OnClick="LnkDescargaCuentas1_Click" CssClass="Texto"></asp:LinkButton> </p>
+                                    </div>
+
+                                    <%--<div class="col-md-12" runat="server"  id="DVDescargaCuentas2" visible=" false">
+                                        <p> Cuentas Interbancarias <asp:LinkButton runat="server" ID="LnkDescargaCuentas2" OnClick="LnkDescargaCuentas2_Click" CssClass="Texto"></asp:LinkButton> </p>
+                                    </div>
+                                    <div class="col-md-12" runat="server"  id="DVDescargaCuentas3" visible=" false">
+                                        <p> Cuentas Convennios CIE <asp:LinkButton runat="server" ID="LnkDescargaCuentas3" OnClick="LnkDescargaCuentas3_Click" CssClass="Texto"></asp:LinkButton> </p>
+                                    </div>
+                                        --%>
+
+                                     <div class="col-md-12" runat="server"  id="DVDescargaReporte" visible=" false">
+                                        <p> <asp:LinkButton runat="server" ID="LnkDescargaReporte" OnClick="LnkDescargaReporte_Click" CssClass="Texto" Text="Descargar Reporte"></asp:LinkButton> </p>
+                                    </div>
+
+                                </div>
+                            </ContentTemplate>
+                            <Triggers>
+                                <asp:PostBackTrigger ControlID="LnkDescarga" />
+                                <asp:PostBackTrigger ControlID="LnkDescargaCuentas1" />
+                              <%--  <asp:PostBackTrigger ControlID="LnkDescargaCuentas2" />
+                                <asp:PostBackTrigger ControlID="LnkDescargaCuentas3" />--%>
+                                <asp:PostBackTrigger ControlID="LnkDescargaReporte" />                                    
+                            </Triggers>
+                        </asp:UpdatePanel>
+
+                    </div>
+                    <div class="modal-footer">
+                        <asp:UpdatePanel runat="server" UpdateMode="Conditional">
+                            <ContentTemplate>                                    
+                                <button type="button" class="btn btn-default" data-dismiss="modal">Cerrar</button>
+                            </ContentTemplate>
+                        </asp:UpdatePanel>
+                    </div>
+                </div>                
+    </div>
+</div>
+
     <asp:Button ID="BtnReporteAltaCarga" ClientIDMode="Static" Text="" runat="server" Style="display: none;" OnClick="BtnReporteAltaCarga_Click" />
     <asp:Button ID="BtnReporteAltaGenera" ClientIDMode="Static" Text="" runat="server" Style="display: none;" OnClick="BtnReporteAltaGenera_Click" />
     <asp:Button ID="BtnReportePago" ClientIDMode="Static" Text="" runat="server" Style="display: none;" OnClick="BtnReportePago_Click" />

Bancos/PagoElectronicoGrupos.aspx.vb

@@ -607,11 +607,11 @@ Partial Class Bancos_PagoElectronicoGrupos
     Private Function CreaArchivo(Tipo As Integer, Optional MismoBanco As Boolean = True, Optional ByRef NombreArchivoEnviado As String = "") As Boolean
 
 
-        System.Threading.Thread.Sleep(1000) 'Un segundo de diferencia Para doferentes tipos de bancos
+        System.Threading.Thread.Sleep(1000) 'Un segundo de diferencia Para dIferentes tipos de bancos
 
         DirectoryExistsCreate(String.Format("{0}Layout", UsuarioActual.Empresa.Ruta))
 
-        NombreArchivo = String.Format("{2}{1}{0}.txt", UsuarioActual.CveUsuario, NowADS().ToString("yyyyMMdd-HH-mm-ss"), If(Tipo = 1, "LAYOUTPAGO", "LAYOUTALTA"))
+        'NombreArchivo = String.Format("{2}{1}{0}.txt", UsuarioActual.CveUsuario, NowADS().ToString("yyyyMMdd-HH-mm-ss"), If(Tipo = 1, "LAYOUTPAGO", "LAYOUTALTA"))
 
         If Tipo = 1 Then
             NombreArchivo = String.Format("{2}{1}{0}.txt", UsuarioActual.CveUsuario, NowADS().ToString("yyyyMMdd-HH-mm-ss"), "LAYOUTPAGO")
@@ -866,7 +866,7 @@ Partial Class Bancos_PagoElectronicoGrupos
         ElseIf OpBancos = 2 Then
             AltaProveedoresBajio()
         ElseIf OpBancos = 3 Then
-            'AltaProveedoresScotia()
+            'AltaProveedoresScotia() SE DEJA COMENTADO PORQUE NO SE ESTA USANDO, SE CAMBIO A PAGO ELECTRONICO
         End If
 
 
@@ -1349,6 +1349,8 @@ Partial Class Bancos_PagoElectronicoGrupos
 
 
 
+
+
     'Protected Sub CrearDetalle()
     '    Dim Resultado = True
     '    Dim CuentaDeposito As String = ""
@@ -1981,16 +1983,16 @@ Partial Class Bancos_PagoElectronicoGrupos
                 If drow("Observaciones").ToString.Trim.Length = 0 Then
 
                     If drow("RazonSocial").ToString.Trim.Length > 30 Then
-                        RegistrosPago.Append(drow("RazonSocial").ToString.Substring(0, 30))
+                        RegistrosPago.Append(drow("RazonSocial").ToString.trim.Substring(0, 30))
                     Else
                         RegistrosPago.Append(drow("RazonSocial").ToString.PadRight(30, EspacioRelleno))
                     End If
                 Else
 
                     If drow("Observaciones").ToString.Trim.Length > 30 Then
-                        RegistrosPago.Append(drow("Observaciones").ToString.Substring(0, 30))
+                        RegistrosPago.Append(drow("Observaciones").ToString.Trim.Substring(0, 30))
                     Else
-                        RegistrosPago.Append(drow("Observaciones").ToString.PadRight(30, EspacioRelleno))
+                        RegistrosPago.Append(drow("Observaciones").ToString.Trim.PadRight(30, EspacioRelleno))
                     End If
 
                 End If

Bancos/RepIngresosPorComprobar.aspx

@@ -282,7 +282,7 @@
                         <div class="row">
                             <div class="col-md-2" style="text-align: left">Fecha:</div>
                             <div class="col-md-2">
-                                 <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
                                     <asp:TextBox ID="TxtFecha" CssClass="form-control input-sm ADSMaskDate" Style="width: 118px" runat="server"></asp:TextBox>
                                     <span class="input-group-btn ">
                                         <asp:LinkButton ID="LnkCortfecha" class="btn default " Text=" <i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
@@ -294,11 +294,19 @@
                                 </div>
                             </div>
                         </div>
+                        <br />
                         <div class="row">
-                             <div class="col-md-2" style="text-align: left">SubProyecto:</div>
+                            <div class="col-md-2" style="text-align: left">SubProyecto:</div>
                             <div class="col-md-4">
-                                     <asp:DropDownList ID="DdlSubProyectoSaldar" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
+                                <asp:DropDownList ID="DdlSubProyectoSaldar" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
-                                        </asp:DropDownList>                                                                     
+                                </asp:DropDownList>
+                            </div>
+                        </div>
+                        <br />
+                        <div class="row">
+                            <div class="col-md-2" style="text-align: left">Observaciones:</div>
+                            <div class="col-md-10">
+                                <asp:TextBox ID="TxtObservaciones" Text="" Rows="3" TextMode="MultiLine" CssClass="Widthall form-control input-sm" runat="server" />
                             </div>
                         </div>
                     </div>

Bancos/RepIngresosPorComprobar.aspx.vb

@@ -267,6 +267,7 @@ Partial Class Bancos_RepIngresosPorComprobar
     End Sub
 
     Protected Sub LnkSaldar_Click(sender As Object, e As EventArgs)
+        TxtObservaciones.Text = ""
         RegistraScript("$('#DivModalSaldar').modal();")
     End Sub
 
@@ -277,16 +278,20 @@ Partial Class Bancos_RepIngresosPorComprobar
         ObjConta.IniciaTransacSQL()
         Dim CvePrePoliza As Integer = 0
         Dim MsgError As String = ""
-        CvePrePoliza = ObjConta.AddPrePolizas("Bancos/RepIngresosPorComprobar", 6, 0, 0, 1, TxtFecha.Text.ToDate, "Saldo de IxC", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+
+        Dim Obs As String = TxtObservaciones.Text.Trim()
+
+        CvePrePoliza = ObjConta.AddPrePolizas("Bancos/RepIngresosPorComprobar", 6, 0, 0, 1, TxtFecha.Text.ToDate, Obs, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+
+        Dim FolioPoliza As Integer = ObjConta.FolioPoliza
 
         For Each gr As GridViewRow In GvIPC.Rows
             If gr.FCCheckBox("Chk").Checked Then
-
+                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 92, "Saldo de IxC", Obs, CveIE:=gr.DataKey("CveIE").ToEntero, CveCliente:=gr.DataKey("CveCliente").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
-                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 92, "", "Saldo de IxC", CveIE:=gr.DataKey("CveIE").ToEntero, CveCliente:=gr.DataKey("CveCliente").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
                     MsgError = "Ocurrio un error al saldar el movimiento"
                 End If
 
-                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 78, "", "Saldo de IxC", CveIE:=gr.DataKey("CveIE").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
+                If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, gr.DataKey("Saldo").ToDecimal, gr.DataKey("Saldo").ToDecimal, 78, "Saldo de IxC", Obs, CveIE:=gr.DataKey("CveIE").ToEntero, CveSubProyecto:=DdlSubProyectoSaldar.SelectedValue.ToEntero) Then
                     MsgError = "Ocurrio un error al saldar el movimiento"
                 End If
             End If
@@ -296,7 +301,7 @@ Partial Class Bancos_RepIngresosPorComprobar
             ObjConta.Commit()
             CargaDatos()
 
-            Alert(String.Format("Los movimientos se saldaron correctamente.</br> <br/>Póliza: <b> <a href='/Contabilidad/RegPrePolizas.aspx?CvePrePoliza={0}' class='Texto' target='_blank'>{1}</a><br/>", CvePrePoliza, ObjConta.ContaFolio))
+            Alert(String.Format("Los movimientos se saldaron correctamente.</br> <br/>Póliza: <b> <a href='/Contabilidad/RegPrePolizas.aspx?CvePrePoliza={0}' class='Texto' target='_blank'>{1}</a><br/>", CvePrePoliza, FolioPoliza))
         Else
             ObjConta.RollBack()
             Alert(MsgError, TipoMensaje.MsgError)

Contabilidad/ContabilizacionCompras.aspx

@@ -124,7 +124,7 @@
                                     <asp:Button ID="BtnContabilizarCompras" runat="server" CssClass="btn btn-success" Text="Contabilizar" />
                                 </div>
 
-                                <asp:GridView ID="GvPrePolizaCompras" runat="server" AutoGenerateColumns="False" Width="100%" CssClass="table  table-advance table-hover" Style="text-align: center;" ForeColor="Black" DataKeyNames="CvePrePoliza,Fecha,CveTipoPoliza,IdPoliza" OnRowDataBound="OnRowDataBound" GridLines="None" ShowHeader="false">
+                                <asp:GridView ID="GvPrePolizaCompras" runat="server" AutoGenerateColumns="False" Width="100%" CssClass="table  table-advance table-hover" Style="text-align: center;" ForeColor="Black" DataKeyNames="CvePrePoliza,Fecha,CveTipoPoliza,IdPoliza,Modulo" OnRowDataBound="OnRowDataBound" GridLines="None" ShowHeader="false">
                                     <Columns>
                                         <asp:TemplateField>
                                             <ItemTemplate>

Contabilidad/ContabilizacionCompras.aspx.cs

@@ -163,6 +163,15 @@ public partial class Contabilidad_ContabilizacionCompras : ClsPaginas
             {
                 e.Row.FCLinkButton("LBActualizarTC").Visible = true;
             }
+
+            if (UsuarioActual.CveEmpresa == 119 && e.Row.DBCampo("Modulo").ToString() == "Compras Comproba")
+            {
+                e.Row.FCCheckBox("Chk").Enabled = false;
+                e.Row.FCCheckBox("Chk").Checked = false;
+                e.Row.FCCheckBox("Chk").ToolTip = "Comprobación";
+            }
+
+
         }
     }