• Domingo 22 de Diciembre de 2024, 06:10

Autor Tema:  Que No Salga Vetanita Pidiendo Valor Para Parámetr  (Leído 1108 veces)

Maraa

  • Nuevo Miembro
  • *
  • Mensajes: 9
    • Ver Perfil
Que No Salga Vetanita Pidiendo Valor Para Parámetr
« en: Viernes 21 de Abril de 2006, 06:45 »
0
Hola a todos, a ver si m podeis exar una mano. Estoy haciendo un
informe y filtro por un campo fecha entre 2 fechas y por un
idpaciente. Para filtrar la fecha he creado en el informe dos
parametros, uno para la fecha inicial y otro para la fecha final y a
estos les paso el valor de dos datetimepicker. Para filtrar el
idpaciente tengo tb otro parametro y recojo este de un combobox.

Hasta akí todo bien y m muestra el informe pero el problema
es q si el usuario da a actualizar me sale una ventanita (no hecha por
mí) pidiendo l idpaciente y los valores de las fechas
y debería d seguir con el valor dl combo y dl datetimepicker a no ser
q se kieran cambiar estos datos en el formulario y se vuelva a dar el
botón d aceptar. Cómo puedo hacer para que no salga la ventanita y m
no m pida otros datos? gracias

                FechaInicial = DateTimePicker1.Text
                FechaFinal = DateTimePicker2.Text


               'Declaramos una instancia del Reporte
                Dim Reporte As New infLesionesPaciente


               'Le indicamos al reporte que tome los datos del DataSet
                Reporte.SetDataSource(dsLesionesPaciente)


                Reporte.DataDefinition.FormulaFields("nombre").Text =
"'" & cmbPacientes.Text & "'"
                Reporte.SetParameterValue("idpaciente",
cmbPacientes.SelectedValue)
                Reporte.SetParameterValue("fechainicial",
String.Format(FechaInicial, "yyyy-MM-dd hh:mm:ss"))
                Reporte.SetParameterValue("fechafinal",
String.Format(FechaFinal, "yyyy-MM-dd hh:mm:ss"))
                Reporte.DataDefinition.RecordSelectionFormula =
"isnull({lesiones.fechalesion})or
{lesiones.fechalesion}>={?fechainicial} and
{lesiones.fechalesion}<={?fechafinal}  "