Árvore de páginas

Versões comparadas

Chave

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

01. DADOS GERAIS

Linha de Produto:Microsiga Protheus®
Segmento:Serviços
Módulo:Financeiro

02. DESCRIÇÃO

O Ponto de Entrada F370E5F permite a edição completa da Query que consulta na Tabela SE5 (Movimentação Bancária), possibilitando modificar a filtragem dos registros para a contabilização.

Informações
titleInformações

A query deve ser editada preferencialmente na cláusula WHERE. 
A query passada pode variar neste ponto de entrada, já que se baseia nos parâmetros definidos (Pergunte) na rotina.
Utilize alias quando adicionar campo no comando SQL.


Bloco de código
languagejava
themeMidnight
titleNova Estrutura do comando de consulta para a tabela SE5
select SE5.E5_FILIAL, FKA.FKA_FILIAL, MPA.E5_FILIAL

from SE5T10 SE5
left join FKAT10 FKA on ... // Utilizado para o relacionamento com as tabelas FK's.
left join SE5T10 MPA on ... // Utilizado para relacionar os registros de compensação na própria SE5 Ex.: NF x PA

where SE5.E5_FILIAL = 'D MG 01 '
	and (
		(
			SE5.E5_DTDIGIT between '19800101' and '19800101'
			and SE5.E5_TIPODOC in ('DH', 'PA', 'RA', 'BA', 'VL', 'V2', 'AP', 'EP', 'PE', 'RF', 'IF', 'CP', 'TL', 'ES', 'TR', 'DB', 'OD', 'LJ', 'E2', 'TE', '  ', 'IT')
			)
		or (
			SE5.E5_DATA between '19800101' and '19800101'
			and SE5.E5_TIPODOC in ('TR', 'TE')
			)
		)
	and SE5.E5_SITUACA <> 'C'
	and (
		SE5.E5_LA <> 'S '
		or (
			(SE5.E5_ORDREC || SE5.E5_SERREC) <> ' '
			and SE5.E5_RECPAG = 'R'
			and SE5.E5_TIPODOC = 'BA'
			)
		)
	and SE5.E5_MOTBX not in ('DSD')
	and SE5.D_E_L_E_T_ = ' '
	and SE5.E5_RECONC = 'x'
order by E5_FILIAL, E5_DTDIGIT, E5_RECPAG, E5_NUMCHEQ, E5_DOCUMEN, E5_PREFIXO, E5_NUMERO, E5_PARCELA, E5_TIPO, E5_CLIFOR, E5_LOJA, E5_SEQ, SE5RECNO




03. EXEMPLO DE UTILIZAÇÃO


Bloco de código
languagejava
themeMidnight
titleF370E1F
#INCLUDE 'Protheus.ch'
 
User FUNCTION F370E5F()
    LOCAL cQRY    := PARAMIXB
    LOCAL cSELECT := ""
    LOCAL cFROM   := ""
    LOCAL cWHERE  := ""
 
    cSELECT := SUBSTR(cQRY, 1, AT("FROM",cQRY)-1)
    cFROM   := SUBSTR(cQRY, AT("FROM",cQRY),AT("WHERE",cQRY)-1-LEN(cSELECT))
    cWHERE  := SUBSTR(cQRY, AT("WHERE",cQRY))

    cWHERE += " AND SE5.E5_RECONC = 'x' "

    cQRY := cSELECT + cFROM + cWHERE

    CONOUT('<<< Execução do PE F370E5F >>> THREAD['+ GetThreadID() +'] - SQLCommand[' + cQry + ']')

RETURN cQry

04. DEMAIS INFORMAÇÕES

Não há

05. ASSUNTOS RELACIONADOS


Templatedocumentos


HTML
<style>
div.theme-default .ia-splitter #main {
    margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
    display: none;
}
#main {
    padding-left: 10px;
    padding-right: 10px;
    overflow-x: hidden;
}

.aui-header-primary .aui-nav,  .aui-page-panel {
    margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
    margin-left: 0px !important;
}
</style>