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

AF/AF.aspx.vb

@@ -2498,7 +2498,7 @@ Partial Class AF_AF
                                          FechaBaja:=FechaBaja, Lat:=TxtLatitud.Text, Longi:=TxtLongitud.Text, AgroCuenta:=TxtAgroCuenta.Text) > 0 Then
                     ViewState("CveActivoFijo") = ObjAF.CveActivoFijo
                     GlobalDTActivoFijos(UsuarioActual.CveEmpresa) = Nothing
-                    If UsuarioActual.Empresa.TipoContabilidad = 1 Then
+                    If UsuarioActual.Empresa.TipoContabilidad = 1 AndAlso DdlCtaContable.SelectedValue.ToEntero > 0 Then
                         If Not ObjContabilidad.AddCuentasAsignaciones(49, UsuarioActual.CveEmpresa, CveCuenta:=DdlCtaContable.SelectedValue.ToEntero, CveActivoFijo:=ObjAF.CveActivoFijo) Then
                             ErrorGuardar = True
                         End If

App_Code/ClsBancos.vb

@@ -1806,7 +1806,14 @@ Public Class ClsBancos
             '    Me.OnError("Ocurrió un error al guardar los cambios en el Banco", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
 
         Catch ex As Exception
-            OnError("Ocurrió un error al cancelar el movimiento en bancos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+
+            If ex.Message.Contains("El Movimiento no se puede eliminar porque tiene una cancelación relacionada") Then
+                OnError("El Movimiento no se puede eliminar porque tiene una cancelación relacionada, se tiene que eliminar primero la cancelación.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            Else
+                OnError("Ocurrió un error al eliminar el movimiento en bancos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            End If
+
+
         End Try
 
         Return Retorno

App_Code/ClsContPAQi.vb

@@ -3099,6 +3099,33 @@ Public Class ClsContPAQi
 
     End Function
 
+    Public Function UpdateMovimientoPrePolizaDetalle(IdPoliza As Integer, IdMovto As Integer, CvePrePolizaDetalle As Integer) As Boolean
+        Dim Retorno As Boolean = False
+        StrSQL.Clear()
+
+        StrSQL.Append("        update mp set CvePrePolizaDetalle = @CvePrePolizaDetalle FROM MovimientosPoliza mp WHERE Id = @pId; ")
+
+        SqlDataAdapter(StrSQL.ToString, CommandType.Text)
+
+        With SqlAdapter.SelectCommand.Parameters
+
+            .Add("@CvePrePolizaDetalle", SqlDbType.Int).Value = CvePrePolizaDetalle
+            .Add("@pIdPoliza", SqlDbType.Int).Value = IdPoliza
+            .Add("@pId", SqlDbType.Int).Value = IdMovto
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un Error al actualizar la Póliza.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+
+    End Function
+
     Public Function RemoveMovimiento(Id As Integer) As Boolean
         Dim Retorno As Boolean = False
 

App_Code/ClsContabilidad.vb

@@ -1279,6 +1279,27 @@ Public Class ClsContabilidad
         End Try
         Return Retorno
     End Function
+    Public Function UpdateContabilizable(CvePrePolizaDetalle As Integer, Contabilizar As Boolean) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Conta_PrePolizasContabilizableUpdate")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CvePrePolizaDetalle", SqlDbType.Int).Value = CvePrePolizaDetalle
+            .Add("@Contabilizar", SqlDbType.Bit).Value = If(Contabilizar, 1, 0)
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+
+            Retorno = True
+        Catch ex As Exception
+            If ex.Message.Contains("50015;") Then
+                OnError("No se puede actualizar una póliza en un ejercicio Cerrado", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+
+            Else
+                OnError("Ocurrió un error al contabilizar las prepoliza detalle.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            End If
+        End Try
+        Return Retorno
+    End Function
 
     Public Function ContabilizarPrePoliza(CvePrePoliza As Integer, CveUsuario As Integer, Empresa As Empresa, Optional Fecha As Date = MinFecha, Optional Concepto As String = "",
                                           Optional ObjConta As ClsContPAQi = Nothing, Optional pIDPoliza As Integer = -1) As Boolean
@@ -1286,7 +1307,7 @@ Public Class ClsContabilidad
         Dim Retorno As Boolean = False
         Dim OcurrioError As Boolean = False
 
-        StrLog.AppendFormat("CvePrep:{0} - Inicio -", CvePrePoliza)
+        StrLog.AppendFormat("CvePrep:{0} - CveE:{1} - Inicio -", CvePrePoliza, Empresa.CveEmpresa)
 
         If Empresa.TipoContabilizacion = 1 Then ' contabilidad en SIG
 
@@ -6403,8 +6424,9 @@ Public Class ClsContabilidad
             Dim MsgPrePoliza As String = SqlAdapter.SelectCommand.Parameters("@MsgPrePolizaSalida").Value.ToString
             If MsgPrePoliza <> "" Then MsgPrePoliza.GuardaLogAD("LogPrePoliza")
 
-            If MensajePolizaDescuadre = "" AndAlso AutoConta Then
+            If MensajePolizaDescuadre = "" Then
-                If UsuarioActual.Empresa.TipoContabilidad = 2 Then ' el tipocontabilidad deberá activarse en el PA
+                ' el tipocontabilidad 1. deberá activarse en el PA, solo aplica para conta contpaq y que no tenga activada el no contabilzar automática
+                If AutoConta AndAlso UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso Not UsuarioActual.Empresa.Funcionalidad(224) = "1" Then
                     If Not ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa, ObjConta:=ObjConta) Then
                         MensajePolizaDescuadre = Mensaje.ToString ' regresa el mensaje de contabilización
                         Retorno = False

App_Code/ClsNominas.vb

@@ -3405,14 +3405,15 @@ Public Class ClsNominas
     End Function
 #Region "Visor sat"
 
-    Public Function SATSolicitudTimbreNominaGral(IDsolicitud As Integer, cveEmpresa As Integer, fechaInicio As String, fechaFin As String, TipoNomina As Integer) As Boolean
+    Public Function SATSolicitudTimbreNominaGral(IDsolicitud As Integer, CveEmpresa As Integer, FechaInicio As Date, FechaFin As Date, TipoNomina As Integer, RegimenContratacion As Integer) As Boolean
         Dim retorno As Boolean = False
         DataAdapter("[PA_SAT_SolicitudTimbreNominaGral]", CommandType.StoredProcedure)
         addParameters("@IDsolicitud", SqlDbType.Int, IDsolicitud)
         addParameters("@TipoNomina", SqlDbType.Int, TipoNomina)
-        addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa)
+        addParameters("@CveEmpresa", SqlDbType.Int, CveEmpresa)
-        addParameters("@FechaInicio", SqlDbType.VarChar, fechaInicio)
+        addParameters("@FechaInicio", SqlDbType.Date, FechaInicio)
-        addParameters("@FechaFin", SqlDbType.VarChar, fechaFin)
+        addParameters("@FechaFin", SqlDbType.Date, FechaFin)
+        addParameters("@RegimenContratacion", SqlDbType.Int, RegimenContratacion)
         retorno = RunQuery("Ocurrió un error al obtener el Calculo ISR anual.")
         Return retorno
     End Function

App_Code/ClsPaginas.vb

@@ -3519,6 +3519,33 @@ Public Class ClsPaginas
             HttpContext.Current.Application(AppNombre) = value
         End Set
     End Property
+
+    Public Shared Property GlobalDTContaCuentasContables(CveEmpresa As Integer, Optional Codigo As String = "-1", Optional Afectable As Integer = -1, Optional CvePadre As Integer = -1) As DataTable
+        Get
+            Dim AppNombre As String = $"GlobalDTContaCuentasContables-{CveEmpresa}"
+            If HttpContext.Current.Application(AppNombre) Is Nothing Then
+                Using ObjContabilidad As New ClsContabilidad
+                    If ObjContabilidad.GetCuentas(-1, "-1", -1, CveEmpresa) Then HttpContext.Current.Application(AppNombre) = ObjContabilidad.DtResultados Else HttpContext.Current.Application(AppNombre) = Nothing
+                End Using
+            End If
+            Dim filtros As New List(Of String)
+            If Codigo <> "-1" Then filtros.Add($"Codigo = '{Codigo}'")
+            If Afectable <> -1 Then filtros.Add($"Afectable = {Afectable}")
+            If CvePadre <> -1 Then filtros.Add($"CvePadre = {CvePadre}")
+            If filtros.Count > 0 Then
+                Dim Dv As New DataView(DirectCast(HttpContext.Current.Application(AppNombre), DataTable), String.Join(" AND ", filtros), "", DataViewRowState.CurrentRows)
+                GlobalDTContaCuentasContables = Dv.ToTable
+                Dv.Dispose()
+            Else
+                GlobalDTContaCuentasContables = DirectCast(HttpContext.Current.Application(AppNombre), DataTable)
+            End If
+        End Get
+        Set(value As DataTable)
+            Dim AppNombre As String = $"GlobalDTContaCuentasContables-{CveEmpresa}"
+            HttpContext.Current.Application(AppNombre) = value
+        End Set
+    End Property
+
 #End Region
 #Region "**********************************************************************GLOBAL DT RH (RECURSOS HUMANOS)********************************************************************"
     Property GlobalDTAsistenciaDetalle() As DataTable

App_Code/ClsVentas.vb

@@ -1343,7 +1343,7 @@ Public Class ClsVentas
                                     CvePresupuestoIngreso As Integer, Optional TiempoEntrega As String = "", Optional CveVentaDetallePadre As Integer = -1,
                                     Optional CveContratoDetalle As Integer = -1, Optional PorcentajeIVA As Decimal = 0, Optional IEPS As Double = -1, Optional PorcentajeIEPS As Double = 0, Optional CvePromocionDetalle As Integer = -1,
                                     Optional CveMovimientoDetallePedido As Integer = -1, Optional ImporteRetIVA As Double = 0, Optional PorcentajeRetIVA As Double = 0,
-                                    Optional ImporteRetISR As Double = 0, Optional PorcentajeRetISR As Double = 0, Optional CuentaPredial As String = "", Optional CvePrecioLista As Integer = -1, Optional CveActivoFijo As Integer = -1) As Boolean
+                                    Optional ImporteRetISR As Double = 0, Optional PorcentajeRetISR As Double = 0, Optional CuentaPredial As String = "", Optional CvePrecioLista As Integer = -1, Optional CveActivoFijo As Integer = -1, Optional NumTurnos As Decimal = 0D) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_VentasDetalleAdd")
 
@@ -1375,6 +1375,7 @@ Public Class ClsVentas
             .Add("@CuentaPredial", SqlDbType.VarChar).Value = CuentaPredial
             .Add("@CvePrecioLista", SqlDbType.Int).Value = CvePrecioLista
             .Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo
+            .Add("@NumTurnos", SqlDbType.Decimal).Value = NumTurnos
         End With
 
         Try

App_Code/LogicNominas.vb

@@ -190,7 +190,7 @@ Public Class LogicNominas
                 If continuar AndAlso objPersonal.GetPersonal(CvePersonal, UsuarioActual.CveEmpresa) AndAlso objPersonal.DtResultados.Rows.Count > 0 Then
                     RFC = objPersonal.RFC
                     cfdi.Emisor.RegistroPatronal = objPersonal.DtResultados.Rows(0)("RegistroPatronal").ToString()
-                    NombreCompleto = String.Format("{0} {1} {2}", objPersonal.Nombres, objPersonal.APaterno, objPersonal.AMaterno)
+                    NombreCompleto = String.Format("{0} {1} {2}", objPersonal.Nombres, objPersonal.APaterno, objPersonal.AMaterno).Trim()
                     CodigoPostal = objPersonal.CP
                     Sindicalizado = objPersonal.DtResultados.Rows(0)("Sindicalizado").ToString().ToUpper().Contiene("TRUE", "1")
                     CURP = objPersonal.CURP

Bancos/FluctuacionCambiaria.aspx

@@ -730,7 +730,7 @@
                                 <asp:RequiredFieldValidator ID="RFVDdlSubproyectoBancos" runat="server" CssClass="help-block errorimput" InitialValue="-1" ControlToValidate="DdlSubproyectoBancos" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo." ValidationGroup="GrpGuardarBancos"></asp:RequiredFieldValidator>
                                 <i></i>
                             </div> 
-                            <div class="col-md-6" style="text-align: right!important">
+                            <div class="col-md-3" style="text-align: right!important">
                                 <asp:Button Text="Generar Bancos" runat="server" ID="BtnGeneraBancos" OnClick="BtnGeneraBancos_Click" Style="margin-left: 30px;" class="btn btn-primary" ValidationGroup="GrpGuardarBancos" />
                                  <asp:HiddenField ID="HdnBancoCvePrePoliza" runat="server" />
                                 <asp:HyperLink ID="HplBancosLiga" runat="server" Text="Ver Póliza" CssClass="Texto" Visible="false" />

Bancos/FluctuacionCambiaria.aspx.vb

@@ -315,14 +315,14 @@ Partial Class Bancos_FluctuacionCambiaria
             Dim DtTemp As DataTable = ObjBancos.DtResultados.Copy
             Dim TCCierreFluctuacion As Decimal = LtTipoCambioActual.Text.ToDecimal
             Dim TotAcumulado As Decimal = ObjBancos.DtResultados.SUMD("Fluctuacion")
+            'bancos no lleva seguimiento
+            'HdnCveFluctuacionBitacora.Value = ObjBancos.DtResultados.MAX("CveFluctuacionBitacora").ToString
+            'HdnBancoCvePrePoliza.Value = ObjBancos.DtResultados.MAX("CvePrePoliza").ToString
+            'BtnBancosRemove.Visible = HdnBancoCvePrePoliza.Value.ToEntero > 0
+            'BtnGeneraBancos.Visible = Not HdnBancoCvePrePoliza.Value.ToEntero > 0
 
-            HdnCveFluctuacionBitacora.Value = ObjBancos.DtResultados.MAX("CveFluctuacionBitacora").ToString
+            'HplBancosLiga.Visible = HdnBancoCvePrePoliza.Value.ToEntero > 0
-            HdnBancoCvePrePoliza.Value = ObjBancos.DtResultados.MAX("CvePrePoliza").ToString
+            'HplBancosLiga.NavigateUrl = String.Format("/Contabilidad/RegPrePolizas.aspx?CvePrePoliza={0}", ObjBancos.DtResultados.MAX("CvePrePoliza").ToString)
-            BtnBancosRemove.Visible = HdnBancoCvePrePoliza.Value.ToEntero > 0
-            BtnGeneraBancos.Visible = Not HdnBancoCvePrePoliza.Value.ToEntero > 0
-
-            HplBancosLiga.Visible = HdnBancoCvePrePoliza.Value.ToEntero > 0
-            HplBancosLiga.NavigateUrl = String.Format("/Contabilidad/RegPrePolizas.aspx?CvePrePoliza={0}", ObjBancos.DtResultados.MAX("CvePrePoliza").ToString)
 
             GvCuentas.DataSource = DtTemp
             LblTotalBancos.Text = TotAcumulado.FormatoNumero

Bancos/IE.aspx

@@ -291,6 +291,12 @@
                                     <asp:TextBox ID="TxtOtrosIngresosEgresos" runat="server" CssClass="form-control input-sm" ClientIDMode="Static" Style="text-align: right;" AutoComplete="off"></asp:TextBox>
 
                                 </div>
+                                <label id="lblDevolucion" runat="server" class="col-md-2 control-label ">Dev. Cliente:</label>
+                                <div id="divTxtDevolucion" runat="server" class="col-md-2 input-icon">
+                                    <i style="margin: 0px;">$</i>
+                                    <asp:TextBox ID="TxtDevolución" runat="server" CssClass="form-control input-sm" ClientIDMode="Static" Style="text-align: right;" AutoComplete="off"></asp:TextBox>
+
+                                </div>
                             </div>
                             <br />
                             <asp:Panel ID="PnlRecibidoPor" runat="server" Visible="false">
@@ -1485,47 +1491,7 @@
             </div>
         </div>
     </div>
-
+     
-
-    <div id="ModalAjustarMovimiento" class="modal ADS fade" role="dialog">
-        <div class="modal-dialog">
-
-            <!-- Modal content-->
-            <div class="modal-content">
-                <div class="modal-header ">
-                    <button type="button" class="close" data-dismiss="modal">&times;</button>
-                    <h4 class="modal-title">Ajustar Movimiento</h4>
-                </div>
-                <div class="modal-body">
-                    <asp:UpdatePanel ID="UpModalAjustarMovimiento" runat="server" UpdateMode="Conditional">
-                        <ContentTemplate>
-
-                            <div class="row">
-                                <div class="col-xs-2">Importe:</div>
-                                <div class="col-xs-8" style="text-align: left">
-                                    <asp:TextBox ID="TxtAjustarMovimiento" runat="server" Width="120px" CssClass="form-control" ClientIDMode="Static" Style="text-align: right;" AutoComplete="off" onkeydown="return (event.keyCode!=13);"></asp:TextBox>
-                                    <asp:RequiredFieldValidator ID="RFVTxtAjustarMovimiento" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtAjustarMovimiento" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Importe''</b> es necesario, por favor ingréselo." ValidationGroup="GpoAjustarMovimiento"></asp:RequiredFieldValidator>
-                                    <ajax:FilteredTextBoxExtender ID="FIETxtAjustarMovimiento" runat="server" TargetControlID="TxtAjustarMovimiento" FilterType="Custom, Numbers" ValidChars="+-.," />
-                                    <i></i>
-                                </div>
-                            </div>
-
-
-                        </ContentTemplate>
-                    </asp:UpdatePanel>
-                </div>
-                <div class="modal-footer">
-                    <asp:UpdatePanel runat="server">
-                        <ContentTemplate>
-                            <asp:Button ID="BtnAjustarMovimiento" Text="Ajustar" runat="server" ClientIDMode="Static" CssClass="btn btn-primary" ValidationGroup="GpoAjustarMovimiento" />
-                            <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
-                        </ContentTemplate>
-                    </asp:UpdatePanel>
-                </div>
-            </div>
-        </div>
-    </div>
-
 
     <%--    <div id="ModalCancelarComplemetno" class="modal ADS fade" role="dialog">
         <div class="modal-dialog">
@@ -1773,11 +1739,23 @@
         //VALIDA QUE LA CANTIDAD DE T (TXT) NO SEA MAYOR A C
         function ValidarCantidad(t, c) {
             var Ot = 0.00;
+            debugger;
             // considera importe de OT ingresos, para que se peuda exceder
             if ($get('TxtOtrosIngresosEgresos')) { Ot = ToDouble($get('TxtOtrosIngresosEgresos').value); }
             t.value = (ToDouble(t.value) > ToDouble(c) + Ot ? c : t.value)
         }
 
+        function ValidarCantidadDev(s) {
+            var Ot = 0.00;
+            var Dev = 0.00;
+            debugger; //valida importe
+            if ($get('TxtDevolución') && (ToDouble($get('TxtDevolución').value) > s)) $get('TxtDevolución').value = s;
+          
+            // considera importe de OT ingresos, para que se peuda exceder
+            if ($get('TxtOtrosIngresosEgresos')) { Ot = ToDouble($get('TxtOtrosIngresosEgresos').value); }
+            if ($get('TxtImporte')) $get('TxtImporte').value = ToDouble($get('TxtDevolución').value) + Ot;
+        }
+
         var TipoCambioActual = 0.0;
         function CambiaTC(txt) {
             let TipoCambioTxt = ToDouble(txt.value)

Bancos/IE.aspx.vb

@@ -1504,6 +1504,8 @@ Partial Class Bancos_IE
                     DdlCliente.SelectedText = ObjCliente.NombreComercial
                     DdlCliente.SelectedValue = ObjCliente.CveCliente.ToString
                     DivOtrosIngresosEgresos.Visible = True
+                    'TxtImporte.ReadOnly = True
+                    TxtImporte.Attributes.Add(“readonly”, “readonly”)
                 End If
 
                 'If UsuarioActual.Empresa.TipoContabilidad = 2 AndAlso UsuarioActual.Empresa.UsaAC AndAlso UsuarioActual.Empresa.Funcionalidad(200) = "1" Then
@@ -3009,7 +3011,8 @@ Partial Class Bancos_IE
                                 If TxtOtrosIngresosEgresos.Text.ToDecimal <> 0 Then
                                     Dim TipoMovtoIE As Boolean = False
                                     Dim CveConcIE As Integer = 78
-                                    If Impo > 0 Then
+                                    Dim tCveSub As Integer = GlobalDTSubProyectos(-1, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto").ToEntero
+                                    If Impo < 0 Then
                                         TipoMovtoIE = True
                                         Impo = Math.Abs(Impo)
                                         CveConcIE = 78
@@ -3021,7 +3024,7 @@ Partial Class Bancos_IE
                                         IdCtaContableAplicar = UsuarioActual.Empresa.Funcionalidad(266).ToEntero
                                     End If
 
-                                    If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoIE, Impo, ReferenciaAplicar, CveConcIE, ConceptoAplicar, Now, IdCtaContableAplicar, -1, CveIE, CveVenta:=CveVentaDevDin, CveCliente:=CveCliente, ImporteMX:=Impo, ImporteME:=0) Then
+                                    If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoIE, Impo, ReferenciaAplicar, CveConcIE, ConceptoAplicar, Now, IdCtaContableAplicar, -1, CveIE, CveVenta:=CveVentaDevDin, CveCliente:=CveCliente, ImporteMX:=Impo, ImporteME:=0, CveSubProyecto:=tCveSub) Then
                                         MsgError = "Ocurrió un error al registrar el asiento de pago de devolución"
                                         Exit Select
                                     End If
@@ -3029,7 +3032,7 @@ Partial Class Bancos_IE
 
                                 'CANCELA NC
                                 IdCtaContableAplicar = IDCtaBeneficiario
-                                ImporteAplicar = ImporteAplicar + Impo
+                                ImporteAplicar = ImporteAplicar - Impo
                                 ImporteAplicarMN = (ImporteAplicar * If(tCveMoneda = 1, 1, TxtTipoCambio.Text.ToDecimal)).RoundSQL()
                                 If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, True, -(ImporteAplicar), ReferenciaAplicar, 12, ConceptoAplicar, Now, IdCtaContableAplicar, -1, CveIE, CveVenta:=CveVentaDevDin, CveCliente:=CveCliente, ImporteMX:=-(ImporteAplicarMN), ImporteME:=ImporteAplicarME) Then
                                     MsgError = "Ocurrió un error al registrar el asiento de pago de devolución"
@@ -3658,7 +3661,7 @@ Partial Class Bancos_IE
                                     End If
 
                                     If CveConceptoCompra.Contiene(10, 338, 48, 345) Then
-                                        If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, Not TipoMovimiento, ImporteAplicar, Ref, If(CveConceptoCompra = 10, 266, 340), Conc, Now, IdCtaAnticipoComplementaria, -1, CveIE, CveCompra:=CveCompraDeCDin, CveProveedor:=CveProveedor, ImporteMX:=ImporteAplicarMN, ImporteME:=ImporteAplicar, TipoCambio:=TxtTipoCambio.Text.ToDecimal) Then
+                                        If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, Not TipoMovimiento, ImporteAplicar, Ref, If(CveConceptoCompra = 10, 266, If(CveConceptoCompra = 345, 347, 340)), Conc, Now, IdCtaAnticipoComplementaria, -1, CveIE, CveCompra:=CveCompraDeCDin, CveProveedor:=CveProveedor, ImporteMX:=ImporteAplicarMN, ImporteME:=ImporteAplicar, TipoCambio:=TxtTipoCambio.Text.ToDecimal) Then
                                             MsgError = "Ocurrió un error al registrar el asiento de bancos complementaria de devolución"
                                         End If
                                     End If
@@ -5806,7 +5809,10 @@ Partial Class Bancos_IE
                 CvePrePolizaDevDin = UrlParametros("CVEPREPOLIZA").ToString.ToEntero
                 ImporteOriginalDevDin = UrlParametros("ORIGINAL").ToString.ToDecimal.RoundSQL(6)
                 TxtImporte.Text = UrlParametros("SALDO").ToString.FormatoNumero()
-                TxtImporte.Attributes.Add("onkeyup", $"FormatoMoneda(this);ValidarCantidad(this,{UrlParametros("SALDO").ToString});")
+                TxtDevolución.Text = UrlParametros("SALDO").ToString.FormatoNumero()
+                'TxtImporte.Attributes.Add("onkeyup", $"FormatoMoneda(this);ValidarCantidad(this,{UrlParametros("SALDO").ToString});")
+                TxtDevolución.Attributes.Add("onkeyup", $"FormatoMoneda(this);ValidarCantidadDev( {UrlParametros("SALDO").ToString});")
+                TxtOtrosIngresosEgresos.Attributes.Add("onkeyup", $"ValidarCantidadDev();")
                 TxtImporteLetra.Text = UrlParametros("SALDO").ToString.ToDouble.Texto2Letras(UrlParametros("CVEMONEDA").ToString.ToEntero)
                 CargaCliente(CveCliente)
                 'BuscarCliente()
@@ -6322,26 +6328,26 @@ Partial Class Bancos_IE
     End Sub
 
 
-    Private Sub LnkAjustarMovimiento_Click(sender As Object, e As EventArgs) Handles LnkAjustarMovimiento.Click
+    'Private Sub LnkAjustarMovimiento_Click(sender As Object, e As EventArgs) Handles LnkAjustarMovimiento.Click
-        RegistraScript("$('#ModalAjustarMovimiento').modal('show');")
+    '    RegistraScript("$('#ModalAjustarMovimiento').modal('show');")
-    End Sub
+    'End Sub
 
-    Private Sub BtnAjustarMovimiento_Click(sender As Object, e As EventArgs) Handles BtnAjustarMovimiento.Click
+    'Private Sub BtnAjustarMovimiento_Click(sender As Object, e As EventArgs) Handles BtnAjustarMovimiento.Click
 
-        Dim ObjBanco As New ClsBancos
+    '    Dim ObjBanco As New ClsBancos
-        ObjBanco.IniciaTransacSQL()
+    '    ObjBanco.IniciaTransacSQL()
 
-        If ObjBanco.UpdateAjustarMovimiento(CveIE, TxtAjustarMovimiento.Text.ToDecimal, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+    '    If ObjBanco.UpdateAjustarMovimiento(CveIE, TxtAjustarMovimiento.Text.ToDecimal, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
-            ObjBanco.Commit()
+    '        ObjBanco.Commit()
-            RegistraScript("$('#ModalAjustarMovimiento').modal('hide');", "ALTR")
+    '        RegistraScript("$('#ModalAjustarMovimiento').modal('hide');", "ALTR")
-            Alert("El ajuste se realizo correctamente.", TipoMensaje.MsgInformacion, $" document.location.href = ""./IE.aspx?CveIE={CveIE}"";")
+    '        Alert("El ajuste se realizo correctamente.", TipoMensaje.MsgInformacion, $" document.location.href = ""./IE.aspx?CveIE={CveIE}"";")
-        Else
+    '    Else
-            ObjBanco.RollBack()
+    '        ObjBanco.RollBack()
-        End If
+    '    End If
 
-        ObjBanco.Dispose()
+    '    ObjBanco.Dispose()
 
-    End Sub
+    'End Sub
 
 
 

Compras/Compras.aspx

@@ -2407,7 +2407,7 @@
                                     <td align="left">
                                         <asp:Label ID="LblAplicaNC" runat="server" Width="100px" Text="Aplica NC/Dev:" ToolTip="Aplica Nota Crédito"></asp:Label></td>
                                     <td align="left">
-                                        <asp:CheckBox ID="ChkAplicaNotaCredito" CssClass="make-switchsd" runat="server" /></td>
+                                        <asp:CheckBox ID="ChkAplicaNotaCredito" CssClass="chksino" data-size="small" Text=" " runat="server" /></td>
                                 </tr>
 
                                 <tr id="TrReembolso" runat="server" visible="false">

Compras/Compras.aspx.vb

@@ -1953,8 +1953,6 @@ Partial Class Compras_Compras
                     End If
 
                     Dim Msg As String = ""
-
-
                     If Version = "3.3" Or Version = "4.0" Then
 
                         If Not TmpDT.Columns.Contains("Amortizacion") Then
@@ -5204,10 +5202,6 @@ Partial Class Compras_Compras
 
                                     Dim AutoConta As Boolean = UsuarioActual.Empresa.Funcionalidad(200) = "1"
 
-                                    If UsuarioActual.CveEmpresa = 119 AndAlso (DdlPersonalReembolso.SelectedValue.ToEntero > 0 Or DdlCuentaCajaChicaReembolso.SelectedValue.ToEntero > 0 Or DdlTipoComprobante.SelectedValue = "Ant") Then
-                                        AutoConta = False
-                                    End If
-
                                     If (AutoConta Or UsuarioActual.Empresa.UsaAC) And ObjContaAC Is Nothing AndAlso UsuarioActual.Empresa.TipoContabilidad = 2 Then
                                         ObjContaAC = New ClsContPAQi(UsuarioActual.Empresa)
                                         ObjContaAC.IniciaTransacSQL()
@@ -7358,35 +7352,35 @@ Partial Class Compras_Compras
                                                 End If
                                             End If
 
-                                            'Simplificacion de PrePolizas
+                                            ''Simplificacion de PrePolizas
-                                            If Not ErrorPrepoliza AndAlso UsuarioActual.Empresa.Funcionalidad(220) <> "" Then
+                                            'If Not ErrorPrepoliza AndAlso UsuarioActual.Empresa.Funcionalidad(220) <> "" Then
-                                                If Not ObjConta.PrePolizaSimplificacion(CvePrePoliza, UsuarioActual.CveEmpresa) Then
+                                            '    If Not ObjConta.PrePolizaSimplificacion(CvePrePoliza, UsuarioActual.CveEmpresa) Then
-                                                    ErrorPrepolizaDescuadre = True
+                                            '        ErrorPrepolizaDescuadre = True
-                                                End If
+                                            '    End If
-                                            End If
+                                            'End If
 
-                                            If Not ErrorPrepoliza AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, 4) Then
+                                            'If Not ErrorPrepoliza AndAlso ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, 4) Then
-                                                If ObjConta.ValorPolizaDescuadre > 0 Then
+                                            '    If ObjConta.ValorPolizaDescuadre > 0 Then
-                                                    GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                                            '        GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
-                                                    ErrorPrepolizaDescuadre = True
+                                            '        ErrorPrepolizaDescuadre = True
-                                                End If
+                                            '    End If
-                                            End If
+                                            'End If
 
-                                            'Conta ContPAQ
+                                            ''Conta ContPAQ
-                                            If ObjContaAC IsNot Nothing AndAlso Not ErrorPrepoliza AndAlso Not ErrorPrepolizaDescuadre AndAlso UsuarioActual.Empresa.Funcionalidad(200).ToString = "1" Then
+                                            'If ObjContaAC IsNot Nothing AndAlso Not ErrorPrepoliza AndAlso Not ErrorPrepolizaDescuadre AndAlso UsuarioActual.Empresa.Funcionalidad(200).ToString = "1" Then
-                                                If idCuentaContabilizacion > 0 Then
+                                            '    If idCuentaContabilizacion > 0 Then
-                                                    If ObjConta.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa, ObjConta:=ObjContaAC) Then
+                                            '        If ObjConta.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa, ObjConta:=ObjContaAC) Then
-                                                        ' Alert(alertaContabilizacion, ModExtensiones.TipoMensaje.MsgInformacion)
+                                            '            ' Alert(alertaContabilizacion, ModExtensiones.TipoMensaje.MsgInformacion)
-                                                        IdPoliza = ObjConta.ContaIdPoliza
+                                            '            IdPoliza = ObjConta.ContaIdPoliza
-                                                    Else
+                                            '        Else
-                                                        ErrorPrepoliza = True
+                                            '            ErrorPrepoliza = True
-                                                        Alert($"Ocurrio un error al contabilizar {ObjConta.AlertaMensaje}", TipoMensaje.MsgAdvertencia)
+                                            '            Alert($"Ocurrio un error al contabilizar {ObjConta.AlertaMensaje}", TipoMensaje.MsgAdvertencia)
-                                                    End If
+                                            '        End If
-                                                Else
+                                            '    Else
-                                                    Alert(String.Format("No se puede contabilizar la Prepoliza debido a que las siguientes cuentas son inválidas: <br>{0}", CuentasContablesInvalidas), TipoMensaje.MsgAdvertencia)
+                                            '        Alert(String.Format("No se puede contabilizar la Prepoliza debido a que las siguientes cuentas son inválidas: <br>{0}", CuentasContablesInvalidas), TipoMensaje.MsgAdvertencia)
-                                                    ErrorPrepoliza = True
+                                            '        ErrorPrepoliza = True
-                                                End If
+                                            '    End If
-                                            End If
+                                            'End If
                                         End If
 
                                         ''  A N T I C I P O S
@@ -7698,12 +7692,17 @@ Partial Class Compras_Compras
                                         Msg.AppendFormat($"</br><a class=""Texto"" target='_blank' href=""/Inventarios/RecepcionAlmacen.aspx?CveCompra={CveCompra}&ED=1"">Recibir mercancía de entrega directa.</a>")
                                     End If
 
+                                    Dim AutoConta As Boolean = True
+                                    If (DdlPersonalReembolso.SelectedValue.ToEntero > 0 Or DdlCuentaCajaChicaReembolso.SelectedValue.ToEntero > 0 Or DdlTipoComprobante.SelectedValue = "Ant") Then
+                                        AutoConta = False
+                                    End If
 
-                                    If UsuarioActual.Empresa.Funcionalidad(220) <> "" Then
+                                    If Not ErrorPrepoliza AndAlso Not ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, Opcion:=4, AutoConta:=AutoConta) Then
-                                        If Not TieneError AndAlso Not ObjConta.PrePolizaSimplificacion(CvePrePoliza, UsuarioActual.CveEmpresa) Then
+                                        TieneError = True
-                                            TieneError = True
+                                        'If ObjConta.ValorPolizaDescuadre > 0 Then
-                                            Alert("No se pudo simplificar los movimientos", TipoMensaje.MsgError)
+                                        '    GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
-                                        End If
+                                        '    ErrorPrepolizaDescuadre = True
+                                        'End If
                                     End If
 
                                     If Not TieneError Then
@@ -16669,16 +16668,9 @@ Partial Class Compras_Compras
                 DdlIVA.SelectedValue = "1.08"
         End Select
 
-
-
-        'TxtIVAModal.Text = FormatoNumero(GvRow.DataKey("IVAPorcentaje").ToDouble * 100, 0)
-
-
-
         TxtRetIVAModal.Text = FormatoNumero(GvRow.DataKey("RetIVAPorcentaje").ToDouble * 100, 6)
         TxtRetISRModal.Text = FormatoNumero(GvRow.DataKey("RetISRPorcentaje").ToDouble * 100, 6)
         TxtIEPSModal.Text = FormatoNumero(GvRow.DataKey("IEPSPSPorcentaje").ToDouble * 100, 6)
-
         ViewState("RetIVA") = GvRow.DataKey("RetIVAPorcentaje").ToDouble
         ViewState("RetISR") = GvRow.DataKey("RetISRPorcentaje").ToDouble
 

Compras/eFacturas.aspx.vb

@@ -4866,7 +4866,36 @@ Partial Class Compras_eFacturas
 
     End Sub
 
+    Protected Sub GvTraslados_RowCommand(sender As Object, e As GridViewCommandEventArgs) Handles GvTraslados.RowCommand
+        Dim ImgBtn As LinkButton = DirectCast(e.CommandSource, LinkButton)
+        Dim GvRow As GridViewRow = DirectCast(ImgBtn.BindingContainer, GridViewRow)
+        Dim ObjDatos As New ClsCompras
+        Dim Correcto As Boolean = False
 
+        Select Case e.CommandName
+            Case "ValidarCFDi"
+                Dim ObjValidacion As New ClsValidaCFDi(GvRow.DataKey("UUID"), GvRow.DataKey("RFCDe"), GvRow.DataKey("RFCPara"), 0)
+                If ObjValidacion.EsValida > 0 Then
+                    If ObjValidacion.EsValida = 2 Then
+                        Alert("La factura está cancelada ante el SAT.", TipoMensaje.MsgInformacion)
+                    End If
+                    Correcto = ObjDatos.UpdateEstatus(ObjValidacion.EsValida, GvRow.DataKey("CveFactura").ToEntero, UsuarioActual.CveEmpresa)
+                Else
+                    Alert("La Factura no se pudo validar.", TipoMensaje.MsgAdvertencia)
+                End If
+                ObjValidacion.Dispose()
+            Case "ValidarCFD"
+                Correcto = ObjDatos.UpdateEstatus(1, GvRow.DataKey("CveFactura").ToEntero, UsuarioActual.CveEmpresa)
+
+            Case "Omitir"
+                Correcto = ObjDatos.UpdateEstatus(3, GvRow.DataKey("CveFactura").ToEntero, UsuarioActual.CveEmpresa)
+        End Select
+
+        ObjDatos.Dispose()
+        If Correcto Then
+            CargaDatos()
+        End If
+    End Sub
 
     Protected Sub LnkAgregarTraslado_Click(sender As Object, e As EventArgs)
 

Contabilidad/ContabilizacionCompras.aspx.cs

@@ -106,7 +106,7 @@ public partial class Contabilidad_ContabilizacionCompras : ClsPaginas
 
             ClsContabilidad contP = new ClsContabilidad();
 
-            if (contP.GetContabilizacionDiarioDetalle(CvePrePoliza))
+            if (contP.GetContabilizacionDiarioDetalle(CvePrePoliza, UsuarioActual.CveEmpresa))
             {
                 if (contP.DtResultados.Rows.Count > 0)
                 {

Contabilidad/ContabilizacionVentas.aspx.cs

@@ -93,7 +93,7 @@ public partial class Contabilidad_ContabilizacionVentas : ClsPaginas
 
             ClsContabilidad contP = new ClsContabilidad();
 
-            if (contP.GetContabilizacionDiarioDetalle(CvePrePoliza))
+            if (contP.GetContabilizacionDiarioDetalle(CvePrePoliza,UsuarioActual.CveEmpresa))
             {
                 if (contP.DtResultados.Rows.Count > 0)
                 {

Contabilidad/FiltraPolizas.aspx.vb

@@ -308,7 +308,7 @@ Partial Class Contabilidad_FiltraPolizas
                     If TempPolizas.FCCheckBox("ChkPoliza").Checked Then
                         contador += 1
                         CvePrePoliza = TempPolizas.DataKey("CvePrePoliza").ToString.ToEntero
-                        ObjContabilidad.GetContabilizacionDiarioDetalle(CvePrePoliza)
+                        ObjContabilidad.GetContabilizacionDiarioDetalle(CvePrePoliza, UsuarioActual.CveEmpresa)
                         TieneComprobante = VerificarComprobante(ObjContabilidad.DtResultados)
 
                         If TieneComprobante = "" And Not SinComprobante Then

Contabilidad/RegPrePoliza.aspx.vb

@@ -483,7 +483,7 @@ Partial Class ContabilidadC_RegPrePoliza
                     BtnEliminar.ToolTip = "No se puede eliminar al prepóliza, eliminarlos desde el módulo"
                 End If
 
-                ObjContabilidad.GetContabilizacionDiarioDetalle(CvePrePoliza)
+                ObjContabilidad.GetContabilizacionDiarioDetalle(CvePrePoliza, UsuarioActual.CveEmpresa)
 
                 DtMovimientos = ObjContabilidad.DtResultados.FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa}")
                 GvPrePoliza.DataSource = DtMovimientos

Contabilidad/RegPrePoliza1.aspx

@@ -1,883 +0,0 @@
-<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegPrePoliza1.aspx.vb" Inherits="ContabilidadC_RegPrePoliza" %>
-
-<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
-</asp:Content>
-<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
-    <style>
-        .GvMov input, .GvMov td {
-            height: 20px !important;
-        }
-
-        .GvSize tr > th:nth-child(1), .GvSize tr > th:nth-child(3), .GvSize tr > th:nth-child(5),
-        .GvSize tr > td:nth-child(1), .GvSize tr > td:nth-child(3), .GvSize tr > td:nth-child(5) {
-            width: 17%;
-        }
-
-        .GvSize tr > th:nth-child(2), .GvSize tr > td:nth-child(2) {
-            width: 9%;
-        }
-
-        .GvSize tr > th:nth-child(4), .GvSize tr > th:nth-child(8),
-        .GvSize tr > td:nth-child(4), .GvSize tr > td:nth-child(8) {
-            width: 12%;
-        }
-
-        .GvSize tr > th:nth-child(6), .GvSize tr > th:nth-child(7),
-        .GvSize tr > td:nth-child(6), .GvSize tr > td:nth-child(7) {
-            width: 8%;
-        }
-
-        .AutoExtender {
-            font-family: Verdana, Helvetica, sans-serif;
-            font-size: .9em;
-            font-weight: normal;
-            border: solid 1px #006699;
-            line-height: 20px;
-            padding: 2px;
-            background-color: White;
-            margin-left: 2px;
-            overflow: auto;
-            list-style-type: none;
-        }
-
-        .AutoExtenderList {
-            cursor: pointer;
-            color: darkgray;
-            text-align: left;
-        }
-
-        .AutoExtenderHighlight {
-            color: White;
-            background-color: #084784;
-            cursor: pointer;
-        }
-
-        #divwidth {
-            width: 150px !important;
-        }
-
-            #divwidth div {
-                width: 150px !important;
-            }
-    </style>
-</asp:Content>
-<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
-</asp:Content>
-<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
-    <asp:Label ID="LblEncabezado" runat="server" Text=" Registro de Póliza"></asp:Label>
-</asp:Content>
-<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
-    <li>
-        <asp:LinkButton ID="LnkComplementoPago" runat="server" Visible="false" OnClick="LnkComplementoPago_Click" Style="color: #686868;"><i class="fa fa-money" style="color:#686868;"></i> Crear Complemento de Pago</asp:LinkButton>
-    </li>
-    <asp:UpdatePanel runat="server">
-        <ContentTemplate>
-            <li>
-                <asp:LinkButton ID="LnkAddConcepto" runat="server" OnClick="LnkAddConcepto_Click" Visible="false"><i class="fa fa-plus" ></i> Agregar Concepto</asp:LinkButton>
-            </li>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-</asp:Content>
-<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
-
-    <table border="0" cellpadding="0" cellspacing="0" width="100%">
-        <tr>
-            <td align="left" style="width: 665px;">
-
-                <asp:UpdatePanel ID="UPPDocumento" runat="server" UpdateMode="Conditional">
-                    <ContentTemplate>
-                        <div id="DivConceptoPrePoliza" runat="server" class="chequesie22">
-                            <div class="chequesie12" runat="server" id="divDatosPrincipales">
-                                <div class="row">
-                                    <label class="col-md-2 control-label text-left">Fecha:  </label>
-                                    <div class="col-md-4" style="width: 42%;">
-                                        <div class="input-group input-small date date-picker" data-date-format="dd/mm/yyyy">
-                                            <asp:TextBox ID="TxtFecha" runat="server" CssClass="form-control"></asp:TextBox>
-                                            <span class="input-group-btn ">
-                                                <asp:LinkButton runat="server" ID="ImgCalendario" class="btn default"><i class="fa fa-calendar"></i></asp:LinkButton>
-                                            </span>
-                                        </div>
-
-                                        <ajax:MaskedEditExtender ID="MEEFecha" runat="server" TargetControlID="TxtFecha" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
-                                        <ajax:CalendarExtender ID="Calendario" runat="server" TargetControlID="TxtFecha" PopupButtonID="ImgCalendario" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
-                                        <asp:RequiredFieldValidator ID="RFVFechaDocumento" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
-                                        <asp:CompareValidator ID="CVFechaDocumento" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
-                                        <ajax:ValidatorCalloutExtender ID="VCOFechaDocumento1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaDocumento" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <ajax:ValidatorCalloutExtender ID="VCOFechaDocumento2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaDocumento" Width="350px"></ajax:ValidatorCalloutExtender>
-                                    </div>
-
-
-
-                                    <div class="col-md-1" style="width: 5px;">
-                                        <asp:CheckBox ID="ChkAutoConta" runat="server"></asp:CheckBox>
-                                    </div>
-                                    <label class="col-md-2">AutoContabilizar</label>
-
-                                </div>
-
-                                <div class="row" runat="server" id="divTipoPolAdd">
-                                    <label class="col-md-2">Tipo Póliza:</label>
-                                    <div class="col-md-4">
-                                        <asp:DropDownList ID="DdlTipoPolizaAdd" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="150px" ValidationGroup="GrpGuardar">
-                                            <asp:ListItem Text="Ingreso" Value="1"></asp:ListItem>
-                                            <asp:ListItem Text="Egreso" Value="2"></asp:ListItem>
-                                            <asp:ListItem Text="Diario" Value="3"></asp:ListItem>
-                                        </asp:DropDownList>
-                                    </div>
-                                </div>
-                            </div>
-                            <div class="chequesie22" runat="server" id="divObservaciones">
-
-                                <div class="row">
-                                    <div class="col-md-6">
-                                    </div>
-                                </div>
-
-                                <div class="row">
-                                    <label class="col-md-2">Observaciones:</label>
-                                    <div class="col-md-5">
-                                        <asp:TextBox ID="TxtObservaciones" CssClass="form-control input-sm" runat="server" MaxLength="12" Width="400px" Rows="3" TextMode="MultiLine"></asp:TextBox>
-                                    </div>
-
-                                    <label class="col-md-1">Movimiento:</label>
-                                    <div class="col-md-4">
-                                        <asp:DropDownList ID="DdlPlantilla" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="True" DataTextField="PlantillaPoliza" DataValueField="CvePlantillaPoliza" Width="250px" ValidationGroup="GrpGuardar">
-                                        </asp:DropDownList>
-
-                                    </div>
-
-                                </div>
-                                <div class="row" id="trNotificar" runat="server" visible="False">
-                                    <label class="col-md-2">Notificar:</label>
-                                    <div class="col-md-10">
-                                        <asp:TextBox ID="TxtNotificarA" CssClass="form-control input-sm" runat="server" MaxLength="12" Width="400px" Rows="2" TextMode="MultiLine" ClientIDMode="Static"></asp:TextBox>
-                                    </div>
-                                </div>
-                                <div class="row" id="trCuentaDeposito" runat="server" visible="False">
-                                    <label class="col-md-2">Cuenta Depósito:</label>
-                                    <div class="col-md-10">
-                                        <asp:DropDownList ID="DdlCuentaDeposito" CssClass="form-control input-sm select2me" runat="server" DataTextField="CuentaDeposito" DataValueField="CveCuentaDeposito" Width="400px" AppendDataBoundItems="True"></asp:DropDownList>
-                                        <asp:RequiredFieldValidator ID="RFVCuentaDeposito" runat="server" ControlToValidate="DdlCuentaDeposito" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta de Depósito''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="VCECuentaDeposito" runat="server" HighlightCssClass="vco" TargetControlID="RFVCuentaDeposito" Width="300px"></ajax:ValidatorCalloutExtender>
-
-                                    </div>
-                                </div>
-                            </div>
-
-                            <div class="row">
-                                <div class="col-md-6">
-                                    <br />
-                                </div>
-                            </div>
-                            <div class="chequesie22">
-                                <div class="row" id="DivAgregarConceptos" runat="server" visible="true">
-                                    <div class="col-md-12">
-                                        <table border="0" rules="none" style="border-collapse: collapse; min-width: 980px;" class="table table-striped GvSize mygvps Widthall">
-                                            <tr class="Titulos TextTab">
-                                                <th>Concepto<asp:HiddenField ID="HdnCve" runat="server" />
-                                                </th>
-                                                <th>Cta. Contable</th>
-                                                <th>Referencia</th>
-                                                <th>Descripción</th>
-                                                <th>SubProyecto</th>
-                                                <th>Cargo</th>
-                                                <th>Abono</th>
-                                                <th style="width: 100px;">Comandos</th>
-                                                <th runat="server" visible="false" id="nomostrar2"></th>
-                                            </tr>
-                                            <tr class="TextTab">
-                                                <th>
-                                                    <asp:DropDownList ID="DdlConceptosContables" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="ConceptoContable" DataValueField="CveConceptoContable" Width="160px" AutoPostBack="true">
-                                                    </asp:DropDownList><br />
-
-                                                    <asp:DropDownList ID="DdlProveedores" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="160px" Visible="false" AutoPostBack="true"></asp:DropDownList><br />
-                                                    <asp:DropDownList ID="DdlCompras" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SerieFolio" DataValueField="CveCompra" Width="160px" Visible="false"></asp:DropDownList><br />
-                                                    <asp:DropDownList ID="DdlPersonal" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="160px" Visible="false"></asp:DropDownList>
-                                                    <ADS:Dropdownlost ID="DdlClientes" CssStyle="width: 100%;" CssClassDdl="select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreComercial" DataValueField="CveCliente" Width="160px" Visible="false" AutoPostBack="true"></ADS:Dropdownlost>
-                                                    <br />
-                                                    <asp:DropDownList ID="DdlVentas" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Folio" DataValueField="CveVenta" Width="160px" Visible="false"></asp:DropDownList><br />
-                                                </th>
-                                                <th>
-                                                    <asp:DropDownList ID="DdlCtaContable" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="Id" Width="160px">
-                                                    </asp:DropDownList><br />
-                                                </th>
-                                                <th>
-                                                    <asp:TextBox ID="TxtReferencia" runat="server" Rows="2" TextMode="MultiLine" Width="150px"></asp:TextBox>
-                                                </th>
-                                                <th>
-                                                    <asp:TextBox ID="TxtDescripcion" runat="server" Rows="2" TextMode="MultiLine" Width="150px"></asp:TextBox>
-                                                </th>
-                                                <th>
-                                                    <asp:DropDownList ID="DdlSubProyecto" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="160px">
-                                                    </asp:DropDownList><br />
-                                                </th>
-                                                <th>
-                                                    <asp:TextBox ID="TxtCargo" runat="server" Width="76px" Height="24px" CssClass="txtcargo"></asp:TextBox>
-                                                </th>
-                                                <th>
-                                                    <asp:TextBox ID="TxtAbono" runat="server" Width="76px" Height="24px" CssClass="txtabono"></asp:TextBox>
-                                                </th>
-                                                <th align="center">
-                                                    <asp:LinkButton ID="LbAgregar" runat="server" CssClass="Texto" Enabled="true" Text="Agregar"></asp:LinkButton>
-                                                    <asp:LinkButton ID="LbCancelarEdicion" runat="server" Visible="false" CssClass="Texto" Enabled="true" Text="Cancelar"></asp:LinkButton>
-                                                </th>
-                                                <th runat="server" visible="false" id="nomostrar"></th>
-                                            </tr>
-                                        </table>
-                                    </div>
-                                </div>
-                            </div>
-                        </div>
-                    </ContentTemplate>
-                </asp:UpdatePanel>
-
-                <asp:UpdatePanel ID="UpPoliza" runat="server" UpdateMode="Conditional">
-                    <ContentTemplate>
-                        <div class="row" visible="false" runat="server" id="DivDatosPoliza">
-                            <label class="col-md-1">Tipo Póliza:</label>
-                            <div class="col-md-2">
-                                <asp:DropDownList ID="DdlTipoPoliza" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="100%" ValidationGroup="GrpGuardar">
-                                    <asp:ListItem Text="Ingreso" Value="1"></asp:ListItem>
-                                    <asp:ListItem Text="Egreso" Value="2"></asp:ListItem>
-                                    <asp:ListItem Text="Diario" Value="3"></asp:ListItem>
-                                </asp:DropDownList>
-                            </div>
-
-                            <label class="col-md-1">Fecha:</label>
-                            <div class="col-md-2">
-                                <div class="input-group input-small date date-picker" data-date-format="dd/mm/yyyy">
-                                    <asp:TextBox ID="TxtFechaDocumento" runat="server" CssClass="form-control"></asp:TextBox>
-                                    <span class="input-group-btn ">
-                                        <asp:LinkButton runat="server" ID="ImgCalendarioPoliza" class="btn default"><i class="fa fa-calendar"></i></asp:LinkButton>
-                                    </span>
-                                </div>
-                                <ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaDocumento" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
-                                <ajax:CalendarExtender ID="CalendarExtender1" runat="server" TargetControlID="TxtFechaDocumento" PopupButtonID="ImgCalendarioPoliza" PopupPosition="Left" Enabled="True"></ajax:CalendarExtender>
-                                <asp:RequiredFieldValidator ID="RFVFechaPoliza" runat="server" ControlToValidate="TxtFechaDocumento" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
-                                <asp:CompareValidator ID="CVFechaPoliza" runat="server" ControlToValidate="TxtFechaDocumento" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
-                                <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaPoliza" Width="350px"></ajax:ValidatorCalloutExtender>
-                                <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaPoliza" Width="350px"></ajax:ValidatorCalloutExtender>
-
-                            </div>
-
-                            <label class="col-md-1">Concepto:</label>
-                            <div class="col-md-5">
-                                <asp:TextBox ID="TxtConcepto" runat="server" Width="100%" CssClass="form-control"></asp:TextBox>
-                            </div>
-
-                        </div>
-                        <div class="row" visible="false" runat="server" id="divContabilziada">
-                            <label class="col-md-1">Contabilizada:</label>
-                            <div class="col-md-2">
-                                <asp:HyperLink ID="HplContabilizada" runat="server" Target="_blank">Si</asp:HyperLink>
-                            </div>
-                        </div>
-                        <div class="row" visible="false" runat="server" id="DivTipoGasto">
-                            <label class="col-md-1">Tipo Gasto:</label>
-                            <div class="col-md-2">
-                                <asp:DropDownList ID="DdlTipoGasto" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoGasto_SelectedIndexChanged" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="100%" ValidationGroup="GrpGuardar" DataTextField="TipoGasto" DataValueField="CveTipoGasto">
-                                </asp:DropDownList>
-                            </div>
-                        </div>
-                    </ContentTemplate>
-                </asp:UpdatePanel>
-            </td>
-        </tr>
-    </table>
-
-    <asp:UpdatePanel ID="UPMovs" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <input id="HdnCveCuenta" runat="server" type="hidden" value="-1" clientidmode="Static" />
-            <table style="width: 100%;" class="table GvSize table-striped table-advance table-hover">
-                <tr class="Titulos">
-                    <th>Cuenta</th>
-                    <th>Referencia</th>
-                    <th>Descripción</th>
-                    <th>SubProyecto
-                        <br />
-                        <asp:DropDownList ID="DdlSubProyectoFiltroMov" Width="150px" AutoPostBack="true" CssClass="form-control input-sm select2me" OnSelectedIndexChanged="DdlSubProyectoFiltroMov_SelectedIndexChanged" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" AppendDataBoundItems="true"></asp:DropDownList></br/>
-                    <th id="ThTipoGasto" runat="server" visible="false">Tipo Gasto</th>
-                        <th>Ref. Bancaria</th>
-                        <th>Cargo</th>
-                        <th>Abono</th>
-                        <th></th>
-                </tr>
-            </table>
-
-            <div style="width: 100%; min-height: 200px; overflow-scrolling: auto;">
-                <asp:GridView ID="GvMov" runat="server" AutoGenerateColumns="False" ShowHeader="False" DataKeyNames="IdMov,IDCuenta,Cargo,Abono,TipoMovto,CveConcepto,CveProveedor,CvePersonal, CveCompra,CveClasificacion,CveCliente,CveVenta" Width="100%" CssClass=" GvMov GvSize table table-striped table-advance table-hover mysmallbtn" GridLines="None">
-                    <Columns>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Cuenta</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="LtlCuenta" runat="server" Text='<%# Eval("Cuenta") %>'></asp:Literal><br />
-                                <asp:Label ID="LblCuentaCon" Font-Italic="true" Font-Size="7pt" runat="server" Text='<%# Eval("CodigoCuenta") %>'></asp:Label>
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Referencia</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="LtlReferencia" runat="server" Text='<%# Eval("Referencia")%>'></asp:Literal>
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Concepto</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:TextBox ID="TxtConcepto" runat="server" Width="150px" Text='<%# Eval("Concepto")%>'></asp:TextBox>
-                            </ItemTemplate>
-                            <ItemStyle />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>SubProyecto</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:DropDownList ID="DdlSubProyecto" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="140px"></asp:DropDownList>
-                            </ItemTemplate>
-                            <ItemStyle />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>TipoGasto</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:DropDownList ID="DdlTipoGasto" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="150px"></asp:DropDownList>
-                            </ItemTemplate>
-                            <ItemStyle />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Ref. Bancaria</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:DropDownList ID="DdlSaldos" CssClass="select2me" runat="server" DataValueField="CveIE" DataTextField="RazonSocialSaldo" Visible="false" Style="width: 150px;"></asp:DropDownList>
-                            </ItemTemplate>
-                            <ItemStyle />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Cargo</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:TextBox ID="TxtCargo" CssClass="txtcargo" runat="server" Style="text-align: right" Width="65px" Visible="False"></asp:TextBox>
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Right" />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Abono</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:TextBox ID="TxtAbono" CssClass="txtabono" runat="server" Style="text-align: right" Width="65px" Visible="False"></asp:TextBox>
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Right" />
-                        </asp:TemplateField>
-
-                        <asp:TemplateField HeaderText="Eliminar">
-                            <ItemTemplate>
-                                <asp:LinkButton ID="LnkE" runat="server" AlternateText="Editar" CausesValidation="False" CommandName="Edit" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
-                                <asp:ImageButton Visible="false" ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete" ImageUrl="/Imagenes/Btn_Delete.png" OnClientClick="javascript:return C();" />
-
-                            </ItemTemplate>
-                        </asp:TemplateField>
-
-                        <asp:TemplateField ItemStyle-HorizontalAlign="Center">
-                            <ItemTemplate>
-                                <asp:LinkButton ID="ImgBancos" runat="server" CausesValidation="False" CssClass="btn btn-circle btn-sm btn-warning" OnClick="Bancos_Click" Text="<i class='fa fa-money'></i>" Visible="false" />
-                            </ItemTemplate>
-                        </asp:TemplateField>
-
-
-                    </Columns>
-                    <RowStyle CssClass="Texto" />
-                    <AlternatingRowStyle CssClass="TextoAlterno" />
-                    <HeaderStyle CssClass="Titulos" />
-                </asp:GridView>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-
-    <asp:UpdatePanel ID="UpPrePoliza" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <div style="width: 100%; min-height: 200px; overflow-scrolling: auto;">
-                <asp:GridView ID="GvPrePoliza" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePrePolizaDetalle, CveConceptoContable, IdCtaContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal" Width="100%" CssClass="table table-striped table-advance table-hover mysmallbtn" GridLines="None">
-                    <Columns>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Movimiento</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="LtlConceptoContable" runat="server" Text='<%# Eval("ConceptoContable") %>'></asp:Literal><br />
-<%--                                <asp:HiddenField ID="HdnConceptoContable" runat="server" Value='<%# Eval("CveConceptoContable") %>' />
-                                <asp:HiddenField ID="HdnProveedor" runat="server" Value='<%# Eval("CveProveedor") %>' />
-                                <asp:HiddenField ID="HdnCompra" runat="server" Value='<%# Eval("CveCompra") %>' />
-                                <asp:HiddenField ID="HdnPersonal" runat="server" Value='<%# Eval("CvePersonal") %>' />
-                                <asp:HiddenField ID="HdnCliente" runat="server" Value='<%# Eval("CveCliente") %>' />
-                                <asp:HiddenField ID="HdnVenta" runat="server" Value='<%# Eval("CveVenta") %>' />--%>
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" Width="150px" />
-                        </asp:TemplateField>
-
-                        <asp:TemplateField>
-                            <HeaderTemplate>Documento</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:HyperLink ID="HlReferencia" Target="_blank" runat="server" Text='<%# Eval("FolioFactura") %>'></asp:HyperLink>
-                                <br />
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" Width="150px" />
-                        </asp:TemplateField>
-
-                        <asp:TemplateField>
-                            <HeaderTemplate>Referencia</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="TxtRef" runat="server" Text='<%# Eval("Referencia") %>'></asp:Literal><br />
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" Width="280px" />
-                        </asp:TemplateField>
-
-                        <asp:TemplateField>
-                            <HeaderTemplate>Concepto</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="TxtConcepto" runat="server" Text='<%# Eval("Concepto") %>'></asp:Literal><br />
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" Width="400px" />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>
-                                SubProyecto
-                                <%--                                <asp:DropDownList ID="DdlSubProyectoFiltro" Width="150px" AutoPostBack="true" CssClass="form-control input-sm select2me" OnSelectedIndexChanged="DdlSubProyectoFiltro_SelectedIndexChanged" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" AppendDataBoundItems="true"></asp:DropDownList>--%>
-                            </HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="DdlSubProyecto" runat="server" Text='<%# If(Eval("CveSubProyecto").ToString = "0", "-", Eval("SubProyecto")) %>'></asp:Literal><br />
-                                <%--<asp:HiddenField ID="HdnSubProyecto" runat="server" Value='<%# Eval("CveSubProyecto") %>' />--%>
-                                <%--<asp:DropDownList ID="DdlSubProyecto" runat="server" Width="150px" CssClass="form-control input-sm select2me" DataValueField="CveSubProyecto" DataTextField="SubProyecto"></asp:DropDownList><br />--%>
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" Width="150px" />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>TipoGasto</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="DdlTipoGasto" runat="server" Text='<%# Eval("TipoGasto") %>'></asp:Literal><br />
-                                <%--<asp:HiddenField ID="HdnTipoGasto" runat="server" Value='<%# Eval("CveTipoGasto") %>' />--%>
-                                <%--<asp:DropDownList ID="DdlTipoGasto" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="150px"></asp:DropDownList>--%>
-                            </ItemTemplate>
-                            <ItemStyle />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Cuenta</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="DdlCtaContable" runat="server" Text='<%# Eval("CtaCodigo") %>'></asp:Literal><br />
-                                <%--<asp:HiddenField ID="HdnCtaContable" runat="server" Value='<%# Eval("IdCtaContable") %>' />--%>
-                                <%--<asp:DropDownList ID="DdlCtaContable" runat="server" Width="200px" CssClass="form-control input-sm select2me" DataValueField="Id" DataTextField="CtaCodigo"></asp:DropDownList><br />--%>
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" Width="300px" />
-                        </asp:TemplateField>
-                        <asp:TemplateField Visible="false">
-                            <HeaderTemplate>TC</HeaderTemplate>
-                            <ItemTemplate>
-                                <asp:Literal ID="LtlTC" runat="server" Text='<%#  String.Format("{0}-${1}", Eval("TC"), Eval("ImporteME", "{0:N2}")) %>'></asp:Literal><br />
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Left" Width="300px" />
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Cargo</HeaderTemplate>
-                            <ItemTemplate>
-                                <div style="text-align: right">
-                                    <asp:Literal ID="TxtCargo" runat="server" Text='<%# If(Eval("TipoMovto").ToString = "False", Eval("ImporteMN", "{0:N2}"), "") %>'></asp:Literal><br />
-                                </div>
-                                <%--                                <asp:CompareValidator ID="CVCargo" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Cargo''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator>
-                                <ajax:ValidatorCalloutExtender ID="VCCCargo" runat="server" HighlightCssClass="vco" TargetControlID="CVCargo" Width="300px"></ajax:ValidatorCalloutExtender>--%>
-                            </ItemTemplate>
-                        </asp:TemplateField>
-                        <asp:TemplateField>
-                            <HeaderTemplate>Abono</HeaderTemplate>
-                            <ItemTemplate>
-                                <div style="text-align: right">
-                                    <asp:Literal ID="TxtAbono" runat="server" Text='<%# If(Eval("TipoMovto").ToString = "True", Eval("ImporteMN", "{0:N2}"), "") %>'></asp:Literal><br />
-                                </div>
-                                <%--                                <asp:CompareValidator ID="CVAbono" runat="server" ControlToValidate="TxtAbono" Display="None" ErrorMessage="El campo <b>''Abono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator>
-                                <ajax:ValidatorCalloutExtender ID="VCCAbono" runat="server" HighlightCssClass="vco" TargetControlID="CVAbono" Width="300px"></ajax:ValidatorCalloutExtender>--%>
-                            </ItemTemplate>
-                        </asp:TemplateField>
-
-                        <asp:TemplateField>
-                            <ItemTemplate>
-                                <asp:LinkButton ID="LnkEdit" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
-                            </ItemTemplate>
-                            <ItemStyle HorizontalAlign="Right" Width="20px" />
-                        </asp:TemplateField>
-
-                    </Columns>
-                    <RowStyle CssClass="Texto" />
-                    <AlternatingRowStyle CssClass="TextoAlterno" />
-                    <HeaderStyle CssClass="Titulos" />
-                </asp:GridView>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-
-    <table class="table table-striped table-advance table-hover Widthall">
-        <tr>
-            <td style="width: 730px">&nbsp;</td>
-            <th style="width: 70px;">
-                <asp:TextBox ID="TxtTotalCargos" runat="server" Style="text-align: right" Enabled="false" Width="70px" Text="0.00"></asp:TextBox></th>
-            <th style="width: 70px;">
-                <asp:TextBox ID="TxtTotalAbonos" runat="server" Style="text-align: right" Enabled="false" Width="70px" Text="0.00"></asp:TextBox></th>
-            <asp:HiddenField ID="HdnTotales" runat="server" ClientIDMode="Static" />
-        </tr>
-        <tr>
-            <td colspan="3" style="text-align: center;">
-                <asp:UpdatePanel ID="UpGuardar" runat="server" UpdateMode="Conditional">
-                    <ContentTemplate>
-                        <asp:Button ID="BtnIEGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" CssClass="btn btn-primary" />
-                        <asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
-                        <asp:Button ID="BtnEliminar" runat="server" Text="Eliminar" class="btn btn-danger" />
-                        <asp:Button ID="BtnContabilizar" runat="server" Text="Contabilizar" CssClass="btn btn-primary green" Visible="false" />
-                    </ContentTemplate>
-                </asp:UpdatePanel>
-            </td>
-        </tr>
-    </table>
-
-    <div id="DivContadoModal" align="center" class="modal ADS fade" role="dialog">
-        <div class="modal-dialog" style="width: 450px;">
-            <asp:UpdatePanel ID="UpBancos" runat="server" class="modal-content" UpdateMode="Conditional">
-                <ContentTemplate>
-                    <div class="modal-header ">
-                        <button type="button" class="close" data-dismiss="modal">×</button>
-                        <h4 class="modal-title">
-                            <asp:Literal ID="LtlTituloPago" runat="server" Text="Contado" />
-                        </h4>
-                    </div>
-
-                    <div class="modal-body">
-                        <asp:Panel ID="PnlContado" runat="server" Visible="False">
-                            <asp:RadioButtonList ID="RBLContado" runat="server" RepeatDirection="Horizontal" AutoPostBack="True">
-                                <asp:ListItem Value="1" Selected="True">Bancos</asp:ListItem>
-                                <asp:ListItem Value="6">Caja Chica</asp:ListItem>
-                                <asp:ListItem Value="2">F y E</asp:ListItem>
-                                <asp:ListItem Value="4">Deudores</asp:ListItem>
-                                <asp:ListItem Value="5">Acreedores</asp:ListItem>
-                                <asp:ListItem Value="3">Créditos</asp:ListItem>
-                            </asp:RadioButtonList>
-                        </asp:Panel>
-                        <br />
-
-                        <div runat="server" id="DivContado">
-                            <asp:Panel ID="PnlContadoBancos" CssClass="chequesie text-small" runat="server" Width="400px" Visible="true">
-                                <div class="chequesie1">
-                                    <div class="row">
-                                        <label class="col-md-2">Movimiento:</label>
-                                        <div class="col-md-6">
-                                            <asp:DropDownList ID="DdlTipoTransaccion" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="TipoTransaccion" DataValueField="CveTipoTransaccion" Width="156px" ValidationGroup="GrpContado"></asp:DropDownList>
-                                            <asp:RequiredFieldValidator ID="RFVTipoTransaccion" runat="server" ControlToValidate="DdlTipoTransaccion" InitialValue="-1" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Movimiento''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpContado"></asp:RequiredFieldValidator>
-                                            <ajax:ValidatorCalloutExtender ID="VCETipoTransaccion" runat="server" HighlightCssClass="vco" TargetControlID="RFVTipoTransaccion" Width="300px"></ajax:ValidatorCalloutExtender>
-                                        </div>
-                                    </div>
-                                    <div class="row">
-                                        <label class="col-md-2">Cuenta:</label>
-                                        <div class="col-md-6">
-                                            <asp:DropDownList ID="DdlCuenta" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="200px" ValidationGroup="GrpContado"></asp:DropDownList>
-                                            <asp:RequiredFieldValidator ID="RFVCuenta" runat="server" ControlToValidate="DdlCuenta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpContado"></asp:RequiredFieldValidator>
-                                            <ajax:ValidatorCalloutExtender ID="VCOCuenta" runat="server" HighlightCssClass="vco" TargetControlID="RFVCuenta" Width="300px"></ajax:ValidatorCalloutExtender>
-                                        </div>
-                                    </div>
-                                </div>
-                                <div class="chequesie2">
-                                    <div class="row">
-                                        <asp:Label ID="LblFolio" runat="server" Text="Número:" class="col-md-2"></asp:Label>
-                                        <div class="col-md-4">
-                                            <asp:TextBox ID="TxtDocumentoFolio" CssClass="form-control input-sm" runat="server" MaxLength="12"></asp:TextBox>
-                                            <asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="TxtDocumentoFolio" Display="None" ErrorMessage="El campo <b>''Folio''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpContado"></asp:RequiredFieldValidator>
-                                            <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender5" runat="server" HighlightCssClass="vco" TargetControlID="RequiredFieldValidator1" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        </div>
-                                        <label class="col-md-2">Importe</label>
-                                        <div class="col-md-4 input-icon">
-                                            <i style="margin: 0px;">$</i>
-                                            <asp:TextBox ID="TxtDocumentoImporte" CssClass="form-control input-sm " Enabled="False" runat="server" MaxLength="12" Width="80px" ClientIDMode="Static" Style="text-align: right;"></asp:TextBox>
-                                            <ajax:FilteredTextBoxExtender ID="FTBEDocumentoImporte" runat="server" TargetControlID="TxtDocumentoImporte" FilterType="Custom, Numbers" ValidChars=".," />
-                                        </div>
-                                    </div>
-
-                                    <div class="row">
-                                        <asp:Label ID="LblBeneficiario" runat="server" Text="Beneficiario:" class="col-md-2"></asp:Label>
-                                        <div class="col-md-8">
-                                            <asp:TextBox ID="TxtDocumentoBeneficiario" runat="server" CssClass="form-control input-sm"></asp:TextBox>
-                                        </div>
-                                    </div>
-
-                                    <div class="row">
-                                        <label class="col-md-2">Observaciones:</label>
-                                        <div class="col-md-8">
-                                            <asp:TextBox ID="TxtDocumentoObservaciones" CssClass="form-control input-sm" runat="server" MaxLength="12" Rows="3" TextMode="MultiLine"></asp:TextBox>
-                                        </div>
-                                    </div>
-                                </div>
-
-                            </asp:Panel>
-                        </div>
-                    </div>
-
-                    <div class="modal-footer">
-                        <asp:Button ID="BtnContado" runat="server" class="btn btn-success" Text="Guardar" ValidationGroup="GrpContado" />
-                        <button id="Button2" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
-                    </div>
-
-                    <asp:HiddenField ID="HiddenField1" runat="server" Value="-1" ClientIDMode="Static" />
-                </ContentTemplate>
-            </asp:UpdatePanel>
-        </div>
-    </div>
-
-
-
-    <div id="DivEditConcepto" align="center" class="modal ADS fade" role="dialog">
-        <div class="modal-dialog" style="width: 450px;">
-            <asp:UpdatePanel ID="UpdatePanel1" runat="server" class="modal-content" UpdateMode="Conditional">
-                <ContentTemplate>
-                    <div class="modal-header ">
-                        <button type="button" class="close" data-dismiss="modal">×</button>
-                        <h4 class="modal-title">
-                            <asp:Literal ID="LtlTitulo" runat="server" Text="Editar Concepto" />
-                        </h4>
-                    </div>
-
-                    <div class="modal-body" style="margin-left: 20px">
-                        <asp:UpdatePanel ID="UppGrid" runat="server" UpdateMode="Conditional">
-                            <ContentTemplate>
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">Concepto:</div>
-                                    <div class="col-xs-4">
-                                        <asp:DropDownList ID="DdlConceptosContablesE" CssClass="form-control input-sm select2me" runat="server" DataTextField="ConceptoContable" DataValueField="CveConceptoContable" Width="160px" AutoPostBack="true">
-                                        </asp:DropDownList>
-                                        <asp:DropDownList ID="DdlProveedoresE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="160px" Visible="false" AutoPostBack="true"></asp:DropDownList>
-                                        <asp:DropDownList ID="DdlComprasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SerieFolio" DataValueField="CveCompra" Width="160px" Visible="false"></asp:DropDownList>
-                                        <asp:DropDownList ID="DdlPersonalE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="160px" Visible="false"></asp:DropDownList>
-                                        <ADS:Dropdownlost ID="DdlClientesE" CssStyle="width: 100%;" CssClassDdl="select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreComercial" DataValueField="CveCliente" Width="160px" Visible="false" AutoPostBack="true"></ADS:Dropdownlost>
-                                        <asp:DropDownList ID="DdlVentasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Folio" DataValueField="CveVenta" Width="160px" Visible="false"></asp:DropDownList>
-                                    </div>
-                                </div>
-
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">
-                                        Cuenta:
-                                    </div>
-                                    <div class="col-xs-4">
-                                        <asp:DropDownList ID="DdlCtaContableE" runat="server" CssClass="form-control input-sm select2me" DataValueField="Id" DataTextField="CtaCodigo"></asp:DropDownList><br />
-                                    </div>
-                                </div>
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">Referencia:</div>
-                                    <div class="col-xs-4">
-                                        <asp:TextBox ID="TxtReferenciaE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
-                                    </div>
-                                </div>
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">Descripción:</div>
-                                    <div class="col-xs-4">
-                                        <asp:TextBox ID="TxtConceptoE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
-                                    </div>
-                                </div>
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">
-                                        SubProyecto:
-                                    </div>
-                                    <div class="col-xs-3">
-                                        <asp:DropDownList ID="DdlSubProyectoE" runat="server" CssClass="form-control input-sm select2me" DataValueField="CveSubProyecto" DataTextField="SubProyecto"></asp:DropDownList><br />
-                                    </div>
-                                </div>
-                                <br />
-                                <div id="DivTG" runat="server">
-                                    <div class="row">
-                                        <div class="col-xs-2" style="text-align: left">Tipo Gasto:</div>
-                                        <div class="col-xs-3">
-                                            <asp:DropDownList ID="DdlTipoGastoE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="150px"></asp:DropDownList>
-                                        </div>
-                                    </div>
-                                    <br />
-                                </div>
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">
-                                        Cargo:
-                                    </div>
-                                    <div class="col-xs-3">
-                                        <asp:TextBox ID="TxtCargoE" runat="server" CssClass=" txtcargo form-control input-sm" Style="text-align: right"></asp:TextBox><br />
-                                        <asp:CompareValidator ID="CVCargo" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Cargo''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator>
-                                        <ajax:ValidatorCalloutExtender ID="VCCCargo" runat="server" HighlightCssClass="vco" TargetControlID="CVCargo" Width="300px"></ajax:ValidatorCalloutExtender>
-                                    </div>
-                                    <div class="col-xs-1" style="text-align: left">
-                                        Abono:
-                                    </div>
-                                    <div class="col-xs-3">
-                                        <asp:TextBox ID="TxtAbonoE" runat="server" CssClass=" txtabono form-control input-sm" Style="text-align: right"></asp:TextBox><br />
-                                        <asp:CompareValidator ID="CVAbono" runat="server" ControlToValidate="TxtAbono" Display="None" ErrorMessage="El campo <b>''Abono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator>
-                                        <ajax:ValidatorCalloutExtender ID="VCCAbono" runat="server" HighlightCssClass="vco" TargetControlID="CVAbono" Width="300px"></ajax:ValidatorCalloutExtender>
-                                    </div>
-                                </div>
-                            </ContentTemplate>
-                        </asp:UpdatePanel>
-                    </div>
-
-                    <div class="modal-footer">
-                        <asp:Button ID="BtnAceptar" runat="server" class="btn btn-success" Text="Aceptar" />
-                        <button id="BtnCancelar" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
-                    </div>
-
-                </ContentTemplate>
-            </asp:UpdatePanel>
-        </div>
-    </div>
-
-
-
-    <script src="/Metronic/assets/global/plugins/dropzone/dropzone.js"></script>
-</asp:Content>
-<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
-    <script type="text/javascript" language="javascript">
-
-
-        $(document).ready(function () {
-            CargaTxtFunciones();
-            Sys.Application.add_load(function (s, e) {
-                CargaTxtFunciones();
-            });
-        });
-
-        function FnSuma(t, txt, importe) {
-            if (t.checked) {
-                txt.value = FormatNumber(importe, 2, true, true, true);
-            } else {
-                txt.value = "";
-            }
-            $get('TxtAbono').value = FormatNumber(SumaValores(), 2, true, true, true);
-        }
-
-        function FncImporte(txt, rowtxt, opcion) {
-            // opcion = 1, se registro desde el txtimporte
-            if (opcion == 1) {
-                $get(rowtxt).value = $get(txt).value == '' ? '' : FormatNumber(ToDouble($get(txt).value), 2, true, true, true);
-                debugger;
-                if ($get('ChkAbonoCuenta')) {
-                    $get('ChkAbonoCuenta').checked = ($get(txt).value > 2000);
-                }
-                FormatoMoneda($get(txt));
-            } else {
-                $get(txt).value = $get(rowtxt).value == '' ? '' : FormatNumber(ToDouble($get(rowtxt).value), 2, true, true, true);
-            }
-        }
-
-        function FncImporteCuenta(txt) {
-            if ($get('ChkAbonoCuenta')) {
-                $get('ChkAbonoCuenta').checked = (parseFloat(txt.value.replace(/,/g, '')) > 2000);
-            }
-            FormatoMoneda(txt);
-        }
-
-        function SumaValores() {
-            var Importe = 0;
-            var topLevelElem = document.getElementById("form1");
-            var textBoxes = topLevelElem.getElementsByTagName("input");
-            for (var i = 0; i < textBoxes.length; i++) {
-                if (textBoxes[i].type == "text") {
-                    if (textBoxes[i].id.indexOf('C_GvMov_TxtAbono') >= 0) {
-                        if (textBoxes[i].value != '') {
-                            Importe = parseFloat(Importe) + parseFloat(textBoxes[i].value.split(',').join(''));
-                            alert(Importe);
-                        }
-                    }
-                }
-            }
-            return Importe;
-        }
-
-        function FnCambia(chk, txt) {
-            if (txt.value != '') {
-                chk.checked = true;
-            } else {
-                chk.checked = false;
-            }
-            $get('TxtImporte').value = FormatNumber(SumaValores(), 2, true, true, true);
-        }
-
-        function getCuenta(pId) {
-            $get('HdnCveCuenta').value = pId;
-            PageMethods.wsGetNombreCuenta(pId, OnSucceeded);
-        }
-
-        function OnSucceeded(result, userContext, methodName) {
-            if (methodName == 'wsGetNombreCuenta') {
-                $get('TxtCuentaContable').value = result;
-            }
-        }
-
-        function myItemSelectedHandler(source, eventArgs) {
-            //debugger;
-            var CC = $get('HdnCveCuenta');
-            CC.value = eventArgs.get_value();
-            //             var b = $get('C_Tabs_TabConyuge_BtnTruco');
-            //             b.Click;
-            var aTargetElement = 'BtnSelCuenta';
-            __doPostBack(aTargetElement, eventArgs.get_value());
-            //alert(" Key : " + eventArgs.get_text() + "  Value :  " + eventArgs.get_value());
-        }
-
-        function LimpiaImporte(t, txt) {
-            if (t.value != '' && $get(txt)) {
-                $get(txt).value = '';
-            }
-        }
-
-
-        function CargaTxtFunciones() {
-            $(".txtcargo").each(function () {
-                $(this).keyup(function () {
-                    calculateCargo();
-                    comparar();
-                });
-            });
-            $(".txtabono").each(function () {
-                $(this).keyup(function () {
-                    calculateAbono();
-                    comparar();
-                });
-            });
-        }
-
-        function comparar() {
-            var TextoCargos = ToDouble(document.getElementById('<%= TxtTotalCargos.ClientID %>').value);
-            var TextoAbonos = ToDouble(document.getElementById('<%= TxtTotalAbonos.ClientID %>').value);
-
-            if (TextoCargos == TextoAbonos) {
-                document.getElementById('<%= TxtTotalCargos.ClientID %>').style.border = "2px solid #04B431";
-                document.getElementById('<%= TxtTotalAbonos.ClientID %>').style.border = "2px solid #04B431";
-                document.getElementById('<%= TxtTotalCargos.ClientID %>').style.color = "";
-                document.getElementById('<%= TxtTotalAbonos.ClientID %>').style.color = "";
-                $('#<%= HdnTotales.ClientID  %>').value = 1;
-            }
-            else {
-
-                document.getElementById('<%= TxtTotalCargos.ClientID %>').style.border = "2px solid #ff0000";
-                document.getElementById('<%= TxtTotalAbonos.ClientID %>').style.border = "2px solid #ff0000";
-                document.getElementById('<%= TxtTotalCargos.ClientID %>').style.color = "#ff0000";
-                document.getElementById('<%= TxtTotalAbonos.ClientID %>').style.color = "#ff0000";
-            }
-        }
-
-        function calculateCargo() {
-            var sum = 0;
-            $(".txtcargo").each(function () {
-                if (!isNaN(this.value.split(',').join('')) && this.value.length != 0) {
-                    sum += parseFloat(this.value.split(',').join(''));
-                }
-            });
-            $('#<%= TxtTotalCargos.ClientID %>').val(FormatoNumero(sum.toFixed(2), 2));
-        }
-
-        function calculateAbono() {
-            var sum = 0;
-            $(".txtabono").each(function () {
-                if (!isNaN(this.value.split(',').join('')) && this.value.length != 0) {
-                    sum += parseFloat(this.value.split(',').join(''));
-                }
-            });
-            $('#<%= TxtTotalAbonos.ClientID %>').val(FormatoNumero(sum.toFixed(2), 2));
-        }
-
-
-    </script>
-</asp:Content>

Inventarios/EntradasSalidas.aspx.vb

@@ -1953,15 +1953,27 @@ Partial Class Inventarios_EntradasSalidas
                                 OpcionPrePoliza = 11
                             End If
 
-                            If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, OpcionPrePoliza) Then
+                            Dim AutoConta As Boolean = True
-                                If ObjConta.ValorPolizaDescuadre > 0 Then
+                            If (UsuarioActual.CveEmpresa = 119 And EsConsumoInterno) Then
-                                    ErrorMovInv = True
+                                AutoConta = False
-                                    GuardaLogAD($"Inv/ES | Error:{ObjConta.MensajePolizaDescuadre} Diferencia:{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
-                                    Alert("No se pudo validar la prepoliza de cuadre.", TipoMensaje.MsgAdvertencia)
-                                End If
-                            Else
-                                Alert("No se pudo validar la prepoliza de cuadre.", TipoMensaje.MsgAdvertencia)
                             End If
+                            If Not ErrorMovInv AndAlso Not ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, Opcion:=OpcionPrePoliza, AutoConta:=AutoConta) Then
+                                ErrorMovInv = True
+                                'If ObjConta.ValorPolizaDescuadre > 0 Then
+                                '    GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                                '    ErrorPrepolizaDescuadre = True
+                                'End If
+                            End If
+
+                            'If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, OpcionPrePoliza) Then
+                            '    If ObjConta.ValorPolizaDescuadre > 0 Then
+                            '        ErrorMovInv = True
+                            '        GuardaLogAD($"Inv/ES | Error:{ObjConta.MensajePolizaDescuadre} Diferencia:{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                            '        Alert("No se pudo validar la prepoliza de cuadre.", TipoMensaje.MsgAdvertencia)
+                            '    End If
+                            'Else
+                            '    Alert("No se pudo validar la prepoliza de cuadre.", TipoMensaje.MsgAdvertencia)
+                            'End If
                         End If
 
                         '------------------------------------------------
@@ -4503,9 +4515,6 @@ Partial Class Inventarios_EntradasSalidas
             End If
         Next
 
-
-
-
         If Prorratear Then
             If Not ErrorMovInv AndAlso CveMovimientoSalida > 0 Then
                 If ObjInventario.GetMovimientosDetalle(CveMovimientoSalida, UsuarioActual.CveEmpresa) Then
@@ -4527,8 +4536,6 @@ Partial Class Inventarios_EntradasSalidas
             End If
         End If
 
-
-
         If Not ErrorMovInv Then
             For Each Dr As DataRow In DtMovimientosEntradaInvFisico.Rows
                 ImporteConcepto = If(Prorratear, ProPU, Dr("PU").ToString.ToDecimal)
@@ -4635,17 +4642,28 @@ Partial Class Inventarios_EntradasSalidas
                 End If
             End If
 
-
+        End If
-            End If
 
         If Not ErrorMovInv Then
-            If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then
+            Dim AutoConta As Boolean = True
-                ObjConta.GetPrePolizasDetalle(CvePrePoliza, UsuarioActual.CveEmpresa)
+            If (UsuarioActual.CveEmpresa = 119) Then
-                If ObjConta.ValorPolizaDescuadre > 0 Then
+                AutoConta = False
-                    ErrorMovInv = True
-                    Mensaje = "Ocurrió un error al validar los movimientos contables"
-                End If
             End If
+            If Not ErrorMovInv AndAlso Not ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, AutoConta:=AutoConta) Then
+                ErrorMovInv = True
+                'If ObjConta.ValorPolizaDescuadre > 0 Then
+                '    GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                '    ErrorPrepolizaDescuadre = True
+                'End If
+            End If
+
+            'If ObjConta.ValidacionPrePolizaCuadre(CvePrePoliza, -1) Then
+            '    ObjConta.GetPrePolizasDetalle(CvePrePoliza, UsuarioActual.CveEmpresa)
+            '    If ObjConta.ValorPolizaDescuadre > 0 Then
+            '        ErrorMovInv = True
+            '        Mensaje = "Ocurrió un error al validar los movimientos contables"
+            '    End If
+            'End If
         End If
 
         Dim RetornoVirtual As MMovimientoVirtual = Nothing
@@ -4695,8 +4713,6 @@ Partial Class Inventarios_EntradasSalidas
     End Sub
     Private Sub BtnGuardarCambiosVigencia_Click(sender As Object, e As EventArgs) Handles BtnGuardarCambiosVigencia.Click
 
-
-
         If GvSalidasCambioVigencia.Rows.Count = 0 Then
             Alert("No hay ningun registro para generar el movimiento. Por favor rectifique y vuelva a intentar.", TipoMensaje.MsgError)
             RegistraScript("playsonidito('142608__autistic-lucario__error.wav')")

Inventarios/PrestamosdeProveedor.aspx.vb

@@ -237,6 +237,18 @@ Partial Class Inventarios_PrestamosdeProveedor
                         If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoAlmacen, -tValorInventario, TxtObservacionesEntrega.Text.Trim, CveConceptoContable, TxtObservacionesEntrega.Text.Trim, Fecha, IdCtaContableOtro, -1, CveMovimientoAlmacen:=CveMovimientoSalida, CveClasificacion:=CveClasifCosto, ImporteMX:=-tValorInventario, CveSubProyecto:=CveSubProyecto) Then
                             ErrorMovInv = True
                         End If
+                    End If
+
+                    Dim AutoConta As Boolean = True
+                    If (UsuarioActual.CveEmpresa = 119) Then
+                        AutoConta = False
+                    End If
+                    If Not ErrorMovInv AndAlso Not ObjConta.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, AutoConta:=AutoConta) Then
+                        ErrorMovInv = True
+                        'If ObjConta.ValorPolizaDescuadre > 0 Then
+                        '    GuardaLogAD($"Compras/Compras-Guardar | Error{ObjConta.MensajePolizaDescuadre} Diferencia{ObjConta.ValorDiferencia} | CvePrePoliza:{CvePrePoliza}", "LogPrePolizas")
+                        '    ErrorPrepolizaDescuadre = True
+                        'End If
                     End If
                 Else
                     ErrorMovInv = True

Inventarios/TraspasoAlmacen.aspx.vb

@@ -1652,7 +1652,7 @@ Partial Class Inventarios_TraspasoAlmacen
                         'DEBE CONSIDERAR SOLO LAS FILAS QUE TENGA PRODUCTOS, NO EL TOTALIZADOR
                         If CvePS > 0 Then
                             CveMovimientoDetalleSalida = GvRow.DataKey("CveMovimientoDetalle").ToEntero
-                            Dim Cantidad As Decimal = GvRow.FCTextBox("TxtCantidad").Text.ToString.ToDecimal
+                            Dim Cantidad As Decimal = GvRow.DataKey("Cantidad").ToDecimal()  'GvRow.FCTextBox("TxtCantidad").Text.ToString.ToDecimal
 
                             'If ChkRealizarDevolucion.Checked Then Cantidad = GvRow.FCTextBox("TxtCantidad").Text.ToDecimal
 

Nomina/Nomina.aspx.cs

@@ -1370,9 +1370,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
                     Msg = lognom.TimbrarNomina(CveNomina, CvePersonal, CvePeriodo, UsuarioActual, versionTimbre: (UsuarioActual.CveEmpresa == 119 ? VersionTimbradoEnum.PorDefectoEmpresa : VersionTimbradoEnum.Version3_3));
 
                     if (Msg != null && Msg.Length > 0)
-                    {
+                    { 
-                        Msg = msgCorregidoSat(Msg, CvePersonal, RFC, CURP);
+                        msggral = string.Format("{0}<tr><td>{3}</td><td>{2}</td><td><pre>{4}</pre><span style='display:none'>{1}</span></td></tr>", msggral, Msg, gvRow.DataKey("Nombre"), gvRow.DataKey("Codigo"), msgCorregidoSat(Msg, CvePersonal, RFC, CURP));
-                        msggral = string.Format("{0}<tr><td>{3}</td><td>{2}</td><td><pre>{1}</pre></td></tr>", msggral, Msg, gvRow.DataKey("Nombre"), gvRow.DataKey("Codigo"));
                     }
                     else
                     {
@@ -1550,7 +1549,6 @@ public partial class Nomina_Nomina2 : ClsPaginas
                 }
 
                 Alert(string.Format("se envio el correo a '{0}'.", Correo), TipoMensaje.MsgInformacion);
-
             }
             else
             {
@@ -1559,7 +1557,6 @@ public partial class Nomina_Nomina2 : ClsPaginas
         }
         else
         {
-
             Alert("No se tiene un correo registrado.", TipoMensaje.MsgAdvertencia);
         }
     }
@@ -1628,6 +1625,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
         DataRow drow;
         string Correo = string.Empty;
         string NombreCompleto = string.Empty;
+        string RFC = string.Empty;
+        string CURP = string.Empty;
         using (ClsRH objrh = new ClsRH())
         {
             objrh.GetPersonal(CvePersonal, UsuarioActual.CveEmpresa);
@@ -1637,12 +1636,14 @@ public partial class Nomina_Nomina2 : ClsPaginas
         {
             Correo = drow["Correo"].ToString();
             NombreCompleto = drow["NombreCompleto"].ToString();
+            //RFC = drow["RFC"].ToString();
+            //CURP = drow["CURP"].ToString();
         }
         string Msg = "";// lognom.TimbrarNomina(CveNomina, CvePersonal, CvePeriodo, UsuarioActual, (UsuarioActual.CveUsuario == 100 ? 4 : 4));
         Msg = lognom.TimbrarNomina(CveNomina, CvePersonal, CvePeriodo, UsuarioActual, versionTimbre: (UsuarioActual.CveEmpresa == 119 ? VersionTimbradoEnum.PorDefectoEmpresa : VersionTimbradoEnum.Version3_3));
 
-        if (Msg != null && Msg.Length > 0)
+        if (Msg != null && Msg.Length > 0)//<pre>{4}</pre><span style='display:none'>{1}</span>
-        { Alert(string.Format("El empleado no se pudo timbrar, el sat nos devolvio el siguiente mensaje:<br/>{0}", Msg), TipoMensaje.MsgAdvertencia); }
+        { Alert(string.Format("El empleado no se pudo timbrar, el sat nos devolvio el siguiente mensaje:<br/>{1}", Msg, msgCorregidoSat(Msg, CvePersonal, RFC, CURP)), TipoMensaje.MsgAdvertencia); }
         else
         {
             ClsNominas ObjPeriodo = new ClsNominas();

SAT/SolicitudesNominaSat.aspx

@@ -307,6 +307,16 @@
                     </div>
                 </div>
                 <div class="portlet-body" style="display: none">
+                     <div class="row">
+                        <label class="col-md-1 compoonenlabel" style="line-height: 1; max-width: 65px;">Régimen:</label>
+                        <div class="col-md-1">
+                            <asp:DropDownList ID="DdlRegimenContratacion" runat="server" Style="width: 100% !important;" CssClass="select2me">
+                                <asp:ListItem Text="Asalariados" Value="1"></asp:ListItem>
+                                <asp:ListItem Text="Asimilados" Value="2"></asp:ListItem>
+                                <asp:ListItem Text="Todos" Value="3"></asp:ListItem>
+                            </asp:DropDownList>
+                        </div>
+                     </div>
                 </div>
             </div>
 

SAT/SolicitudesNominaSat.aspx.cs

@@ -26,21 +26,21 @@ public partial class SAT_SolicitudesNominaSat : ClsPaginas
         }
         set { ViewState["clasegrid"] = value; }
     }
-    public string fechaInicio
+    public DateTime fechaInicio
     {
         get
         {
-            if (ViewState["fechaInicio"] == null) { return ""; }
+            if (ViewState["fechaInicio"] == null) { return ModExtensiones.MinFecha; }
-            else { return ViewState["fechaInicio"].ToString(); }
+            else { return ViewState["fechaInicio"].ToString().ToDate(); }
         }
         set { ViewState["fechaInicio"] = value; }
     }
-    public string fechaFin
+    public DateTime fechaFin
     {
         get
         {
-            if (ViewState["fechaFin"] == null) { return ""; }
+            if (ViewState["fechaFin"] == null) { return ModExtensiones.MaxFecha; }
-            else { return ViewState["fechaFin"].ToString(); }
+            else { return ViewState["fechaFin"].ToString().ToDate(); }
         }
         set { ViewState["fechaFin"] = value; }
     }
@@ -60,7 +60,7 @@ public partial class SAT_SolicitudesNominaSat : ClsPaginas
 
         using (ClsNominas nom = new ClsNominas())
         {
-            nom.SATSolicitudTimbreNominaGral(DdlReporte.SelectedValue.ToString().ToEntero(), UsuarioActual.CveEmpresa, fechaInicio, fechaFin, DdlTipoNomina.SelectedValue.ToEntero());
+            nom.SATSolicitudTimbreNominaGral(DdlReporte.SelectedValue.ToString().ToEntero(), UsuarioActual.CveEmpresa, fechaInicio, fechaFin, DdlTipoNomina.SelectedValue.ToEntero(), DdlRegimenContratacion.SelectedValue.ToEntero());
 
             ClosedXML.Excel.XLWorkbook wb = new ClosedXML.Excel.XLWorkbook();
             var libro = wb.AddWorksheet(nom.DtResultados , "Nomina");
@@ -137,10 +137,10 @@ public partial class SAT_SolicitudesNominaSat : ClsPaginas
     {
         using (ClsNominas nom = new ClsNominas())
         {
-            fechaInicio = TxtRpdFechaInicio.Text.ToDateTime().ToString("yyyy/MM/dd");
+            fechaInicio = TxtRpdFechaInicio.Text.ToDateTime();
-            fechaFin = TxtRpdFechaFin.Text.ToDateTime().ToString("yyyy/MM/dd");
+            fechaFin = TxtRpdFechaFin.Text.ToDateTime();
 
-            nom.SATSolicitudTimbreNominaGral(0, UsuarioActual.CveEmpresa, fechaInicio, fechaFin, DdlTipoNomina.SelectedValue.ToEntero());
+            nom.SATSolicitudTimbreNominaGral(0, UsuarioActual.CveEmpresa, fechaInicio, fechaFin, DdlTipoNomina.SelectedValue.ToEntero(),DdlRegimenContratacion.SelectedValue.ToEntero());
             if (nom.DtResultados.Rows.Count > 0)
             {
                 DataRow drow = nom.DtResultados.Rows[0];
@@ -156,7 +156,7 @@ public partial class SAT_SolicitudesNominaSat : ClsPaginas
             }
 
 
-            nom.SATSolicitudTimbreNominaGral(DdlReporte.SelectedValue.ToString().ToEntero(), UsuarioActual.CveEmpresa, fechaInicio, fechaFin, DdlTipoNomina.SelectedValue.ToEntero());
+            nom.SATSolicitudTimbreNominaGral(DdlReporte.SelectedValue.ToString().ToEntero(), UsuarioActual.CveEmpresa, fechaInicio, fechaFin, DdlTipoNomina.SelectedValue.ToEntero(), DdlRegimenContratacion.SelectedValue.ToEntero());
             GVSolicitudTimbreNominaGral.DataSource = nom.DtResultados;
             GVSolicitudTimbreNominaGral.DataBind();
             clasegrid = string.Format("reporte{0}", DdlReporte.SelectedValue);

Ventas/Clientes.aspx

@@ -1699,7 +1699,7 @@
                                                                         </div>
                                                                     </div>
                                                                     <div class="col-md-6">
-                                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px">
+                                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px; margin-top:-10px !important;">
                                                                             <label for="<%= TxtFechaLimiteCredito.ClientID.ToString()%>" style="color: #888888;">F. Limite Crédito: </label>
                                                                             <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="TxtFechaLimiteCredito" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" Width="100px"></asp:TextBox>
@@ -1898,15 +1898,15 @@
                                                     <span class="caption-subject bold uppercase">Estado de Cuenta</span>
                                                 </div>
                                                 <div class="tools">
+                                                    <asp:CheckBox ID="ChkAntIXCNC" Text="Anticipos / NC / IXC" runat="server" Checked="true" OnCheckedChanged="ChkAntIXCNC_CheckedChanged" AutoPostBack="true" />
                                                     <a href="javascript:;" class="collapse"></a>
                                                 </div>
                                             </div>
                                             <div class="portlet-body">
 
-                                                <asp:CheckBox ID="ChkAntIXCNC" Text="Anticipos / NC / IXC" runat="server" Checked="true" OnCheckedChanged="ChkAntIXCNC_CheckedChanged" AutoPostBack="true" />
                                                 <div class="row">
                                                     <div class="col-md-6">
-                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px">
+                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px; margin-top:-10px !important;">
                                                             <label for="<%= TxtFechaInicioCxP.ClientID.ToString()%>">Fecha Inicio: </label>
                                                             <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="TxtFechaInicioCxP" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" Width="100px"></asp:TextBox>
@@ -1919,7 +1919,7 @@
                                                         </div>
                                                     </div>
                                                     <div class="col-md-6">
-                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px">
+                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px; margin-top:-10px !important;">
                                                             <label for="<%= TxtFechaFinCxP.ClientID.ToString()%>">Fecha Fin: </label>
                                                             <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 Width="100px" ID="TxtFechaFinCxP" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
@@ -1934,7 +1934,7 @@
                                                 </div>
                                                 <div class="row">
                                                     <div class="col-md-6">
-                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px">
+                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px; margin-top:-10px !important;">
                                                             <label for="<%= TxtFechaVICxP.ClientID.ToString()%>">Fecha V. Inicio: </label>
                                                             <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="TxtFechaVICxP" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" Width="100px"></asp:TextBox>
@@ -1947,7 +1947,7 @@
                                                         </div>
                                                     </div>
                                                     <div class="col-md-6">
-                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px">
+                                                        <div class="form-group form-md-line-input input-iconright date date-picker date date-picker" style="min-width: 135px; margin-top:-10px !important;">
                                                             <label for="<%= TxtFechaVFCxP.ClientID.ToString()%>">Fecha V. Fin: </label>
                                                             <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="TxtFechaVFCxP" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" Width="100px"></asp:TextBox>

Ventas/Clientes.aspx.vb

@@ -2638,31 +2638,31 @@ Partial Class Clientes
             Dim CtaCliente As Integer = DdlCtaContableClientes.SelectedValue.ToEntero()
 
             ' si tiene la funcionalidad de la cuenta contable padre
-            If UsuarioActual.Empresa.Funcionalidad(114) <> "" Then
+            'If UsuarioActual.Empresa.Funcionalidad(114) <> "" Then
 
-                Dim ObjContaAC = New ClsContPAQi(UsuarioActual.Empresa)
+            '    Dim ObjContaAC = New ClsContPAQi(UsuarioActual.Empresa)
 
-                ObjContaAC.IniciaTransacSQL()
+            '    ObjContaAC.IniciaTransacSQL()
-                'se registra la cuenta contable automaticamente
+            '    'se registra la cuenta contable automaticamente
 
-                CtaCliente = ObjContaAC.AddSiguienteCuentaHijo(UsuarioActual.Empresa.Funcionalidad(114).ToEntero(), TxtNombreComercial.Text.Trim, "A", 2)
+            '    CtaCliente = ObjContaAC.AddSiguienteCuentaHijo(UsuarioActual.Empresa.Funcionalidad(114).ToEntero(), TxtNombreComercial.Text.Trim, "A", 2)
 
-                If CtaCliente > 0 Then
+            '    If CtaCliente > 0 Then
-                    ObjContaAC.Commit()
+            '        ObjContaAC.Commit()
-                    DdlCtaContableClientes.Items.Add(New ListItem(TxtNombreComercial.Text.Trim, CtaCliente.ToString()))
+            '        DdlCtaContableClientes.Items.Add(New ListItem(TxtNombreComercial.Text.Trim, CtaCliente.ToString()))
-                    DdlCtaContableClientes.SelectedValue = CtaCliente.ToString()
+            '        DdlCtaContableClientes.SelectedValue = CtaCliente.ToString()
-                    'MsgCuentaContable = String.Format("<br />Con la cuenta contable: {0}", NewCuenta)
+            '        'MsgCuentaContable = String.Format("<br />Con la cuenta contable: {0}", NewCuenta)
 
-                Else
+            '    Else
 
-                    ObjContaAC.RollBack()
+            '        ObjContaAC.RollBack()
-                    ObjContaAC.Dispose()
+            '        ObjContaAC.Dispose()
-                    Alert("Error al guardar la cuenta contable ", TipoMensaje.MsgError)
+            '        Alert("Error al guardar la cuenta contable ", TipoMensaje.MsgError)
-                    ObjClientes.Dispose()
+            '        ObjClientes.Dispose()
-                    Exit Sub
+            '        Exit Sub
-                End If
+            '    End If
-                ObjContaAC.Dispose()
+            '    ObjContaAC.Dispose()
-            End If
+            'End If
 
 
             Dim CodigoCuentaAltaCompaq As String = ""
@@ -2750,11 +2750,15 @@ Partial Class Clientes
                     End If
                 End If
 
-                If Not AltaCuentaContabilidadSIG(CodigoCuentaAltaCompaq, NombreCuentaCuentaAltaCompaq, IdCuentaAltaCompaq, 1, ObjClientes.IniciaTransacSQL) Then
+
-                    ErrorProceso = True
+                If IdCuentaAltaCompaq > 0 Then
+                    If Not AltaCuentaContabilidadSIG(CodigoCuentaAltaCompaq, NombreCuentaCuentaAltaCompaq, IdCuentaAltaCompaq, 1, ObjClientes.IniciaTransacSQL) Then
+                        ErrorProceso = True
+                    End If
                 End If
 
 
+
                 If ErrorProceso Then
                     ObjClientes.RollBack()
                 Else
@@ -4119,11 +4123,11 @@ Partial Class Clientes
         Dim FechaCorte As Date = ("9999/01/01").ToDate()
         Dim TipoDocto As String = If(DdlTipoDocto.GetSelectedValuesM = "", "-1", DdlTipoDocto.GetSelectedValuesM)
         Dim TipoDocto2 As String = If(DdlTipoDocto.GetSelectedValuesM = "", "-1", DdlTipoDocto.GetSelectedValuesM(True))
-        Dim FechaVencimientoI As String = If(TxtFechaVICxP.Text = "", "-1", TxtFechaVICxP.Text).ToString()
+        Dim FechaVencimientoI As DateTime = If(TxtFechaVICxP.Text = "", MinFecha, TxtFechaVICxP.Text.ToDate())
-        Dim FechaVencimientoF As String = If(TxtFechaVFCxP.Text = "", "-1", TxtFechaVFCxP.Text).ToString()
+        Dim FechaVencimientoF As DateTime = If(TxtFechaVFCxP.Text = "", MaxFecha, TxtFechaVFCxP.Text.ToDate())
 
         Dim ObjMovtos As New ClsMovimientos()
-        If ObjMovtos.GetCxCClienteDetalle(CveCliente, "-1", "-1", -1, -1, UsuarioActual.CveEmpresa, DdlSucursalCliente.SelectedValue.ToEntero()) Then
+        If ObjMovtos.GetCxCClienteDetalle(CveCliente, FI, FF, -1, -1, UsuarioActual.CveEmpresa, DdlSucursalCliente.SelectedValue.ToEntero(), FechaVencimientoI:=FechaVencimientoI, FechaVencimientoF:=FechaVencimientoF) Then
             DtCxCFact = If(DdlTipoCuentasCxC.SelectedValue = "-1", ObjMovtos.DtResultados.FiltraParametros("", "TipoDocto").Copy, ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'", "TipoDocto"))
             'cargo los anticipos NC
             DtCxCFact.Columns.Add("SaldoAnticipo", GetType(Decimal))

Ventas/ClientesAbonar.aspx.vb

@@ -1235,33 +1235,34 @@ Partial Class Ventas_ClientesAbonar
 
                     End If
 
-                    If MsgError = "" AndAlso UsuarioActual.Empresa.Funcionalidad(220) <> "" Then
+                    'If MsgError = "" AndAlso UsuarioActual.Empresa.Funcionalidad(220) <> "" Then
-                        If Not ObjMov.PrePolizaSimplificacion(CvePrePoliza, UsuarioActual.CveEmpresa) Then
+                    '    If Not ObjMov.PrePolizaSimplificacion(CvePrePoliza, UsuarioActual.CveEmpresa) Then
-                            MsgError = "No se pudo simplificar los movimientos"
+                    '        MsgError = "No se pudo simplificar los movimientos"
-                            Alert("No se pudo simplificar los movimientos", TipoMensaje.MsgError)
+                    '        Alert("No se pudo simplificar los movimientos", TipoMensaje.MsgError)
-                        End If
+                    '    End If
+                    'End If
+
+                    If MsgError = "" AndAlso Not ObjMov.ValidacionesPrePoliza(CvePrePoliza, UsuarioActual, Opcion:=3) Then
+                        MsgError = ObjMov.MensajePolizaDescuadre & " La diferencia es de: " & ObjMov.ValorDiferencia
+                        'If ObjMov.ValorPolizaDescuadre > 0 Then
+                        '    MsgError = ObjMov.MensajePolizaDescuadre & " La diferencia es de: " & ObjMov.ValorDiferencia
+                        'End If
                     End If
 
-                    If MsgError = "" AndAlso ObjMov.ValidacionPrePolizaCuadre(CvePrePoliza, 3) Then
+                    ''Conta ContPAQ
-                        If ObjMov.ValorPolizaDescuadre > 0 Then
+                    'If UsuarioActual.Empresa.Funcionalidad(200) = "1" AndAlso MsgError = "" Then
-                            MsgError = ObjMov.MensajePolizaDescuadre & " La diferencia es de: " & ObjMov.ValorDiferencia
+                    '    If idCuentaContabilizacion > 0 Then
-                        End If
+                    '        If ObjMov.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
-                    End If
+                    '            IDPoliza = ObjMov.ContaIdPoliza
-
+                    '            FolioPoliza = ObjMov.ContaFolio
-                    'Conta ContPAQ
+                    '        Else
-                    If UsuarioActual.Empresa.Funcionalidad(200) = "1" AndAlso MsgError = "" Then
+                    '            Alert("Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico")
-                        If idCuentaContabilizacion > 0 Then
+                    '            MsgError = "Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico"
-                            If ObjMov.ContabilizarPrePoliza(CvePrePoliza, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
+                    '        End If
-                                IDPoliza = ObjMov.ContaIdPoliza
+                    '    Else
-                                FolioPoliza = ObjMov.ContaFolio
+                    '        Alert(String.Format("No se puede contabilizar la Prepoliza debido a que las siguientes cuentas son invalidas: {0}", CuentasContablesInvalidas))
-                            Else
+                    '    End If
-                                Alert("Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico")
+                    'End If
-                                MsgError = "Ocurrio un error al contabilizar, pongase en contacto con Soporte Técnico"
-                            End If
-                        Else
-                            Alert(String.Format("No se puede contabilizar la Prepoliza debido a que las siguientes cuentas son invalidas: {0}", CuentasContablesInvalidas))
-                        End If
-                    End If
                 Else
                     MsgError = "No se pudo insertar la póliza"
                 End If
@@ -2677,8 +2678,8 @@ Partial Class Ventas_ClientesAbonar
         CambiaTipoMoneda()
     End Sub
     Private Sub CambiaTipoMoneda()
-        Dim dia As Integer = If(UsuarioActual.CveEmpresa = 13, TxtFechaDocumento.Text.ToDate.Day - 1, TxtFechaDocumento.Text.ToDate.Day)
+
-        Fecha = (dia.ToString + "/" + TxtFechaDocumento.Text.ToDate.Month.ToString + "/" + TxtFechaDocumento.Text.ToDate.Year.ToString).ToDate
+        Fecha = If(UsuarioActual.CveEmpresa = 13, TxtFechaDocumento.Text.ToDate.AddDays(-1), TxtFechaDocumento.Text.ToDate).ToDate
 
         If TxtTC.Visible Then
             TxtTC.Text = GlobalTipoCambio(Fecha).FormatoNumero(4)

Ventas/PV.aspx.vb

@@ -2009,8 +2009,8 @@ Partial Class PV
                         End If
 
                         If TmpDTRecepcionUsados IsNot Nothing Then
-                            If TmpDTRecepcionUsados.Select($"CvePS={Row("CvePS").ToString.ToEntero}").Length > 0 Then
+                            If TmpDTRecepcionUsados.Select($"ConsecUsado={Row("Consec").ToString.ToEntero} AND CvePS={Row("CvePS").ToString.ToEntero}").Length > 0 Then
-                                Dim rowInv As DataRow = TmpDTRecepcionUsados.Select($"CvePS={Row("CvePS").ToString.ToEntero}")(0)
+                                Dim rowInv As DataRow = TmpDTRecepcionUsados.Select($"ConsecUsado={Row("Consec").ToString.ToEntero} AND CvePS={Row("CvePS").ToString.ToEntero}")(0)
                                 rowInv("CveVentaDetalle") = CveVentaDetalle
                             End If
                         End If
@@ -7858,11 +7858,15 @@ Partial Class PV
             If TmpDTRecepcionUsados.Rows.Count > 0 Then
                 Dim Elimino As Boolean = False
                 For Each Row As DataRow In TmpDTRecepcionUsados.Rows
-                    If Row("CvePSRelacionado").ToString().ToEntero() = CvePS Then
+                    If Row("CvePSRelacionado").ToString().ToEntero() = CvePS AndAlso
+                        Row("ConsecUsado").ToString().ToEntero() = ListaPSCargo.FirstOrDefault().ConsecutivoUsado AndAlso
+                        Row("ConsecRelacionado").ToString().ToEntero() = ListaPSCargo.FirstOrDefault().Consecutivo Then
+
                         Row.Delete()
                         Elimino = True
                     End If
                 Next
+
                 If Elimino Then
                     TmpDTRecepcionUsados.AcceptChanges()
                 End If
@@ -8179,7 +8183,7 @@ Partial Class PV
         'ELIMINAR LOS USADOS QUE SE MANDAN A RECEPCION
         For Each drow As DataRow In TmpDT.Select($"Consec ={Consec}")
             For Each RowRecepcionUsados As DataRow In TmpDTRecepcionUsados.Rows
-                If (RowRecepcionUsados("CvePSRelacionado").ToString() = drow("CvePS").ToString()) Then
+                If (RowRecepcionUsados("CvePSRelacionado").ToString() = drow("CvePS").ToString()) AndAlso RowRecepcionUsados("ConsecRelacionado").ToString() = drow("Consec").ToString() Then
                     RowRecepcionUsados.Delete()
                 End If
             Next

Ventas/ProductosServicios.aspx

@@ -551,7 +551,7 @@
                                         </div>
                                     </div>
                                     <div class="portlet-body form">
-                                        <div class="form-group form-md-line-input input-iconright" style="display:none;">
+                                        <div class="form-group form-md-line-input input-iconright" id="divPrecio" runat="server" visible="false" >
                                             <asp:TextBox ID="TxtPrecio" CssClass="form-control" runat="server" MaxLength="10" Text="0"></asp:TextBox>
                                             <label for="<%= TxtPrecio.ClientID.ToString()%>">Precio:</label><asp:RequiredFieldValidator ID="RFVPrecio" runat="server" ControlToValidate="TxtPrecio" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Precio''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                             <asp:RegularExpressionValidator ID="REVPrecio" runat="server" ControlToValidate="TxtPrecio" Display="None" EnableClientScript="True" ErrorMessage="El campo <b>''Precio''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." ValidationGroup="GrpGuardar" ValidationExpression="^[0-9]{1,15}(?:\.[0-9]{1,4})?$" />

Ventas/ProductosServicios.aspx.vb

@@ -360,10 +360,11 @@ Partial Class ProductosyServicios
             divCodigo2.Visible = True
             divLitraje.Visible = True
             DivClasificacion2.Visible = True
-
             CargaPSAdicionalesVigencias()
         End If
 
+        divPrecio.Visible = UsuarioActual.Empresa.Funcionalidad(404) = "" ' si tiene lista de precio, se oculta el precio por ps
+
         If UsuarioActual.Empresa.Funcionalidad(713) = "1" Then '' empresa deduce IEPS
             divIEPS.Visible = True
         End If

Ventas/RepProductosServiciosDetalle.aspx

@@ -427,7 +427,8 @@
                     <asp:BoundField HeaderText="Forma de Pago" DataField="FormaPago" ItemStyle-Width="5%" Visible="false" />
                     <%--18--%>
                     <asp:BoundField HeaderText="Fecha Hora de Emisión"  DataField="FechaIng"   ItemStyle-Width="200px"  ItemStyle-HorizontalAlign="Center" Visible="false" />
-
+                    <%--19--%>
+                    <asp:BoundField HeaderText="Num. Turnos" DataField="NumTurnos" DataFormatString="{0:N0}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" Visible="false" />
                     
                 </Columns>
                 <RowStyle CssClass="Texto" />
@@ -475,7 +476,7 @@
                                             <asp:CheckBox ID="ChkFechaHoraEmision" runat="server" Text="Fecha Hora de Emisión" />
                                         </td>
                                         <td style="text-align: left;">
-                                            
+                                            <asp:CheckBox ID="ChkNumTurnos" runat="server" Text="Número  de turnos" Visible="false" />
                                         </td>
                                         <td style="text-align: left;">
                                             

Ventas/RepProductosServiciosDetalle.aspx.vb

@@ -85,6 +85,10 @@ Partial Class Ventas_RepProductosServiciosDetalle
 
             End If
 
+            If UsuarioActual.CveEmpresa.Contiene(7, 122) Then
+                ChkNumTurnos.Visible = True
+            End If
+
         End If
     End Sub
 
@@ -568,6 +572,7 @@ Partial Class Ventas_RepProductosServiciosDetalle
         GvDatos.Columns(16).Visible = ChkMetodoPago.Checked
         GvDatos.Columns(17).Visible = ChkFormaPago.Checked
         GvDatos.Columns(18).Visible = ChkFechaHoraEmision.Checked
+        GvDatos.Columns(19).Visible = ChkNumTurnos.Checked
 
         CargaDatos()
         UPDatos.Update()

Ventas/Ventas.aspx

@@ -948,7 +948,8 @@
                                             <%--width="100%"--%>
                                             <tr class="Titulos TextTab">
                                                 <th>#</th>
-                                                <th>Cant</th>
+                                                <th style="width: 100px;">
+                                                    <asp:Literal ID="LblTituloCantidad" runat="server" Text="Cant"></asp:Literal></th>
                                                 <th>Unidad</th>
                                                 <th>
                                                     <div id="DIVClasificacion" runat="server">
@@ -992,13 +993,24 @@
                                             <tr class="TextTab" runat="server" id="TrEdit">
                                                 <th>
                                                     <asp:Label ID="LtlConsec" runat="server"></asp:Label>&nbsp;</th>
-                                                <th>
+                                                <th style="width: 100px;">
-                                                    <asp:TextBox ID="TxtCantidad" onkeyup="Recalcula();" onkeypress="DisableEnterKey(event);" runat="server" CssClass="form-control input-sm " ClientIDMode="Static" MaxLength="12" ValidationGroup="GprAgregaPS" Width="60px" Height="24px"></asp:TextBox>
+                                                    <div class="row">
-                                                    <ajax:FilteredTextBoxExtender ID="SoloNumerosCantidad" runat="server" TargetControlID="TxtCantidad" FilterType="Custom, Numbers" ValidChars="." />
+                                                        <div class="col-md-12">
-                                                    <asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GprAgregaPS"></asp:RequiredFieldValidator>
+                                                            <asp:TextBox ID="TxtCantidad" onkeyup="Recalcula();" onkeypress="DisableEnterKey(event);" runat="server" CssClass="form-control input-sm " ClientIDMode="Static" MaxLength="12" ValidationGroup="GprAgregaPS" Width="60px" Height="24px"></asp:TextBox>
-                                                    <ajax:ValidatorCalloutExtender ID="VCOCantidad1" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                            <ajax:FilteredTextBoxExtender ID="SoloNumerosCantidad" runat="server" TargetControlID="TxtCantidad" FilterType="Custom, Numbers" ValidChars="." />
-                                                    <asp:CustomValidator ID="CVCantidad" runat="server" ClientValidationFunction="ValidaDecimal6digits" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto. Por favor rectifique y vuelva a intentar." ValidateEmptyText="True" ValidationGroup="GprAgregaPS"></asp:CustomValidator>
+                                                            <asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GprAgregaPS"></asp:RequiredFieldValidator>
-                                                    <ajax:ValidatorCalloutExtender ID="VCECantidad" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                            <ajax:ValidatorCalloutExtender ID="VCOCantidad1" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                            <asp:CustomValidator ID="CVCantidad" runat="server" ClientValidationFunction="ValidaDecimal6digits" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto. Por favor rectifique y vuelva a intentar." ValidateEmptyText="True" ValidationGroup="GprAgregaPS"></asp:CustomValidator>
+                                                            <ajax:ValidatorCalloutExtender ID="VCECantidad" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                        </div>
+                                                    </div>
+                                                    <div class="row" id="DivNumTurnos" runat="server" visible="false">
+                                                        <asp:Label runat="server" Text="Turno" CssClass="col-md-4"></asp:Label>
+                                                        <div class="col-md-8">
+                                                            <asp:TextBox ID="TxtNumTurnos" onkeypress="DisableEnterKey(event);" runat="server" CssClass="form-control input-sm " ClientIDMode="Static" MaxLength="12" Width="100%" Height="24px"></asp:TextBox>
+                                                            <ajax:FilteredTextBoxExtender ID="FTBNumTurnos" runat="server" TargetControlID="TxtNumTurnos" FilterType="Custom, Numbers" ValidChars="." />
+                                                        </div>
+                                                    </div>
                                                 </th>
                                                 <th>
                                                     <%--<asp:Label ID="LblUnidadMedida" runat="server" Text="UM"></asp:Label> --%>
@@ -1124,17 +1136,38 @@
                                                 <%--1--%>
                                                 <asp:TemplateField>
                                                     <ItemTemplate>
-                                                        <asp:Literal ID="LtlCantidad" runat="server" Text='<%# Eval("Cantidad", "{0:#,###.####}") %>'></asp:Literal>
+
+                                                        <div class="row">
+                                                            <div class="col-md-12">
+                                                                <asp:Literal ID="LtlCantidad" runat="server" Text='<%# Eval("Cantidad", "{0:#,###.####}") %>'></asp:Literal>
+                                                            </div>
+                                                        </div>
+                                                        <div class="row">
+                                                            <div class="col-md-12">
+                                                                <asp:Literal ID="LtlNumTurnos" runat="server" Visible="false" Text='<%# String.Format("Turnos: {0:#,###.####}", Eval("NumTurnos")) %>'></asp:Literal>
+                                                            </div>
+                                                        </div>
                                                     </ItemTemplate>
                                                     <EditItemTemplate>
-                                                        <asp:Literal ID="LtlCantidad" runat="server" Text='<%# Eval("Cantidad") %>' Visible="false"></asp:Literal>
+                                                        <div class="row">
-                                                        <asp:Literal ID="LtlTipoDescuento" runat="server" Text='<%# Eval("TipoDescuento") %>' Visible="false"></asp:Literal>
+                                                            <div class="col-md-12">
-                                                        <asp:Literal ID="LtlDescuento" runat="server" Text='<%# Eval("Descuento") %>' Visible="false"></asp:Literal>
+                                                                <asp:Literal ID="LtlCantidad" runat="server" Text='<%# Eval("Cantidad") %>' Visible="false"></asp:Literal>
-                                                        <asp:TextBox ID="TxtCantidad" runat="server" CausesValidation="true" MaxLength="12" Text='<%# Eval("Cantidad", "{0:0.######}") %>' ValidationGroup="GprGV" Width="45px" Height="24px"></asp:TextBox>
+                                                                <asp:Literal ID="LtlTipoDescuento" runat="server" Text='<%# Eval("TipoDescuento") %>' Visible="false"></asp:Literal>
-                                                        <asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GprGV"></asp:RequiredFieldValidator>
+                                                                <asp:Literal ID="LtlDescuento" runat="server" Text='<%# Eval("Descuento") %>' Visible="false"></asp:Literal>
-                                                        <ajax:ValidatorCalloutExtender ID="VCOCantidad1" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                                <asp:TextBox ID="TxtCantidad" runat="server" CausesValidation="true" MaxLength="12" Text='<%# Eval("Cantidad", "{0:0.######}") %>' ValidationGroup="GprGV" Width="45px" Height="24px"></asp:TextBox>
-                                                        <asp:CustomValidator ID="CVCantidadEdit" runat="server" ClientValidationFunction="ValidaDecimal6digits" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto. Por favor rectifique y vuelva a intentar." ValidateEmptyText="True" ValidationGroup="GprGV"></asp:CustomValidator>
+                                                                <asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GprGV"></asp:RequiredFieldValidator>
-                                                        <ajax:ValidatorCalloutExtender ID="VCECantidadEdit" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidadEdit" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                                <ajax:ValidatorCalloutExtender ID="VCOCantidad1" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                                <asp:CustomValidator ID="CVCantidadEdit" runat="server" ClientValidationFunction="ValidaDecimal6digits" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto. Por favor rectifique y vuelva a intentar." ValidateEmptyText="True" ValidationGroup="GprGV"></asp:CustomValidator>
+                                                                <ajax:ValidatorCalloutExtender ID="VCECantidadEdit" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidadEdit" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                            </div>
+                                                        </div>
+                                                        <div class="row">
+                                                            <asp:Label ID="LblTurnoEditar" runat="server" Text="Turno" CssClass="col-md-4" Visible="false"></asp:Label>
+                                                            <div class="col-md-8">
+                                                                <asp:TextBox ID="TxtNumTurnosEditar" Visible="false" Text='<%# Eval("NumTurnos") %>' onkeypress="DisableEnterKey(event);" runat="server" CssClass="form-control input-sm " ClientIDMode="Static" MaxLength="12" Width="100%" Height="24px"></asp:TextBox>
+                                                                <ajax:FilteredTextBoxExtender ID="FTBNumTurnos" runat="server" TargetControlID="TxtNumTurnosEditar" FilterType="Custom, Numbers" ValidChars="." />
+                                                            </div>
+                                                        </div>
                                                     </EditItemTemplate>
                                                 </asp:TemplateField>
                                                 <%--2--%>

Ventas/Ventas.aspx.vb

@@ -2748,6 +2748,8 @@ Partial Class Ventas
                         TmpDT.Columns.Add("CveActivoFijo", GetType(Integer))
                         TmpDT.Columns.Add("AFDepreciacion", GetType(Decimal))
                         TmpDT.Columns.Add("AFValorInicial", GetType(Decimal))
+                        TmpDT.Columns.Add("NumTurnos", GetType(Decimal))
+                        TmpDT.Columns("NumTurnos").DefaultValue = 0D
 
                         GvPS.DataSource = ObjVentas.DtResultados
                         GvPS.DataBind()
@@ -2778,6 +2780,8 @@ Partial Class Ventas
                         TmpDT.Columns.Add("CveActivoFijo", GetType(Integer))
                         TmpDT.Columns.Add("AFDepreciacion", GetType(Decimal))
                         TmpDT.Columns.Add("AFValorInicial", GetType(Decimal))
+                        TmpDT.Columns.Add("NumTurnos", GetType(Decimal))
+                        TmpDT.Columns("NumTurnos").DefaultValue = 0D
 
                         GvPS.DataSource = ObjVentas.DtResultados
                         GvPS.DataBind()
@@ -3151,6 +3155,11 @@ Partial Class Ventas
                 CargaListasPrecios()
             End If
 
+            If CveVenta <= 0 AndAlso UsuarioActual.CveEmpresa.Contiene(7, 122) Then
+                TxtCantidad.Width = New Unit("100%")
+                DivNumTurnos.Visible = True
+            End If
+
             'SELECCIONA VENDEDOR DEL USUARIO CUANDO SEA VENTA NUEVA Y SIN CLIENTE
             'If UsuarioActual.CveVendedor > 0 Then
             '    If CveVenta = -1 AndAlso Not DdlVendedor.SelectedValue.ToEntero() > 0 Then DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor.ToString())
@@ -8067,6 +8076,12 @@ Partial Class Ventas
                     e.Row.FCLinkButton("imgD").Visible = False
                 End If
 
+                If UsuarioActual.CveEmpresa.Contiene(7, 122) Then
+                    e.Row.FCTextBox("TxtCantidad").Width = New Unit("100%")
+                    e.Row.FCLabel("LblTurnoEditar").Visible = True
+                    e.Row.FCTextBox("TxtNumTurnosEditar").Visible = True
+                End If
+
                 'If UsuarioActual.CveEmpresa = 119 Then
                 '    e.Row.FCTextBox("TxtDescuento").Enabled = False
                 'End If
@@ -8150,6 +8165,10 @@ Partial Class Ventas
                     e.Row.FCLiteral("LtlPrecioLista").Visible = True
                 End If
 
+                If UsuarioActual.CveEmpresa.Contiene(7, 122) AndAlso e.Row.DBCampo("NumTurnos").ToDecimal() > 0 Then
+                    e.Row.FCLiteral("LtlNumTurnos").Visible = True
+                End If
+
                 'CANTIDAD FACTURADA
                 Select Case e.Row.DBCampo("TipoDocto")
                     Case "Cot"
@@ -8456,6 +8475,11 @@ Partial Class Ventas
                 ObjDescuento = CalcularDescuentos(GvPS.Rows(e.RowIndex).FCDropDownLost("DdlPS").SelectedValue.ToEntero(), Cantidad, PU)
             End If
 
+            Dim NumTurnos As Decimal = 0
+            If UsuarioActual.CveEmpresa.Contiene(7, 122) Then
+                NumTurnos = GvPS.Rows(e.RowIndex).FCTextBox("TxtNumTurnosEditar").Text.ToDecimal()
+            End If
+
             TmpDT.Rows.Remove(TmpDT.Rows(e.RowIndex))
             CalculaUsados()
             AgregarProductoServicio(Cantidad, DdlUM.SelectedValue.ToEntero(), DdlUM.SelectedItem.Text, DdlCla.SelectedValue.ToEntero(), DdlCla.SelectedItem.Text,
@@ -8463,7 +8487,8 @@ Partial Class Ventas
                                     GvPS.Rows(e.RowIndex).FCTextBox("TxtObsPS").Text.Trim, PU, ObjDescuento.ImporteDescuento,
                                     GvPS.Rows(e.RowIndex).FCDropDownList("DdlProyecto").SelectedValue.ToEntero(), GvPS.Rows(e.RowIndex).FCDropDownList("DdlProyecto").SelectedItem.Text,
                                     GvPS.Rows(e.RowIndex).FCDropDownList("DdlSubProyecto").SelectedValue.ToEntero(), GvPS.Rows(e.RowIndex).FCDropDownList("DdlSubProyecto").SelectedItem.Text,
-                                    CuentaPredial:=CuentaPredial, CveVentaDetalle:=GvPS.Rows(e.RowIndex).DataKey("CveVentaDetalle").ToString().ToEntero(), SeActualiza:=True, CvePromocionDetalle:=ObjDescuento.CvePromocionDetalle, ObjDescuento:=ObjDescuento)
+                                    CuentaPredial:=CuentaPredial, CveVentaDetalle:=GvPS.Rows(e.RowIndex).DataKey("CveVentaDetalle").ToString().ToEntero(), SeActualiza:=True, CvePromocionDetalle:=ObjDescuento.CvePromocionDetalle,
+                                    ObjDescuento:=ObjDescuento, NumTurnos:=NumTurnos)
 
             '    TmpDT.Rows(e.RowIndex)("CveUM") = Ddl.SelectedValue
             '    TmpDT.Rows(e.RowIndex)("UM") = Ddl.SelectedItem.Text
@@ -8532,8 +8557,11 @@ Partial Class Ventas
             TmpDT.Rows(e.RowIndex)("PorcentajeRetISR") = ClienteRetISR
             TmpDT.Rows(e.RowIndex)("CuentaPredial") = CuentaPredial
 
-
+            Dim NumTurnos As Decimal = 0
-
+            If UsuarioActual.CveEmpresa.Contiene(7, 122) Then
+                NumTurnos = GvPS.Rows(e.RowIndex).FCTextBox("TxtNumTurnosEditar").Text.ToDecimal()
+            End If
+            TmpDT.Rows(e.RowIndex)("NumTurnos") = NumTurnos
 
             If ObjDescuento IsNot Nothing Then
                 TmpDT.Rows(e.RowIndex)("CvePromocionDetalle") = ObjDescuento.CvePromocionDetalle
@@ -13428,7 +13456,7 @@ Partial Class Ventas
                                                  Row("PU").ToString().ToDouble(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Row("ImporteIVA").ToString().ToDouble, Math.Round((Row("Total").ToString().ToDouble(If(factura.ConvertirPesos, factura.TipoCambio, 1)) * (1 + Row("PorcentajeIVA").ToString().ToDouble(If(factura.ConvertirPesos, factura.TipoCambio, 1)))), 6),
                                                  Row("Obs").ToString(), Row("Descuento").ToString().ToDouble(If(factura.ConvertirPesos, factura.TipoCambio, 1)), Row("TipoDescuento").ToString().ToEntero(), Row("CveSubProyecto").ToString().ToEntero(), Row("CvePresupuestoIngreso").ToString().ToEntero(), TiempoEntrega:=Row("TiempoEntrega").ToString(), CveVentaDetallePadre:=Row("CveVentaDetalle").ToString().ToEntero(),
                                                  CveContratoDetalle:=Row("CveContratoDetalle").ToString().ToEntero(), CvePromocionDetalle:=Row("CvePromocionDetalle").ToString().ToEntero(), IEPS:=Row("ImporteIEPS").ToString().ToDouble, CveMovimientoDetallePedido:=Row("CveMovimientoDetallePedido").ToString().ToEntero(), ImporteRetIVA:=Row("ImporteRetIVA").ToString().ToDouble, ImporteRetISR:=Row("ImporteRetISR").ToString().ToDouble,
-                                                 PorcentajeIVA:=Row("PorcentajeIVA").ToString().ToDecimal, PorcentajeIEPS:=Row("PorcentajeIEPS").ToString().ToDouble, PorcentajeRetIVA:=Row("PorcentajeRetIVA").ToString().ToDouble, PorcentajeRetISR:=Row("PorcentajeRetISR").ToString().ToDouble, CuentaPredial:=Row("CuentaPredial").ToString(), CvePrecioLista:=Row("CvePrecioLista").ToString().ToEntero(), CveActivoFijo:=Row("CveActivoFijo").ToString().ToEntero()) Then
+                                                 PorcentajeIVA:=Row("PorcentajeIVA").ToString().ToDecimal, PorcentajeIEPS:=Row("PorcentajeIEPS").ToString().ToDouble, PorcentajeRetIVA:=Row("PorcentajeRetIVA").ToString().ToDouble, PorcentajeRetISR:=Row("PorcentajeRetISR").ToString().ToDouble, CuentaPredial:=Row("CuentaPredial").ToString(), CvePrecioLista:=Row("CvePrecioLista").ToString().ToEntero(), CveActivoFijo:=Row("CveActivoFijo").ToString().ToEntero(), NumTurnos:=Row("NumTurnos").ToString().ToDecimal()) Then
                     ErrorList.Add("Ocurrió un error al agregar un Producto o Servicio a la Factura.<br />Revise su factura y cualquier detalle comuníquese a Soporte Técnico")
                     Exit For
                 Else
@@ -18815,11 +18843,16 @@ Partial Class Ventas
                     End If
                 End If
 
+                Dim NumTurnos As Decimal = 0
+                If UsuarioActual.CveEmpresa.Contiene(7, 122) Then
+                    NumTurnos = TxtNumTurnos.Text.ToDecimal()
+                End If
+
                 AgregarProductoServicio(Cantidad, DdlUnidadMedida.SelectedValue.ToEntero(), DdlUnidadMedida.SelectedItem.Text, DdlClasificacion.SelectedValue.ToEntero(), DdlClasificacion.SelectedItem.Text,
                                 CvePS, "", TxtObsPS.Text.TrimEnd, PU, ObjDescuento.ImporteDescuento,
                                 DdlProyecto.SelectedValue.ToEntero(), DdlProyecto.SelectedItem.Text, DdlSubProyecto.SelectedValue.ToEntero(), DdlSubProyecto.SelectedItem.Text,
                                 Serie:=If(DIVCod.Visible, TxtCodigoSerie.Text.Trim, ""), TiempoEntrega:=TxtTiempoEntrega.Text, CuentaPredial:=TxtCuentaPredial.Text.Trim, RegeneraIEPS:=ClienteDesglosaIEPS, CvePromocionDetalle:=ObjDescuento.CvePromocionDetalle,
-                                ImporteProntoPago:=ObjDescuento.ImporteProntoPago, ObjDescuento:=ObjDescuento, CvePrecioLista:=CvePrecioListaPS, PrecioLista:=PrecioListaPS)
+                                ImporteProntoPago:=ObjDescuento.ImporteProntoPago, ObjDescuento:=ObjDescuento, CvePrecioLista:=CvePrecioListaPS, PrecioLista:=PrecioListaPS, NumTurnos:=NumTurnos)
 
                 CalculaUsados()
 
@@ -18941,6 +18974,7 @@ Partial Class Ventas
     End Sub
     Private Sub LimpiaAgregar()
         TxtCantidad.Text = ""
+        TxtNumTurnos.Text = ""
         HdnPS.Value = "-1"
         HdnCodigoPS.Value = "-1"
         HdnTipoPS.Value = "-1"
@@ -19011,7 +19045,7 @@ Partial Class Ventas
                       Optional CveOrdenCompraDetalle As Integer = 0, Optional CveVentaDetalleRemision As Integer = 0, Optional CveVentaDetalleCotizacion As Integer = 0, Optional CuentaPredial As String = "",
                       Optional RegeneraIEPS As Boolean = True, Optional CveVentaDetallePedido2 As Integer = 0, Optional SeActualiza As Boolean = False, Optional CvePromocionDetalle As Integer = -1, Optional EsCargo As Boolean = False,
                       Optional ImporteProntoPago As Decimal = 0, Optional ByRef ObjDescuento As Modelos.VentaDescuentos = Nothing, Optional CvePrecioLista As Integer = -1, Optional PrecioLista As String = "",
-                      Optional CveActivoFijo As Integer = -1, Optional AFDepreciacion As Decimal = 0D, Optional AFValorInicial As Decimal = 0D) As Boolean
+                      Optional CveActivoFijo As Integer = -1, Optional AFDepreciacion As Decimal = 0D, Optional AFValorInicial As Decimal = 0D, Optional NumTurnos As Decimal = 0D) As Boolean
 
         Dim Retorno As Boolean = False
         Try
@@ -19274,6 +19308,7 @@ Partial Class Ventas
             Row("AFDepreciacion") = AFDepreciacion
             Row("AFValorInicial") = AFValorInicial
 
+            Row("NumTurnos") = NumTurnos
 
             If UsuarioActual.CveEmpresa.Contiene(119, 13, 83) Then
                 If Not RemisionesLista.Count > 0 Then 'SI VIENE DE REMISION NO SE CONSIDERA
@@ -19519,6 +19554,9 @@ Partial Class Ventas
         TmpDT.Columns("TieneProntoPago").DefaultValue = "No"
         TmpDT.Columns("ImporteProntoPago").DefaultValue = 0
 
+        TmpDT.Columns.Add("NumTurnos", GetType(Decimal))
+        TmpDT.Columns("NumTurnos").DefaultValue = 0
+
     End Sub
     Private Sub CreaDTmpC()
         DTmpC = New DataTable
@@ -22249,7 +22287,7 @@ Partial Class Ventas
                                              Row("PU").ToString().ToDouble(If(ChkConvertirDoctoPesos.Checked, TxtTipoCambio.Text.ToDecimal, 1)), Row("ImporteIVA").ToString().ToDouble, Math.Round((Row("Total").ToString().ToDouble(If(ChkConvertirDoctoPesos.Checked, TxtTipoCambio.Text.ToDecimal, 1)) * (1 + Row("PorcentajeIVA").ToString().ToDouble(If(ChkConvertirDoctoPesos.Checked, TxtTipoCambio.Text.ToDecimal, 1)))), 6),
                                              Row("Obs").ToString(), Row("Descuento").ToString().ToDouble(If(ChkConvertirDoctoPesos.Checked, TxtTipoCambio.Text.ToDecimal, 1)), Row("TipoDescuento").ToString().ToEntero(), Row("CveSubProyecto").ToString().ToEntero(), Row("CvePresupuestoIngreso").ToString().ToEntero(), PorcentajeIVA:=Row("PorcentajeIVA").ToString().ToDecimal, IEPS:=Row("ImporteIEPS").ToString().ToDouble(If(ChkConvertirDoctoPesos.Checked, TxtTipoCambio.Text.ToDecimal, 1)), PorcentajeIEPS:=Row("PorcentajeIEPS").ToString().ToDouble, TiempoEntrega:=Row("TiempoEntrega").ToString(),
                                              CveVentaDetallePadre:=Row("CveVentaDetalle").ToString().ToEntero(), CveContratoDetalle:=Row("CveContratoDetalle").ToString().ToEntero(), CvePromocionDetalle:=If(DtPromociones IsNot Nothing, DtPromociones.FiltroPrimeroValor("CvePromocionDetalle", $"CvePS={Row("CvePS").ToString()}").ToEntero(), -1),
-                                             ImporteRetIVA:=Row("ImporteRetIVA").ToString().ToDouble, ImporteRetISR:=Row("ImporteRetISR").ToString().ToDouble, PorcentajeRetIVA:=Row("PorcentajeRetIVA").ToString().ToDouble, PorcentajeRetISR:=Row("PorcentajeRetISR").ToString().ToDouble, CuentaPredial:=Row("CuentaPredial").ToString(), CvePrecioLista:=Row("CvePrecioLista").ToString().ToEntero(), CveActivoFijo:=Row("CveActivoFijo").ToString().ToEntero()) Then
+                                             ImporteRetIVA:=Row("ImporteRetIVA").ToString().ToDouble, ImporteRetISR:=Row("ImporteRetISR").ToString().ToDouble, PorcentajeRetIVA:=Row("PorcentajeRetIVA").ToString().ToDouble, PorcentajeRetISR:=Row("PorcentajeRetISR").ToString().ToDouble, CuentaPredial:=Row("CuentaPredial").ToString(), CvePrecioLista:=Row("CvePrecioLista").ToString().ToEntero(), CveActivoFijo:=Row("CveActivoFijo").ToString().ToEntero(), NumTurnos:=Row("NumTurnos").ToString().ToDecimal()) Then
                             OcurrioError = True
                             Exit For
                         Else
@@ -33054,11 +33092,25 @@ Partial Class Ventas
 
         'REMOVER EVENTO PARA RECARGAR ALMACEN
         'spanAlmacen.Attributes.Remove("onclick")
+        If UsuarioActual.CveEmpresa.Contiene(7, 122) Then
+            TxtCantidad.Width = New Unit("100%")
+            DivNumTurnos.Visible = True
+        End If
 
         If UsuarioActual.Empresa.Funcionalidad(360) = "1" Then
             CargaListasPrecios()
         End If
 
+        BtnEditar.Visible = False
+        BtnEmitir.Visible = False
+        BtnPermisoEditarCotizacion.Visible = False
+        BtnEditarCotizacion.Visible = False
+        BtnPermisoEditarRemision.Visible = False
+        BtnEditarRemision.Visible = False
+
+        BtnGenerarRemision.Visible = False
+        BtnGeneraAutorizacion.Visible = False
+
         HdnCargarInventario.Value = "False"
         UpParametros.Update()
 
@@ -35400,6 +35452,8 @@ Partial Class Ventas
         TmpDT.Columns.Add("CveActivoFijo", GetType(Integer))
         TmpDT.Columns.Add("AFDepreciacion", GetType(Decimal))
         TmpDT.Columns.Add("AFValorInicial", GetType(Decimal))
+        TmpDT.Columns.Add("NumTurnos", GetType(Decimal))
+        TmpDT.Columns("NumTurnos").DefaultValue = 0D
 
         Return TmpDT
     End Function