Histórico da Página

#INCLUDE "FINC040.CH"
#INCLUDE "PROTHEUS.CH"

//-------------------------------------------------------------------------------
/*/{Protheus.doc} FI040CPTN
Inclui colunas no aBrowse da 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 FI040CPTN()
Local aBrowPE := {} //Array a ser retornado para o FINC040

	//Colunas nativas da rotina
    aBrowPE:= {;
        {" ","OK"},;            //Led de ativo, cancelado ou estornado
        {STR0010,"DATAX"},;     //Data
        {STR0011,"JUROS"},;     //Juros
        {STR0012,"MULTA"},;     //Multa
        {STR0013,"CORRECAO"},;  //Correção
        {STR0014,"DESCONTOS"},; //Descontos
        {STR0101,"VALACESS"},;  //Valores Acessórios
        {STR0106,"VALORTRANS"},;//Valor Descontado
        {STR0015,"VALORRECEB"},;//Valor Recebido
        {STR0016,"MOTIVO"},;    //Motivo
        {STR0017,"HISTORICO"},; //Hist¢rico
        {STR0018,"DATACONT"},;  //Data Contabilização
        {STR0090,"DATADISP"},;  //Data Contabilização
        {STR0019,"LOTE"},;      //Lote
        {STR0020,"BANCO"},;     //Banco
        {STR0021,"AGENCIA"},;   //Agência
        {STR0022,"CONTA"},;     //Conta
        {STR0023,"DOCUMENTO"},; //Documento
        {STR0081,"FILIAL"},;    //Filial Movto.
        {STR0082,"RECONC"},;    //Reconciliado
        {"ID","IDORIG"};
    }
 
	//Novas colunas
    AADD(aBrowPE,{"Campo1","E5_BENEF"})     // Campo 1 incluído pelo cliente
    AADD(aBrowPE,{"Campo2","E5_AUTBCO"})    // Campo 2 incluído pelo cliente

RETURN aBrowPE