Procedur produto_update Scatter memo to loscatt Use \\outroservidor\outrapasta\produto in 0 shared alias destino Sele destino Set order to 1 Seek produto.prod If eof() Append blank Endif Gather from loscatt memo Use Release loscatt Sele produto EndprocEste procedimento está funcionando corretamente quando tenho apenas 1 usuário trabalhando no sistema. Quando existem 2 usuários fazendo o mesmo tipo de tarefa ( no exemplo, incluindo produtos ), dá erro de "Arquivo em uso".