LJ7107 - Permite a customização de proposição de valor e porcentagem de desconto para serem carregados ao se clicar no botão "Desconto no Total".

Descrição:

Disponibilizar P.E para atuar na proposição de valor e porcentagem de desconto para serem carregados ao se clicar no botão "Desconto no Total".

Eventos:

O ponto de entrada é executado assim que acionada a rotina de Desconto no Total(CRTL +B), dando a opção de calculo do percentual e valor de desconto que sera carregado para a tela de Desconto no Total.

Programa Fonte:

LOJA701A.PRW

Parâmetros:

NomeTipoDescrição
ParamIxb[1]StringString com a cláusula "WHERE" do padrão, para permitir análise da criação de complemento(SQL) para ser incluso na mesma via o Ponto de Entrada.
ParamIxb[2]StringString com a cláusula "WHERE" do padrão, para permitir análise da criação de complemento(SQL) para ser incluso na mesma via o Ponto de Entrada.
ParamIxb[3]StringString com a cláusula "WHERE" do padrão, para permitir análise da criação de complemento(SQL) para ser incluso na mesma via o Ponto de Entrada.

Retorno:

Nome	Tipo	Descrição
cNewFiltro	String	String com o filtro(SQL) a ser incluso na cláusula "WHERE" do filtro padrão de seleção dos orçamentos a serem finalizados.

Exemplo:

#INCLUDE "TOTVS.CH"

User Function LJ7105()

Local cWhere := Paramixb[1] //Filtro padrão, disponibilizado como parametro, para analise previa e decisão referente a inclusão de filtro SQL na tabela SL1
Local cCondPad := PADR(GetMv( "MV_CONDPAD"),3) // Condicao de pagto padrao
Local cNewFiltro := ""

//Exemplo de utilização do P.E:
//O P.E. deve apenas retornara o filtro customizado, caso o mesmo não esteja contido na clausula WHERE padrao.
cNewFiltro := "SL1.L1_RESERVA = 'N' AND SL1.L1_CONDPG = '" + cCondPad + "'" //Exemplo de filtro SQL para compor a clausula Where Padrão

Return cNewFiltro