Linha Microsiga Protheus

Árvore de páginas

Tempo aproximado para leitura: 5 min

01. DADOS GERAIS

Linha de Produto:Protheus
Segmento:Serviços
Módulo:Medicina e Segurança do Trabalho (SIGAMDT)
Função:Exames do Funcionario
Ticket:5740994
Requisito/Story/Issue:DNG-5240


02. SITUAÇÃO/REQUISITO

É necessária a criação de um Ponto de Entrada para tratativa de Inclusão\Alteração do Exame do Funcionário na rotins de Exames do Funcionário (MDTA120).

03. SOLUÇÃO

Criado Ponto de Entrada MDTA1202 na rotina deExames do Funcionário (MDTA120) para tratar a Inclusão e Alteração do exame.

04. DEMAIS INFORMAÇÕES

Função:MDTA1202()
Retorno:Boolean
Exemplo
#include "Protheus.ch"


User Function MDTA695A()
	Local lRet := .T.
	
	If Empty(M->TM5_PCMSO) .And. M->TM5_ORIGEX == "2"
		MsgInfo("Não é possível incluir exames sem a informação de um PCMSO")
		lRet := .F.
	EndIf


Return lRet