Árvore de páginas

Versões comparadas

Chave

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

Disponibilização de ponto de entrada para manipulação do filtro do browse da rotina de Aprovação de Solicitação de Despesas

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

serviços.Jurídico

Módulo:

Contabilidade Gerencial - SIGACTB.Pré Faturamento de Serviços - SIGAPFS

Rotina:

Rotina

Nome Técnico

CTBXVLDJURA235A

Validação de amarração.Aprovação de Solicitações de Despesa

Ponto de Entrada:

JURA235A

Parâmetros:

CTBXAMARRA.

Tickets relacionados

3723147.

NomeTipoDescrição
PARAMIXB[1]ObjetoObjeto do formulário ou do modelo, conforme o caso
PARAMIXB[2]CaractereID do local de execução do ponto de entrada
PARAMIXB[3]CaractereID do formulário

Requisito:

DJURFAT1-7315

Requisito/Story/Issue (informe o requisito relacionado):

DSERCTR1-14982.

País(es):

Brasil.

Banco(s) de Dados:

Todos homologados para o Protheus.

Sistema(s) Operacional(is):

Todos homologados para o Protheus.

Descrição

O ponto de entrada ,  CTBXAMARRA JURA235A, para o local de execução com ID "BROWSEFILTER", se implementado/existente, não exibirá a mensagem de inconsistência do Help padrão do sistema. O usuário/cliente deverá criar o seu próprio Help para exibir a mensagem de inconsistência de amarração de entidades contábeis.

Se houver inconsistência de amarração de entidades contábeis o ponto de entrada deve retornar falso. 

, realizará um filtro nos registros no browse sempre que a rotina for executada. Esse filtro não poderá ser alterado ou removido pelo usuário/cliente via sistema. 

Caso não seja enviado nenhum valor como filtro, não será realizado nenhum filtro.

Os Obs: os impactos da execução de pontos de entrada no sistema padrão são de responsabilidade do usuário/cliente.


Ponto de Entrada

Descrição:

Este ponto de entrada permite adicionar uma validação após a validação um filtro padrão do sistema.

Eventos:

lRet cFiltro := ExecBlock("CTBXAMARRAJURA235A", .F., .F., {cContaNIL, cCusto,cItem ,cCLVL, aCpos"BROWSEFILTER", "JURA235A"})

Programa Fonte:

CTBXVLDJURA235A

Retorno:

.T. ou .F.Caractere com o filtro a ser utilizado.

 

Exemplo:

#Include 'Protheus.ch'

User Function

CTBXAMARA

JURA235A()
Local aParam   := PARAMIXB
Local

lRet

oObj        :=

.F.

""
Local

cConta

cIdPonto :=

PARAMIXB[1]

""
Local

cCusto

cIdModel :=

PARAMIXB[2]

""
Local

cItem 

cFiltro      :=

PARAMIXB[3]

Local cCLVL := PARAMIXB[4]

Local aCpos := PARAMIXB[5]  // Array com os campos digitados

/* ------------------------------------------------------------------------------------
Aqui efetuar o seu tratamento
------------------------------------------------------------------------------------ */

Help( " " , 1 , "USER_HELP" ,, " Aqui exibir sua mensagem " ,3,0)

Return lRet

""


If aParam <> NIL

oObj        := aParam[1] // Objeto do formulário ou do modelo, conforme o caso
cIdPonto := aParam[2] // ID do local de execução do ponto de entrada
cIdModel := aParam[3] // ID do formulário

If cIdPonto == "BROWSEFILTER"

cFiltro := "NZQ_USRINC == 'USER'" // Exibe somente as solicitações em que o usuário de inclusão é o 'USER'.

EndIf

EndIf

Return cFiltro