Linha Microsiga Protheus

Árvore de páginas

Carregando...
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:Prontuário Médico (MDTA410)
País:Brasil
Ticket:

Não há.

Issue:Não há.


02. DESCRIÇÃO

Criado Ponto de Entrada MDTA4101 chamado na rotina de Prontuário Médico (MDTA410) para possibilitar a validação da exclusão de registros.


Ponto de EntradaMDTA4101()
Chamada

Ao realizar a exclusão de qualquer registro contido na rotina do Prontuário Médico (MDTA410).

Pré-RequisitoTer registros na rotina.
EventoValidação da exclusão de registros contidos na rotina do Prontuário Médico (MDTA410).
RetornoIndica se existe a permissão para a exclusão de registros no prontuário.

03. DEMAIS INFORMAÇÕES

FunçãoMDTA4101()
ParâmetroscAlias, Caracter, Alias da tabela onde o registro está sendo excluído.
Retorno

 lRet, Lógico, indica se existe a permissão para a exclusão de registros no prontuário.



Exemplo
#Include "Protheus.ch"
 
User Function MDTA4101()
 
    Local cAlias := PARAMIXB[1]
    Local lRet := .T.
 
    If cAlias == "TM5" .And. PswAdmin(,,RetCodUsr()) != 0
        MsgAlert("Esse usuário não possui permissão para executar essa exclusão", "Atenção")
        lRet := .F.
    EndIf
 
Return lRet


04. ASSUNTOS RELACIONADOS

    Não há.