FoxPro/Visual FoxPro - ayudenme con estas sentencias por favor

desearia tener conocimiento de como realmente se utilizan los rlock o flock de acurdo a sus experiencias, pense que ya no necesitaria en visual9 pero veo que siempre seran necesarios controlar el bloqueo.
desde ya gracias,

Son dos casos

caso 1:::::

DO WHILE aar=0
SELECT autodet
IF FLOCK()
INSERT INTO autodet ;
(planilla,numero,fecha,empresa,subempresa,contrato,benef,paciente,monto,cantidad,montototal,cedula,;
NOMSERV,CODIGO,CODGRUPO,marca,usugra,fecgra,horgra,cantidad,montototal,seguro);
values;
(vplanilla,vnumero,thisform.fecha.Value,;
thisform.empresa.Value,;
thisform.subempresa.Value,;
thisform.contrato.Value,;
thisform.codigo.Value,;
thisform.nomsocio.value,;
thisform.costo.value,1,thisform.costo.value,thisform.cedula.value,;
thisform.servicio.value,thisform.concepto.value,83,thisform.marca.value,nomoperador,DATE(),TIME(),;
thisform.cantidad.Value,;
thisform.montototal.Value,thisform.seguro.Value)
*
SELECT autodet
=TABLEUPDATE(.t.)
UNLOCK
EXIT
ENDIF
ENDDO

caso 2:::::
*
SELECT autodet
SET ORDER TO NUMERO && NUMERO
IF SEEK(thisform.buscar.VALUE)
aaa=0
DO WHILE aaa=0
if rLOCK()
replace empresa WITH thisform.empresa.value
replace subempresa WITH thisform.subempresa.value,MARCA WITH THISFORM.MARCA.VALUE
replace monto WITH thisform.costo.value,montototal WITH monto*cantidad
replace contrato WITH thisform.contrato.value,benef WITH thisform.codigo.value
REPLACE seguro WITH thisform.ds.value
TABLEUPDATE()
unlock()
exit
ENDIF
enddo
ENDIF

Si estas usando buffering (Table update, table revert) puedes ahorrarte el trabajo, Vfp te lo hace de acuerdo al tipo de buffer que uses.

esloque siempre pense,pero cuando otras aplicaciones quieren actualizar las mismas tablas se producen perdidas de datos, quedando uno de ellos sin actualizar, aparentemente lo graba pero realmente no., al querer registrar 2 o mas detalles, solo lo graba 1, en caso de que trabaje solo, los graba todos, pero al trabajar on line varias estaciones de trabajo no.