Linha Microsiga Protheus

Árvore de páginas

Ponto de Entrada

MóduloSIGALOJA
Descrição:Customização para pesquisar título pela digitação no campo de filtro
Localização:Venda Assistida (LOJXREC)
Eventos:Este ponto de entrada permite filtrar a busca e posicionar no registro de acordo com a regra de negócio. 
Programa Fonte:LOJXREC
Função:

LJRECPSQ.

Pode-se utilizar o parâmetro MV_LJPESRE para posicionar no índice inicial desejado para a busca.

Parâmetros
NomeTipoDescrição
PARAMIXB[1]NuméricoÍndice de busca selecionado em tela pelo usuário.
PARAMIXB[2]caracterConteúdo da pesquisa realizada pelo usuário.
Retorno:
NomeTipoDescriçãoObrigatório
lRetlógico

Retorna se o conteúdo digitado pelo usuário é valido.
Se retornou .T., o ponto de entrada deve obrigatoriamente ter posicionado no registro(SE1) para

que a seleção seja realizada.

Sim

 

Exemplo #1

 

#Include 'Protheus.ch'

User Function LJRECPSQ()

Local lRet := .F. //Retorno da validacao
Local nIdxSE1 := PARAMIXB[1] //nIdxSE1
Local cSeekE1 := PARAMIXB[2] //cSeekE1

dbSelectArea("SE1")
dbSetOrder(nIdxSE1)
If dbSeek( FWXFilial("SE1") + cSeekE1)

     lRet := .T.
EndIf

Return lRet

---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------