diff --git a/App_Code/ClsAcumuladores.vb b/App_Code/ClsAcumuladores.vb index 3821f21de..c243c6058 100644 --- a/App_Code/ClsAcumuladores.vb +++ b/App_Code/ClsAcumuladores.vb @@ -477,20 +477,21 @@ Public Class ClsAcumuladores End Try Return Retorno - End Function - + End Function + #End Region - + #Region " FOLIOS GARANTÍA " - - Public Function FoliosGarantiaGet(CveFolioGarantia As Integer, CveEmpresa As Integer) As Boolean + + Public Function FoliosGarantiaGet(CveFolioGarantia As Integer, CveEmpresa As Integer, Optional Estatus As Integer = -1) As Boolean Dim Retorno As Boolean = False 'Data = New DataTable SqlDataAdapter("PA_Acum_FoliosGarantiaGet") With SqlAdapter.SelectCommand.Parameters - .Add("@CveFolioGarantia", SqlDbType.Int).Value = CveFolioGarantia + .Add("@CveFolioGarantia", SqlDbType.Int).Value = CveFolioGarantia + .Add("@Estatus", SqlDbType.Int).Value = Estatus .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa End With diff --git a/App_Code/ClsClientes.vb b/App_Code/ClsClientes.vb index cb1e95310..a268761f6 100644 --- a/App_Code/ClsClientes.vb +++ b/App_Code/ClsClientes.vb @@ -568,7 +568,7 @@ Public Class ClsClientes Optional ObservacionRevsion As String = "-1", Optional ReferenciaFiscal As String = "-1", Optional Celular As String = "-1", Optional ExtOtros As String = "-1", Optional CveUsoCFDI As Integer = -1, Optional CveFormaPago33 As Integer = -1, Optional CveMetodoPago33 As Integer = -1, Optional DesglosaIEPS As Boolean = True, Optional AplicaComercioExterior As Boolean = False, Optional CveTipoOperacion As Integer = -1, Optional CvePedimento As Integer = -1, Optional CveIncoterm As Integer = -1, Optional CvePais As Integer = -1, Optional CveEstado As Integer = -1, Optional CveMunicipio As Integer = -1, Optional CveColonia As Integer = -1, Optional CveMotivoTraslado As Integer = 0, Optional NumRegIdTrib As String = "", Optional ComExtEstado As String = "-1", Optional ComExtMunicipio As String = "-1", Optional ComExtColonia As String = "-1", Optional RequiereOC As Boolean = False, - Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False) As Boolean + Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0) As Boolean Dim Retorno As Boolean = False @@ -702,6 +702,7 @@ Public Class ClsClientes .Add("@TipoCliente", SqlDbType.Int).Value = TipoCliente .Add("@CargoUsado", SqlDbType.Bit).Value = CargoUsado .Add("@BonificacionUsado", SqlDbType.Bit).Value = BonificacionUsado + .Add("@CveTipoRetencion", SqlDbType.TinyInt).Value = CveTipoRetencion .Add("@RETURN_VALUE", SqlDbType.Int).Direction = ParameterDirection.ReturnValue End With @@ -747,7 +748,7 @@ Public Class ClsClientes Optional AplicaComercioExterior As Boolean = False, Optional CveTipoOperacion As Integer = -1, Optional CvePedimento As Integer = -1, Optional CveIncoterm As Integer = -1, Optional CvePais As Integer = -1, Optional CveEstado As Integer = -1, Optional CveMunicipio As Integer = -1, Optional CveColonia As Integer = -1, Optional CveMotivoTraslado As Integer = 0, Optional NumRegIdTrib As String = "-1", Optional ComExtEstado As String = "-1", Optional ComExtMunicipio As String = "-1", Optional ComExtColonia As String = "-1", Optional ApellidoPaternoPF As String = "-1", Optional ApellidoMaternoPF As String = "-1", Optional NombresPF As String = "-1", Optional RequiereOC As Boolean = False, - Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False) As Boolean + Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0) As Boolean Dim Retorno As Boolean = False @@ -896,7 +897,8 @@ Public Class ClsClientes .Add("@EsDistribuidor", SqlDbType.Bit).Value = EsDistribuidor .Add("@TipoCliente", SqlDbType.Int).Value = TipoCliente .Add("@CargoUsado", SqlDbType.Bit).Value = CargoUsado - .Add("@BonificacionUsado", SqlDbType.Bit).Value = BonificacionUsado + .Add("@BonificacionUsado", SqlDbType.Bit).Value = BonificacionUsado + .Add("@CveTipoRetencion", SqlDbType.TinyInt).Value = CveTipoRetencion End With Try SqlAdapter.Fill(Data) diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb index 8f89239ca..597854f57 100644 --- a/App_Code/ClsContabilidad.vb +++ b/App_Code/ClsContabilidad.vb @@ -5768,6 +5768,7 @@ Public Class ClsContabilidad .Add("@Opcion", SqlDbType.Int).Value = Opcion .Add("@Valor", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@MsgSalida", SqlDbType.VarChar, 100).Direction = ParameterDirection.Output + .Add("@MsgPrePolizaSalida", SqlDbType.VarChar, 800).Direction = ParameterDirection.Output .Add("@Diferencia", SqlDbType.Float).Direction = ParameterDirection.Output End With diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb index fea43d93f..6df87817e 100644 --- a/App_Code/Modelos.vb +++ b/App_Code/Modelos.vb @@ -368,7 +368,7 @@ Namespace Modelos End If Timbre = New CFDITimbre End Sub - Public Sub New(UsuarioActual As Usuario, CveVenta As Integer, CveEmpresa As Integer, Optional DirectorioServidor As String = "") + Public Sub New(UsuarioActual As Usuario, CveVenta As Integer, CveEmpresa As Integer, Optional DirectorioServidor As String = "", Optional EsCancelacion As Boolean = False) Me.UsuarioActual = UsuarioActual Me.CveVenta = CveVenta Me.CveEmpresa = CveEmpresa @@ -393,7 +393,7 @@ Namespace Modelos Me.DtDetalle = ObjVentas.DtResultados.Copy() End If ObjVentas.Dispose() - IniciaValoresVentas() + IniciaValoresVentas(EsCancelacion) If String.IsNullOrEmpty(DirectorioServidor) Then DirectorioServidor = HttpContext.Current.Server.MapPath("/") End If @@ -446,7 +446,7 @@ Namespace Modelos Me.IEPS = 0 Me.CveAlmacenTraspasoOrigen = 0 End Sub - Private Sub IniciaValoresVentas() + Private Sub IniciaValoresVentas(Optional EsCancelacion As Boolean = False) If CveVenta > 0 AndAlso CveEmpresa > 0 Then Me.DtAnticipos = New DataTable() Me.DtAntNCVinculadas = New DataTable() @@ -492,6 +492,10 @@ Namespace Modelos Me.DtNCVinculadas = ObjVentas.DtResultados.Copy() End If + If TipoDocto.Contiene("Ant") AndAlso EsCancelacion Then + EsNCAmortizacion = True + End If + If ObjVentas.GetVentasAntNC(-1, CveVenta, AplicaAmortizacion:=EsNCAmortizacion) Then Me.DtAnticipos = ObjVentas.DtResultados.Copy() End If @@ -2333,7 +2337,7 @@ Namespace Modelos Exit Select End If - If ObjFactura.TipoDocto.Contiene("Ing", "Egs") AndAlso ValorMultiplicador = -1 Then + If ObjFactura.TipoDocto.Contiene("Ing", "Egs", "Ant") AndAlso ValorMultiplicador = -1 Then For Each row2 As DataRow In ObjFactura.DtAnticipos.Rows If row2("CveConceptoContable").ToString().ToEntero = 11 Then importeMovimiento = row2("Importe").ToString().ToDecimal * ValorMultiplicador '- ((row2.FCTextBox("TxtAnticipo" & row2.RowIndex).Text.ToDecimal / row2.DataKey("TotalAnticipo").ToDecimal) * row2.DataKey("IVAAnticipo").ToDecimal) @@ -2344,7 +2348,10 @@ Namespace Modelos CveSubProyectoContabilizar = CveSubProyectoVenta If importeMovimiento <> 0 Then - If Not ObjConta.AddPrePolizasDetalle(ObjFactura.CvePrePoliza, TipoMovimiento, importeMovimiento, Referencia, ConceptoContable, Concepto, FechaMovimiento, IdCtaContable, -1, CveVenta:=row2("CveVenta").ToString().ToEntero, CveVentaAmortizacion:=ObjFactura.CveVenta, CveCliente:=ObjFactura.CveCliente, CveIE:=CveIEAnticipo, ImporteMX:=importeMovimiento * tipoCambio, ImporteME:=If(tipoCambio = 1, 0, importeMovimiento), CveCuenta:=CveCuenta, CveSubProyecto:=CveSubProyectoContabilizar, Contabilizable:=SeContabiliza) Then + If Not ObjConta.AddPrePolizasDetalle(ObjFactura.CvePrePoliza, TipoMovimiento, importeMovimiento, Referencia, ConceptoContable, Concepto, FechaMovimiento, IdCtaContable, -1, + CveVenta:=ObjFactura.CveVenta, CveVentaAmortizacion:=row2("CveVenta").ToString().ToEntero, CveCliente:=ObjFactura.CveCliente, + CveIE:=CveIEAnticipo, ImporteMX:=importeMovimiento * tipoCambio, ImporteME:=If(tipoCambio = 1, 0, importeMovimiento), CveCuenta:=CveCuenta, + CveSubProyecto:=CveSubProyectoContabilizar, Contabilizable:=SeContabiliza) Then ErrorPrepoliza = True Exit For Else diff --git a/App_Code/modExtensiones.vb b/App_Code/modExtensiones.vb index 9832061b6..2a531ef0d 100644 --- a/App_Code/modExtensiones.vb +++ b/App_Code/modExtensiones.vb @@ -54,8 +54,8 @@ Namespace Extensiones ' BaseDatos = CType(System.Web.HttpContext.Current.Session("UsuarioSIG"), Usuario).Empresa.BaseDatosNombre 'End If - - Return String.Format("Data Source=192.168.0.2;Initial Catalog={0};User Id=JCaudillo;Password=JCau127*953;pooling=True; Min Pool Size=10;Application Name=SIG;", BaseDatos) + Return ConfigurationManager.ConnectionStrings("Conexion").ConnectionString + ' Return String.Format("Data Source=192.168.0.2;Initial Catalog={0};User Id=JCaudillo;Password=JCau127*953;pooling=True; Min Pool Size=10;Application Name=SIG;", BaseDatos) End Function diff --git a/Ashx/SIGWeb.ashx b/Ashx/SIGWeb.ashx index a1d1c9720..faf915fda 100644 --- a/Ashx/SIGWeb.ashx +++ b/Ashx/SIGWeb.ashx @@ -247,13 +247,13 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState 'ObjProveedores.Dispose() Dim dt As DataTable = DirectCast(context.Application(AppNombre), DataTable).FiltraParametros($"CveEmpresa = {CveEmpresa}") If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then - DtRetorno = dt.FiltraParametros($"RazonSocial like '%{Name}%'") + DtRetorno = dt.FiltraParametros($"NombreCortoProveedor like '%{Name}%'") End If End If If DtRetorno IsNot Nothing AndAlso DtRetorno.Rows.Count > 0 Then DtRetorno.Columns("CveProveedor").ColumnName = "id" - DtRetorno.Columns("RazonSocial").ColumnName = "text" + DtRetorno.Columns("NombreCortoProveedor").ColumnName = "text" retorno = JsonConvert.SerializeObject(DtRetorno).ToString context.Response.Write(retorno) Else diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index afd814184..74cb73e65 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -1471,7 +1471,7 @@ Partial Class PopUpVerFactura If Archivo.Exists Then 'IMPRESION ESPECIAL SALIDA DE COMPUPROVEEDORES y VSH - If UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 119, 4, 145) Then + If UsuarioActual.CveEmpresa.Contiene(1, 72, 80, 119, 4, 145, 146) Then Dim CiudadSucursal As String = "" Dim DomicilioSucursal As String = "" Dim DomicilioCliente As String = String.Format("{0} #{1}, {2}, Col. {3}, CP: {4}, {5}, {6}", DtMovimientos(0)("SucClienteDireccion").ToString, DtMovimientos(0)("SucClienteNoExt").ToString, DtMovimientos(0)("SucClienteNoInt").ToString, DtMovimientos(0)("SucClienteColonia"), DtMovimientos(0)("SucClienteCP").ToString, DtMovimientos(0)("SucClienteCiudad"), DtMovimientos(0)("SucClientePais").ToString) @@ -1487,7 +1487,7 @@ Partial Class PopUpVerFactura End If - If UsuarioActual.CveEmpresa.Contiene(72, 80) Then + If UsuarioActual.CveEmpresa.Contiene(72, 80, 146) Then params.Add(New ReportParameter("Fecha", String.Format("{0} {1}", FechaHora.ToDate.ToString("yyyy-MM-dd"), FechaHora.ToDateTime.ToString("HH:mm:ss")))) params.Add(New ReportParameter("SucursalCliente", DtMovimientos(0)("SucCliente").ToString)) diff --git a/Contabilidad/RegPrePoliza.aspx b/Contabilidad/RegPrePoliza.aspx index 2836aea82..88e35e479 100644 --- a/Contabilidad/RegPrePoliza.aspx +++ b/Contabilidad/RegPrePoliza.aspx @@ -373,6 +373,9 @@ +
+
+ diff --git a/Contabilidad/RegPrePoliza.aspx.vb b/Contabilidad/RegPrePoliza.aspx.vb index 623229efd..e6580a22f 100644 --- a/Contabilidad/RegPrePoliza.aspx.vb +++ b/Contabilidad/RegPrePoliza.aspx.vb @@ -794,6 +794,18 @@ Partial Class ContabilidadC_RegPrePoliza e.Row.FCLinkButton("ImgBancos").CssClass = "btn btn-circle btn-sm green" End If End If + + If e.Row.DataKey("CveConcepto").ToEntero.Contiene(17) Then + e.Row.FCDropDownList("DdlProveedores").Visible = True + e.Row.FCDropDownList("DdlProveedores").DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa) + e.Row.FCDropDownList("DdlProveedores").DataBind() + e.Row.FCDropDownList("DdlProveedores").Items.Insert(0, New ListItem(" - ", "-1")) + + 'If CveTipoTransaccion > 0 And CveCuenta > 0 And Folio.Length > 0 And ImporteDocumento > 0 And Beneficiario.Length > 0 Then + ' e.Row.FCLinkButton("ImgPagoCompra").CssClass = "btn btn-circle btn-sm green" + 'End If + End If + End If End Sub @@ -854,15 +866,20 @@ Partial Class ContabilidadC_RegPrePoliza If ObjIE.GetBancosIE(CveIE, -1, -1, "-1", -1, "-1", "-1", -1, -1, -1, -1, -1, MinFecha, MaxFecha, MinFecha, MaxFecha, MinFecha, MaxFecha, -1, -1, UsuarioActual.CveEmpresa) Then FolioIE = ObjIE.Folio End If - End If - - + End If + + + Dim CveProveedor As Integer = -1 + Dim CveCompra As Integer = -1 'inserto las compras que voy a pagarDdlSaldos For Each gvr As GridViewRow In GvMov.Rows If gvr.DataKey("IDCuenta").ToEntero > 0 Then IdCtaContable = gvr.DataKey("IDCuenta") End If + CveProveedor = gvr.DataKey("CveProveedor").ToEntero + CveCompra = gvr.DataKey("CveCompra").ToEntero + CveConcepto = gvr.DataKey("CveConcepto").ToEntero If gvr.DataKey("TipoMovto").ToDouble <> 0 Then Importe = gvr.FCTextBox("TxtAbono").Text.ToDouble @@ -870,6 +887,11 @@ Partial Class ContabilidadC_RegPrePoliza Else Importe = gvr.FCTextBox("TxtCargo").Text.ToDouble TipoMovto = False + End If + 'Registra pago de compra + If CveConcepto = 17 Then + CveProveedor = gvr.FCDropDownList("DdlProveedores").SelectedValue.ToEntero + CveCompra = gvr.FCDropDownList("DdlCompras").SelectedValue.ToEntero End If If CveConcepto = 41 Then @@ -890,7 +912,7 @@ Partial Class ContabilidadC_RegPrePoliza If Importe <> 0 Then If ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovto, Importe, gvr.FCLiteral("LtlReferencia").Text, gvr.DataKey("CveConcepto").ToEntero, gvr.FCTextBox("TxtConcepto").Text, TxtFecha.Text.ToDate, IdCtaContable, -1, CveSubProyecto:=gvr.FCDropDownList("DdlSubProyecto").SelectedValue.ToEntero, CveIE:=CveIE, - CveProveedor:=gvr.DataKey("CveProveedor").ToEntero, CveCompra:=gvr.DataKey("CveCompra").ToEntero, + CveProveedor:=CveProveedor, CveCompra:=CveCompra, CvePersonal:=gvr.DataKey("CvePersonal").ToEntero, CveClasificacion:=gvr.DataKey("CveClasificacion").ToEntero, ImporteMX:=Importe, CveTipoGasto:=gvr.FCDropDownList("DdlTipoGasto").SelectedValue.ToEntero, CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, TipoCambio:=If(gvr.DataKey("TC").ToString.ToDouble > 0, gvr.DataKey("TC").ToString.ToDouble, 1), @@ -1560,10 +1582,34 @@ Partial Class ContabilidadC_RegPrePoliza Protected Sub LnkComplementoPago_Click(sender As Object, e As EventArgs) GeneraTimbre(CvePrePoliza) - End Sub + End Sub #End Region - - - + + + + Protected Sub DdlProveedores_SelectedIndexChanged1(sender As Object, e As EventArgs) + Dim ddl As DropDownList = CType(sender, DropDownList) + Dim ddl2 As DropDownList = DirectCast(ddl.BindingContainer, GridViewRow).FCDropDownList("DdlCompras") + CargaCompras2(ddl.SelectedValue.ToEntero, ddl2) + End Sub + + Private Sub CargaCompras2(CveProveedor As Integer, ddl As DropDownList) + + Dim ObjCompras As New ClsCompras + + ddl.ClearSelection() + If ObjCompras.GetCompras(-1, "-1", "-1", CveProveedor, -1, UsuarioActual.CveEmpresa) Then + ddl.DataSource = ObjCompras.DtResultados.FiltraParametros("Saldo > 0") + ddl.DataBind() + ddl.Items.Insert(0, New ListItem(" - ", "-1")) + ddl.Visible = True + Else + ddl.DataSource = Nothing + ddl.DataBind() + ddl.Items.Insert(0, New ListItem(" - ", "-1")) + + End If + ObjCompras.Dispose() + End Sub End Class diff --git a/Empresas/146/Formatos/Factura.rdlc b/Empresas/146/Formatos/Factura.rdlc index 593500dc1..ed8648fc9 100644 --- a/Empresas/146/Formatos/Factura.rdlc +++ b/Empresas/146/Formatos/Factura.rdlc @@ -1749,19 +1749,22 @@ - 2.12527cm + 1.34132cm - 2.02474cm + 1.32237cm - 10.17786cm + 2.53649cm + + + 8.96945cm 2.52862cm - 3.15415cm + 3.27979cm @@ -1776,7 +1779,7 @@ - Cantidad + Cant. + + + + + + Textbox1 + + + #ff1037 + 2pt + 2pt + 2pt + 2pt + + + + @@ -1973,7 +2012,7 @@ =Fields!Cantidad.Value @@ -2041,6 +2080,48 @@ + + + + true + true + + + + + =Fields!Codigo.Value + + + + + + + Codigo + + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + @@ -2225,6 +2306,38 @@ + + + + true + true + + + + + + + + + + + 2pt + 2pt + 2pt + 2pt + + + + @@ -2336,6 +2449,7 @@ + @@ -2355,7 +2469,7 @@ 5.75246cm 0.11468cm 1.07241cm - 20.01064cm + 19.97804cm 26 - - -
  • - Registrar Venta - Registrar Cotización -
    • - -
  • +<%@ Page Title="Ventas - Clientes" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Clientes.aspx.vb" Inherits="Clientes" %> + +<%@ Register Assembly="TimePicker" Namespace="MKB.TimePicker" TagPrefix="cc1" %> +<%@ Register Assembly="eWorld.UI" Namespace="eWorld.UI" TagPrefix="ew" %> + + + + + + +
  • + Registrar Venta + Registrar Cotización +
    • + +
  • Conciliar - -
    • - - - -
  • - -
    • -     -     - - - - -
  • - -
    • -     -     - - -
  • - -
    • -     -     - - -
  • - -
    • -     -     - - - -
  • - Agregar Cuenta Bancaria -
    • -     -     - - - -
  • - -
    • -     -     - - -
  • - -
    • -     -     - - - - -
  • - -
    • -     -     - - - -
  • - -
    • -     -     - - - -
  • - -
    • -     -     - - - -
  • - -
    • -     -     - - - -
  • - -
    • -     -     - - - -
  • - -
    • -     - - - -     - -     - -   - - - - - -
      -
    • -
      • -
    • - -
      • -
    -     -     - - - - - - - -
    -
    -
    -
    -
    - - Datos de Emisión -
    -
    -
    -
    -
    -
    - -
    - -
    - - - - -
    - -
    -
    - - - - -
    -
    - - - - -
    -
    - - - - -
    -
    - - -
    - - - - -
    -
    - - -
    -
    - - - -
    -
    - - - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - -
    -
    -
    -
    - - - - -
    -
    - - - -
    -
    - - - - -
    -
    - - - - -
    -
    - - - - -
    -
    - - - - - -
    -
    - - - - - - -
    -
    -
    -
    - - - - - -
    -
    -
    - - - -
    -
    -
    -
    -
    - - Datos del Cliente -
    -
    -
    -
    -
    -
    -
    -
    - - -
    -
    -
    -
    - - - - -
    -
    -
    -
    - - -
    -
    -
    - -
    - -
    -
    - - - -
    -
    - -
    -
    -
    - - -
    -
    -
    -
    - - -
    - - - -
    - -
    - - - - - -
    -
    - - - - - -
    -
    - - -
    -
    - - -
    -
    - - - - -
    -
    - - -
    -
    - - - - -
    - -
    - - - -
    - -
    - - - -
    - -
    - - - -
    - -
    - - -
    -
    - - -
    - -
    - - -
    - -
    - - Frecuente - No Frecuente - - -
    -
    - - -
    -
    - - -
    -
    -
    -
    - - <%-- Marcar el Cliente como Frecuente --%> -
    -
    -
    -
    - - Registrar -
    -
    -
    -
    -
    -
    -
    -
    - - - - -
    - -
    -
    -
    -
    -
    - -
    -
    -
    -
    - - Sucursales y/o Departamentos -
    -
    -
    -
    -
    -
    -
    -
    - - - - - - - - - - - - - - - -
    Sucursal y/o DepartamentoComandos
       -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    Periodo Facturación: - - - - - - - - -
    Imprime Nombre Sucursal: -
    - -
    -
    -
    -
    - -
    -
    -
    -
    - - Direcciones de envío -
    -
    -
    - -
    -
    -
    -
    - - - - + + + + + +
  • + +
    • +     +     + + + + +
  • + +
    • +     +     + + +
  • + +
    • +     +     + + +
  • + +
    • +     +     + + + +
  • + Agregar Cuenta Bancaria +
    • +     +     + + + +
  • + +
    • +     +     + + +
  • + +
    • +     +     + + + + +
  • + +
    • +     +     + + + +
  • + +
    • +     +     + + + +
  • + +
    • +     +     + + + +
  • + +
    • +     +     + + + +
  • + +
    • +     +     + + + +
  • + +
    • +     + + + +     + + + +   + + + + + +
      +
    • +
      • +
    • + +
      • +
    +     +     + + + + + + + +
    +
    +
    +
    +
    + + Datos de Emisión +
    +
    +
    +
    +
    +
    + +
    + +
    + + + + +
    + +
    +
    + + + + +
    +
    + + + + +
    +
    + + + + +
    +
    + + +
    + + + + +
    +
    + + +
    +
    + + + +
    +
    + + + + +
    +
    +
    +
    + + +
    +
    +
    +
    + + +
    +
    +
    +
    + + + + +
    +
    + + + +
    +
    + + + + +
    +
    + + + + +
    +
    + + + + +
    +
    + + + + + +
    +
    + + + + + + +
    +
    +
    +
    + + + + + +
    +
    +
    + + + +
    +
    +
    +
    +
    + + Datos del Cliente +
    +
    +
    +
    +
    +
    +
    +
    + + +
    +
    +
    +
    + + + + +
    +
    +
    +
    + + +
    +
    +
    + +
    + +
    +
    + + + +
    +
    + +
    +
    +
    + + +
    +
    +
    +
    + + +
    + + + +
    + +
    + + + + + +
    +
    + + + + + +
    +
    + + +
    +
    + + +
    +
    + + + + +
    +
    + + +
    +
    + + + + +
    + +
    + + + +
    + +
    + + + +
    + +
    + + + +
    + +
    + + +
    +
    + + +
    + +
    + + +
    + +
    + + Frecuente + No Frecuente + + +
    +
    + + +
    +
    + + +
    +
    +
    +
    + + <%-- Marcar el Cliente como Frecuente --%> +
    +
    +
    +
    + + Registrar +
    +
    +
    +
    +
    +
    +
    +
    + + + + +
    + +
    +
    +
    +
    +
    + +
    +
    +
    +
    + + Sucursales y/o Departamentos +
    +
    +
    +
    +
    +
    +
    +
    + + + + + + + + + + + + + + + +
    Sucursal y/o DepartamentoComandos
       +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    Periodo Facturación: + + + + + + + + +
    Imprime Nombre Sucursal: +
    + +
    +
    +
    +
    + +
    +
    +
    +
    + + Direcciones de envío +
    +
    +
    + +
    +
    +
    +
    + + + + Sucursal/Depto - - -
    - -
    -     -     - - + + + +
    + +
    +     +     + + Contacto - - -
    - -
    -     -     - - + + + +
    + +
    +     +     + + Ciudad - - -
    - -
    -     -     - - - - - - - - - - -     -     -
    + + + +
    + +
    +     + + + + + + + + + + + + + +
    Condiciones Entrega: - -
    -
    -
    -
    -
    - - - - - - - - - - - - - - - - - + + + + + + + + + + + + + + + - - - - - - - -
    -
    -
    -
    -
    - - Resumen -
    -
    -
    -
    -
    -
    -
    -
    -
    + + +
    + +
    + +
    +
    + +
    +
    +
    + + Contable +
    +
    +
    +
    +
    +
    +
    + +
    +
    +
    +
    +
    + + Registros Contables +
    +
    +
    +
    +
    +
    +
    +
    +
    + +
    + + + + + +
    +
    + +
    + +
    + + + + + +
    +
    + + +
    + +
    + + + + + +
    +
    + + + +
    + +
    + + + + + +
    +
    + + +
    + +
    + + + + + +
    +
    + + +
    + +
    + + + + + +
    +
    + + + + +
    + +
    + + + + + +
    +
    +
    + +
    + + + + + +
    +
    +
    + +
    + + + + + +
    +
    +
    +
    +
    +
    +
    + + + + + + + + + +
    +
    +
    +
    +
    + + Resumen +
    +
    +
    +
    +
    +
    +
    +
    +
    Cantidad de Ventas: -
    -
    - - -
    -
    -
    -
    + +
    +
    + + +
    +
    +
    +
    Total Vendido: -
    -
    - - -
    -
    - -
    -
    + +
    +
    + + +
    +
    + +
    +
    Venta Mínima: -
    -
    - -
    -
    -
    -
    + +
    +
    + +
    +
    +
    +
    Promedio de Ventas: -
    -
    - -
    -
    -
    -
    + +
    +
    + +
    +
    +
    +
    Venta Máxima: -
    -
    - - -
    -
    -
    -
    -
    - -
    -
    -
    -
    -
    -
    - - Historial de Ventas -
    -
    -
    - " - style="display: inline-block; margin-right: -20px; width: 150px;" /> - " - style="margin-top: -3px; float: inherit;" class="btn btn-circle btn-sm label-info"> -
    -
    -
    -
    -
    -
    - - - - - - - - - -
    -
    -
    - - - - - - - - - - - - - - - - Factura - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - Remision - - - - - - - - Reenviar - - - - - - - - - - - - - -
    -
    - -
    -
    -
    -
    -
    -
    -
    -
    -
    -
    - - Resumen -
    -
    -
    -
    -
    -
    -
    -
    -
    + +
    +
    + + +
    +
    +
    +
    +
    + +
    +
    +
    +
    +
    +
    + + Historial de Ventas +
    +
    +
    + " + style="display: inline-block; margin-right: -20px; width: 150px;" /> + " + style="margin-top: -3px; float: inherit;" class="btn btn-circle btn-sm label-info"> +
    +
    +
    +
    +
    +
    + + + + + + + + + +
    +
    +
    + + + + + + + + + + + + + + + + Factura + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + Remision + + + + + + + + Reenviar + + + + + + + + + + + + + +
    +
    + +
    +
    +
    +
    +
    +
    +
    +
    +
    +
    + + Resumen +
    +
    +
    +
    +
    +
    +
    +
    +
    Cantidad de Cotizaciones: -
    -
    - -
    -
    -
    -
    + +
    +
    + +
    +
    +
    +
    Factor de Cotizaciones VS Ventas: -
    -
    + +
    +
     % -
    -
    -
    -
    - -
    - -
    -
    -
    -
    - - Cotizaciones -
    - -
    -
    - " - style="display: inline-block; margin-right: -20px; width: 150px;" /> - " - style="margin-top: -3px; float: inherit;" class="btn btn-circle btn-sm label-info"> -
    -
    - -
    -
    - - - - - - - - - - -
    -
    - -
    -
    -
    - - - - - Cotización - - - - - - - - - - - - - - - - - - - - - - - - - Folio Venta - - - - - - - - - - Reenviar - - - - - - + +
    +
    +
    +
    + +
    + +
    +
    +
    +
    + + Cotizaciones +
    + +
    +
    + " + style="display: inline-block; margin-right: -20px; width: 150px;" /> + " + style="margin-top: -3px; float: inherit;" class="btn btn-circle btn-sm label-info"> +
    +
    + +
    +
    + + + + + + + + + + +
    +
    + +
    +
    +
    + + + + + Cotización + + + + + + + + + + + + + + + + + + + + + + + + + Folio Venta + + + + + + + + + + Reenviar + + + + + + <%-- - --%> - - Crear O.S. - + --%> + + Crear O.S. + <%--Crear O.S.--%> - - - - - - - - -
    -
    -
    - -
    -
    -
    -
    -     -     - - - - - - - -
    -
    - -
    -
    -
    - - Parametros -
    -
    - -
    -
    -
    - - -
    -
    - -
    - -
    - -
    - - - - <%-- --%> - -
    - -
    - - - - -
    - -
    - - - - -
    - -
    -
    -
    - -
    + + + + + + + + +
    +
    +
    + +
    +
    +
    +
    +     + + + + + + + + +
    +
    + +
    +
    +
    + + Parametros +
    +
    + +
    +
    +
    + + +
    +
    + +
    + +
    + +
    + + + + <%-- --%> + +
    + +
    + + + + +
    + +
    + + + + +
    + +
    +
    +
    + +
       +     +    +    +    +    -
    - + +
    +   +   +   +   +   +   -
    -
    - -
    -
    - - -
    -
    -
    - - - -
    - - - - - - - -
    - -
    - - -
    -
    -
    -
    - -
    + +
    +
    + +
    +
    + + +
    +
    +
    + + + +
    + + + + + + + +
    + +
    + + +
    +
    +
    +
    + +
       +     +    +    +    +    -
    - + +
    +   +   +   +   +   +   -
    -
    -
    -
    - - -
    - + +
    +
    +
    +
    + + +
    + <%-- @@ -1537,48 +1589,48 @@ - --%> -
    - -
    - -
    - - <%----%> - -
    - -
    -
    -
    - - - - <%----%> - -
    -
    - -
    -
    - - -
    -
    -
    - - -
    - - <%----%> - -
    - -
    - - -
    - + --%> +
    + +
    + +
    + + <%----%> + +
    + +
    +
    +
    + + + + <%----%> + +
    +
    + +
    +
    + + +
    +
    +
    + + +
    + + <%----%> + +
    + +
    + + +
    + <%--
    @@ -1600,708 +1652,716 @@
    -
    --%> - -
    - - <%----%> - -
    - -
    -
    - - <%----%> - -
    - -
    - - <%----%> - -
    -
    - -
    - - - -
    -
    - -
    - - - -
    -
    -
    - -
    -
    -
    -
    - - Estado de Cuenta -
    -
    - -
    -
    -
    +
    --%> + +
    + + <%----%> + +
    + +
    +
    + + <%----%> + +
    + +
    + + <%----%> + +
    +
    + +
    + + + +
    +
    + +
    +     +     + +
    +
    +
    + +
    +
    +
    +
    + + Estado de Cuenta +
    +
    + +
    +
    +
    <%-- Cuentas por Cobrar Anticipos / NC - --%> - -
    -
    - -
    - - - - - - -
    -
    -
    - -
    - - - - - - -
    -
    -
    -
    -
    - -
    - - - - - - -
    -
    -
    - -
    - - - - - - -
    -
    -
    - -
    -
    - - - - - -
    - -
    - - - - - - - - - + --%> + +
    +
    + +
    + + + + + + +
    +
    +
    + +
    + + + + + + +
    +
    +
    +
    +
    + +
    + + + + + + +
    +
    +
    + +
    + + + + + + +
    +
    +
    + +
    +
    + + + + + +
    + +
    + + + + + + + + + <%-- - --%> -
    -
    -
    -
    - -
    -
    -
    -
    - -    -
    -
    - - - - -
    -
    -
    -
    -
    -
    -
    - -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    -
    -
    -
    -
    - - CxC Activas -
    -
    -
    - - - - - - - - - - -
    -
    -
    -
    -
    -
    + --%> +
    +
    +
    +
    + +
    +
    +
    +
    + +    +
    +
    + + + + +
    +
    +
    +
    +
    +
    +
    + +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    +
    +
    +
    +
    + + CxC Activas +
    +
    +
    + + + + + + + + + + +
    +
    +
    +
    +
    +
    Pago múltiples facturas Pagar múltiples facturas      -
    -
    - - - - - - - - - - - - - - + +
    +
    + + + + + + + + + + + + + +   - - - - + + + + +   - - - - + + + + +   - - - - - - - - - - - - - - - - <%----%> - - - - - - - - -
    - - -
    - - -
    -
    -
    - - Historial de CxC -
    -
    -
    - - - - - - - - - - -
    -
    -
    - -
    -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    -
    -
    -
    -
    - - - - - - - - - - - - - + + + + + + + + + + + + + + + + + <%----%> + + + + + + + + +
    +
    + +
    + + +
    +
    +
    + + Historial de CxC +
    +
    +
    + + + + + + + + + + +
    +
    +
    + +
    +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    +
    +
    +
    +
    + + + + + + + + + + + + +   - - - - + + + + +   - - - - + + + + +   - - - - - - - - - - - - -
    -
    -
    - - - - - - - - - - - - - - - - - -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    - -
    -
    -
    - - Anticipo del Cliente -
    -
    -
    - - - - - - - - - - -
    -
    -
    -
    -
    - - - - - - - - - - - - - - - - - - - - - - - -
    -
    -
    - -
    -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    - -
    -
    -
    - - Anticipo del Cliente Historial -
    -
    -
    - - - - - - - - - - -
    -
    -
    -
    -
    - - - - - - - - - - - - - - - - -
    - -
    - -
    -
    -
    - -     -     - -     -     - - - - - - - - - - - - - - - - - - -
    -
    -
    - - Cuentas Bancarias - -
    - -
    - - - -
    - -
    -
    - - - - - - - - - - -
    -
    -
    -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    -
    - -
    -
    -
    - - Cobros Realizados -
    -
    -
    - - - - - - - - - - -
    -
    -
    -
    -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    - -
    - - - - - - - - - - - - - - - + + + + + + + + + + + + + +
    +
    +
    +     + + + + + + + + +     + + + + + + + +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    + +
    +
    +
    + + Anticipo del Cliente +
    +
    +
    + + + + + + + + + + +
    +
    +
    +
    +
    + + + + + + + + + + + + + + + + + + + + + + + +
    +
    +
    + +
    +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    + +
    +
    +
    + + Anticipo del Cliente Historial +
    +
    +
    + + + + + + + + + + +
    +
    +
    +
    +
    + + + + + + + + + + + + + + + + +
    + +
    + +
    +
    +
    + +     +     + +     +     + + + + + + + + + + + + + + + + + + +
    +
    +
    + + Cuentas Bancarias + +
    + +
    + + + +
    + +
    +
    + + + + + + + + + + +
    +
    +
    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    +
    + +
    +
    +
    + + Cobros Realizados +
    +
    +
    + + + + + + + + + + +
    +
    +
    +
    +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    + +
    + + + + + + + + + + + + + + +   - - - - - - - - - - Archivos - - - - - - - Reenviar Complemento - + + + + + + + + + + + Archivos + + + + + + + Reenviar Complemento + <%-- - --%> - - - - - - - - -
    -
    - -
    -
    -
    -     -     - - - - - - - - - -

    No Facturadas

    - - - - - - - - - - - - - - - - - - - - - -     -     - - - - -

    Facturadas

    - - - - Folio - - - - + --%> + + + + + + + + +
    +
    + +
    + + +     +     + + + + + + + + + +

    No Facturadas

    + + + + + + + + + + + + + + + + + + + + + +     +     + + + + +

    Facturadas

    + + + + Folio + + + + <%-- Solicitó @@ -2313,1202 +2373,1215 @@ - --%> - - - - - - - - - - - - - - - -     -     - - - - -
    -

    Cuentas y Equipos

    - - - - - - - - - - - - - - - - - - - - - - - - -
    - -     -     - -     - - - - - - - -     -     - - - -
    -
    -
    -
    -
    - - FEMSA -
    -
    -
    -
    -
    -
    -
    -
    - -
    - -
    -
    - -
    - - -
    -
    - -
    - -
    - - -
    -
    - -
    - -
    - - -
    -
    -
    -
    -
    -
    - -
    -
    -
    -
    - - Detallista -
    -
    -
    -
    -
    -
    -
    -
    -
    - -
    -
    - -
    - - -
    -
    - -
    - -
    - - -
    -
    - -
    - -
    - - -
    -
    - -
    - -
    - - -
    -
    -
    -
    -
    -
    - -
    -
    -
    -
    - - 7Eleven -
    -
    -
    -
    -
    -
    -
    -
    - -
    - -
    - - -
    -
    -
    -
    -
    -
    - -
    -
    -
    -
    - - FORD -
    -
    -
    -
    -
    -
    -
    -
    -
    - -
    -
    - -
    - - -
    -
    -
    -
    -
    -
    -
    - -
    -
    -
    -
    -
    - - Impuestos Locales -
    -
    -
    -
    -
    -
    - -
    -
    - -
    -
    -
    -
    -
    -
    - - COMERCIO EXTERIOR -
    -
    -
    -
    -
    -
    - -
    -
    -
    -
    - -
    - -
    - - -
    - -
    - -
    -
    - -
    - - -
    - -
    -
    - -
    - -
    - -
    -
    - -
    - -
    - - -
    - -
    - -
    - -
    - -
    -
    - -
    -
    - -
    - -
    - - -
    - -
    - -
    - -
    - -
    -
    - -
    -
    - -
    -
    - - -
    - -
    - -
    -
    - -
    - -
    - -
    - -
    - -
    - -
    - -
    - -
    - -
    -
    -
    -
    -
    -     - -     - - - -
    -
    -
    -
    -
    - - Ventas -
    -
    -
    -
    -
    -
    -
    -
    - -
    - -
    - - -
    -
    -
    -
    -
    -
    -
    -
    -
    -
    - - ACTIVO FIJO ASIGNADO -
    -
    -
    -
    -
    -
    -
    -
    - - - - - - - - - - - - - -
    -
    -
    -
    -
    -     -     - - - -
    -
    -
    - - Personal Asignado -
    -
    -
    -
    -
    -
    -
    -
    - - - - N° - - - - - - Personal - -   - - - - Genero - -   - - - - Turno - -   - - - - Departamento - -   - - - - Puesto - -   - - - - Estatus - - - - - - - - - -
    -
    -
    -
    -
    -
    -
    -
    - - Consultar Asistencias -
    -
    -
    -
    -
    -
    -
    -
    -
    + --%> + + + + + + + + + + + + + + + + + + + + + +
    +

    Cuentas y Equipos

    + + + + + + + + + + + + + + + + + + + + + + + + +
    + +     +     + + + + + + + + + + + + + + +
    +
    +
    +
    +
    + + FEMSA +
    +
    +
    +
    +
    +
    +
    +
    + +
    + +
    +
    + +
    + + +
    +
    + +
    + +
    + + +
    +
    + +
    + +
    + + +
    +
    +
    +
    +
    +
    + +
    +
    +
    +
    + + Detallista +
    +
    +
    +
    +
    +
    +
    +
    +
    + +
    +
    + +
    + + +
    +
    + +
    + +
    + + +
    +
    + +
    + +
    + + +
    +
    + +
    + +
    + + +
    +
    +
    +
    +
    +
    + +
    +
    +
    +
    + + 7Eleven +
    +
    +
    +
    +
    +
    +
    +
    + +
    + +
    + + +
    +
    +
    +
    +
    +
    + +
    +
    +
    +
    + + FORD +
    +
    +
    +
    +
    +
    +
    +
    +
    + +
    +
    + +
    + + +
    +
    +
    +
    +
    +
    +
    + +
    +
    +
    +
    +
    + + Impuestos Locales +
    +
    +
    +
    +
    +
    + +
    +
    + +
    +
    +
    +
    +
    +
    + + COMERCIO EXTERIOR +
    +
    +
    +
    +
    +
    + +
    +
    +
    +
    + +
    + +
    + + +
    + +
    + +
    +
    + +
    + + +
    + +
    +
    + +
    + +
    + +
    +
    + +
    + +
    + + +
    + +
    + +
    + +
    + +
    +
    + +
    +
    + +
    + +
    + + +
    + +
    + +
    + +
    + +
    +
    + +
    +
    + +
    +
    + + +
    + +
    + +
    +
    + +
    + +
    + +
    + +
    + +
    + +
    + +
    + +
    + +
    +
    +
    +
    +
    +     + +     + + + +
    +
    +
    +
    +
    + + Ventas +
    +
    +
    +
    +
    +
    +
    +
    + +
    + +
    + + +
    +
    +
    +
    +
    +
    +
    +
    +
    +
    + + ACTIVO FIJO ASIGNADO +
    +
    +
    +
    +
    +
    +
    +
    + + + + + + + + + + + + + +
    +
    +
    +
    +
    +     +     + + + +
    +
    +
    + + Personal Asignado +
    +
    +
    +
    +
    +
    +
    +
    + + + + N° + + + + + + Personal + +   + + + + Genero + +   + + + + Turno + +   + + + + Departamento + +   + + + + Puesto + +   + + + + Estatus + + + + + + + + + +
    +
    +
    +
    +
    +
    +
    +
    + + Consultar Asistencias +
    +
    +
    +
    +
    +
    +
    +
    +
    Fecha Inicial: -
    - - - - - - - - - - -
    -
    -
    + +
    + + + + + + + + + + +
    +
    +
    Fecha Final: -
    - - - - - - - - - - -
    -
    -
    - -
    -
    - -
    - - - - - Fecha - - - - - - Asistencia - -   - - - - % Pago - - - - - - Horas Dobles - - - - - - Horas Triples - - - - - - Motivo Horas Extras - -   - - - - Observaciones - -   - - - - - - - -
    -
    -
    -
    -
    - -     -     - - - - +
    +
    +
    + + + + + + + - - - - - - -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    - - - - - - - - - - - - - - - - - - - - - - - - - - -     -     - - - - -
    -
    -
    - - Contratos Activos -
    -
    -
    -
    -
    -
    -
    -
    -
    -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    -
    - - - - -
    - - - - - - - - -
    Clasificación Contratado Avance Faltante Avance Por Facturar
    -
    - - - - - - - - - - - - -     -     -
    -
    -
    - -
    -
    - -
    -
    -
    - - Historial de Contratos -
    -
    -
    -
    -
    -
    -
    -
    -
    -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    -
    - - - - -
    - - - - - - - - -
    Clasificación Contratado Avance Faltante Avance Por Facturar
    -
    - - - - - - - - - - - - - -     -     -
    -
    -
    - -     -     - - - -
    -
    -
    -
    -
    - - Sistema -
    -
    -
    -
    -
    -
    -
    -
    + --%> + + +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    +
    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    + + + + + + +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    + + + + + + + + + + + + + + + + + + + + + + + + + + +     +     + + + + +
    +
    +
    + + Contratos Activos +
    +
    +
    +
    +
    +
    +
    +
    +
    +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    +
    + + + + +
    + + + + + + + + +
    Clasificación Contratado Avance Faltante Avance Por Facturar
    +
    + + + + + + + + + + + + +     +     +
    +
    +
    + +
    +
    + +
    +
    +
    + + Historial de Contratos +
    +
    +
    +
    +
    +
    +
    +
    +
    +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    +
    + + + + +
    + + + + + + + + +
    Clasificación Contratado Avance Faltante Avance Por Facturar
    +
    + + + + + + + + + + + + + +     +     +
    +
    +
    + +     +     + + + +
    +
    +
    +
    +
    + + Sistema +
    +
    +
    +
    +
    +
    +
    +
    Estado: - -
    -
    + + +
    +
    Fecha de Captura: - -
    -
    + + +
    +
    Usuario Capturó: - -
    -
    -
    -
    - - - -
    -
    -
    -
    - - Acceso a Portal del Cliente -
    -
    -
    -
    -
    -
    -
    -
    -
    -
    + + +
    +
    +
    +
    + + + +
    +
    +
    +
    + + Acceso a Portal del Cliente +
    +
    +
    +
    +
    +
    +
    +
    +
    +
    Usuario Activo: - - - -
    - + + + + +
    + Usuario: -
    -
    -
    + +
    +
    +
    Enviar Activación: - - -
    -
    + + + +
    +
    Desactivar Usuario: - -
    -
    - -
    -
    - - - Permisos Admin: - - - - - - - - + + + + + +
    +
    + + + Permisos Admin: +
    - - - -
    + + + + + + + <%-- --%> + --%> <%-- --%> - - - - - - - - - + --%> + + + + + + + + + <%-- --%> + --%> <%----%> - - -
    + + + + - - -
    - - - - +
    + + + + - - -
    - - -     -     -
    - - -
    -
    -
    -
    -
    -     -     - -
    - - - -
    -
    -
    -
    -
    - - Usuarios del Portal -
    -
    -
    -
    -
    -
    -
    - - - - -
    - - - - - + +
    - + --%> + +
    + + + + + + + + + + + + + + + + + + + +
    +
    +
    +
    +
    + + Usuarios del Portal +
    +
    +
    +
    +
    +
    +
    + + + + + + + + + + + + + + + + + + + + + + +
    + + + + + - + - - - - - - - - - - - - + + + + + + + + + + + + - + - - - - - - - - - - - - - - - - - - - - -
    + Nombre - - - - + + + + + Correo/Usuario - - - - Compras - CxP - Anticip - R.H. - O.S. - Cotiza- - Sist - - - - - + + + + + Compras + CxP + Anticip + R.H. + O.S. + Cotiza- + Sist + + + + + Fecha - - - - + + + + + Usuario - - - Comandos
    - - - - - - - - - - - - - - - - -     - -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + +     		Comandos
    + + + + + + + + + + + + + + + + +     + +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + <%-- @@ -3524,2458 +3597,2479 @@ - --%> - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + --%> + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
      -
    -     - - -   + + + + +     - - - -     -     - - -     -
    -
    -
    -
    -
    -     -     - - - - - <%-- ---------------------------- --%> - <%-- Documentacion --%> - <%-- ---------------------------- --%> - - -
    - -
    - - -
    -
    -
    - - Documentación del Cliente -
    -
    -
    -
    -
    -
    - -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    - - - - - - - - - - -
    -     -     - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - + + + + + +     + + +     + + + +
    +
    +
    +
    +     + + +     + + + <%-- ---------------------------- --%> + <%-- Documentacion --%> + <%-- ---------------------------- --%> + + +
    + +
    + + +
    +
    +
    + + Documentación del Cliente +
    +
    +
    +
    +
    +
    + +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    + + + + + + + + + + +
    +     +     + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + <%-- - --%> -     -     - - -     -     - - - - - -
    -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    -
    -
    -
    - -
    -
    -     -     -
    - - - -
    -     -     - -
    -
    - -     -     - <%-- ---------------------------- --%> - <%-- Documentacion Fin --%> - <%-- ---------------------------- --%> - - - - - -
    -
    -
    - - -
    -
    -
    -
    + --%> + + + + + + + + + + + +
    +
    + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    +
    +
    +
    + +
    +
    +     +     +
    + + + +
    + + + +
    +
    + + + + <%-- ---------------------------- --%> + <%-- Documentacion Fin --%> + <%-- ---------------------------- --%> + + + + + +
    +
    +
    + + +
    +
    +
    +
    Fecha Inicio: -
    -
    -
    - - - - -
    - - - - -
    -
    + +
    +
    +
    + + + + +
    + + + + +
    +
    Fecha Fin: -
    -
    -
    - - - - -
    - - - - -
    - -
    - -
    - -
    - - - -
    - -
    - - - -
    - -
    - - - -
    -
    -
    -
    - -
    -     -     - - -
    -
    - - - - - - - - - - - - - - - -
    -
    -     -     - -     -     - - - - - - - -
    -
    -
    -
    -
    - - Usados resumen -
    -
    -
    -
    -
    -
    -
    - - - - - - - - - - - - + + +
    +
    + + + + +
    + + + + +
    + +
    + +
    + +
    + + + +
    + +
    + + + +
    + +
    + + + +
    + + + + + + + + + +
    +
    + + + + + + + + + + + + + + + +
    +
    +     +     + + + + + + + + + + +
    +
    +
    +
    +
    + + Usados resumen +
    +
    +
    +
    +
    +
    +
    + + + + +
    Puntos -
    Importe Cargo
    + + + + + + + - - - - + + + + + + - - - -
    Puntos +
    Importe Cargo $ - - -
    Importe Bonificación + +
    Importe Bonificación $ - - -
    - -     -     - - -
    -
    -
    -
    - - -
    -
    - - -
    -
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> -
    -
    - -
    - -
    - - -
    -
    -
    - - -
    -
    -
    -
    + + + + + + + + + + + + + +
    +
    +
    +
    + + +
    +
    + + +
    +
    + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    +
    + +
    + +
    + + +
    +
    +
    + + +
    +
    +
    +
    Fecha Inicio: -
    -
    -
    - - - - -
    - - - - -
    -
    + +
    +
    +
    + + + + +
    + + + + +
    +
    Fecha Fin: -
    -
    -
    - - - - -
    - - - - -
    -
    -
    -
    - -
    -     -     - - - - - - - - - - - - - - - - + +
    +
    +
    + + + + +
    + + + + +
    +
    +
    +
    + +
    +     +     + + + + + + + + + + + + + + + + <%-- - --%> - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    - -
    + --%> + + + + + + + + + + + + + + + + + + + + + + + + + + + +
    + +
    <%--
    -
    --%> - -
    - -
    - - -
    -
    -     -     - - - - - - - - - - - - -
    - - - - - - - - -
    - - +
    +
    + + <%-- MODAL BITACORA --%> + - <%-- FIN MODAL BITACORA --%> - - <%-- MODAL SUCURSAL --%> - - - <%-- MODAL DIRECCION ENVIO --%> - +
    +
    + <%-- FIN MODAL BITACORA --%> + + <%-- MODAL SUCURSAL --%> + + + <%-- MODAL DIRECCION ENVIO --%> + - <%-- FIN MODAL DIRECCION ENVIO--%> - - <%-- MODAL COMPARACION--%> - - <%-- FIN MODAL COMPARACION--%> - - <%-- MODAL IMPORTAR SALDOS --%> - + <%-- FIN MODAL IMPORTAR SALDOS --%> + + <%-- MODAL AGREGAR CUENTA EQUIPO --%> + + <%-- FIN MODAL AGREGAR CUENTA --%> + + <%-- MODAL CARGA DOCUMENTOS CLIENTE CXC --%> + + <%-- FIM MODAL CARGA DOCUMENTOS CXC --%> + + <%-- MODAL VISITAS CXC --%> + + + + + + + <%--MODAL ACTUALIZAR PERSONA FISICA--%> + + + + + + +
    +
    + + +
    +     + +
    +
    +
    + <%-- FIN MODAL MODIFICAR PRECIOS PS --%> +     + + + + + + + + + - - + + + - - - + + + diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb index 93b3af6a2..d3d25173e 100644 --- a/Ventas/Clientes.aspx.vb +++ b/Ventas/Clientes.aspx.vb @@ -820,6 +820,10 @@ Partial Class Clientes UpFiscalContable.Update() End If + If UsuarioActual.Empresa.Funcionalidad(579) = "1" Then + DivTipoRetenciones.Visible = True + End If + If Request("CveEmpresaCRM") IsNot Nothing AndAlso IsNumeric(Request("CveEmpresaCRM")) AndAlso Request("CveEmpresaCRM").ToEntero > 0 Then ViewState("CveEmpresaCRM") = Request("CveEmpresaCRM") CargaDatosCRM() @@ -1374,7 +1378,8 @@ Partial Class Clientes TxtGiro.Text = ObjClientes.Giro DdlPrecioLista.SelectedValue = ObjClientes.CvePrecioLista.ToString TxtCC.Text = ObjClientes.NotificarA - ChkMail.Checked = ObjClientes.EnviarFactura + ChkMail.Checked = ObjClientes.EnviarFactura + DdlTipoRetencion.SelectedValueExist(ObjClientes.DtResultados(0)("CveTipoRetencion").ToString) TxtRetIVA.Text = ObjClientes.RetIVA.ToString TxtRetISR.Text = ObjClientes.RetISR.ToString ChkRetIVAFletesAcarreos.Checked = ObjClientes.RetieneIVAFletes @@ -2411,7 +2416,7 @@ Partial Class Clientes CveFormaPago33:=DdlFormaPago33.SelectedValue.ToEntero, CveMetodoPago33:=DdlMetodoPago33.SelectedValue.ToEntero, DesglosaIEPS:=ChkDesglosarIEPS.Checked, AplicaComercioExterior:=ChkAplicaComercioExterior.Checked, CveTipoOperacion:=DdlTipoOperacion.SelectedValue.ToEntero, CvePedimento:=DdlClavePedimento.SelectedValue.ToEntero, CveIncoterm:=DdlIncoterm.SelectedValue.ToEntero, CvePais:=DdlPais.SelectedValue.ToEntero, CveEstado:=DdlEstado.SelectedValue.ToEntero, CveMunicipio:=DdlMunicipio.SelectedValue.ToEntero, CveColonia:=DdlColonia.SelectedValue.ToEntero, CveMotivoTraslado:=IIf(DdlMotivoTraslado.SelectedValue = "-1", "0", DdlMotivoTraslado.SelectedValue).ToString().ToEntero, NumRegIdTrib:=IIf(TxtNumRegIdTrib.Text = "", "-1", TxtNumRegIdTrib.Text).ToString(), ComExtEstado:=IIf(TxtComExtEstado.Text = "", "-1", TxtComExtEstado.Text).ToString(), ComExtMunicipio:=IIf(TxtComExtMunicipio.Text = "", "-1", TxtComExtMunicipio.Text).ToString(), ComExtColonia:=IIf(TxtComExtColonia.Text = "", "-1", TxtComExtColonia.Text).ToString(), RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked, - TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked) Then + TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero()) Then ViewState("CveCliente") = ObjClientes.CveCliente @@ -2505,7 +2510,8 @@ Partial Class Clientes AplicaComercioExterior:=ChkAplicaComercioExterior.Checked, CveTipoOperacion:=DdlTipoOperacion.SelectedValue.ToEntero, CvePedimento:=DdlClavePedimento.SelectedValue.ToEntero, CveIncoterm:=DdlIncoterm.SelectedValue.ToEntero, CvePais:=DdlPais.SelectedValue.ToEntero, CveEstado:=DdlEstado.SelectedValue.ToEntero, CveMunicipio:=DdlMunicipio.SelectedValue.ToEntero, CveColonia:=DdlColonia.SelectedValue.ToEntero, CveMotivoTraslado:=IIf(DdlMotivoTraslado.SelectedValue = "-1", "0", DdlMotivoTraslado.SelectedValue).ToString().ToEntero, NumRegIdTrib:=IIf(TxtNumRegIdTrib.Text = "", "-1", TxtNumRegIdTrib.Text).ToString(), ComExtEstado:=IIf(TxtComExtEstado.Text = "", "-1", TxtComExtEstado.Text).ToString(), ComExtMunicipio:=IIf(TxtComExtMunicipio.Text = "", "-1", TxtComExtMunicipio.Text).ToString(), ComExtColonia:=IIf(TxtComExtColonia.Text = "", "-1", TxtComExtColonia.Text).ToString(), - ApellidoPaternoPF:=IIf(TxtApellidoPaterno.Text = "", "-1", TxtApellidoPaterno.Text).ToString(), ApellidoMaternoPF:=IIf(TxtApellidoMaterno.Text = "", "-1", TxtApellidoMaterno.Text).ToString(), NombresPF:=IIf(TxtNombres.Text = "", "-1", TxtNombres.Text).ToString(), RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked) Then + ApellidoPaternoPF:=IIf(TxtApellidoPaterno.Text = "", "-1", TxtApellidoPaterno.Text).ToString(), ApellidoMaternoPF:=IIf(TxtApellidoMaterno.Text = "", "-1", TxtApellidoMaterno.Text).ToString(), NombresPF:=IIf(TxtNombres.Text = "", "-1", TxtNombres.Text).ToString(), + RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero, CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero()) Then ObjClientes.LimpiaImpuestosLocales(CveCliente) @@ -9934,6 +9940,6 @@ Partial Class Clientes Acum.Dispose() End Sub -#End Region +#End Region End Class diff --git a/Ventas/PV.aspx.vb b/Ventas/PV.aspx.vb index e00126eae..9b317a159 100644 --- a/Ventas/PV.aspx.vb +++ b/Ventas/PV.aspx.vb @@ -5018,7 +5018,7 @@ Partial Class PV Private Sub CargaAjuste() Dim ObjAcum As New ClsAcumuladores - If ObjAcum.FoliosGarantiaGet(-1, UsuarioActual.CveEmpresa) Then + If ObjAcum.FoliosGarantiaGet(-1, UsuarioActual.CveEmpresa, 1) Then DdlFolioGarantia.DataSource = ObjAcum.DtResultados DdlFolioGarantia.Items.Insert(0, New ListItem("Seleccione", "-1")) End If diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx index 6fa1b3ceb..9a676f7a0 100644 --- a/Ventas/Ventas.aspx +++ b/Ventas/Ventas.aspx @@ -812,7 +812,7 @@ - +
    Turno: @@ -1367,9 +1367,20 @@ Ret. IVA: - + + -  (%) +  (%) + + + + + + + + + + @@ -3240,11 +3251,8 @@ - Kilometraje  - - - - + Kilometraje  +
    diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 1765b3c67..6f7cd833e 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -2523,7 +2523,8 @@ Partial Class Ventas DivDdlCuentaTarjetaCredito.Attributes.Add("class", "col-md-4") DivContadoOtros.Visible = True TrKilometraje.Visible = True - TrKilometrajeTxt.Visible = True + TrPedido.Visible = False + ' TrKilometrajeTxt.Visible = True End If End If @@ -2582,8 +2583,9 @@ Partial Class Ventas LkbEstadodeCaja.Visible = True LkbIngreso.Visible = True LkbRetiro.Visible = True - UpTurno.Update() + UpTurno.Visible = True Else + UpTurno.Visible = False 'Ingresar un nuevo Turno RegistraScript("window.onload = function MuestraCorteCaja() { document.getElementById(""C_btnShow"").click(); }") End If @@ -4111,6 +4113,7 @@ Partial Class Ventas 'Sección Detalle DdlMoneda.Enabled = False + DdlTipoRetencion.Enabled = False TxtFechaEjecucion.ReadOnly = True ImgCalendarFechaEje.Enabled = False 'DdlSucursalEjecucion.Enabled = False @@ -4699,6 +4702,9 @@ Partial Class Ventas ViewState("ClienteRetIVA") = ObjCliente.RetIVA / 100 ViewState("ClienteRetISR") = ObjCliente.RetISR / 100 + DdlTipoRetencion.SelectedValueExist(ObjCliente.DtResultados(0)("CveTipoRetencion").ToString) + DdlTipoRetencion_SelectedIndexChanged(DdlTipoRetencion, EventArgs.Empty) + ViewState("RetIVAFletes") = ObjCliente.RetieneIVAFletes If ObjCliente.RetieneIVAFletes Then TrRetIVA.Style.Add("display", "") @@ -5920,6 +5926,20 @@ Partial Class Ventas Dim TotalCalculableImpuestosIVA As Decimal = 0 TotalCalculableImpuestosIVA = TotalCalculableImpuestos * (1 + TmpDT.Rows(e.RowIndex)("PorcentajeIEPS").ToString.ToDecimal) + Dim ClienteRetIVA = Me.ClienteRetIVA + If UsuarioActual.Empresa.Funcionalidad(579) = "1" Then + If DdlTipoRetencion.SelectedValue.Contiene("1", "2") Then + ClienteRetIVA = 0.1D + ElseIf DdlTipoRetencion.SelectedValue.Contiene("3") Then + ClienteRetIVA = 0.04D + ElseIf DdlTipoRetencion.SelectedValue.Contiene("4") Then + ClienteRetIVA = 0.06D + End If + + LblRetIVA.Text = (ClienteRetIVA * 100).FormatoNumero + DdlTipoRetencion.Visible = True + End If + TmpDT.Rows(e.RowIndex)("CveUM") = GvPS.Rows(e.RowIndex).FCDropDownList("DdlUnidadMedida").SelectedValue.ToEntero TmpDT.Rows(e.RowIndex)("UM") = GvPS.Rows(e.RowIndex).FCDropDownList("DdlUnidadMedida").SelectedItem.Text @@ -6462,22 +6482,32 @@ Partial Class Ventas End If 'Valida si en caso de que el detalle tenga llantas o polizas se agreguén kilometraje/serie en la parte de observaciones(solo para el caso de empresas llanteras) If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then + + If txtkilometraje.text.toentero = 0 Then + 'cuando es la clasificacion de llantas + Dim FaltaObservacion As Integer = TmpDT.FiltroPrimeroValor("CveClasificacion", "CveClasificacion = 20342").ToEntero + If FaltaObservacion = 20342 Then + Alert("No se ha especificado el kilometraje.", TipoMensaje.MsgAdvertencia) + Exit Sub + End If + + End If + If TxtObsFact.Text = "" Then Dim FaltaObservacion As Integer = -1 - For Each PS As GridViewRow In GvPS.Rows - Dim PsRenglon As GridViewRow = PS - Dim CveClasificacion As Integer = PsRenglon.DataKey("CveClasificacion").ToEntero - If CveClasificacion = 20345 Or CveClasificacion = 20342 Then - FaltaObservacion = CveClasificacion - Exit For - End If - Next + 'For Each PS As GridViewRow In GvPS.Rows + ' Dim PsRenglon As GridViewRow = PS + ' Dim CveClasificacion As Integer = PsRenglon.DataKey("CveClasificacion").ToEntero + ' If CveClasificacion = 20345 Or CveClasificacion = 20342 Then + ' FaltaObservacion = CveClasificacion + ' Exit For + ' End If + ' + FaltaObservacion = TmpDT.FiltroPrimeroValor("CveClasificacion", "CveClasificacion = 20345").ToEntero + 'cuando es la clasificacion de polizas If FaltaObservacion = 20345 Then Alert("No se ha especificado la serie para la poliza en la sección de Observaciones", TipoMensaje.MsgAdvertencia) Exit Sub - ElseIf FaltaObservacion = 20342 Then - Alert("No se ha especificado el kilometraje para la llanta en el sección de Observaciones", TipoMensaje.MsgAdvertencia) - Exit Sub End If End If End If @@ -7581,10 +7611,10 @@ Partial Class Ventas End Function - Private Sub CreaObjetosVenta(Optional VistaPrevia As Boolean = False) + Private Sub CreaObjetosVenta(Optional VistaPrevia As Boolean = False, Optional EsCancelacion As Boolean = False) If Me.CveVenta > 0 AndAlso NuevaFactura <> 1 Then - ObjFactura = New Modelos.Factura(UsuarioActual, CveVenta, UsuarioActual.CveEmpresa) + ObjFactura = New Modelos.Factura(UsuarioActual, CveVenta, UsuarioActual.CveEmpresa, EsCancelacion:=EsCancelacion) Else ObjFactura = New Modelos.Factura End If @@ -9125,7 +9155,7 @@ Partial Class Ventas CveVentaRelacion:=(If(factura.CveVentaRelacion.ToEntero > 0, factura.CveVentaRelacion, -1)), ImporteRelacion:=(If(factura.ImporteRelacion <> Nothing, factura.ImporteRelacion, -1)), CveTipoAmortizacionAnticipo:=factura.CveTipoAmortizacionAnticipo, CveEmpresaCRM:=CveEmpresaCRM, EsInterno:=EsInterno, CveAcercamientoCRM:=CveAcercamientoCRM, DiasCredito:=factura.DiasCredito, EsDiasCreditoFijo:=factura.EsDiasCreditoFijo, AnticipoEspecial:=If(TrAntEspecial.Visible, ChkAntEspecial.Checked, False), - Kilometraje:=If(TrKilometrajeTxt.Visible AndAlso IsNumeric(TxtKilometraje.Text), TxtKilometraje.Text.ToDouble, -1)) Then + Kilometraje:=TxtKilometraje.Text.todouble) Then ErrorList.Add("Ocurrió un error al Generar la Venta.
    Revise su factura y cualquier detalle comuníquese a Soporte Técnico") @@ -14215,6 +14245,20 @@ Partial Class Ventas Row("PorcentajeIVA") = DrPS("IVA") End If + Dim ClienteRetIVA = Me.ClienteRetIVA + If UsuarioActual.Empresa.Funcionalidad(579) = "1" Then + If DdlTipoRetencion.SelectedValue.Contiene("1", "2") Then + ClienteRetIVA = 0.1D + ElseIf DdlTipoRetencion.SelectedValue.Contiene("3") Then + ClienteRetIVA = 0.04D + ElseIf DdlTipoRetencion.SelectedValue.Contiene("4") AndAlso DrPS("CveTipoPS").ToString().ToEntero() = 1 Then + ClienteRetIVA = 0.06D + End If + + LblRetIVA.Text = (ClienteRetIVA * 100).FormatoNumero + DdlTipoRetencion.Visible = True + End If + Row("IVA") = Row("PorcentajeIVA") Row("ImporteIVA") = Math.Round(Row("PorcentajeIVA").ToString.ToDecimal * TotalCalculableImpuestosIVA, NumeroDecimales) Row("ImporteRetIVA") = Math.Round(ClienteRetIVA * TotalCalculableImpuestos, NumeroDecimales) @@ -14276,7 +14320,7 @@ Partial Class Ventas 'AGREGA PS ADICIONAL - If UsuarioActual.Empresa.Funcionalidad(561).ToString = "1" AndAlso Not UsuarioActual.TienePermisoProceso(284) AndAlso GlobalDTPSAdicionales(CvePS, UsuarioActual.CveEmpresa).Rows.Count > 0 AndAlso Not SeActualiza Then + If UsuarioActual.Empresa.Funcionalidad(561).ToString = "1" AndAlso Not UsuarioActual.TienePermisoProceso(285) AndAlso GlobalDTPSAdicionales(CvePS, UsuarioActual.CveEmpresa).Rows.Count > 0 AndAlso Not SeActualiza Then For Each Dr As DataRow In GlobalDTPSAdicionales(CvePS, UsuarioActual.CveEmpresa).Rows Dim CvePSAdicional As Integer = Dr("CvePSAdicional").ToString.ToEntero @@ -16408,7 +16452,7 @@ Partial Class Ventas Vigencia:=TxtFechaVencimientoCotizacion.Text.Trim.ToDate, CondicionesPago:=If(RBLPago.SelectedValue = "2", 0, 1), PedidoContrato:=TxtPedidoContrato.Text, AtencionA:=TxtAtencionA.Text.Trim, CveMetodoPago33:=DdlMetodoPago33.SelectedValue.ToEntero, CveFormaPago33:=DdlFormaPago33.SelectedValue.ToEntero, TipoDocto:="Rem", CveCliente:=CveCliente, CveClienteSucursal:=CveClienteSucursal, - OrdenCompra:=TxtOrdenCompra.Text, RetIVA:=TxtRetIVA.Text.ToDecimal, RetISR:=TxtRetISR.Text.ToDecimal, Kilometraje:=If(TrKilometrajeTxt.Visible AndAlso IsNumeric(TxtKilometraje.Text), TxtKilometraje.Text.ToDouble, -1)) Then + OrdenCompra:=TxtOrdenCompra.Text, RetIVA:=TxtRetIVA.Text.ToDecimal, RetISR:=TxtRetISR.Text.ToDecimal, Kilometraje:=TxtKilometraje.Text.ToDouble) Then OcurrioError = True End If @@ -18433,7 +18477,8 @@ Partial Class Ventas CancelarRefacturada() End If - CreaObjetosVenta() + CreaObjetosVenta(EsCancelacion:=True) + Dim resp As Modelos.Factura.MCancelacionVentaMensaje = Nothing If ObjFactura IsNot Nothing AndAlso ObjFactura.CveVenta > 0 Then @@ -18451,9 +18496,6 @@ Partial Class Ventas End If ObjFactura.CveAlmacenDevolucion = CveAlmacenDevolucion - If ChkDevAlm.Checked Then - ObjFactura.CveAlmacenDevolucion = CveAlmacenDevolucion - End If resp = ObjFactura.CancelarFactura(ChkDevAlm.Checked, ListaRemisionesCancelar) End If @@ -22080,7 +22122,7 @@ Partial Class Ventas Vigencia:=TxtFechaVencimientoCotizacion.Text.Trim.ToDate, CondicionesPago:=If(RBLPago.SelectedValue = "2", 0, 1), PedidoContrato:=TxtPedidoContrato.Text, AtencionA:=TxtAtencionA.Text.Trim, CveMetodoPago33:=DdlMetodoPago33.SelectedValue.ToEntero, CveFormaPago33:=DdlFormaPago33.SelectedValue.ToEntero, CveCliente:=CveCliente, CveClienteSucursal:=CveClienteSucursal, OrdenCompra:=TxtOrdenCompra.Text, RetIVA:=TxtRetIVA.Text.ToDecimal, RetISR:=TxtRetISR.Text.ToDecimal, - TipoDocto:=DdlTipoComprobante.SelectedValue, Kilometraje:=If(TrKilometrajeTxt.Visible AndAlso IsNumeric(TxtKilometraje.Text), TxtKilometraje.Text.ToDouble, -1)) Then + TipoDocto:=DdlTipoComprobante.SelectedValue, Kilometraje:=TxtKilometraje.Text.ToDouble) Then MensajeError = "Ocurrió un error al actualizar la información de la cotización" OcurrioError = True End If @@ -23857,10 +23899,12 @@ Partial Class Ventas CargaRNC() RegistraScript("$('#ModalAplicarRemisionesNC').modal({backdrop: 'static', keyboard: false });") End Sub + +#Region "P O L I Z A - V I R T U A L" Protected Sub GeneraPolizaVentaWS(ObjFactura As Modelos.Factura) Dim DtUsados As DataTable = Nothing Dim ObjAcum As New ClsAcumuladores - If ObjAcum.GetGarantiasDetalle(ObjFactura.CveVenta) Then + If ObjAcum.GetGarantiasPolizaVirtual(ObjFactura.CveVenta) Then DtUsados = ObjAcum.DtResultados.Copy() End If ObjAcum.Dispose() @@ -23984,5 +24028,39 @@ Partial Class Ventas Return Retorno End Function +#End Region + + Protected Sub DdlTipoRetencion_SelectedIndexChanged(sender As Object, e As EventArgs) + If UsuarioActual.Empresa.Funcionalidad(579) = "1" Then + If TmpDT IsNot Nothing AndAlso TmpDT.Rows.Count > 0 Then + For Each RowServicio As DataRow In TmpDT.Rows + Dim ClienteRetIVA = Me.ClienteRetIVA + If DdlTipoRetencion.SelectedValue.Contiene("1", "2") Then + ClienteRetIVA = 0.1D + ElseIf DdlTipoRetencion.SelectedValue.Contiene("3") Then + ClienteRetIVA = 0.04D + ElseIf DdlTipoRetencion.SelectedValue.Contiene("4") AndAlso RowServicio("CveTipoPS").ToString().ToEntero() = 1 Then + ClienteRetIVA = 0.06D + End If + + Dim TotalCalculableImpuestos As Decimal = (RowServicio("Cantidad").ToString().ToDecimal() * RowServicio("PU").ToString().ToDecimal()) - RowServicio("Descuento").ToString().ToDecimal() + RowServicio("ImporteRetIVA") = (TotalCalculableImpuestos * ClienteRetIVA).RoundSQL() + RowServicio("PorcentajeRetIVA") = ClienteRetIVA + + Next + TxtRetIVA.Text = TmpDT.SUM("ImporteRetIVA").ToDecimal().FormatoNumero(2) + Dim PorcentajeRetIVA = (TmpDT.MAX("PorcentajeRetIVA").ToDecimal() * 100) + LblRetIVA.Text = PorcentajeRetIVA.FormatoNumero(2) + If PorcentajeRetIVA > 0 Then + DdlTipoRetencion.Visible = True + End If + + GvPS.DataSource = TmpDT + GvPS.DataBind() + + UpPS.Update() + End If + End If + End Sub End Class \ No newline at end of file