To suvi Joseph

Respected sir

This is the coding i give onclick of the command button Ok:

LOCAL lcRptfrm, mfrompono,mtopono
lcrptfrm = "POLIST"

mfrompodate = THISFORM.ofrompodate.Value
mtopodate = THISFORM.otopodate.Value

WITH THISFORM.opgoutput

DO CASE
CASE .Value = 1 && REPORT ON BASIS OF VENDORCODE
REPORT FORM c:\gears\reports\povend FOR purorder.podate >= mfrompodate and purorder.podate <= mtopodate PREVIEW
CASE .Value = 2 && REPORT ON BASIS OF MATERIALS
REPORT FORM c:\gears\reports\pomat FOR purorder.podate >= mfrompodate and purorder.podate <= mtopodate PREVIEW
CASE .Value = 3 && REPORT ON BASIS OF GENERAL
REPORT FORM c:\gears\reports\pogeneral FOR purorder.podate >= mfrompodate and purorder.podate <= mtopodate PREVIEW
ENDCASE
ENDWITH

As you said i tried selecting the table & giving go top command, but that does not make any difference.

Regards
Vijayendran
> > >
> > > I have a form with 3 option buttons named vendor,material & general & three seperate reports for the previous three optionbuttons. Onclick of ok command button, the report for vendor should be displayed & similarly the two should be displayed. My problem is onclick of ok button , the form does call the report but it runs out immediately.
> > >
> > > Regards
> > > Vijayendran S
> >
> > I think the table has no records. Plz, check this out.
> >
> > C.Suresh
>
> What is typically do is this :
>
> SET FILTER TO blah blah blah
> GO TOP
>
> IF EOF()
> =Messagebox("No Data Printed")
> ELSE
> REPORT FORM blah blah blah
> ENDIF
>
>
> if the messagebox appears , then it means your filter didn't produce result
> Hope this could help you.
>
> Foxpro Child


Vijayendran S