Tempo aproximado para leitura: 10 min
01. DADOS GERAIS
| Produto: | TOTVS Medicina e Segurança do Trabalho |
|---|---|
| Linha de Produto: | Linha Protheus |
| Segmento: | Serviços |
| Módulo: | Medicina e Segurança do Trabalho (SIGAMDT) |
| Função: | Atestado ASO (MDTA200) |
| Ticket: | 18751078, 20275618 |
| Issue: | DNG-21672, DNGRHUMDT-16 |
02. SITUAÇÃO/REQUISITO
Solicitação de criação de um ponto de entrada na rotina de Atestado ASO (MDTA200) que possa realizar bloqueio e outras funcionalidades.
03. SOLUÇÃO
| Ponto de Entrada | MDTA2001() |
|---|---|
| Chamada | Rotina Atestado ASO (MDTA200), quando clicar no botão de Alterar. |
| Pré-Requisito | Existir um ASO impresso. |
| Evento | Ao selecionar um ASO impresso e selecionar o botão Alterar, o sistema dispara o ponto de entrada. |
| Retorno | O ponto de entrada MDTA2001 tem como objetivo duas opções, a primeira seria o bloqueio da alteração do Atestado ASO já impresso, onde se desejar bloqueá-lo diretamente deve-se retornar falso ou aplicar uma condição como no exemplo a seguir, possibilitando que o usuário escolha se altera o Atestado ASO ou não. As outras funcionalidades podem ser realizadas com o retorno diretamente como verdadeiro ou utilizando uma condição, como também no exemplo a seguir, possibilitando que o usuário escolha se altera o Atestado ASO ou não. |
04. DEMAIS INFORMAÇÕES
| Função | MDTA2001() |
|---|---|
| Parâmetros | Não há. |
| Retorno | lRetVal: retorna verdadeiro ou falso. |
Exemplo
#include 'protheus.ch'
User Function MDTA2001()
Local lRetVal
//Validação desejada para retorno do Ponto de Entrada.
lRetVal := MsgYesNo( "Ponto de Entrada MDTA2001 Executado." + CRLF + "Ao selecionar Sim, o retorno do Ponto de Entrada será verdadeiro, ao selecionar Não o retorno será falso." )
Return lRetVal
05. ASSUNTOS RELACIONADOS.
Não há.
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas