| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINC040 – Posição de Títulos a Receber |
O ponto de entrada FI040MNCP é utilizado para a manipular as colunas do aBrowse da rotina de consulta Posição de Títulos a Receber (FINC040).
Para atender a Lei Geral de Proteção de Dados (Lei n° 13.70), alguns campos que apresentam informações consideradas como dados sensíveis, serão ofuscados deixando de ser legíveis.
Para tratar ofuscação de campos modificados por esse ponto de entrada, utilizar o Ponto de Entrada FI040CPCO .
A execução do PE FI040MNCP está condicionada à presença dos PE's abaixo:
| Nome | Tipo | Descrição |
|---|---|---|
| PARAMIXB[1] | Array | Dados das colunas (nome e campo da tabela temporária). |
| Tipo | Descrição |
|---|---|
| Array | Dados das colunas atualizado (nome e campo da tabela temporária). |
#INCLUDE "TOTVS.CH"
//----------------------------------------------------------------------------------
/*/{Protheus.doc} FI040MNCP
Manipula as colunas do aBrowse na rotina de Consulta de Títulos a Receber (FINC040).
@return aBrowPE[1] = Nome da coluna a ser exibido em tela;
aBrowPE[2] = Campo da tabela SE5 a ser adicionado;
/*/
//----------------------------------------------------------------------------------
User FUNCTION FI040MNCP() as array
LOCAL aBrowPE := PARAMIXB[1] as array// Array para ser manipulado
IF EMPTY(aBrowPE)
aBrowPE:= {;
{" " ,"OK"},; //Led de ativo, cancelado ou estornado
{"Data" ,"DATAX"},;
{"Juros" ,"JUROS"},;
{"Multa" ,"MULTA"},;
{"Correção" ,"CORRECAO"},;
{"Descontos" ,"DESCONTOS"},;
{"Valores Acessórios" ,"VALACESS"},;
{"Valor Descontado" ,"VALORTRANS"},;
{"Valor Recebido" ,"VALORRECEB"},;
{"Motivo" ,"MOTIVO"},;
{"Histórico" ,"HISTORICO"},;
{"Data Contabilização" ,"DATACONT"},;
{"Data Contabilização" ,"DATADISP"},;
{"Lote" ,"LOTE"},;
{"Banco" ,"BANCO"},;
{"Agência" ,"AGENCIA"},;
{"Conta" ,"CONTA"},;
{"Documento" ,"DOCUMENTO"},;
{"Filial Movto." ,"FILIAL"},;
{"Reconciliado" ,"RECONC"},;
{"ID" ,"IDORIG"};
}
ENDIF
IF ASCAN(aBrowPE,{|e| e[2] $ 'E5_BENEF' }) == 0
AADD(aBrowPE,{"Campo1","E5_BENEF"}) // Campo 1 incluido pelo cliente
ENDIF
IF ASCAN(aBrowPE,{|e| e[2] $ 'E5_AUTBCO' }) == 0
AADD(aBrowPE,{"Campo2","E5_AUTBCO"}) // Campo 2 incluido pelo cliente
ENDIF
RETURN aBrowPE |