01. DADOS GERAIS


Linha de Produto:Microsiga Protheus®
Segmento:BackOffice
Módulo:Fiscal
Programa FonteFISA008
Função:Reg1900

02. DESCRIÇÃO

Ponto de Entrada para o Registro 1900 - Consolidação dos Documentos Emitidos no Período por Pessoa Jurídica Submetida ao Regime de Tributação com Base no Lucro Presumido–Regime de Caixa ou de Competência 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] 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

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.


#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

Não há.

06. ASSUNTOS RELACIONADOS