Linha Microsiga Protheus

Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Backoffice

Linha de Produto:

Linha Protheus

Segmento:

Serviços

Módulo:

Contabilidade Gerencial (SIGACTB)

Função:Efetivação de Pré-lançamento  – CTBA350
País:Brasil
Ticket:13223964
Requisito/Story/Issue:

DSERCTR1-35190


02. SITUAÇÃO/REQUISITO

Permitir editar a query para filtro de acordo os parâmetros informados no pergunte para acrescentar condições na clausula Where.

03. SOLUÇÃO

Criação do ponto de entrada CT351QRY, na rotina CTBA350-Efetivação de Pré-Lançamento, para permitir alterar e acrescentar condições na clausula Where da query.



IMPORTANTE!

A utilização do ponto de entrada é de total autoria de quem o utiliza e os efeitos resultantes dele são de responsabilidade do cliente.


04. DEMAIS INFORMAÇÕES

O ponto de entrada recebera por parâmetro a query que será executada, então no ponto de entrada o usuário poderá acrescentar condições na clausula Where, como por exemplo, filtro por um campo de usuário criado na tabela CT2-Lançamentos Contábeis. Neste exemplo utilizaremos acrescentar um filtro por um campo de usuário Caractere 1 posição com título "Filtro Usr." (campo: CT2_CPOUSR C 1) cujo conteúdo esteja "1".


Contextualização PE

CT351QRY – Manipular a query recebida como parâmetro e retornar a mesma alterada, conforme necessidade do usuário.


Características do Requisito

Descrição:

O ponto de entrada CT351QRY permite manipular a query recebida como parâmetro e retornar a mesma alterada, conforme necessidade do usuário na rotina CTBA350-Efetivação de Pré-Lançamento.

Eventos:

ExistBlock("CT351QRY")

Programa Fonte:

CTBA351.PRW 

Função (PE) :

CT351QRY() – Recebe e permite manipular a query para filtro da rotina CTBA350-Efetivação de Pré-lançamento e retorna a query ja alterada.

Parametros:

Nome

Tipo

Descrição

Obrigatório

 cQuery

Caractere

String com query original a ser executada como filtro na rotina de efetivação de Pré-Lançamento.[1] = Estrutura do Campo 1

SIM

Retorno:

Nome

Tipo

Descrição

Obrigatório

 cQuery

Caractere

String com query já alterada e acrescentado condições na clausula Where que será executada como filtro na rotina de efetivação de Pré-Lançamento.

SIM



Exemplo de PE 
// Altera clausula where da query de filtro da rotina ctba350 - Efetivação de pré-lançamento quando por multi-thread

#Include "Protheus.ch"

User Function CT351QRY()

    Local aArea := GetArea()

    Local cQueryAux:= PARAMIXB[1]

	Alert("Evidencia do Ponto de Entrada : CT351QRY")

	cQueryAux:= StrTran(cQueryAux, " AND D_E_L_E_T_ = ' ' ", " AND CT2_CPOUSR = '1' AND D_E_L_E_T_ = ' ' ")

    RestArea(aArea)

Return cQueryAux


05. ASSUNTOS RELACIONADOS