Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 3 minutos


01. DADOS GERAIS

Produto:

TOTVS Medicina e Segurança do Trabalho

Linha de Produto:

Linha Protheus

Segmento:

RH

Módulo:

TOTVS RH (Linha Protheus) - Medicina e Segurança do Trabalho (SIGAMDT)

Função:Extintores (MDTA540)
País:Brasil
Ticket:Não há.
Issue:Não há.


02. DESCRIÇÃO

Criado o ponto de entrada MDTA5401 para permitir a criação de um semáforo para controle de extintores na rotina de Extintores (MDTA540) e será executado ao entrar na rotina.


Ponto de EntradaMDTA5401()
ChamadaAo entrar na rotina de Extintores (MDTA540).
Pré-RequisitoNão há.
EventoNão há.
RetornoRetorna as cores na legenda conforme a situação do extintor que é consultada na tabela TLA - Extintores.

03. DEMAIS INFORMAÇÕES

FunçãoMDTA5401()
ParâmetrosLocal aCores, Array, responsável por armazenar as cores exibidas na legenda do semáforo quando o ponto de entrada for executado.
RetornoaCores, Array, retorna as cores na legenda conforme situação do Extintor na tabela TLA (Extintores).



Exemplo
#include "protheus.ch" 

User Function MDTA5401()

    Local aCores := { { "TLA->TLA_SITUAC == '1'", "BR_VERDE" }, ;
                      { "TLA->TLA_SITUAC == '2'", "BR_VERMELHO" } }

    Return aCores


04. ASSUNTOS RELACIONADOS

Não há.