se requiere bloqueo con APPEND BLANK

[Loren]

Compañeros, buenas:

En una red local con DBF/CDX hay ocasiones (afortunadamente las menos) en las que el programa genera un error del tipo:

Error DBFCDX/1022 Se requiere bloqueo

... y es justo en la línea donde hago un simple APPEND BLANK, es decir

Code: Select all  Expand view  RUN

 select 40 ; append blank
  replace codigop with codcli, nombrep with nom.....

Pensaba que rlock() y dbunlock() debía colocarse justo cuando se editan/eliminan registros... pero NO para un simple INSERT.
En este caso... ¿como debo proceder? Interponiendo un rlock() justo antes del append o despues?

Mil gracias
LORENZO.

[cnavarro]

Loren, antes de hacer el append, pon un FLock()

[Loren]

Gracias, compañero
LOREN.

[jvtecheto]

Si lo que te ha dicho Cristóbal te funciona genial pero yo siempre compruebo si el registro se ha podido bloquear ya como como sabes append blank intenta bloquear por lo que después deberías comprobar si lo ha conseguido.

APPEND BLANK
IF !NETERR()
// ...
ELSE
? "Error en bloqueo "
ENDIF

Y ojo no te olvides de efectuar unlock después .

Saludos

José.

Enviado desde mi POCOPHONE F1 mediante Tapatalk