Árvore de páginas

Versões comparadas

Chave

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

...

O exemplo abaixo permite acrescentar ao filtro atualmente existente, a regra de negócio para desconsiderar do processamento, produtos recebidos em transferência de outro estabelecimento da mesma empresa (CFOP 1152) que são tratados no Armazém 25na geração do registro 1900 EFD Contribuições.


Bloco de código
languagejava
themeMidnight
titleFSA302FMOV
#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 

...