Linha Microsiga Protheus

Árvore de páginas

LJ7105 - Permitir filtro customizado para seleção de orçamentos a serem finalizados via rotina de NFC-e em Lote.

Descrição:

Disponibilizar P.E na rotina de finalização de NFCE em Lote para permitir inclusão de filtro customizado na cláusula "where" do filtro padrão de seleção dos orçamentos a serem finalizados.

Eventos:

O ponto de entrada é executado tanto quando selecionada a opção de pré-seleção dos orçamentos filtrados, quanto na finalização de todos orçamentos filtrados anteriormente pelos parâmetros padrões da rotina.

Programa Fonte:LOJA701.PRW

Parâmetros:

NomeTipoDescrição
ParamIxb[1]String
String 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:
NomeTipoDescrição
cNewFiltroStringString 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