Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 5

changes.mady.by.user Paulo Henrique Santos de Moura

Gravado em

comparado com

Nova versão 6

changes.mady.by.user Paulo Henrique Santos de Moura

Gravado em

Chave

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

Ponto de Entrada

Descrição:

Permite incluir condição no where da select a ser executada para o Monitor Vendas PDVs x Reducao Z

Localização:

Controle de Lojas

Eventos:

Este Ponto de Entrada é acionado no momento em que são executadas as query para montar o monitor de vendas PDV x Redução Z.

Importante: É de extrema importância que o ponto de entrada retorne a condição junto com as palavras "AND" ou "OR" para juntar com as demais condições padrões no 'Where' da query a ser executada..

Programa Fonte:

LOJA782.PRW

Função:

FiltraDados()

Parâmetros

ParamIxb[1] - Numérico - Opção de Filtro em execução: 1 - Redução Z x Orçamentos (SFI x SL1), 2 - Redução Z x Vendas (SFI x SD2), 3 - Vendas x Orçamentos (SD2 x SL1)

Retorno:

NomeTipoDescriçãoObrigatório
cExpCaracter

Retorno: O retorno do ponto de entrada dever ser obrigatoriamente um string (caracter), e caso exista alguma condição a ser incluida na condição padrão do WHERE da query, este retorno deve possuir as palavras "AND" ou "OR" no inicio da condição do WHERE retorando pelo ponto de entrada. Caso nao exista nenhum condição de verificação customizada, basta retornar uma string (carater) vazio.

S

 

Exemplo:

User Function LJ782WHERE()

Local cWhere := ""

Local nOpc := ParamIxb[1] //1 - Redução Z x Orçamentos (SFI x SL1), 2 - Redução Z x Vendas (SFI x SD2), 3 - Vendas x Orçamentos (SD2 x SL1)

//Customiza query do primeiro filtro: Redução Z x Orçamentos (SFI x SL1)

If nOpc == 1 

  cWhere := " AND SL1.L1_PDV <> '001' "

EndIf

Return cWhere


Importante:

  • As condições A condição padrão do WHERE serão mantidasserá mantida, assim a condição do PE será adicionado a condição padrão.
  • É realizado consistência do retorno do PE, se o retorno do PE for diferente do tipo de string (Caracter) a condição customizada será ignorada.
  • Processo possui logs, para habilitar logs do varejo verifique: http://tdn.totvs.com.br/pages/viewpage.action?pageId=203764807
    • Exemplo de Logs: 

      18:29:27 [6128] Function FiltraDados Line 544
      [Monitor de vendas] Antes da Chamada do Ponto de Entrada:LJ782WHERE -> Caracter (25) [ AND SL1.L1_PDV <> '001' ]
      18:29:27 [6128] Function FiltraDados Line 546
      [Monitor de vendas] Apos a Chamada do Ponto de Entrada:LJ782WHERE -> Caracter (25) [ AND SL1.L1_PDV <> '001' ]

 

User Function LJ782WHERE()Local cWhere := "AND SL1.L1_PDV <> '001'"Return cWhere