Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

Versão 1 Próxima »

Libera o registro criado ou bloqueado pela RecLock.

 

Exemplo:

Verifica se o registro existe na tabela SA1:

// MsUnlockSample.prw

If !DbSeek(XFilial("SA1") + "000001")

       // Se não existir, insere um registro em branco e o bloqueia

       Reclock("SA1", .T.)

Else

       // Bloqueia o registro encontrado

       Reclock("SA1", .F.)

EndIf

SA1->A1_SALDO := nNovoSaldo

MSUnlock("SA1")

A recomendação é que sejam utilizadas somente as funções RecLock e MsUnlock. 

  • Sem rótulos