AYUDA URGENTE NUEVAMENTE HELP!!!! PLEASE
estoy tratando de hacer un reporte de ventas basado en un rango de fechas que el usuario seleccione de la fecha xxxx a la fecha xxxxx, el codigo que uso en el procedimiento CLICK del boton es el siguiente:
public fec1, fec2
fec1=thisform.text1.value
fec2=thisform.text2.value
open database d:montanaventadia
use ventadia1
go top
locate all for ventadia1.fecventa>=fec1 .and. ventadia1.fecventa<=fec2
if found()
? sys(1037)
select fecventa,cantidad,descripcion,importe,precio
from ventadia1
where ventadia1.fecventa>=fec1
and ventadia1.fecventa<=fec2 into curso resulta
report form d:montanaventrep preview
else
messagebox('Fechas fuera del rango',16,'Aviso')
endif
el problema radica en que cuando trato de grabar el boton me marca el siguiente error: FALTA UNA CLAUSULA NECESARIA EN EL COMANDO y se señala la siguiente linea:
select fecventa,cantidad,descripcion,importe,precio
y nada mas... ALguien me podria indicar en donde esta el error, por favor ??? no lo encuentro....
De antemano gracias----
public fec1, fec2
fec1=thisform.text1.value
fec2=thisform.text2.value
open database d:montanaventadia
use ventadia1
go top
locate all for ventadia1.fecventa>=fec1 .and. ventadia1.fecventa<=fec2
if found()
? sys(1037)
select fecventa,cantidad,descripcion,importe,precio
from ventadia1
where ventadia1.fecventa>=fec1
and ventadia1.fecventa<=fec2 into curso resulta
report form d:montanaventrep preview
else
messagebox('Fechas fuera del rango',16,'Aviso')
endif
el problema radica en que cuando trato de grabar el boton me marca el siguiente error: FALTA UNA CLAUSULA NECESARIA EN EL COMANDO y se señala la siguiente linea:
select fecventa,cantidad,descripcion,importe,precio
y nada mas... ALguien me podria indicar en donde esta el error, por favor ??? no lo encuentro....
De antemano gracias----
Si cortás un comando para continuarlo en la linea siguiente tenés que indicar con punto y coma. En tu caso el codigo deberÃa ser:
select fecventa,cantidad,descripcion,importe,precio;
from ventadia1;
where ventadia1.fecventa>=fec1;
and ventadia1.fecventa<=fec2 into curso resulta
select fecventa,cantidad,descripcion,importe,precio;
from ventadia1;
where ventadia1.fecventa>=fec1;
and ventadia1.fecventa<=fec2 into curso resulta
