set multilocks on
select nome, flock() as bloq from produto 


Os registros que retornam bloq=.T. já estão automaticamente bloqueados, já se retornar apenas .F., quer fizer que alguem já bloqueou.

Use "set reprocess to" para aumentar a performace, mas não espere um foquete :)

Cordialmente,

Fabiano Costa