From 413c5b56e1f60b2f2c0c342a2d7469a98fa13a95 Mon Sep 17 00:00:00 2001 From: Antonio Gonzalez Date: Thu, 21 Jan 2021 09:26:11 -0700 Subject: [PATCH] =?UTF-8?q?carga=20de=20trabajo=20sobre=20la=20retroalimen?= =?UTF-8?q?taci=C3=B3n?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- App_Code/ClsEncuestas.vb | 2 +- App_Code/ClsPaginas.vb | 1 + CRM/AsignarVendedorEnProspectos.aspx | 30 ++++++++++++++ CRM/AsignarVendedorEnProspectos.aspx.cs | 17 ++++++++ CRM/CatEmpresasCRM.aspx | 6 +-- CRM/CatEtapasProceso.aspx | 4 +- CRM/CatEtapasProceso.aspx.cs | 43 ++++++++----------- CRM/CatMediosCaptacion.aspx | 4 +- CRM/CatProbabilidadAcercamiento.aspx | 4 +- CRM/CatProbabilidadAcercamiento.aspx.cs | 4 +- CRM/CatTipoProceso.aspx | 4 +- CRM/CatTipoProceso.aspx.cs | 4 +- CRM/EmpresaCRM.aspx.cs | 7 +++- CRM/RepAcercamientos.aspx | 16 +++++++- CRM/RepAcercamientos.aspx.cs | 48 +++++++++++++++++++++- CRM/RepAcercamientosProcesos.aspx.cs | 30 +++++++++++++- CRM/RepAcercamientosRechazos.aspx.cs | 27 ++++++++++++ Prospeccion/PopUpBuscarProspectos.aspx | 50 +++++++++++------------ Prospeccion/PopUpBuscarProspectos.aspx.vb | 38 +++++++++-------- 19 files changed, 247 insertions(+), 92 deletions(-) create mode 100644 CRM/AsignarVendedorEnProspectos.aspx create mode 100644 CRM/AsignarVendedorEnProspectos.aspx.cs diff --git a/App_Code/ClsEncuestas.vb b/App_Code/ClsEncuestas.vb index edec3dd57..bafb08bd6 100644 --- a/App_Code/ClsEncuestas.vb +++ b/App_Code/ClsEncuestas.vb @@ -33,6 +33,7 @@ Public Class ClsEncuestas SqlConexion.ConnectionString = ConfigurationManager.ConnectionStrings("Conexion").ConnectionString Try SqlConexion.Open() + ConexionAdd() Catch ex As Exception OnError("Ocurrió un error al intentar conectarse a la base de datos.", ex) End Try @@ -42,7 +43,6 @@ Public Class ClsEncuestas End If SqlAdapter = New SqlDataAdapter("", SqlConexion) - ConexionAdd() End Sub Private Sub DataAdapter(StrSQL As String, Optional TipoComando As CommandType = CommandType.StoredProcedure) With SqlAdapter.SelectCommand diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index df2523887..507d7bc15 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -4453,6 +4453,7 @@ Public Class ClsPaginas PaginaDict.Add("/CRM/RepAcercamientosRechazos.aspx".ToUpper(), 1314) PaginaDict.Add("/CRM/RepAcercamientosProcesosDetalle.aspx".ToUpper(), 1313) PaginaDict.Add("/CRM/CatMetas.aspx".ToUpper(), 684) + PaginaDict.Add("/CRM/AsignarVendedorEnProspectos.aspx".ToUpper(), 695) #End Region #Region "CxC" diff --git a/CRM/AsignarVendedorEnProspectos.aspx b/CRM/AsignarVendedorEnProspectos.aspx new file mode 100644 index 000000000..1bc111064 --- /dev/null +++ b/CRM/AsignarVendedorEnProspectos.aspx @@ -0,0 +1,30 @@ +<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="AsignarVendedorEnProspectos.aspx.cs" Inherits="CRM_AsignarVendedorEnProspectos" %> + + + + + + + Asignar Vendedor a Prospectos + + + + + + + + + + + + + + + + + + + + \ No newline at end of file diff --git a/CRM/AsignarVendedorEnProspectos.aspx.cs b/CRM/AsignarVendedorEnProspectos.aspx.cs new file mode 100644 index 000000000..247372543 --- /dev/null +++ b/CRM/AsignarVendedorEnProspectos.aspx.cs @@ -0,0 +1,17 @@ +using System; +using System.Collections.Generic; +using System.Linq; +using System.Web; +using System.Web.UI; +using System.Web.UI.WebControls; +using System.Data; +using Microsoft.Reporting.WebForms; +using Extensiones; + +public partial class CRM_AsignarVendedorEnProspectos : ClsPaginas +{ + protected void Page_Load(object sender, EventArgs e) + { + + } +} \ No newline at end of file diff --git a/CRM/CatEmpresasCRM.aspx b/CRM/CatEmpresasCRM.aspx index c4391eec7..4d47b17ab 100644 --- a/CRM/CatEmpresasCRM.aspx +++ b/CRM/CatEmpresasCRM.aspx @@ -11,7 +11,7 @@
  • - Agregar Prospecto + Agregar
    • @@ -72,7 +72,7 @@ - + @@ -96,7 +96,7 @@ - + diff --git a/CRM/CatEtapasProceso.aspx b/CRM/CatEtapasProceso.aspx index 8dc6acbfb..1ec7ff0ef 100644 --- a/CRM/CatEtapasProceso.aspx +++ b/CRM/CatEtapasProceso.aspx @@ -13,7 +13,7 @@
  • - Agregar Etapas de Proceso + Agregar
  • PDF @@ -112,7 +112,7 @@ - + diff --git a/CRM/CatEtapasProceso.aspx.cs b/CRM/CatEtapasProceso.aspx.cs index 088df61d5..2fc3b29a8 100644 --- a/CRM/CatEtapasProceso.aspx.cs +++ b/CRM/CatEtapasProceso.aspx.cs @@ -132,19 +132,19 @@ public partial class CRM_CatEtapasProceso : ClsPaginas { if (EsEditar == 1) { - LtlModalTitulo.Text = "Actualizar Etapa del Proceso"; + //LtlModalTitulo.Text = "Actualizar Etapa del Proceso"; BtnGuardar.Text = "Actualizar"; DivEstatus.Visible = true; - + DdlTipoProceso.SelectedValueExist("-1"); DdlTipoProceso.Enabled = false; } else { - LtlModalTitulo.Text = "Agregar Etapa al Proceso"; + //LtlModalTitulo.Text = "Agregar Etapa al Proceso"; BtnGuardar.Text = "Guardar"; DivEstatus.Visible = false; - DdlTipoProceso.SelectedValueExist("1"); + DdlTipoProceso.SelectedValueExist("-1"); DdlTipoEtapa.SelectedValueExist("1"); DdlTipoProceso.Enabled = true; @@ -152,6 +152,7 @@ public partial class CRM_CatEtapasProceso : ClsPaginas TxtEtapaProceso.Text = ""; TxtDescripcion.Text = ""; ChkEstatus.Checked = true; + UPModal.Update(); } protected void CargaTiposProceso() @@ -203,6 +204,7 @@ public partial class CRM_CatEtapasProceso : ClsPaginas DivOrden.Visible = false; bloquearEtapasAnteriores(-1); DdlTipoProceso.SelectedValueExist(CveTipoProcesoSeleccionado); + //cargaEtapas(); DdlTipoEtapa.SelectedValueExist(CveTipoEtapaSeleccionada); UPModal.Update(); @@ -222,6 +224,11 @@ public partial class CRM_CatEtapasProceso : ClsPaginas bloquearEtapasAnteriores(GvRow.DataKey("CveTipoEtapa").ToEntero()); CveEtapaProceso = GvRow.DataKey("CveEtapaProceso").ToEntero(); DdlTipoProceso.SelectedValueExist(GvRow.DataKey("CveTipoProceso")); + + int CveTipoEtapaSeleccionado = GvRow.DataKey("CveTipoEtapa").ToEntero(); + DataTable EtapasDisponiblesEditar = DTEtapas.FiltraParametros(String.Format("CveTipoEtapa = {0} OR TipoEtapa = 'Proceso'", CveTipoEtapaSeleccionado)); + DdlTipoEtapa.DataSource = EtapasDisponiblesEditar; + DdlTipoEtapa.DataBind(); DdlTipoEtapa.SelectedValueExist(GvRow.DataKey("CveTipoEtapa")); TxtEtapaProceso.Text = GvRow.DataKey("EtapaProceso").ToString(); @@ -308,7 +315,7 @@ public partial class CRM_CatEtapasProceso : ClsPaginas //} // PRECARGAMOS LA SIGUIENTE ETAPA A AGREGAR CON LOS MISMA DATOS DE LA ETAPA QUE SE INSERTO - CveTipoProcesoSeleccionado = CveTipoProceso; + //CveTipoProcesoSeleccionado = CveTipoProceso; CveTipoEtapaSeleccionada = CveTipoEtapa; ObjCRM.Dispose(); @@ -421,40 +428,26 @@ public partial class CRM_CatEtapasProceso : ClsPaginas protected void DdlTipoProceso_Change(Object sender,EventArgs e) { + int CveTipoProcesoSeleccionado = DdlTipoProceso.SelectedValue.ToEntero(); DataTable EtapasIterable = DTEtapas.Copy(); + DataTable EtapasDefiniticas = DTEtapas.Copy(); DataTable EtapasAux = DTEtapas.Copy(); - int indice = 0; foreach (DataRow EtapaRow in EtapasIterable.Rows) { int CveTipoEtapa = EtapaRow["CveTipoEtapa"].ToEntero(); if (CveTipoEtapa != 2) { - int CantidadEtapas = TmpDT.FiltraParametros(String.Format("CveTipoProceso = {0} AND CveTipoEtapa = {1}",DdlTipoProceso.SelectedValue,EtapaRow["CveTipoEtapa"])).Rows.Count; - if(CantidadEtapas > 0) + int CantidadEtapas = TmpDT.FiltraParametros(String.Format("CveTipoProceso = {0} AND CveTipoEtapa = {1}", CveTipoProcesoSeleccionado, CveTipoEtapa)).Rows.Count; + if (CantidadEtapas > 0) { - EtapasAux.Rows.RemoveAt(indice); + EtapasAux = EtapasDefiniticas.FiltraParametros(String.Format("CveTipoEtapa <> {0}", CveTipoEtapa)); + EtapasDefiniticas = EtapasAux.Copy(); } - }else - { - indice++; } } - //for (int i = 1; i < CveTipoEtapa; i++) - //{ - // DataRow TipoEtapaRow = EtapasAux.Rows[indice]; - // int CveTipoEtapaAux = TipoEtapaRow["CveTipoEtapa"].ToEntero(); - // if (CveTipoEtapaAux == 2) - // { - // indice++; - // } - // else - // { - // EtapasAux.Rows.Remove(TipoEtapaRow); - // } - //} EtapasAux.AcceptChanges(); DdlTipoEtapa.DataSource = EtapasAux; diff --git a/CRM/CatMediosCaptacion.aspx b/CRM/CatMediosCaptacion.aspx index 5e733e2eb..44c28263a 100644 --- a/CRM/CatMediosCaptacion.aspx +++ b/CRM/CatMediosCaptacion.aspx @@ -13,7 +13,7 @@
  • - Agregar Medio de Captación + Agregar
    • @@ -60,7 +60,7 @@ - + diff --git a/CRM/CatProbabilidadAcercamiento.aspx b/CRM/CatProbabilidadAcercamiento.aspx index fed9a26a3..2cd1ec94e 100644 --- a/CRM/CatProbabilidadAcercamiento.aspx +++ b/CRM/CatProbabilidadAcercamiento.aspx @@ -13,7 +13,7 @@
  • - Agregar Probabilidad de Acercamiento + Agregar
  • PDF @@ -48,7 +48,7 @@ --%> - + diff --git a/CRM/CatProbabilidadAcercamiento.aspx.cs b/CRM/CatProbabilidadAcercamiento.aspx.cs index 2997bba1e..417402df1 100644 --- a/CRM/CatProbabilidadAcercamiento.aspx.cs +++ b/CRM/CatProbabilidadAcercamiento.aspx.cs @@ -104,13 +104,13 @@ public partial class CRM_CatProbabilidadAcercamiento : ClsPaginas { if (EsEditar == 1) { - LtlModalTitulo.Text = "Actualizar Probabilidad de Acercamiento"; + //LtlModalTitulo.Text = "Actualizar Probabilidad de Acercamiento"; BtnGuardar.Text = "Actualizar"; DivEstatus.Visible = true; } else { - LtlModalTitulo.Text = "Agregar Probabilidad de Acercamiento"; + //LtlModalTitulo.Text = "Agregar Probabilidad de Acercamiento"; BtnGuardar.Text = "Guardar"; DivEstatus.Visible = false; } diff --git a/CRM/CatTipoProceso.aspx b/CRM/CatTipoProceso.aspx index 8ce066a9f..221b3ae1d 100644 --- a/CRM/CatTipoProceso.aspx +++ b/CRM/CatTipoProceso.aspx @@ -13,7 +13,7 @@
  • - Agregar Tipo de Proceso + Agregar
  • PDF @@ -74,7 +74,7 @@ - + diff --git a/CRM/CatTipoProceso.aspx.cs b/CRM/CatTipoProceso.aspx.cs index 2058a867d..5f00ba584 100644 --- a/CRM/CatTipoProceso.aspx.cs +++ b/CRM/CatTipoProceso.aspx.cs @@ -73,13 +73,13 @@ public partial class CRM_CatTipoProceso : ClsPaginas { if (EsEditar == 1) { - LtlModalTitulo.Text = "Actualizar Tipo de Proceso"; + //LtlModalTitulo.Text = "Actualizar Tipo de Proceso"; BtnGuardar.Text = "Actualizar"; DivEstatus.Visible = true; } else { - LtlModalTitulo.Text = "Agregar Tipo de Proceso"; + //LtlModalTitulo.Text = "Agregar Tipo de Proceso"; BtnGuardar.Text = "Guardar"; DivEstatus.Visible = false; } diff --git a/CRM/EmpresaCRM.aspx.cs b/CRM/EmpresaCRM.aspx.cs index 8c2874e1b..abb4a55a9 100644 --- a/CRM/EmpresaCRM.aspx.cs +++ b/CRM/EmpresaCRM.aspx.cs @@ -239,7 +239,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas CreoCliente = false; RecuperaCve(); CargaTipoProceso(); - //CargaMetodosCaptacion(); + CargaMetodosCaptacion(); CargaVendedores(); CargaSucursales(); CargarTiposEventos(); @@ -570,14 +570,16 @@ public partial class CRM_EmpresaCRM : ClsPaginas if (ObjCRM.GetTipoProceso(UsuarioActual.CveEmpresa)) { DdlTipoPrceso2.DataSource = ObjCRM.DtResultados; + DdlTipoPrceso2.Items.Insert(0, new ListItem("Seleccione","-1")); } DdlTipoPrceso2.DataBind(); + ObjCRM.Dispose(); } protected void CargaMetodosCaptacion() { ClsCRM ObjCRM = new ClsCRM(); - if (ObjCRM.GetMedioCaptacion(UsuarioActual.CveEmpresa, 1)) + if (ObjCRM.GetMedioCaptacion(UsuarioActual.CveEmpresa, -1)) { DdlMedioCaptacion.DataSource = ObjCRM.DtResultados.FiltraParametros(String.Format("CveTipoProceso = {0}", DdlTipoPrceso2.SelectedValue)); DdlMedioCaptacion.Items.Insert(0, new ListItem("Seleccione ", "-1")); @@ -758,6 +760,7 @@ public partial class CRM_EmpresaCRM : ClsPaginas else { ObjCRM.RollBack(); } ObjCRM.Dispose(); + objDatosTecnicos.Dispose(); } #endregion diff --git a/CRM/RepAcercamientos.aspx b/CRM/RepAcercamientos.aspx index 7b6db4b54..f3f14be4a 100644 --- a/CRM/RepAcercamientos.aspx +++ b/CRM/RepAcercamientos.aspx @@ -10,6 +10,20 @@ + + +
  • + +
    • +
  • + +
    • +     + + + + +     @@ -54,7 +68,7 @@ - +
    diff --git a/CRM/RepAcercamientos.aspx.cs b/CRM/RepAcercamientos.aspx.cs index 1eef821ff..07844b84b 100644 --- a/CRM/RepAcercamientos.aspx.cs +++ b/CRM/RepAcercamientos.aspx.cs @@ -6,6 +6,7 @@ using System.Web.UI; using System.Web.UI.WebControls; using Extensiones; using System.Data; +using Microsoft.Reporting.WebForms; public partial class CRM_RepAcercamientos : ClsPaginas { @@ -22,6 +23,18 @@ public partial class CRM_RepAcercamientos : ClsPaginas ViewState["CveVendedor"] = value; } } + private DataTable DtDatos + { + get + { + return (ViewState["DtDatos"] == null ? null : (DataTable)ViewState["DtDatos"]); + } + + set + { + ViewState["DtDatos"] = value; + } + } #endregion protected void Page_Load(object sender, EventArgs e) @@ -49,6 +62,7 @@ public partial class CRM_RepAcercamientos : ClsPaginas if (ObjCRM.GetAcercamiento(UsuarioActual.CveEmpresa, CveVendedor: CveVendedor, FechaInicio: FechaInicio, FechaFin: FechaFin, CvePS: CvePS, CveGiroClasificacion:DdlGiroClasificacion.SelectedValue.ToEntero())) { GVDatos.DataSource = ObjCRM.DtResultados; + DtDatos = ObjCRM.DtResultados; GVDatos.DataBind(); } @@ -78,13 +92,43 @@ public partial class CRM_RepAcercamientos : ClsPaginas //CALCULAMOS EL INTERVALO DE LA SEMANA ACTUAL TxtFechaInicio.Text = DateTime.Now.AddDays(-((int)DateTime.Now.DayOfWeek) + 1).ToShortDateString(); - //TxtFechaFin.Text = DateTime.Now.AddDays((7 - (int)DateTime.Now.DayOfWeek)).ToShortDateString(); + TxtFechaFin.Text = DateTime.Now.AddDays((7 - (int)DateTime.Now.DayOfWeek)).ToShortDateString(); DdlPS.setEsWebService(true); - + DdlPS.SelectedValue = "-1"; + DdlPS.SelectedText = "Seleccione"; DataTable dtGiroClasificaciones = get_GlobalDTClienteClasificaciones(UsuarioActual.CveEmpresa); DdlGiroClasificacion.DataSource = dtGiroClasificaciones; DdlGiroClasificacion.DataBind(); DdlGiroClasificacion.Items.Insert(0, new ListItem("Seleccione", "-1")); } #endregion + + protected void LnkPDF_Click(object sender, EventArgs e) + { + Imprimir("PDF"); + } + + protected void LnkExcel_Click(object sender, EventArgs e) + { + Imprimir("Excel"); + } + + private void Imprimir(string formato) + { + string VendedorFiltro = String.Format("Vendedor: {0}    ", (DdlVendedor.SelectedValue != "-1" ? DdlVendedor.SelectedItem.Text : "Todos")); + string ProductoServicioFiltro = String.Format("Producto Servicio: {0}    ", (DdlPS.SelectedValue != "-1" ? DdlPS.SelectedText : "Todos")); + string GiroFiltro = String.Format("Giro: {0}    ", (DdlGiroClasificacion.SelectedValue != "-1" ? DdlGiroClasificacion.SelectedItem.Text : "Todos")); + string FechaInicioFiltro = String.Format("Fecha Inicio: {0}    ", TxtFechaInicio.Text); + string FechaFinFiltro = String.Format("Fecha Fin: {0}    ", TxtFechaFin.Text); + + string Filtros = String.Format("{0}{1}{2}{3}{4}", VendedorFiltro, FechaInicioFiltro, FechaFinFiltro, ProductoServicioFiltro, GiroFiltro); + + List @params = new List(); + @params.Add(new ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa)); + @params.Add(new ReportParameter("LogoPath", new Uri(Server.MapPath(string.Format("~/Empresas/{0}/Logo.png", UsuarioActual.CveEmpresa))).AbsoluteUri)); + @params.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Usuario)); + @params.Add(new ReportParameter("AgrupadoPor", Filtros)); + + ImprimirPDF("Empresas/Grales/Formatos/RepAcercamientos.rdlc", DtDatos, @params, "Reporte de Acercamientos", formato); + } } \ No newline at end of file diff --git a/CRM/RepAcercamientosProcesos.aspx.cs b/CRM/RepAcercamientosProcesos.aspx.cs index 59588035e..241ff91d7 100644 --- a/CRM/RepAcercamientosProcesos.aspx.cs +++ b/CRM/RepAcercamientosProcesos.aspx.cs @@ -393,7 +393,7 @@ public partial class CRM_RepAcercamientosProcesos : ClsPaginas doc.Add(header); Paragraph Filtros = this.filtrosDelReporte(); doc.Add(Filtros); - PdfPTable table = this.convertirReporteATabla(); + PdfPTable table = this.convertirReporteATabla(doc); doc.Add(table); doc.Close(); @@ -533,12 +533,15 @@ public partial class CRM_RepAcercamientosProcesos : ClsPaginas return Filtros; } - private PdfPTable convertirReporteATabla() + private PdfPTable convertirReporteATabla(Document doc) { int numeroDeColumnas = GVRepAcercamientosEtapas.Columns.Count; PdfPTable table = new PdfPTable(numeroDeColumnas); table.WidthPercentage = 100f; + float[] anchoColumnas = this.ColumnasWidth(); + table.SetWidths(anchoColumnas); + BaseColor headerBackGroundColor = new BaseColor(240,240,240); Font fuente = FontFactory.GetFont("Arial", 9f); @@ -568,6 +571,29 @@ public partial class CRM_RepAcercamientosProcesos : ClsPaginas return table; } + private float[] ColumnasWidth() + { + int CantidadColumnas = GVRepAcercamientosEtapas.Columns.Count; + float[] ColumnsWidth = new float[CantidadColumnas]; + + int cursor = 0; + DataControlFieldCollection ColumnsCollection = GVRepAcercamientosEtapas.Columns; + foreach (DataControlField columns in ColumnsCollection) + { + if (columns.HeaderText == "Total") + { + ColumnsWidth[cursor] = 20f; + }else + { + ColumnsWidth[cursor] = 80f; + } + + cursor++; + } + + return ColumnsWidth; + } + protected void LnkExcel_Click(object sender, EventArgs e) { GVRepAcercamientosEtapas.ExportToExcelGembox("Reporte de Rechazos de Acercamiento", UsuarioActual, "", "", "Reporte de Rechazos de Acercamiento", "", -1); diff --git a/CRM/RepAcercamientosRechazos.aspx.cs b/CRM/RepAcercamientosRechazos.aspx.cs index 2ab4f2746..ea1d906c8 100644 --- a/CRM/RepAcercamientosRechazos.aspx.cs +++ b/CRM/RepAcercamientosRechazos.aspx.cs @@ -520,6 +520,9 @@ public partial class CRM_RepAcercamientosRechazos : ClsPaginas PdfPTable table = new PdfPTable(numeroDeColumnas); table.WidthPercentage = 100f; + //float[] anchoColumnas = this.ColumnasWidth(); + //table.SetWidths(anchoColumnas); + BaseColor headerBackGroundColor = new BaseColor(240, 240, 240); Font fuente = FontFactory.GetFont("Arial", 9f); @@ -550,6 +553,30 @@ public partial class CRM_RepAcercamientosRechazos : ClsPaginas return table; } + private float[] ColumnasWidth() + { + int CantidadColumnas = GVRepAcercamientosEtapas.Columns.Count; + float[] ColumnsWidth = new float[CantidadColumnas]; + + int cursor = 0; + DataControlFieldCollection ColumnsCollection = GVRepAcercamientosEtapas.Columns; + foreach (DataControlField columns in ColumnsCollection) + { + //if (columns.HeaderText == "Total") + //{ + // ColumnsWidth[cursor] = 20f; + //} + //else + //{ + // ColumnsWidth[cursor] = 80f; + //} + + cursor++; + } + + return ColumnsWidth; + } + protected void LnkExcel_Click(object sender, EventArgs e) { GVRepAcercamientosEtapas.ExportToExcelGembox("Reporte de Rechazos de Acercamiento", UsuarioActual, "", "", "Reporte de Rechazos de Acercamiento", "", -1); diff --git a/Prospeccion/PopUpBuscarProspectos.aspx b/Prospeccion/PopUpBuscarProspectos.aspx index d1038fbd9..936bffa8e 100644 --- a/Prospeccion/PopUpBuscarProspectos.aspx +++ b/Prospeccion/PopUpBuscarProspectos.aspx @@ -21,16 +21,14 @@ Filtros para búsqueda - Nombre: - Empresa: + RFC: + - Teléfono/Celular: - @@ -44,52 +42,52 @@
    - +
    Número de registros encontrados: 
    -
    - +
    + - + -
    +     - + -
    +     - <%----%> - + -
    +     - <%----%> - + -
    +     - <%----%> - + -
    +     - <%----%> - <%-- - --%> - + -
    +     - <%----%> + <%----%> + <%----%> + <%----%> + <%----%> + <%----%> + <%----%>
    diff --git a/Prospeccion/PopUpBuscarProspectos.aspx.vb b/Prospeccion/PopUpBuscarProspectos.aspx.vb index 971daf4b0..90b755c73 100644 --- a/Prospeccion/PopUpBuscarProspectos.aspx.vb +++ b/Prospeccion/PopUpBuscarProspectos.aspx.vb @@ -16,7 +16,7 @@ Partial Class PopUpBuscarProspectos CType(Me.Master, BaseMasterPage).EsPopup = True CType(Me.Master, BaseMasterPage).PopupWidth = 800 RegistraScript("$get('tdContenido').style.height='520px'") - TxtNombre.Focus() + 'TxtNombre.Focus() ViewState("Opt") = IfNull(Request("Opt"), "") @@ -31,29 +31,26 @@ Partial Class PopUpBuscarProspectos End Sub Protected Sub BtnBuscar_Click(sender As Object, e As System.EventArgs) Handles BtnBuscar.Click - Dim ObjProsp As New ClsProspectos() + Dim ObjCRM As New ClsCRM() - Dim Nombre As String = "-1" + Dim RFC As String = "-1" Dim NombreEmpresa As String = "-1" - Dim Celular As String = "-1" - - If TxtNombre.Text.Trim <> String.Empty Then Nombre = TxtNombre.Text.Trim - If TxtNombreEmpresa.Text.Trim <> String.Empty Then NombreEmpresa = TxtNombreEmpresa.Text.Trim - If txtCelular.Text.Trim <> String.Empty Then Celular = txtCelular.Text.Trim - - If ObjProsp.GetProspectosDetalle(-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, "-1", -1, Nombre, NombreEmpresa, Celular, UsuarioActual.CveEmpresa) Then - If ObjProsp.DtResultados.Rows.Count > 0 Then - LtlTotalRegistros.Text = ObjProsp.DtResultados.Rows.Count.ToString.FormatoNumero(0) - GV.DataSource = ObjProsp.DtResultados + If TxtRFC.Text.Trim <> String.Empty Then RFC = TxtRFC.Text.Trim + If TxtNombreEmpresa.Text.Trim <> String.Empty Then NombreEmpresa = TxtNombreEmpresa.Text.Trim + + If ObjCRM.GetEmpresasCRM(UsuarioActual.CveEmpresa, -1, NombreEmpresa, RFC) Then + If ObjCRM.DtResultados.Rows.Count > 0 Then + LtlTotalRegistros.Text = ObjCRM.DtResultados.Rows.Count.ToString.FormatoNumero(0) + GV.DataSource = ObjCRM.DtResultados Else LtlTotalRegistros.Text = "0" GV.DataSource = Nothing - Alert("No se encontraron registros con losparámetros solicitados.", Extensiones.TipoMensaje.MsgAdvertencia) + Alert("No se encontraron registros con los parámetros solicitados.", Extensiones.TipoMensaje.MsgAdvertencia) End If End If - ObjProsp.Dispose() + ObjCRM.Dispose() GV.DataBind() UPDatos.Update() TblBusqueda.Visible = True @@ -62,12 +59,17 @@ Partial Class PopUpBuscarProspectos Protected Sub GV_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GV.RowDataBound If e.Row.RowType = DataControlRowType.DataRow Then If e.Row.RowIndex = 0 Then - 'e.Row.Cells(0).Width = Unit.Pixel(250) - 'e.Row.Cells(1).Width = Unit.Pixel(80) + e.Row.Cells(0).Width = Unit.Pixel(250) + e.Row.Cells(1).Width = Unit.Pixel(80) End If e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Left - e.Row.FCHyperLink("Hpl").Attributes.Add("onclick", String.Format("Ir('/Prospeccion/Prospectos.aspx?CveProspecto={0}')", e.Row.DBCampo("CveProspecto"))) + e.Row.FCHyperLink("Hpl").Attributes.Add("onclick", String.Format("Ir('/CRM/EmpresaCRM.aspx?CveEmpresaCRM={0}')", e.Row.DBCampo("CveEmpresaCRM"))) + e.Row.FCHyperLink("Hp2").Attributes.Add("onclick", String.Format("Ir('/CRM/EmpresaCRM.aspx?CveEmpresaCRM={0}')", e.Row.DBCampo("CveEmpresaCRM"))) + e.Row.FCHyperLink("Hp3").Attributes.Add("onclick", String.Format("Ir('/CRM/EmpresaCRM.aspx?CveEmpresaCRM={0}')", e.Row.DBCampo("CveEmpresaCRM"))) + e.Row.FCHyperLink("Hp4").Attributes.Add("onclick", String.Format("Ir('/CRM/EmpresaCRM.aspx?CveEmpresaCRM={0}')", e.Row.DBCampo("CveEmpresaCRM"))) + e.Row.FCHyperLink("Hp5").Attributes.Add("onclick", String.Format("Ir('/CRM/EmpresaCRM.aspx?CveEmpresaCRM={0}')", e.Row.DBCampo("CveEmpresaCRM"))) + e.Row.FCHyperLink("Hp6").Attributes.Add("onclick", String.Format("Ir('/CRM/EmpresaCRM.aspx?CveEmpresaCRM={0}')", e.Row.DBCampo("CveEmpresaCRM"))) End If End Sub End Class