01. DADOS GERAIS
Produto: | TOTVS Backoffice |
---|---|
Linha de Produto: | Linha Protheus |
Segmento: | Backoffice |
Módulo: | Financeiro (SIGAFIN) |
Função: | Liberação para baixa (FINA580) |
País: | Brasil |
02. VISÃO GERAL
Ponto de entrada que permite a manipulação das legendas na rotina de liberação para baixa (FINA580).
03. PARÂMETROS
Não há.
04. RETORNO
Tipo | Descrição |
---|---|
Vetor | Vetor com as legendas a serem incluídas. |
05. EXEMPLO
Exemplo de execução
#include 'Protheus.ch' USER FUNCTION F580LEGEN Local aLegenda := {; {"BR_VERDE" , "Título liberado para pagamento."},; {"BR_AZUL" , "Título aguardando liberação."},; {"BR_VERMELHO" , "Título totalmente baixado."},; {"BR_VIOLETA" , "Título suspenso."},; {"BR_LARANJA" , "Título Cancelado."},; {"BR_PRETO" , "Teste Legenda 1."},; {"BR_CINZA" , "Teste Legenda 2."}; } Local aRetorno := {} Aadd(aRetorno , { ' SE2->E2_VALOR >= 100 .And. SE2->E2_VALOR < 150', aLegenda[6][1] }) Aadd(aRetorno , { ' SE2->E2_VALOR >= 150 .And. SE2->E2_VALOR < 200', aLegenda[7][1] }) Aadd(aRetorno , { ' E2_SALDO <= 0', aLegenda[3][1] } ) Aadd(aRetorno , { '!EMPTY(E2_DATASUS) .AND. !EMPTY(E2_USUASUS)' , aLegenda[4][1] }) Aadd(aRetorno , { '!EMPTY(E2_DATACAN) .AND. !EMPTY(E2_USUACAN)' , aLegenda[5][1] }) Aadd(aRetorno , { '!EMPTY(E2_DATALIB) .OR. (SE2->E2_SALDO+SE2->E2_SDACRES-SE2->E2_SDDECRE) <= '+ALLTRIM(STR(GetMv('MV_VLMINPG'),17,2)), aLegenda[1][1] }) Aadd(aRetorno , { '(SE2->E2_SALDO+SE2->E2_SDACRES-SE2->E2_SDDECRE) > '+ALLTRIM(STR(GetMv('MV_VLMINPG'),17,2)), aLegenda[2][1] }) RETURN aRetorno
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas