Versões comparadas

Chave

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

...

Neste exemplo, a consulta SQL que utilizamos é a seguinte:

Bloco de código
languagec#
SELECT 
	XXF.XXF_EXTVAL, 
	SE1.E1_CODBAR CODIGOBARRA, 
	SE1.E1_VALOR VALOR, 
	SE1.E1_IDCNAB IDBOLETO, 
	SE1.E1_NUMBCO NOSSONUMERO, 
	SE1.E1_PORTADO NUMBANCO, 
	SE1.E1_AGEDEP NUMAGENCIA,
	SE1.E1_VALJUR PERCENTUAL_JUROS, 
	SE1.E1_PORCJUR PERCENUTAL_MULTA,
	SEE.EE_CONTA  	NROCONTA, 
    SEE.EE_DVCTA 	DIGCONTA, 
    SEE.EE_CODCART 	CARTEIRA
                                                                                                                                                                                                                    
FROM PROTHEUS12_PRODUCAO.XXF XXF

INNER JOIN PROTHEUS12_PRODUCAO.SE1040  SE1
ON SE1.D_E_L_E_T_ = ' '
AND  LTRIM(RTRIM('04'|| RTRIM(SE1.E1_FILIAL) || RTRIM(SE1.E1_PREFIXO) || RTRIM(SE1.E1_NUM) || RTRIM(SE1.E1_PARCELA) || RTRIM(SE1.E1_TIPO))) = LTRIM(RTRIM(REPLACE(XXF.XXF_INTVAL,'|','')))

LEFT JOIN PROTHEUS12_PRODUCAO.SEE040  SEE

ON SEE.D_E_L_E_T_ = ' '
AND RTrim(SEE.EE_FILIAL) = SUBSTR(SE1.E1_FILIAL, 0, 4)           /* ///// filial na tabela SEE não sendo preenchida por completo*/
AND SEE.EE_CODIGO = SE1.E1_PORTADO
AND SEE.EE_AGENCIA = SE1.E1_AGEDEP
AND SEE.EE_CONTA = SE1.E1_CONTA
AND SEE.EE_SUBCTA = '001' /* ALTERAMOS PARA QUE SEJA RETORNADO APENAS O REGISTRO DE RETORNO A RECEBER E TIRAMOS A COMPARAÇÃO COM O CAMPO E1_NUMCONTA QUE NÃO POSSUI OS DADOS */

WHERE XXF.D_E_L_E_T_ = ' '
AND XXF.XXF_ALIAS = 'SE1'
AND XXF.XXF_FIELD = 'E1_NUM'
AND RTRIM(XXF.XXF_EXTVAL) = CAST(:FRM_COLIGADA AS VARCHAR(3)) || '|' || CAST(:FRM_IDLAN AS VARCHAR (10))



Aviso

Esta fórmula deverá ser sempre criada dentro do contexto do TOTVS Gestão Financeira, visto que as informações bancárias estão presentes na tabela FLAN