como migrar de codigo dbase a otro ¿? clipper u otro ?

[marcoszorrilla]

Otro ejemplo para hacer un bloqueo:

                WHILE !PRIXGEN->(EOF())
                nValor:=(++nCon)*100/nUltimo
                        IF nValor < 2
                        nValor:=2
                        END
                GAUGE(nValor)

                        
                        WHILE !PRIXGEN->(RLOCK())
                        END

                PRIXGEN->NUEVOPREC:=0
                PRIXGEN->MRGFUTURO:=0
                        PRIXGEN->(DbUnLock())
                PRIXGEN->(DbSkip())
                END

Un Saludo.

[marcoszorrilla]

Estoy consultando un viejo libro de Dbase IV y te recomiendo busques ayuda sobre las funciones:

Flock()
LkSys()
Lock()
RLock()
Set Lock
UnLock
Set Exclusive
Use

Un Saludo.