SimpleLock - Exemplos

Framework - Linha Protheus LIB
,
1

Boa tarde, alguem já utilizou a função SimpleLock()? pretendo utilizar ela para processamento de uma fila mas não encontrei documentação suficiente. Gostaria de saber se a maneira que estou executando abaixo está correta. Obrigado desde já.


    If SC5->(MSSeek(xFilial("SC5")+(cAlias)->NUM))
        SimpleLock()
        Ft210Liber()
        MsRUnlock()
    Endif
2

Boa tarde Paulo,

Ela tenta alocar o registro corrente (alias e recno) e retorna um boolean conforme o sucesso.


//Caso a SC5 não seja a workarea atual, é necessário colocar o SC5-> a esquerda do SimpleLock e do MsRUnlock
if SC5->(MSSeek(xFilial("SC5")+(cAlias)->NUM))
    if SC5->(SimpleLock())
        Ft210Liber()
        SC5->(MsRUnlock())
    endif
endif

https://tdn.totvs.com/display/public/PROT/SimpleLock

3

Daniel,

Existe alguma diferença entre fazer esse if com o SimpleLock ou com Reclock?

4

Boa noite, sim, existe, o reclock possui diversas regras que o simplelock não possui.

5

Eu estava usando uma função que customizei que testava com MsRLock e em caso de sucesso, fazia Softlock… essa simplelock substituiria isso?