Histórico da Página
...
O PE F040URET adiciona a regra e o PE F040ADLE adiciona adiciona a descrição quando acionada a tela de legenda conforme imagem abaixo.
...
Logo os pontos de entrada F040URET ee F040ADLEdevem devem ser utilizados em conjunto.
Card documentos
Sendo assim as regras do padrão serão prioritárias em relação às do ponto de entrada.
Caso seja preciso adicionar legendas em outra ordem ou alterar legendas do padrão, utilizar o ponto de entrada FINALEG.
03. PARÂMETROS
| Nome | Descrição |
|---|---|
| aRegras | Contém o array com as regras do padrão |
aLegendas | Contém array com as legendas e descrição. |
...
| Nome | Descrição |
|---|---|
aRet | Array com a regra e a legenda. Estrutura do array: 2ª posição: Cor da Legenda Exemplo: aAdd(aRet,{"!Empty(E1_PORTADO)","BR_LARANJA"}) |
05. EXEMPLO DE UTILIZAÇÃO
...
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#INCLUDE "PROTHEUS.CH"
/*
Ponto de entrada para regras de legenda
*/
User Function F040URET()
Local aRet := {}
If FunName() $ "FINA040|FINA740"
aAdd(aRet,{"!Empty(E1_PORTADO)","BR_LARANJA"})
Endif
If FunName() $ "FINA050|FINA750" // Exemplo para "Titulo aguardando liberacao em outras moedas"
aAdd(aRet,{" !( SE2->E2_TIPO $ MVPAGANT ).and. EMPTY(E2_DATALIB) .AND. IIF(E2_MOEDA > 1, E2_VLCRUZ, (SE2->E2_SALDO+SE2->E2_SDACRES-SE2- >E2_SDDECRE)) > SuperGetMV('MV_VLMINPG',.F.,0) .AND. E2_SALDO > 0","BR_PINK"})
Endif
Return aRet
/*
Ponto de entrada para legenda e descrição ao acionar o botão legendas do browse
*/
User Function F040ADLE()
Local aRet := {}
aAdd(aRet,{"BR_LARANJA","Título em Portador"})
Return aRet |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas