//Este exemplo, apresenta como utilizar a função DBRLockList() para verificar quais registro//estão bloqueados na tabela corrente.DBUseArea( .T.,"dbfcdxads", "\dadosadv\sa1990.dbf","SSS",.T., .F. )DBGoToP()DBRLock() // Bloqueia o primeiro registroDBRLock(110) // Bloqueia o registro de número 110DBRLock(100) // Bloqueia o registro de número 100DBRLockList() // Retorna: {1,100,110}