private void btnConsultar_Click(object sender, EventArgs e)
{
if (dtpFechaDesde.Value > dtpFechaHasta.Value)
{
MessageBox.Show("La fecha inicial no puede ser mayor que la fecha final", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
int prog = -1;
string cadprog = "";
int loc = -1;
if (cmbPrograma.SelectedIndex >= 0)
{
prog = Convert.ToInt32(cmbPrograma.SelectedValue);
cadprog = cmbPrograma.Text;
}
if (cmbLocacion.SelectedIndex >= 0)
{
loc = Convert.ToInt32(cmbLocacion.SelectedValue);
}
List <Clases.Parameters> Parametros = new List <Clases.Parameters>();
Parametros.Add(new Clases.Parameters {
nameValue = "@fechadesde", Valor = Globales.yyyy_mm_dd_hhmmss_otra(dtpFechaDesde.Value, " 00:00")
});
Parametros.Add(new Clases.Parameters {
nameValue = "@fechahasta", Valor = Globales.yyyy_mm_dd_hhmmss_otra(dtpFechaHasta.Value, " 23:59")
});
Parametros.Add(new Clases.Parameters {
nameValue = "@codprogd", Valor = prog
});
Parametros.Add(new Clases.Parameters {
nameValue = "@codprogh", Valor = prog
});
Parametros.Add(new Clases.Parameters {
nameValue = "@progd", Valor = cadprog
});
Parametros.Add(new Clases.Parameters {
nameValue = "@progh", Valor = cadprog
});
Parametros.Add(new Clases.Parameters {
nameValue = "@locd", Valor = loc
});
Parametros.Add(new Clases.Parameters {
nameValue = "@loch", Valor = loc
});
DataTable resultado = Globales.BD.generar_datatable("_SP_volumen_opc_detallada", CommandType.StoredProcedure, Parametros);
if (resultado.Rows.Count == 0)
{
MessageBox.Show("No hubo coincidencias con los parámetros establecidos", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
string lc = loc == -1 ? "SIN ESPECIFICAR" : cmbLocacion.Text;
string dir = Application.StartupPath.Replace("\\bin\\Debug", "");
rpvwVolOPC.LocalReport.ReportPath = dir + "\\Reportes\\rptVolOPCDet.rdlc";
rpvwVolOPC.LocalReport.DataSources.Clear();
rpvwVolOPC.LocalReport.DataSources.Add(new ReportDataSource("dsVOPCDet", resultado));//Conjunto de Datos (Ver Datos de Informe en el archivo .rdlc)
ReportParameter[] parVolOPC = new ReportParameter[5];
parVolOPC[0] = new ReportParameter("FechaInicio", dtpFechaDesde.Value.ToShortDateString());
parVolOPC[1] = new ReportParameter("FechaFin", dtpFechaHasta.Value.ToShortDateString());
parVolOPC[2] = new ReportParameter("Programa", cmbPrograma.Text == "" ? "SIN ESPECIFICAR" : cmbPrograma.Text);
parVolOPC[3] = new ReportParameter("Locacion", lc);
parVolOPC[4] = new ReportParameter("Fecha", DateTime.Now.ToShortDateString());
rpvwVolOPC.LocalReport.SetParameters(parVolOPC);
rpvwVolOPC.RefreshReport();
}
}
private void btnConsultar_Click(object sender, EventArgs e)
{
if (dtpFechaDesde.Value == null || dtpFechaDesde.Value == null)
{
MessageBox.Show("Las fechas no deben estar vacías", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
if (dtpFechaDesde.Value > dtpFechaHasta.Value)
{
MessageBox.Show("La fecha inicial no puede ser mayor que la fecha final", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error);
return;
}
string txtSQL = "";
string tipo = "";
if (rdContratos.Checked)
{
txtSQL = " set dateFormat DMY SELECT a.FechaCreacion,A.NroContrato,(a.Nombres + ' ' + a.Apellidos) as Nombre , a.Estatus,a.DescripcionPrograma,(Select Nombre from empleados where Codigo = a.CodigoLiner) as Nombreliner1 , (Select Nombre from empleados where Codigo = a.CodigoLiner2) as Nombreliner2, (Select Nombre from empleados where Codigo = a.CodigoLiner3) as Nombreliner3, (Select Nombre from empleados where Codigo = a.CodigoCloser1) as NombreCloser1, (Select Nombre from empleados where Codigo = a.CodigoCloser2) as NombreCloser2, (Select Nombre from empleados where Codigo = a.CodigoCloser3) as NombreCloser3, (Select OPC from MANIFIESTO where CONTRATO = a.NROCONTRATO and convert(date,fechacreacion) = convert(date,a.fechacreacion)) as NombreOPC, (Select e.NOMBRE from MANIFIESTO m left join Empleados e on m.CodigoSupervisorOPC=e.CODIGO where CONTRATO = a.NROCONTRATO and convert(date,fechacreacion) = convert(date,a.fechacreacion)) as NombreSUP, a.Observacioneshostess ,a.montocontrato as monto, A.DESCRIPCIONLOC,case when (CodigoCobrador = 'PPF')THEN CodigoCobrador WHEN (CodigoCobrador = 'PVB') THEN CodigoCobrador ELSE '' END AS CodigoCobrador FROM V_CONTRATOS a WHERE Estado='ACTIVO' and estatus in('PENDING','PROCESABLE') AND CodigoOficina='" + cmbOficina.SelectedValue + "' AND a.FechaCreacion Between '" + Globales.yyyy_mm_dd_hhmmss_singuion(Convert.ToDateTime(dtpFechaDesde.Value), " 00:00") + "' And '" + Globales.yyyy_mm_dd_hhmmss_singuion(Convert.ToDateTime(dtpFechaHasta.Value), " 23:59") + "'";
tipo = "CONTRATOS";
}
else
{
txtSQL = " set dateFormat DMY SELECT a.FechaCreacion,A.NroContrato,(a.Nombres + ' ' + a.Apellidos) as Nombre , a.Estatus,a.DescripcionPrograma,(Select Nombre from empleados where Codigo = a.CodigoLiner) as Nombreliner1 , (Select Nombre from empleados where Codigo = a.CodigoLiner2) as Nombreliner2, (Select Nombre from empleados where Codigo = a.CodigoLiner3) as Nombreliner3, (Select Nombre from empleados where Codigo = a.CodigoCloser1) as NombreCloser1, (Select Nombre from empleados where Codigo = a.CodigoCloser2) as NombreCloser2, (Select Nombre from empleados where Codigo = a.CodigoCloser3) as NombreCloser3, (Select OPC from MANIFIESTO where CONTRATO = a.NROCONTRATO and cedula=a.cedula_rif AND fechacreacion = Convert(date,a.fechacreacion)) as NombreOPC, (Select e.NOMBRE from MANIFIESTO m left join Empleados e on m.CodigoSupervisorOPC=e.CODIGO where CONTRATO = a.NROCONTRATO and cedula=a.cedula_rif AND fechacreacion = Convert(date,a.fechacreacion)) as NombreSUP, a.Observacioneshostess ,a.montocontrato as monto, A.DESCRIPCIONLOC,case when (CodigoCobrador = 'PPF')THEN CodigoCobrador WHEN (CodigoCobrador = 'PVB') THEN CodigoCobrador ELSE '' END AS CodigoCobrador FROM V_CONTRATOS a WHERE Estado='ACTIVO' AND ESTATUS = 'RESERVA' AND CodigoOficina='" + cmbOficina.SelectedValue + "' AND a.FechaCreacion Between '" + Globales.yyyy_mm_dd_hhmmss_singuion(Convert.ToDateTime(dtpFechaDesde.Value), " 00:00") + "' And '" + Globales.yyyy_mm_dd_hhmmss_singuion(Convert.ToDateTime(dtpFechaHasta.Value), " 23:59") + "'";
tipo = "RESERVAS";
}
Globales.BD.dtt = Globales.BD.generar_datatable(txtSQL, CommandType.Text, new List <Clases.Parameters>());
if (Globales.BD.dtt.Rows.Count == 0)
{
MessageBox.Show("No hubo coincidencias con los parámetros establecidos", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
string dir = Application.StartupPath.Replace("\\bin\\Debug", "");
rpvwRepHostess.LocalReport.ReportPath = dir + "\\Reportes\\rptHostess.rdlc";
rpvwRepHostess.LocalReport.DataSources.Clear();
rpvwRepHostess.LocalReport.DataSources.Add(new ReportDataSource("dsRepHostess", Globales.BD.dtt));//Conjunto de Datos (Ver Datos de Informe en el archivo .rdlc)
ReportParameter[] parRepHostess = new ReportParameter[4];
parRepHostess[0] = new ReportParameter("FechaInicio", dtpFechaDesde.Value.ToShortDateString());
parRepHostess[1] = new ReportParameter("FechaFin", dtpFechaHasta.Value.ToShortDateString());
parRepHostess[2] = new ReportParameter("Oficina", cmbOficina.Text);
parRepHostess[3] = new ReportParameter("Tipo", tipo);
rpvwRepHostess.LocalReport.SetParameters(parRepHostess);
rpvwRepHostess.RefreshReport();
}
}
