01. DADOS GERAIS
Produto: | TOTVS Backoffice |
---|---|
Linha de Produto: | Linha Protheus ® |
Módulo: | Financeiro |
Função: | FINA040 - Contas a Receber |
02. DESCRIÇÃO
Utilizado para alterar as legendas de diversas rotinas do financeiro, como FINA040, FNA050, FINA740, FINA750 entre outras.
O retorno desse ponto de entrada substituirá as regras do padrão.
Lembrando que as regras de legenda são consideradas na ordem do array retornado.
A primeira regra atendida definirá a cor que será atribuída.
Atenção para com a ordem das regras e com regras conflitantes.
É chamado para retornar as regras de legendas e chamado também quando acionado o botão de legendas para que seja mostrada a tela:
03. PARÂMETROS
Nome | Descrição |
---|---|
nReg | Com valor: Abrir a telinha de legendas ### Sem valor: Retornar as regras |
cAlias | SE1 ou SE2, dependendo da rotina utilizada |
aRegras | Regras do Padrão |
aLegendas | Legendas do Padrão |
04. RETORNO
Nome | Descrição |
---|---|
aRet | Array com todas as regras de legendas. Estrutura do array: 2ª posição: Cor |
05. EXEMPLO DE UTILIZAÇÃO
FINALEG
#INCLUDE "PROTHEUS.CH" User Function FINALeg() Local nReg := PARAMIXB[1] // Com valor: Abrir a telinha de legendas ### Sem valor: Retornar as regras Local cAlias := PARAMIXB[2] // SE1 ou SE2 Local aRegras := PARAMIXB[3] // Regras do padrão Local aLegendas := PARAMIXB[4] // Legendas do padrão Local aRet := {} Local nI := 0 /* Sem Recno --> Retornar array com as regras para o Browse colocar as cores nas colunas. Com Recno --> Chamada quando acionado botão Legendas do browse -> Abrir telinha de Legendas (BrwLegenda) */ If nReg = Nil /* aRegras passado contém as regras do padrão O array retornado deverá conter todas as regras, do padrão e customizadas. Dicas: Lembrando que as regras de legenda são consideradas na ordem do array retornado. A Primeira regra atendida definirá a cor que será atribuída. Atenção para com a ordem das regras e com regras conflitantes. A Última regra do padrão, caso não atenda a nenhuma condição anterior é a .T. -> BR_VERDE -> Título em aberto */ If cAlias = "SE1" /* Exemplo: adicionar uma regra de legenda "mais prioritária" que as do padrão */ aAdd(aRet,{"!Empty(E1_PORTADO) .AND. Empty(E1_NUMBOR)","BR_LARANJA"}) /* Regras do padrão para retorno */ For nI := 1 To Len(aRegras) aAdd(aRet,{aRegras[nI][1],aRegras[nI][2]}) Next nI Else // SE2 /* Exemplo para retornar as mesmas regras do padrão sem alteração */ aRet := aRegras Endif Else // Abrir telinha de Legendas (BrwLegenda) If cAlias = "SE1" aAdd(aLegendas,{"BR_LARANJA","Título em Portador"}) Else // SE2 /* Adicionar a cor e descrição de legendas para SE2 aqui. Exemplo: Aadd(aLegendas, {"BR_AMARELO", "Titulo aguardando liberacao"}) //Titulo aguardando liberacao */ Endif BrwLegenda(cCadastro, "Legenda", aLegendas) Endif Return aRet
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas