Árvore de páginas

Versões comparadas

Chave

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

...

com objetivo de realizar filtros na geração do 1900 .


03. ESPECIFICAÇÃO

Parâmetros

...

do ponto de entrada

Nome

Tipo

Descrição

PARAMIXB

Array of Record

Array com os dados de processamento com elementos

[1]

Caracter

Cláusula WHERE original com a instrução TSQL para retornar registros das tabelas SFT, 

Retorno

...

Nome

Tipo

Descrição

Obrigatório

cWhere

Caracter

Retorna cláusula Where alterada

Sim

Variável dDataDe  é recebida como parâmetro além ser Default com tratamento de conversão:

DEFAULT dDataDe        := cTOd('  /  /    ')

04. EXEMPLO DE UTILIZAÇÃO

O exemplo abaixo permite acrescentar ao filtro atualmente existente, na geração do registro 1900 EFD Contribuições, sendo o seu comportamento determinado pelas regras de negócios definidas pelo cliente, além de sua responsabilidade.


Bloco de código
languagejava
themeMidnight
titleFSA302FMOVSPD1900A
#Include 'Totvs.ch'
 
User Function SPD1900A()

Local cWhere := PARAMIXB[1] // Recebe a cláusula WHERE atual da rotina
 
// Regra de negócio acrescida a instrução TSQL Where recebida como parâmetro
  cWhere += "AND ( SFT.FT_ENTRADA >= '"+ DToS(dDataDe) + "' )"
 
Return  cWhere 


05. DEMAIS INFORMAÇÕES

...