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:Entrega de EPI (MDTA695 e MDTA630)
País:Brasil
Ticket:15127976
Issue:DNG-18185


02. DESCRIÇÃO

Criado Ponto de Entrada MDTA695B nas rotinas de Entrega de EPI (MDTA695 e MDTA630) para impedir a geração do evento S-2240.


Ponto de EntradaMDTA695B()
ChamadaNa entrega de EPI para o funcionário.
Pré-RequisitoNão há.
EventoNão gera evento S-2240 na entrega do EPI.
RetornoImpede a geração do evento S-2240.

03. DEMAIS INFORMAÇÕES

FunçãoMDTA695B()
ParâmetrosLocal lImpede, booleano, impede ou não a geração do evento S-2240. É necessário estar como True (verdadeiro) para impedir a geração.
RetornoLocal lImpede, booleano, quando o retorno é True, não retornou o evento S-2240 nas rotinas.



Exemplo
#Include 'protheus.ch'
 
//---------------------------------------------------------------------
/*/{Protheus.doc} mdta695b
Impede a geração do evento S-2240 na entrega de epi
 
@doc https://tdn.totvs.com/x/RTVaKg
 
@author Gabriel Sokacheski
@since 21/09/2022
 
@return lImpede, verdadeiro para impedir a geração do evento
/*/
//---------------------------------------------------------------------
User Function mdta695b()
 
    Local lImpede := .F.
 
    Default l695Auto := .F.
 
    If l695Auto // Caso seja execução automática
        lImpede := .T.
    EndIf
 
Return lImpede


04. ASSUNTOS RELACIONADOS