Histórico da Página

Tempo aproximado para leitura: 10 min

01. DADOS GERAIS

18751078, 20275618DNG-21672, DNGRHUMDT-16

Produto:

Solucoes_totvs_parceirosexptotvs

SolucaoParcsExpsTOTVS	TOTVS Medicina e Segurança do Trabalho

Linha de Produto:

Linhas_totvs

Segmento	Distribuição
Region	Construção Projetos
Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Serviços

Módulo:

Modulos_totvs_rh

ModulosTOTVSRH	TOTVS RH (Linha Protheus) - Medicina e Segurança do Trabalho (SIGAMDT)

Função:

Atestado ASO (MDTA200Questionário Func. (MDTA145)

Ticket:

Issue:

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 funcionalidades.da rotina permite alterar o relatório da rotina

03. SOLUÇÃO

Rotina Atestado ASO (MDTA200), quando clicar no botão de Alterar.Existir um ASO impresso.Ao selecionar um ASO impresso e selecionar o botão Alterar, o sistema dispara o ponto de entrada.

Ponto de Entrada	MDTA2001MDTA1451()
Chamada
Pré-Requisito
Evento
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	MDTA2001MDTA1451()
Parâmetros	Não há.MV_MCONTAB
Retorno	lRetVal: retorna verdadeiro ou falso.

Bloco de código

theme	Eclipse
title	Exemplo

#include 'protheus.ch'   

User Function MDTA2001(		If ExistBlock("MDTA1452")
 
     Local lRetVal
    
 cTempQuery   //Validação desejada para retorno do Ponto de Entrada.
:=  ExecBlock("MDTA1452",.F.,.F.)
           lRetVal :=If MsgYesNoValType(cTempQuery) == "C"Ponto
   de Entrada MDTA2001 Executado." + CRLF + "Ao selecionar Sim, o retorno do PontocQuery de+= EntradacTempQuery
 será verdadeiro, ao selecionar Não o retorno será falso." )
 
Return lRetValEndIf

05. ASSUNTOS RELACIONADOS.

Não há.

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>

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão 2

Chave

02. SITUAÇÃO/REQUISITO

05. ASSUNTOS RELACIONADOS.