Descrição
MsSeek
A função MsSeek possui as mesmas funcionalidades da função dbSeek(), com a vantagem de não necessitar acessar novamente a base de dados para localizar uma informação já utilizada pela conexão (thread) ativa..
Desta forma, a thread mantém em memória os dados necessários para reposicionar os registros já localizados, de forma que a aplicação pode, simplesmente, posicionar o registro sem executar novamente a pesquisa.
A diferença entre as funções dbSeek() e MsSeek() é notada em aplicações com grande volume de posicionamentos e pesquisas, como relatórios, por exemplo, que necessitam referenciar diversas vezes o mesmo registro durante uma execução.
|
Sintaxe
| MsSeek( <cExp>, <lSoftSeek>, <lUltimo> ) |
Parâmetros
| Par |
Nome |
Tipo |
Descrição |
Default |
Obg |
Ref |
01
|
cExp
|
Caracter
|
Indica o valor da chave que será encontrada
|
|
|
|
| 02 |
lSoftSeek
|
Boolean
|
Indica se, verdadeiro (.T.), posiciona no primeiro registro com expressão de chave maior que o valor procurado
|
.F. |
|
|
| 03 |
lUltimo
|
Boolean
|
Parâmetro não suportado pela linguagem AdvPL. Mantido por compatibilidade
|
|
|
|
Retorno
| Retorno |
Tipo |
Descrição |
| lRet |
Boolean
|
Retorna verdadeiro (.T.), se encontrar um registro com o valor especificado; caso contrário, falso (.F.).
|
Exemplo
#INCLUDE "TOTVS.CH"
User Function MsSeek()
dbSelectArea('SA1')
If SA1->( msSeek( xFilial('SA1') + '000001' + '0001' ) )
MsgInfo( 'Encontrou', 'Universo do Desenvolvedor' )
Else
MsgInfo( 'NAO Encontrou', 'Universo do Desenvolvedor' )
Endif
Return( Nil )
Resultado
Informações adicionais
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎