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

AC/RegNomina.aspx

@@ -93,12 +93,23 @@
                             <table><tr><td>ISPT</td>
                                 <td>
                                     <asp:TextBox ID="TxtISPT" runat="server" Width="75px"></asp:TextBox></td>
-                               
+                                <td>Servicio Médico:</td><td><asp:TextBox ID="TxtServicioMedico" runat="server" Width="75px"></asp:TextBox></td>
+                                <td>Fonacot:</td><td><asp:TextBox ID="TxtFonacot" runat="server" Width="75px"></asp:TextBox></td>
                             </tr><tr> <td>Crédito al Salario</td>
                                 <td>
                                     <asp:TextBox ID="TxtCredSalario" runat="server" Width="75px"></asp:TextBox></td>
+                                <td>Pensión:</td><td><asp:TextBox ID="TxtPension" runat="server" Width="75px"></asp:TextBox></td>
+                                <td>P. Infonavit:</td><td><asp:TextBox ID="TxtInfonavit" runat="server" Width="75px"></asp:TextBox></td>
+                                 </tr>
+                             </tr><tr> 
+                                  <td>ISR Asimilados</td><td>  <asp:TextBox ID="TxtISRAsimilados" runat="server" Width="75px"></asp:TextBox></td>
+                                 <td>C. Sindical</td>
+                                <td>
+                                    <asp:TextBox ID="TxtSindical" runat="server" Width="75px"></asp:TextBox></td>
                                
-                                 </tr></table>
+                                <td> </td><td> </td>
+                                 </tr>
+                            </table>
                         </asp:Panel>
                         <asp:Panel ID="PnlFiniquito" runat="server" Visible="true">
                             <table border="0" id="TbIEPersonal" runat="server" Visible="false" >

AC/RegNomina.aspx.vb

@@ -373,6 +373,12 @@ Partial Class AC_RegNomina
         Dim IdCtaCreditoSalario As Integer = 635
         Dim IdCtaDevolucionISPT As Integer = 1745
         Dim IdCtaMatriz As Integer
+        Dim IdCtaCuotaSindical As Integer = 644
+        Dim IdCtaInfonavit As Integer = 2018
+        Dim IdCtaFonacot As Integer = 646
+        Dim IdCtaServicioMedico As Integer = 643
+        Dim IdCtaPension As Integer = 643
+        Dim IdCtaISRAsimilados As Integer = 4442
 
         Dim Importe As Double
         Dim MsgError As String = ""
@@ -564,6 +570,7 @@ Partial Class AC_RegNomina
 
                     ObjIE.UpdateIEPrePoliza(Fecha, objAC.Folio.ToString, IDPoliza, CvePrePoliza, CveIE, -1)
                 Else
+                    MsgError = "no se pudo agregar el movimiento bancario"
                     TieneError = True
                 End If
 
@@ -586,9 +593,34 @@ Partial Class AC_RegNomina
             If Importe > 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaCreditoSalario, False, Importe, "", Concepto, 0, Fecha, "") Then TieneError = True
 
 
-            'Registro del Mov Devolución 
+            'Registro Cuotas Sindicales
-            Importe = TxtISPT.Text.ToDouble - TxtCredSalario.Text.ToDouble
+            Importe = TxtSindical.Text.ToDouble
-            If Importe <> 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaDevolucionISPT, If(Importe > 0, False, True), Math.Abs(Importe), "", Concepto, 0, Fecha, "") Then TieneError = True
+            If Importe > 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaCuotaSindical, True, Importe, "", Concepto, 0, Fecha, "") Then TieneError = True
+
+            'Registro Prestamo infonavit
+            Importe = txtInfonavit.Text.ToDouble
+            If Importe > 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaInfonavit, True, Importe, "", Concepto, 0, Fecha, "") Then TieneError = True
+
+            'Registro Fonacot
+            Importe = txtFonacot.Text.ToDouble
+            If Importe > 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaFonacot, True, Importe, "", Concepto, 0, Fecha, "") Then TieneError = True
+
+            'Registro Servicio Medico
+            Importe = txtServicioMedico.Text.ToDouble
+            If Importe > 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaServicioMedico, True, Importe, "", Concepto, 0, Fecha, "") Then TieneError = True
+
+            'Registro Pensión
+            Importe = txtPension.Text.ToDouble
+            If Importe > 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaPension, True, Importe, "", Concepto, 0, Fecha, "") Then TieneError = True
+
+            'Registro ISR Asimilados
+            Importe = TxtISRAsimilados.Text.ToDouble
+            If Importe > 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaISRAsimilados, True, Importe, "", Concepto, 0, Fecha, "") Then TieneError = True
+
+
+            ''Registro del Mov Devolución 
+            'Importe = TxtISPT.Text.ToDouble - TxtCredSalario.Text.ToDouble
+            'If Importe <> 0 AndAlso Not objAC.AddMovimiento(IDPoliza, IdCtaDevolucionISPT, If(Importe > 0, False, True), Math.Abs(Importe), "", Concepto, 0, Fecha, "") Then TieneError = True
 
         Else
             TieneError = True

Bancos/ProveedoresAbonar.aspx

@@ -369,7 +369,7 @@
     <asp:UpdatePanel ID="UPCompras" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
             <asp:GridView ID="GvCxP" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Cuentas X Pagar Pendientes" 
-                DataKeyNames="CveCompra,ImporteProgramo,Saldo,SubTotal,IVA,IVADeducible,IVANoDeducible,IEPS,RetIVA,RetISR,Original,UUID,RFC,CveFactura,SerieFolio,Descripcion,CvePrePoliza,Fecha,EstatusInventario,CveProveedor,TipoCambio, CveMoneda,CveRetIVAConcepto,IVAPorPagar,IVAPorPagarDeducible,IVAPorPagarNoDeducible,IEPSPorPagar,CveRetISRConcepto,PorcentajeIVA,CveTipoConcepto,CveSubProyecto,TotalOriginal" 
+                DataKeyNames="CveCompra,ImporteProgramo,Saldo,SubTotal,IVA,IVADeducible,IVANoDeducible,IEPS,RetIVA,RetISR,Original,UUID,RFC,CveFactura,SerieFolio,Descripcion,CvePrePoliza,Fecha,EstatusInventario,CveProveedor,TipoCambio, CveMoneda,CveRetIVAConcepto,IVAPorPagar,IVAPorPagarDeducible,IVAPorPagarNoDeducible,IEPSPorPagar,CveRetISRConcepto,PorcentajeIVA,CveTipoConcepto,CveSubProyecto,TotalOriginal,EsImportacion" 
                 Width="100%" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None">
                 <Columns>
                     <asp:TemplateField>

Bancos/ProveedoresAbonar.aspx.vb

@@ -1043,21 +1043,17 @@ Partial Class Bancos_ProveedoresAbonar
                                             Dim PorcentajeImpuesto As Decimal = 0
 
                                             If ConceptoContable.Contiene(14, 19) AndAlso gvr.DataKey("CveCompra").ToEntero > 0 Then
-                                                Dim objcompras As New ClsCompras
+
-                                                objcompras.GetCompras(gvr.DataKey("CveCompra").ToEntero, "-1", "-1", -1, -1, UsuarioActual.CveEmpresa)
+                                                If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
-                                                If objcompras.DtResultados IsNot Nothing AndAlso objcompras.DtResultados.Rows.Count > 0 Then
+                                                    If gvr.DataKey("EsImportacion").ToString = "1" Then
-                                                    Dim dr As DataRow = objcompras.DtResultados.Rows(0)
+                                                        EsImportacion = True
-                                                    If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
+                                                        If ConceptoContable = 14 Then
-                                                        If dr("EsImportacion").ToString = "True" Then
+                                                            ConceptoContable = 287
-                                                            EsImportacion = True
-                                                            If ConceptoContable = 14 Then
-                                                                ConceptoContable = 287
-                                                            Else
-                                                                ConceptoContable = 288
-                                                            End If
                                                         Else
-                                                            EsImportacion = False
+                                                            ConceptoContable = 288
                                                         End If
+                                                    Else
+                                                        EsImportacion = False
                                                     End If
                                                 End If
 
@@ -2656,10 +2652,12 @@ Partial Class Bancos_ProveedoresAbonar
         'cuando es cheque
         If DdlTipoTransaccion.SelectedValue = "1" Then
             ChkAbonoCuenta.Visible = True
-
+            TxtPagueseA.Enabled = True
 
         Else
             ChkAbonoCuenta.Visible = False
+            TxtPagueseA.Enabled = False
+
         End If
 
         If DdlTipoTransaccion.SelectedValue.ToEntero.Contiene(9, 17) Then

Contabilidad/RegPrePoliza.aspx.vb

@@ -202,7 +202,6 @@ Partial Class ContabilidadC_RegPrePoliza
     Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
 
         If Not Page.IsPostBack Then
-            Tick = DateTime.Now.Ticks.ToString
 
             If UsuarioActual.Empresa.TipoContabilizacion = 1 OrElse UsuarioActual.Empresa.TipoContabilidad = 1 Then
                 Response.Redirect(Request.Url.PathAndQuery.Replace("RegPrePoliza", "RegPrePolizaS"))
@@ -849,7 +848,10 @@ Partial Class ContabilidadC_RegPrePoliza
             dr("MultipleSubProyecto") = drt("MultipleSubProyecto")
             dr("PorcentajeImpuesto") = drt("PorcentajeImpuesto")
             dr("CveCuenta") = drt("CveCuenta")
-            dr("FolioPoliza") = drt("FolioPoliza")
+            If CvePrePoliza > 0 Then
+                dr("FolioPoliza") = drt("FolioPoliza")
+            End If
+
 
             DtMovimientos.Rows.Add(dr)
 
@@ -1775,6 +1777,7 @@ Partial Class ContabilidadC_RegPrePoliza
         Dim ObjIE As New ClsBancos()
         Dim pathPoliza As String = ""
         Dim TieneComprobante As Boolean
+        Tick = DateTime.Now.Ticks.ToString
 
         Try
             TieneComprobante = VerificarComprobante()
@@ -1856,20 +1859,18 @@ Partial Class ContabilidadC_RegPrePoliza
                         End If
                     End If
                 Next
-
                 MergePdfFiles(Pathpdf.ToArray)
-                If File.Exists(pathPoliza) Then
-                    Directory.Delete(String.Format("{0}{1}", AppDomain.CurrentDomain.BaseDirectory, Tick), True)
-                End If
-
             Else
                 Alert("No se tiene cargado comprobante de pago", TipoMensaje.MsgAdvertencia)
             End If
 
-
         Catch ex As Exception
             Alert("Error al descargar el paquete", TipoMensaje.MsgError)
         End Try
+
+        If Directory.Exists(String.Format("{0}/{1}", AppDomain.CurrentDomain.BaseDirectory, Tick)) Then
+            Directory.Delete(String.Format("{0}/{1}", AppDomain.CurrentDomain.BaseDirectory, Tick), True)
+        End If
         ObjCompra.Dispose()
         ObjIE.Dispose()
     End Sub

Contabilidad/RegPrePolizaS.aspx.vb

@@ -2037,6 +2037,9 @@ Partial Class ContabilidadC_RegPrePolizaS
             If UsuarioActual.CveEmpresa = 119 Then
                 params.Add(New ReportParameter("UsuarioRegistro", GlobalDTUsuarios(dr("CveUsuario").ToString.ToEntero).FiltroPrimeroValor("Nombre")))
             End If
+            If UsuarioActual.CveEmpresa = 140 Then
+                params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
+            End If
             If Archivo.Exists Then
                 ruta = UsuarioActual.Empresa.Ruta & "Formatos/Polizas.rdlc"
             Else

Contabilidad2/RepEstadoActividades.aspx.vb

@@ -116,6 +116,10 @@ Partial Class AC_RepEstadoActividades
             DdlEjercicio.Items.Add(New ListItem(Now.Year.ToString, Now.Year.ToString))
         End If
         DdlPeriodo.SelectedValue = Now.Month.ToString
+
+        DdlSubproyecto.datasource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
+        DdlSubproyecto.databind
+
     End Sub
 
     Private Sub CargaDatos()

CxC/RepCxCDetalle.aspx

@@ -434,13 +434,14 @@
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--<asp:HyperLinkField HeaderText="Folio" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" ControlStyle-Width ="85px"  DataTextField="SerieFolio" />--%>
-                    <asp:BoundField HeaderText="Total" DataField="Total" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
+
                     <asp:BoundField HeaderText="SubTotal" DataField="SubTotal" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
-                    <asp:BoundField HeaderText="IVA" DataField="IVA" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="Descuento" DataField="Descuento" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="Amortizacion" DataField="Amortizacion" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="IVA" DataField="IVA" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="RetIVA" DataField="RetIVA" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="RetISR" DataField="RetISR" DataFormatString="{0:N2}" Visible="false" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField HeaderText="Total" DataField="Total" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="Saldo" DataField="Saldo" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField HeaderText="Mon" DataField="Moneda"/>
                     <asp:BoundField HeaderText="Sucursal Venta" DataField="SubProyecto" DataFormatString="{0}" />
@@ -506,8 +507,7 @@
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkFolio" runat="server" Text="&nbsp;Folio" Checked="true" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkSubTotal" runat="server" Text="&nbsp;SubTotal" /></td>
+                                            <asp:CheckBox ID="ChkFecha" runat="server" Text="&nbsp;Fecha" Checked="true" /></td>
-
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkSeEnvioMail" runat="server" Text="&nbsp;Se envió Mail" /></td>
                                         <td style="text-align: left;">
@@ -515,7 +515,7 @@
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkDescuento" runat="server" Text="&nbsp;Descuento" /></td>
+                                            <asp:CheckBox ID="ChkSubTotal" runat="server" Text="&nbsp;SubTotal" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChlMotivoDescuento" runat="server" Text="&nbsp;Motivo Descuento" /></td>
                                         <td style="text-align: left;">
@@ -525,9 +525,10 @@
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkAmortizacion" runat="server" Text="&nbsp;Amortización" /></td>
+                                            <asp:CheckBox ID="ChkDescuento" runat="server" Text="&nbsp;Descuento" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkIVA" runat="server" Text="&nbsp;IVA" Checked="true" /></td>
+                                            <asp:CheckBox ID="ChkVendedor" runat="server" Text="&nbsp;Vendedor" Checked="false" /></td>
+
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkSucursalEjecucion" runat="server" Text="&nbsp;Sucursal Ejecucion" /></td>
                                         <td style="text-align: left;">
@@ -535,9 +536,9 @@
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetIVA" runat="server" Text="&nbsp;Ret. IVA" /></td>
+                                            <asp:CheckBox ID="ChkAmortizacion" runat="server" Text="&nbsp;Amortización" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetISR" runat="server" Text="&nbsp;Ret. ISR" /></td>
+                                            <asp:CheckBox ID="ChkSucursal" runat="server" Text="&nbsp;Sucursal" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkTelefono" runat="server" Text="&nbsp;Telefono" /></td>
                                         <td style="text-align: left;">
@@ -545,9 +546,9 @@
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkTotal" runat="server" Text="&nbsp;Total" Checked="true" /></td>
+                                            <asp:CheckBox ID="ChkIVA" runat="server" Text="&nbsp;IVA" Checked="true" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkFecha" runat="server" Text="&nbsp;Fecha" Checked="true" /></td>
+                                            <asp:CheckBox ID="ChkCodigo" runat="server" Text="&nbsp;Código Cliente" Checked="true" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkLimiteCredito" runat="server" Text="&nbsp;Limite Credito" /></td>
                                         <td style="text-align: left;">
@@ -555,57 +556,57 @@
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkSucursal" runat="server" Text="&nbsp;Sucursal" /></td>
+                                            <asp:CheckBox ID="ChkRetIVA" runat="server" Text="&nbsp;Ret. IVA" /></td>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkCliente" runat="server" Text="&nbsp;Cliente" Checked="true" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkCodigo" runat="server" Text="&nbsp;Código Cliente" Checked="true" /></td>
-                                        <td>
                                             <asp:CheckBox ID="ChkIEPS" runat="server" Text="&nbsp;IEPS" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkEstatusCliente" runat="server" Text="&nbsp;Estatus Cliente" /></td>
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkCliente" runat="server" Text="&nbsp;Cliente" Checked="true" /></td>
+                                            <asp:CheckBox ID="ChkRetISR" runat="server" Text="&nbsp;Ret. ISR" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkSucursalCliente" runat="server" Text="&nbsp;Sucursal Cliente" Checked="true" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkEstatusCobranza" runat="server" Text="&nbsp;Estatus Cobranza" />
+                                            <asp:CheckBox ID="ChkEstatusCobranza" runat="server" Text="&nbsp;Estatus Cobranza" /></td>
-                                        </td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkTurnoCobranza" runat="server" Text="&nbsp;TurnoCobranza" />
+                                            <asp:CheckBox ID="ChkTurnoCobranza" runat="server" Text="&nbsp;TurnoCobranza" /></td>
-                                        </td>
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkVendedor" runat="server" Text="&nbsp;Vendedor" Checked="false" /></td>
+                                            <asp:CheckBox ID="ChkTotal" runat="server" Text="&nbsp;Total" Checked="true" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkEstatusFactura" runat="server" Text="&nbsp;Estatus de Factura" /></td>
                                         <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkObsCobranza" runat="server" Text="&nbsp;Observación Cobranza" />
+                                            <asp:CheckBox ID="ChkObsCobranza" runat="server" Text="&nbsp;Observación Cobranza" /></td>
-                                        </td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkCuentaContableReferencia" runat="server" Text="&nbsp;CuentaContableReferencia" Visible="False" /></td>
-                                        <td></td>
+                                        <td style="text-align: left;">
+                                            
                                     </tr>
                                     <tr>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkMotivoCancelacion" runat="server" Text="&nbsp;Motivo Cancelacion" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkSeTimbro" runat="server" Text="&nbsp;Se Timbró" /></td>
-                                        <td>
+                                        <td style="text-align: left;">
-                                            <asp:CheckBox ID="ChkFechaCobranza" runat="server" Text="&nbsp;Fecha Cobranza" Checked="true" /></td>
+                                            <asp:CheckBox ID="ChkFechaCobranza" runat="server" Text="&nbsp;Fecha Cobranza" Checked="true" /> </td>
-                                        <td> <asp:CheckBox ID="ChkDiasTranscurridos" runat="server" Text="&nbsp;Días Transcurridos" /></td>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkDiasTranscurridos" runat="server" Text="&nbsp;Días Transcurridos" /></td>
                                     </tr>
                                      <tr>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkHorario" runat="server" Text="&nbsp;Horario" Checked="false" /></td>
                                         <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkDiasPago" runat="server" Text="&nbsp;Dias Pago" /></td>
-                                          <td style="text-align: left;">
+                                        <td style="text-align: left;">
                                             <asp:CheckBox ID="ChkFechaEjecucion" runat="server" Text="&nbsp;Fecha Ejecución" /></td>
+                                        <td style="text-align: left;">
+                                              <asp:CheckBox ID="ChkTC" runat="server" Text="&nbsp;Tipo Cambio" /></td>
+                                                                                 
 
-                                          <td> <asp:CheckBox ID="ChkTC" runat="server" Text="&nbsp;Tipo Cambio" /></td>
-                                        <td></td>
                                     </tr>
                                 </tbody>
                             </table>

CxC/RepCxCDetalle.aspx.vb

@@ -534,47 +534,47 @@ Partial Class RepCxCDetalle
         End If
 
         If ChkTotal.Checked Then
+            GvDatos.Columns(9).Visible = True
+            SePersonalizo = 1
+        Else
+            GvDatos.Columns(9).Visible = False
+        End If
+
+        If ChkSubTotal.Checked Then
             GvDatos.Columns(3).Visible = True
             SePersonalizo = 1
         Else
             GvDatos.Columns(3).Visible = False
         End If
 
-        If ChkSubTotal.Checked Then
-            GvDatos.Columns(4).Visible = True
-            SePersonalizo = 1
-        Else
-            GvDatos.Columns(4).Visible = False
-        End If
-
         If ChkIVA.Checked Then
-            GvDatos.Columns(5).Visible = True
-            SePersonalizo = 1
-        Else
-            GvDatos.Columns(5).Visible = False
-        End If
-
-        If ChkDescuento.Checked Then
             GvDatos.Columns(6).Visible = True
             SePersonalizo = 1
         Else
             GvDatos.Columns(6).Visible = False
         End If
 
+        If ChkDescuento.Checked Then
+            GvDatos.Columns(4).Visible = True
+            SePersonalizo = 1
+        Else
+            GvDatos.Columns(4).Visible = False
+        End If
+
         If ChkAmortizacion.Checked Then
+            GvDatos.Columns(5).Visible = True
+            SePersonalizo = 1
+        Else
+            GvDatos.Columns(5).Visible = False
+        End If
+
+        If ChkRetIVA.Checked Then
             GvDatos.Columns(7).Visible = True
             SePersonalizo = 1
         Else
             GvDatos.Columns(7).Visible = False
         End If
 
-        If ChkRetIVA.Checked Then
-            GvDatos.Columns(8).Visible = True
-            SePersonalizo = 1
-        Else
-            GvDatos.Columns(8).Visible = False
-        End If
-
         If ChkRetISR.Checked Then
             GvDatos.Columns(9).Visible = True
             SePersonalizo = 1

Inventarios/AjustesSeccionAlmacen.aspx.vb

@@ -13,7 +13,7 @@ Partial Class Inventarios_AjustesSeccionAlmacen
     End Sub
 
     Private Sub CargaCombos()
-        Dim DtAlmacenes As DataTable = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoAlmacen:=-1).FiltraParametros("CveTipoAlmacen in (1,12,14,16, 26)")
+        Dim DtAlmacenes As DataTable = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoAlmacen:=-1).FiltraParametros("CveTipoAlmacen in (1,2,12,14,16, 26)")
 
         DdlAlmacen.DataSource = DtAlmacenes
         DdlAlmacen.DataBind()

OC/RepSolicitudesAnticipo.aspx

@@ -25,12 +25,9 @@
                 <asp:LinkButton ID="LnkCambiarFecha" OnClick="LnkCambiarFecha_Click" runat="server"> <i class="fa fa-calendar" style="font-weight:bold;"></i>  Cambiar Fechas</asp:LinkButton>
             </li>
              <li>
-                <asp:LinkButton ID="LnkGuardar" runat="server" Visible="false" data-toggle="modal" data-target="#ModalUpload"> <i class="fa fa-floppy-o" style="font-weight:bold;"></i>  Guardar</asp:LinkButton>
+                <asp:LinkButton ID="LnkGuardar" runat="server" Visible="false" OnClick="LnkGuardar_Click"> <i class="fa fa-floppy-o" style="font-weight:bold;"></i>  Guardar</asp:LinkButton>
             </li>
         </ContentTemplate>
-            <Triggers>
-                <asp:PostBackTrigger ControlID="LnkGuardar" />
-            </Triggers>
     </asp:UpdatePanel>
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="HA" Runat="Server">
@@ -172,7 +169,7 @@
     </asp:UpdatePanel>
 
     <div id="ModalUpload" class="modal ADS fade" role="dialog">
-                <div class="modal-dialog">
+                <div class="modal-dialog modal-sm">
                     <div class="modal-content">
                         <div class="modal-header ">
                             <button type="button" class="close" data-dismiss="modal">&times;</button>
@@ -186,12 +183,12 @@
                                         <div class="col-md-4"> </div>
                                         <div class="form-group col-md-6 form-md-line-input input-iconright" style="padding-left: 0px !important;">
                                             <div class="input-group input-sm dater" data-date-format="dd/mm/yyyy" style="width: 50%;">
+
+                                                <asp:TextBox ID="txtFechaActualizar" ClientIDMode="Static" runat="server" Width="100%" CssClass="form-control input-sm" CausesValidation="true" MaxLength="18"></asp:TextBox>
+                                                <label style=" padding-bottom: 30px; width: 70%;" for="<%= txtFechaActualizar.ClientID.ToString()%>">Fecha:</label>
                                                 <span class="input-group-btn ">
                                                     <asp:LinkButton ID="btnFechaActualizar" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
                                                 </span>
-                                                <asp:TextBox ID="txtFechaActualizar" ClientIDMode="Static" runat="server" Width="100%" CssClass="form-control input-sm" CausesValidation="true" MaxLength="18"></asp:TextBox>
-                                                <label style=" padding-bottom: 30px; width: 70%;" for="<%= txtFechaActualizar.ClientID.ToString()%>">Fecha:</label>
-
                                             </div>
                                             <asp:RequiredFieldValidator ID="RFVFechaInicioAdd" Display="None" CssClass="help-block errorimput" runat="server" ControlToValidate="txtFechaActualizar" ErrorMessage="<b><span style='text-decoration: underline'>ERROR</span></b>:<br>El campo <b>''Fecha''</b> es necesario." ValidationGroup="Actualiza"></asp:RequiredFieldValidator>
                                             <ajax:MaskedEditExtender ID="MEEFechaActualiar" runat="server" TargetControlID="txtFechaActualizar" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>

OC/RepSolicitudesAnticipo.aspx.cs

@@ -158,14 +158,17 @@ public partial class OC_RepSolicitudesAnticipo : ClsPaginas
         GvSolicitudes.Columns[0].Visible = true;
         LnkGuardar.Visible = true;
         LnkCambiarFecha.Visible = false;
-
         UPAcciones.Update();
         UPDatos.Update();
     }
+    protected void LnkGuardar_Click(object sender, EventArgs e)
+    {
+        RegistraScript("$('#ModalUpload').modal('show')");
+    }
     protected void BtnGuardarArchivo_Click(object sender, EventArgs e)
     {
         ActualizarFechas();
-        RegistraScript("$('#ModalUpload').modal('hide')", "hidemodal1");
+        RegistraScript("$('#ModalUpload').modal('hide')");
         GvSolicitudes.Columns[0].Visible = false;
         LnkGuardar.Visible = false;
         LnkCambiarFecha.Visible = true;
@@ -195,14 +198,12 @@ public partial class OC_RepSolicitudesAnticipo : ClsPaginas
                 {
                     TieneError = true;
                     Alert("Ocurrio un error al actulizar las fechas", TipoMensaje.MsgError);
-                    ObjEvento.RollBack();
                     break;
 
                 }
             }
         }
         if (TieneError == false) {
-            ObjEvento.Commit();
             Alert("Las Fechas se actualizaron correctamente");
         }
         ObjEvento.Dispose();