*!* the following line is somewhere else in your code use test.dbf alias test1 shared in 0 *!* not readily apparent that I or someone else has the table exclusive or otherwise llOpenError = .f. m.lcOldError = on("error") on error llOpenError = .t. use test.dbf alias test exclusive in 0 again on error &lcOldError if !llOpenError * we opened the file exclusively *!* but is it really? messagebox("VFP did not throw an error -llOpenError assumes test is open exclusively") select test *!* Pack generates error table not open exclusively pack else * could not exclusively open file messagebox("VFP threw an error - Did not get test.dbf exclusively") endif if used("test") and isexclusive("test") *!* this line only executes when test.dbf can be opened exclusively select test *!* Pack table is successful pack else *!* did not get table exclusively, I don't care why messagebox("Did not get test.dbf exclusively") endifAdmittedly, issuing "use test.dbf exclusive in 0 again" is a stretch and not a wise thing to do if you really want to open a table exclusively, but it can happen and VFP will not throw an error.