Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.


01. DADOS GERAIS

Produto:

Solucoes_totvs_parceirosexptotvs
SolucaoParcsExpsTOTVSTOTVS Medicina e Segurança do Trabalho

Linha de Produto:

Linhas_totvs
LinhaLinha Protheus

Segmento:

Segmentos_totvs
SegmentoRH

Módulo:

Modulos_totvs_rh
ModulosTOTVSRHTOTVS RH (Linha Protheus) - Medicina e Segurança do Trabalho (SIGAMDT)

Função:Riscos (MDTA180)
País:Brasil
Ticket:Não há.
Issue:Não há.

02. DESCRIÇÃO

Ponto de entrada MDTA1802 criado na rotina de Riscos (MDTA180) para possibilitar a gravação dos registros em tabela customizada antes da gravação dos riscos.

03. SOLUÇÃO


Ponto de EntradaMDTA1802

Chamada

Na inclusão, alteração ou exclusão do registro.
Pré-RequisitoCadastro de Centro de Custo, Função, Fonte Geradora, Agente e Tarefa para que seja possível realizar o vínculo do funcionário com o risco.
EventoCadastro customizado.
RetornoNão há.

03. DEMAIS INFORMAÇÕES

FunçãoMDTA1802()
ParâmetrosnOpcx, Array, Armazena uma das três opções disponíveis na rotina, sendo elas, Incluir, Alterar e Excluir.
cOper,Array, Armazena a operação executada e exibe em tela.
cRisco, Array, Armazena o número do risco cadastrado na rotina.
RetornoNão há.
Bloco de código
languagejava
themeEclipse
firstline1
titleExemplo
linenumberstrue
#include "Protheus.ch"

User Function MDTA1802()

Local nOpcx := PARAMIXB[1]
Local cOper := ""
Local cRisco := M->TN0_NUMRIS

Do Case
Case nOpcx == 3
cOper := "Inclusão"
Case nOpcx == 4
cOper := "Alteração"
Otherwise
cOper := "Exclusão"
EndCase

cMsg := "Ponto de entrada executado com sucesso. Operação: " + cOper + CRLF
cMsg += "Numero do risco: " + cRisco

MsgInfo(cMsg, "ATENÇÃO")

Return

04. ASSUNTOS RELACIONADOS

Templatedocumentos