Gisela
07 de Enero del 2005

Señores Listeros, tengo una tabla en access de pedidos y necesito armar un informe para listar los pedios por RANGO DE FECHAS. Estoy usando el DataEnvironment, pero no se como pasarle al DataReport parametros para Filtrar x fecha..... Alguien lo uso asi??
Muchas Gracias, Recibo manuales del DataReport [email protected].
Saludos y GRACIAS!

N?or
07 de Enero del 2005

Hola Gisela

Te envio este codigo que utiliza un Datareport, para que lo adaptes, en una pantalla ingreso dos fechas desde, hasta y ademas un codigo de Status, lo filtra una sentencia SQL para mostrar los datos en el Data Report

Dim listado As ADODB.Command
Dim Entorno As DataEnvironment
Dim Comando, Comillas, Cruz As String
Unload DatRepStatus

Cruz = "#"
Comillas = """"
reportes = 0
Set Entorno = New DataEnvironment
Set listado = Entorno.Commands("CmdStatus") <-- nombre del comando SQL generado en datareport

listado.CommandType = adCmdText
'
' Sustituye SQL del Data Report por SQL en Command text
' para aceptar los parametros ingresados en pantalla
'
Comando = "SELECT Estatus, `Fecha Real de Cierre`,`Fecha Requerimiento`,`N°- Solic`, `Nombre del Requerimiento`,Responsables FROM Proy_Abiertos where Estatus ="
Comando = Comando & Comillas & FrmSimaso3.CmbStatus.Text & Comillas
Comando = Comando & " and (`Fecha Requerimiento` between " & Cruz & Format(DTPDesde.Value, "yyyy-mm-dd") & Cruz
Comando = Comando & " and " & Cruz & Format(DTPHasta.Value, "yyyy-mm-dd") & Cruz & ") ORDER BY `Fecha Requerimiento` DESC"

listado.CommandText = Comando
DatRepStatus.Caption = "Simaso: Listado Status " & FrmSimaso3.CmbStatus.Text & " del " & DTPDesde.Value & " al " & DTPHasta.Value

Load DatRepStatus
DatRepStatus.Show vbModal
i

mvallejos
07 de Enero del 2005

Tu reporte se alimenta desde un Command del DataEnvironment, cambiale la sql en tiempo de ejecución (como para actulizar los filtros) y refréscalo antes de ejecutar el reporte.

Otra posible solución
Podrías tener una tablita temporal, con dos campos (para fecha desde y hasta) y un único registro.
Diseñas una consulta usando esos dos campos como filtro y incorporas esa consulta a tu dataEnvironment para diseñar el reporte.
La idea es que antes de ejecutar el reporte, actualizes esos dos campos de tu tabla temporal con las fechas seleccionadas en tu formulario.

Espero que sirva