Linha Microsiga Protheus

Árvore de páginas

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:Atestado Médico (MDTA685)
País:Brasil
Ticket:Não há.
Issue:Não há.


02. DESCRIÇÃO

Criado ponto de entrada MDTA6851 na rotina de Atestado Médico (MDTA685) que permite a criação de própria regra de validação no momento de Incluir, Alterar e Excluir.


Ponto de EntradaMDTA6851()
ChamadaAo acessar a rotina Atestado Médico (MDTA685) e quando clicar para Incluir, Alterar ou Excluir.
Pré-RequisitoNão há.
EventoPrópria regra de negócio para validação na hora de Incluir, Alterar ou Excluir o atestado médico.
RetornoValida se a operação de inclusão, alteração ou exclusão foi executada corretamente.

03. DEMAIS INFORMAÇÕES

FunçãoMDTA6851()
Parâmetros

Local nOpc, Array, armazena a opção selecionada, podendo ser 3 - Incluir, 4 - Alterar ou 5 - Excluir.
Local cTipo, Array, armazena o nome da opção, por exemplo, Incluir.

RetornoNão há.



Exemplo
#Include "Protheus.ch"
 
User Function MDTA6851()
 
Local nOpc := PARAMIXB[1]
Local cTipo := ""
 
Do Case
Case nOpc == 3
  cTipo := "Incluir"
Case nOpc == 4
  cTipo := "Alterar"
Case nOpc == 5
  cTipo := "Excluir"
EndCase
 
If M685DTVAL(nOpc) //Valida se o funcionário possui atestados cadastrados pelo GPE
  MsgStop( "Validação executada com sucesso. Tipo de operação: " + cTipo , "Aviso" )
EndIf
EndIf
 
 
Return


04. ASSUNTOS RELACIONADOS