Histórico da Página
01. DADOS GERAIS
| Produto: |
| ||||||||
|---|---|---|---|---|---|---|---|---|---|
| Linha de Produto: |
| ||||||||
| Segmento: |
| ||||||||
| Módulo: |
| ||||||||
| Função: | Atestado ASO (MDTA200Questionário Func. (MDTA145) | ||||||||
| Ticket: | 18751078, 20275618Não há. | ||||||||
| Issue: | DNG-21672, DNGRHUMDT-16 Não há. |
02. SITUAÇÃO/REQUISITO
Solicitação de criação de um Atualização documentação PE da rotina Questionário Func. (MDTA145). O ponto de entrada na rotina de Atestado ASO (MDTA200) que possa realizar bloqueio e outras funcionalidadesda rotina permite alterar o relatório da rotina.
03. SOLUÇÃO
| Ponto de Entrada | MDTA2001MDTA1451() |
|---|---|
| Chamada | Rotina Atestado ASO (MDTA200), quando clicar no botão de AlterarVerifica se existe um registro de questionário do funcionário. |
| Pré-Requisito | Existir um ASO impressoFuncionário com ficha médica e registro de um questionário relacionado e respondido. |
| Evento | Ao selecionar um ASO impresso e selecionar o botão Alterar, o sistema dispara o ponto de entradaAlteração do relatório do questionário do funcionário. |
| 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ãoRelatório impresso do questionário que foi relacionado ao funcionário e respondido pelo mesmo na rotina Questionário Func. (MDTA145). |
04. DEMAIS INFORMAÇÕES
| Função | MDTA2001MDTA1451() |
|---|---|
| Parâmetros | Não há. |
| Retorno | lRetVal: retorna verdadeiro ou falso.Return ExecBlock("MDTA1451",.F.,.F.) |
| Bloco de código | ||||
|---|---|---|---|---|
| ||||
#include 'protheus.ch' User Function MDTA2001MDTA145() Local lRetVal If ExistBlock("MDTA1451") //Validação desejada para retorno MsgStop("Teste do Ponto de Entrada. MDTA1451") 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 lRetValReturn ExecBlock("MDTA1451",.F.,.F.) Endif Return .T. |
05. ASSUNTOS RELACIONADOS.
Não há.- Questionário Padrão (MDTA055)
| Templatedocumentos |
|---|
| HTML |
|---|
<style>
div.theme-default .ia-splitter #main {
margin-left: 0px;
}
.ia-fixed-sidebar, .ia-splitter-left {
display: none;
}
#main {
padding-left: 10px;
padding-right: 10px;
overflow-x: hidden;
}
.aui-header-primary .aui-nav, .aui-page-panel {
margin-left: 0px !important;
}
.aui-header-primary .aui-nav {
margin-left: 0px !important;
}
</style>
|