Árvore de páginas

Versões comparadas

Chave

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

...

Bloco de código
languagejava
themeMidnight
firstline1
titleF620QRY
linenumberstrue
#INCLUDE "TOTVS.CH"

/*/{Protheus.doc} User Function F620QRY
    (Ponto de entrada F620QRY que permite o cliente manipular
    query com regras e validações específicas para definir 
    o que será exibido no relatório de movimentação báncária.)
    @type  Function
    @author Cassio S. Dias
    @since 21/11/2023
    @version 12.1.2310
    @return cQuery, caracter
    @see (https://tdn.totvs.com/x/3wIdM)
    /*/

/*EXEMPLO -  ORDENANDO "POR BANCO"*/    
User Function F620QRY() as chararcter

	Local cQuery  AS character
	Local cBco    AS character
	Local cAge    AS character
	Local cCto    AS character

	/* 
     Não inicializar a variável com os operador lógico "AND" ou "OR". O Ponto de entrada já está tratando. 
    */

    /* ATENÇÃO: Quando selecionado ordenar por "Banco", o P.E. receberá os parâmentros. "ParamixB"
    Para as outras opções de ordenação, nao será necessário parâmetros*/

	IF LEN(ParamixB) > 0
   
		cBco   := ParamixB[2,1] //Bacno
		cAge   := ParamixB[2,2] //Agencia
		cCto   := ParamixB[2,3] //Conta

		If cBco == "001"
			cQuery += " E5_BANCO	 NOT IN ('"+cBco+"')     AND  "
			cQuery += " E5_AGENCIA   NOT IN ('"+cAge+"') AND  "
			cQuery += " E5_CONTA     NOT IN ('"+cCto+"')      "
		Endif
	ENDIF

Return cQuery // Não pode retornar vazio.

...