Linha Microsiga Protheus

Árvore de páginas

Essa alteração foi realizada nas versões 11.8 e 12.1.17.

Ponto de Entrada na validação das linhas da Grid de seleção de Epi's e na Confirmação de Tela.

Características do Requisito

Linha de Produto:

Microsiga Protheus.

Segmento:

Serviços.

Módulo:

Medicina e Segurança do Trabalho (SIGAMDT).

Rotina:

Rotina

Nome Técnico

MDTA620

Fornecedor x EPI

Cadastros Iniciais:

  • Produto (epi)
  • Fornecedores

Ponto de Entrada:

MDTA6204

País(es):

Todos.

Banco(s) de Dados:

Todos.

Tabelas Utilizadas:

  • SA2 - Fornecedores
  • TN3 - Fornecedores de EPI
  • TNF - Epis Entregues Funcionários
  • TNB - Epi por Função
  • TOH - Epi por centro de custo
  • TIK - Epi por Tarefa
  • TL0 - Grupo de Epi's

Sistema(s) Operacional(is):

Todos.

Descrição

Ponto de Entrada MDTA6204 chamado na rotina de Fornecedor x Epi após a validação de cada linha da Grid de seleção de Epi's.


Procedimento para Utilização

Exemplo:

  1. Abrir o módulo de Medicina e Segurança do Trabalho (SIGAMDT);
  2. Em Atualizações\Cadastros Gerais\Produto (epi), incluir um novo Epi;
  3. Em Atualizações\Cadastros Gerais\Fornecedores, incluir um novo fornecedor;
  4. Em Atualizações\EPI\Epi x Fornecedor, clicar em "Epi's", relacionar um novo Epi na grid e verificar que ao ir com a seta para cima ou para baixo o ponto de entrada MDTA6204 será chamado.

Ponto de Entrada

Descrição:

Ponto de Entrada após a validação das linhas da Grid de seleção de Epi's

Localização:

SIGAMDT: Atualizações\Epi\Fornecedor x Epi

Eventos:

Relacionar um Epi a um fornecedor

Programa Fonte:

MDTA620.prw

Função:

MDTA6204()

Retorno:

Lógico

 

Exemplo:

#Include 'Protheus.ch'

User Function MDTA6204()

Local lRet := .T.

If Len( aEpis ) < 0

lRet := .F.

Endif

Return lRet