Histórico da Página
Ponto de entrada que permite realizar customização na
...
legenda do
...
browse no Retorno Mod. 2 (MNTA435)
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||||||
Segmento: | Manufatura | ||||||||
Módulo: | SIGAMNT - Manutenção de Ativos e Gestão de Frotas | ||||||||
Rotina: |
| ||||||||
País(es): | Todos | ||||||||
Banco(s) de Dados: | Todos | ||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
Descrição: | Ponto de entrada executado na rotina de Retorno Mod. 2 (MNTA435) que retorna um array |
com a estrutura para construção da legenda no browse de O.S.. Além de adicionar novas legendas, poderão ser customizadas as legendas já existentes. | |||||||||
Programa Fonte: | MNTA435.prx | ||||||||
Localização: | SIGAMNT: Atualizações/Controle de Oficina/Retorno de OS/Retorno Mod. 2 | ||||||||
Função: | MNTA4355() | ||||||||
Retorno: |
|
Bloco de código | ||
---|---|---|
| ||
#Include 'ProtheusTotvs.ch' User Function MNTA4355() Local aArrayaLegenda := {} aArray PARAMIXB If MsgYesNo( 'Deseja deixar somente a primeira legenda?' ) aLegenda := {{"AllTrim(aOS[oOS:nAt,2])=='1'","oRed"},; {"AllTrim(aOS[oOS:nAt,2])=='2'","oAmarelo"},; {"AllTrim(aOS[oOS:nAt,2])=='3'","oVerde"},; {"","oAzul"}} Return aArray { ' !Empty((cAlias435)->TJ_TIPORET) .And. (cAlias435)->TJ_DTMPFIM >= dDataBase', 'BR_VERDE', /*Legenda*/, /*Não usar*/, .F. } } EndIf Return aLegenda |