PE MDTA6204 Executado na Linha e Confirmação de Tela.

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:	Epi X Fornecedor (MDTA620)
País:	Brasil
Ticket:	Não há.
Issue:	Não há.

Criado Ponto de Entrada MDTA6204 chamado na rotina de Epi X Fornecedor (MDTA620) após a validação de cada linha da Grade de seleção de EPIs.

Ponto de Entrada	MDTA6204()
Chamada	Ao movimentar a seta para cima ou para baixo após relacionar um EPI ao Fornecedor.
Pré-Requisito	Ter um EPI e um Fornecedor cadastrado no sistema.
Evento	Validação de cada linha da Grade de seleção de EPIs.
Retorno	Retorna o PE

Função	MDTA6204()
Parâmetros	Local lRet, Booleano, variável lógica com retorno sendo verdadeiro ou falso (True/False)
Retorno	lRet, Booleano, retorna true ou false.

Procredimento para Utilização

Em Atualizações\Cadastros Gerais\Produto (epi), incluir um novo Epi;
Em Atualizações\Cadastros Gerais\Fornecedores, incluir um novo fornecedor;
Em Atualizações\EPI\Epi x Fornecedor, clique em Epis, relacionando um novo Epi na grade e verifique se ao ir com a seta para cima ou para baixo o ponto de entrada MDTA6204 será chamado.

Exemplo

#Include 'Protheus.ch'

User Function MDTA6204()

	Local lRet := .T.

	If Len( aEpis ) < 0

		lRet := .F.

	Endif

Return lRet