RepAgendaBitacora filtro Tipos de OI CRM

This commit is contained in:
Oscar Irigoyen
2023-02-08 19:41:36 -07:00
parent 19e7f561e1
commit fda80d2018
3 changed files with 12 additions and 2 deletions

View File

@@ -1173,7 +1173,7 @@ Public Class ClsCRM
Public Function RepAgendasBitacoras(CveEmpresa As Integer, CveVendedor As Integer, CveTipoProceso As Integer, FechaInicio As Date, FechaFin As Date) As Boolean
Public Function RepAgendasBitacoras(CveEmpresa As Integer, CveVendedor As Integer, CveTipoProceso As Integer, FechaInicio As Date, FechaFin As Date, Optional CveTipoEvento As Integer = -1) As Boolean
Dim retorno As Boolean = False
DataAdapter("PA_CRM_RepAgendasBitacoras", CommandType.StoredProcedure)
With SqlAdapter.SelectCommand.Parameters
@@ -1183,6 +1183,7 @@ Public Class ClsCRM
.Add("@CveTipoProceso", SqlDbType.Int).Value = CveTipoProceso
.Add("@FechaInicio", SqlDbType.Date).Value = FechaInicio
.Add("@FechaFin", SqlDbType.Date).Value = FechaFin
.Add("@CveTipoEvento", SqlDbType.Int).Value = CveTipoEvento
End With

View File

@@ -71,6 +71,15 @@
<ajax:CalendarExtender runat="server" ID="CEFechaSolicitudF" TargetControlID="TxtFechaFin" PopupButtonID="imgFechaFin" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
</div>
<label class="col-md-1" >Tipo Evento:</label>
<div class="col-md-1">
<asp:DropDownList ID="DdlTipoEvento" Width="100%" runat="server" CssClass="form-control input-sm select2me" >
<asp:ListItem Value="-1">Todos</asp:ListItem>
<asp:ListItem Value="6">Bitácora</asp:ListItem>
<asp:ListItem Value="2">Agenda</asp:ListItem>
</asp:DropDownList>
</div>

View File

@@ -38,7 +38,7 @@ public partial class CRM_AgendasBitacoras : ClsPaginas
ClsCRM ObjCRM = new ClsCRM();
//nt CveEmpresa, int CveVendedor, int CveTipoProceso, DateTime FechaInicio, DateTime FechaFin
if (ObjCRM.RepAgendasBitacoras(UsuarioActual.CveEmpresa, DdlVendedor.SelectedValue.ToEntero(),DdlTipoProceso.SelectedValue.ToEntero(), TxtFechaInicio.Text.ToDate(), TxtFechaFin.Text.ToDate()))
if (ObjCRM.RepAgendasBitacoras(UsuarioActual.CveEmpresa, DdlVendedor.SelectedValue.ToEntero(),DdlTipoProceso.SelectedValue.ToEntero(), TxtFechaInicio.Text.ToDate(), TxtFechaFin.Text.ToDate(), CveTipoEvento:DdlTipoEvento.SelectedValue.ToEntero()))
{
GVDatos.DataSource = ObjCRM.DtResultados;
GVDatos.DataBind();