>THISFORM.mousepointer = 11 >local cListTable >cListTable = "WorkpkgTask_View" >select (cListTable) > >lCount = thisform.list1.listCount >WAIT WINDOW "Scanning for records to delete" NOWAIT NOCLEAR > >FOR cnt = 1 TO lCount > IF INKEY() = 27 > EXIT > ENDIF > IF thisform.list1.selectedId(cnt) > thisform.list1.selectedId(cnt) = .f. > SELECT (cListTable) > LOCATE FOR project_no = <b>trim(</b>thisform.list1.listItem(cnt,1)<b>)</b> AND Workpkg_no = <b>trim(</b>thisform.list1.listItem(cnt,2)<b>)</b> * now check whether you found it or not. You may as well Assert found() here. if found() > DELETE lSuccess=tableupdate(0) * check whether the record is deleted in the table as well else * now scratch your head and look at the values in the Locate line in the debugger * see why didn't they match. Browse your view and try to find them endif > ENDIF >ENDFOR requery(cListTable) >WAIT CLEARAnother thing, check the view and make sure it has a ...Where !deleted() in its definition.