SET RANT ONand
for x=1 to 1may by
for x=1 to 13>SET RANT ON
>SET EXCLUSIVE ON & Not OFF, OFF is if you must share, to pack it must be ON!!!!!!!!! >>By the way, SET EXCLUSIVE OFF is usually only set ONCE in your program, or in the config.fpw file. In stead you add the EXCLUSIVE keyboard whenever you need it
>for x=1 to 1 > use ('month'+alltrim(str(x,2))+'2005') EXCLUSIVE > delete for no=1151 > pack >endfor>And if you need to PACK regularly, you should reconsider your design. PACK should typically be used about once a year to clean up the tables, not daily or weekly!
>>SET EXCLUSIVE off >>for x=1 to 13 >> delete FROM ('month'+ltrim(str(x))+'2004') where no=1231 >> pack &&File must be opened exclusively >>endfor >>>>
>>>>>for x=1 to 1 >>>>> use (trim(str(x,2))+'2005') >>>>> delete for no=1151 >>>>>endfor>>>>