Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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.

  • Será mostrado uma lista contendo os índices da tabela Contas a Receber (SE1).

  • No momento em que for selecionado o índice (como um VALID de Campo), o ponto de entrada é executado para efetuar as
    validações necessárias, a busca e o posicionamento no registro e assim prosseguir com o recebimento.

  • Ao retornar o ponto de entrada é efetuada a validação das informações do cliente e a captura do título
    para pagamento.

  • 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

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