SELECT DISTINCT Sitedata.id, Sitedata.site_name, Sitedata.resp_party, Sitedata.r1,; > Sitedata.street, Sitedata.city, Sitedata.status, Sitedata.material,; > Sitedata.date_rep, reports.recvdate, reports.respdate, reports.rptname; > FROM ; > events!Sitedata; > LEFT OUTER JOIN events!reports ; > ON sitedata.id = reports.id; > WHERE ISBLANK(reports.respdate) = .T.; > AND (Sitedata.status = "O" OR Sitedata.status = "M"); > AND DATE() > reports.recvdate + 30 ; > AND reports.recvdate = (select max (recvDate) from Reports where SiteData.ID = Reports.ID) ; > ORDER BY Sitedata.id; > INTO CURSOR reviewer >WITH thisform >.WindowState = 2 >ENDWITH >BROWSE >thisform.Visible = .F. >WITH thisform >.WindowState = 0 >ENDWITH >DO FORM frmexport.scx TO m.exportcheck >IF m.exportcheck = "a" > EXPORT TO C:\Temp\NoReviewer.xls TYPE xls >ENDIF >thisform.Visible = .T.>