| Produto: | |
|---|---|
| Linha de Produto: | |
| Segmento: | |
| Módulo: | |
| Função: | TMSA050 - Entrada doc. clientes TMSA170 - Lote de NF de cliente TMSA200 - Cálculo de Frete TMSA510 - Cockpit de cliente |
| País: | Brasil |
| Ticket: | 25027554 |
| Requisito/Story/Issue (informe o requisito relacionado) : | DLOGTMS02-29704 |
Ponto de Entrada utilizado no TMS Protheus (SIGATMS), para manipular as cores, descrições e condições das legendas dos Lote e Documentos de Clientes.
SINTAXE
TMA170COR( ) ---> aRet
PARÂMETROS
Nome | Tipo | Descrição |
|---|---|---|
| aParamIXB[1] | Vetor | Vetor com os linhas de dados de legenda com impacto em todos os fontes: |
RETORNO
Retorno | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| aCores | Vetor | Vetor com os linhas de dados de legenda com impacto em todos os fontes: [ x ][ 1 ] - cBMP_Br - Nome do ícone de cor no formato ADVPL original. Exemplo: "BR_VERDE" [ x ][ 2 ] - cBMP - Nome do ícone de cor no formato ADVPL MVC com tratamento de assecibilidade. Exemplo: "GREEN" [ x ][ 3 ] - cCondDTP - Condição de verificação de legenda para o browse da tabela DTP. Exemplo: "DTP_STATUS=='2'" [ x ][ 4 ] - cCondDTC - Condição de verificação de legenda para o browse da tabela DTC. Exemplo: "TMS050STLT(DTC->DTC_FILORI, DTC->DTC_LOTNFC)=='2'" [ x ][ 5 ] - cDescricao - Texto descritivo da opção da legenda. Exemplo: "Em Aberto" |
|
A execução do ponto de entrada TMA170Cor é realizada nas telas com browse de Lotes de Documentos (DTP) e Documentos de Clientes (DTC).
As rotinas tratadas são:
TMSA050 - Entrada doc. clientes
TMSA170 - Lote de NF de cliente
TMSA200 - Cálculo de Frete
TMSA510 - Cockpit de cliente
#include "Protheus.ch"
User Function TMA170Cor
Local aLeg As Array
Local aCores As Array
aLeg := ParamIXB[1]
aCores := { {"BR_PINK" , "PINK" , aLeg[1][3] , aLeg[1][4] , "Editado PE PINK" }, ;
{"BR_PRETO", "BLACK", "DTP_STATUS!='1'", "TMS050STLT(DTC->DTC_FILORI, DTC->DTC_LOTNFC)!='1'", "Editado PE BLACK"} }
Return aCores |