Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Migration of unmigrated content due to installation of a new plugin

Descrição

Desenvolvido o ponto de entrada

...

"MDeFil"

...

capaz

...

de

...

permitir

...

ao

...

administrador

...

do

...

sistema

...

substituir

...

a

...

tela

...

de

...

filtro

...

apresentada

...

no

...

início

...

da

...

execução

...

da

...

rotina

...

SPEDMANIF

...

...

Manifesto

...

Destinatário,

...

possibilitando

...

a

...

implementação

...

de

...

filtros

...

customizados

...

sobre

...

a

...

tabela

...

C00

...

...

Manifesto

...

de

...

Destinatário.

...

Veja

...

também

...

MDeExpFil

Idioma

Português (Brasil)

...

Versões

Versões_Anteriores

...

Sistemas

...

Operacionais

...

Suportados

...

Todos

Compatível com as Bases de Dados

Todas

Programa Fonte

SPEDMANIFE.PRW

Retorno

O retorno deste ponto de entrada deve contemplar um array de 2 posições, com as seguintes características:

Posição 01:
Tipo: Caractere
Conteudo: Sintaxe na linguagem ADVPL com o filtro utilizado.
Exemplo: .and. C00_MESNFE == 2014

Posição 02:
Tipo: Caractere
Conteudo: Sintaxe na linguagem SQL-ANSI com o filtro utilizado.
Exemplo: AND C00_MESNFE = '2014'
Em anexo a este Boletim Técnico segue um modelo (RDMAKE) do ponto de entrada que ilustra melhor a sua utilização.

Exemplos

#INCLUDE "PROTHEUS.CH"

User Function MDeFil()
Local aRet := Array(2)
Local dDataIni := STOD('20140401')
Local dDataFim := STOD('20140430')
Local cAdvFil := ""
Local cSQLFil := ""

//ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿
//³ Monta os Retornos ³
//ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
//1* - Sintaxe ADVPL
cAdvFil := " .and. C00_DTEMI >= STOD('" + DTOS(dDataIni) + "') "
cAdvFil += " .and. C00_DTEMI <= STOD('" + DTOS(dDataFim) + "') "
//2* - Sintaxe SQL ANSI
cSQLFil := "AND C00_DTEMI >= '" + DTOS(dDataIni) + "' "
cSQLFil += "AND C00_DTEMI <= '" + DTOs(dDataFim) + "' "

//Coloca os filtros no retorno do Array
aRet1 := cAdvFil
aRet2 := cSQLFil

Return aRet