Visual Basic - Parametros en DataEnvironment

Life is soft - evento anual de software empresarial
 
Vista:

Parametros en DataEnvironment

Publicado por Ruben (18 intervenciones) el 12/10/2006 15:12:09
Hola a todos

Tengo un pequeño problema que me vuelve loco!
Tengo un datareport a partir de un comando en un dataenvironment

En el comando le pido dos parametros, que son fecha desde y fecha hasta, para que me traiga los valores de ese periodo....

si lo hago con un solo parametro anda bien

DETodas.Detalle (fechad) me trae correctamente

pero cuando quiero hacerlo con dos parametros me da error de compilacion

DETodas.Detalle (fechad, fechah)

me da un error de compilacion y dice que se esperaba: =

O sea el problema aparentemente lo tengo en la forma de ejecutar el comando??

Un ayuda por favor!!!
Gracias por su tiempo!
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Parametros en DataEnvironment

Publicado por Mario (107 intervenciones) el 12/10/2006 16:00:40
Te envio un ejemplo que a mi me funciona. En el dataenvironment tengo este command
PARAMETERS Fecha_Inicio date, Fecha_Fin date;
SELECT Transaciones.IdCuentas, Cuentas.Descripcion, Transaciones.Documento, Transaciones.Importe, Transaciones.Fecha, Transaciones.Observaciones FROM Cuentas, Transaciones WHERE Cuentas.IdCuentas = Transaciones.IdCuentas and
transaciones.fecha >=fecha_inicio and transaciones.fecha<=fecha_fin
Y en evento que llama al reporte este:
Dim FechaInicio As Date, FechaFin As Date
Dim FechaInicioS As String, FechaFinS As String
FechaInicioS = InputBox("Teclee fecha con el siguiente" & Chr(13) & _
"format dd/mm/yyyy", "Fecha Inicial")
If FechaInicioS = "" Then
MsgBox "Operación Cancelada"
Exit Sub
Else
FechaInicio = FechaInicioS
End If

FechaFinS = InputBox("Teclee fecha con el siguiente" & Chr(13) & _
"format dd/mm/yyyy", "Fecha Final")

If FechaFinS = "" Then
MsgBox "Operación Cancelada"
Exit Sub
Else
FechaFin = FechaFinS
End If

If dteGladys.rsdteFechaAgrupa_Grouping.State = adStateOpen Then dteGladys.rsdteFechaAgrupa_Grouping.Close

dteGladys.dteFechaAgrupa_Grouping FechaInicio, FechaFin

rptFecha.Caption = Version
rptFecha.Show vbModal
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Parametros en DataEnvironment

Publicado por Ruben (18 intervenciones) el 13/10/2006 13:10:57
Gracias Mario!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar