Árvore de páginas


01. DADOS GERAIS

Produto:

TOTVS Medicina e Segurança do Trabalho

Linha de Produto:

Linha Protheus

Segmento:

RH

Módulo:Medicina e Segurança do Trabalho
Função:Ficha Médica (MDTA005)
Ticket:Não há.
Issue:Não há.


02. 
SITUAÇÃO/REQUISITO

Na rotina de Ficha Médica (MDTA005), criar um ponto de entrada que dispara no momento ao selecionar as opções de Visualizar ou Alterar.

03. SOLUÇÃO

Criado ponto de entrada MDTA0054 na rotina de Ficha Médica (MDTA005), que será executado ao selecionar a opção Visualizar ou Alterar.

Descrição da variável:

  • nLinhaNúmero da linha corrente da validação.


Exemplo
#include "protheus.ch"

User Function MDTA0054 

	aAdd( aNgButton, { "PARAMETROS" ,;
						{||If (TM0->TM0_TIPDEF == "1", MsgStop("Função Executada !"), MsgStop("O Funcionário não é Portador de Deficiência Física."))},;
						"Atestado Médico de Deficiência","Atest. Def."})
	
	_SetOwnerPrvt( "aNgButton", aNgButton )

	MsgInfo('Chamada do Ponto de Entrada MDTA0054', 'Ponto de Entrada')

Return


04. DEMAIS INFORMAÇÕES

Não há.


05. ASSUNTOS RELACIONADOS

Não há.