...
| Produto: | |||
|---|---|---|---|
| Solucoes_totvs_cross | Producto: | TOTVS Backoffice | |
| Linha Línea de Produtoproducto: | | Linhas_totvs | | Linha | Linha
Segmento: | |||
| Segmentos_totvs | Backoffice | ||
Módulo: | Financeiro Financiero (SIGAFIN) | ||
| Função Función: | Liberação Liberación para baixa baja (FINA580) | ||
País: | Brasil |
...
Ponto Punto de entrada que permite a manipulação das legendas na rotina de liberação para baixa el manejo de las leyendas e la rutina de liberación para baja (FINA580).
...
Não háNo existen.
...
| Tipo | DescriçãoDescripción | ||
|---|---|---|---|
Vector | Vector con las leyendas que se incluirán | Vetor | Vetor com as legendas a serem incluídas. |
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#include 'Protheus.ch'
USER FUNCTION F580LEGEN
Local aLegenda := {;
{"BR_VERDE" , "Título liberado para pagamentopago."},;
{"BR_AZUL" , "Título aguardandoesperando liberaçãoliberación."},;
{"BR_VERMELHO" , "Título totalmente dado baixadode baja."},;
{"BR_VIOLETA" , "Título suspensosuspendido."},;
{"BR_LARANJA" , "Título Canceladoanulado."},;
{"BR_PRETO" , "TestePrueba LegendaLeyenda 1."},;
{"BR_CINZA" , "TestePrueba LegendaLeyenda 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 |
...