Ponto de Entrada para realizar operações ao confirmar a tela da Rotina de Epis Entregues por Funcionário
Características do Requisito
Linha de Produto: | Microsiga Protheus | ||||
Segmento: | Serviço | ||||
Módulo: | Medicina e Segurança do Trabalho | ||||
Rotina: |
| ||||
País(es): | Brasil | ||||
Banco(s) de Dados: | Todos | ||||
Sistema(s) Operacional(is): | Windows/Linux | ||||
Versões/Release: | Release 12.1.6 | ||||
Versão Expedida: | Release 12.1.6 |
Ponto de Entrada
Descrição: | O ponto de entrada MDTA1555 poderá ser utilizado para criação de novas opções no browse da rotina de diagnósticos médicos. | ||||||||
Localização: | Atualizações\Atendimento Medico\Diagnostico Medico | ||||||||
Eventos: | É executado na criação da tela. | ||||||||
Programa Fonte: | MDTA155.PRX | ||||||||
Função: | MDTA1555() | ||||||||
Retorno: |
|
Descrição
Exemplo:
#Include 'Protheus.ch'
User Function Mdta1555()
Local cTeste := "Teste"
Local aRotina := aClone( PARAMIXB )
aAdd( aRotina, { cTeste , "U_MostraMsg()" , 0 , 3 } ) //U_MostraMsg() é a função responsável por executar a ação do novo botão
Return aRotina
//Mostra mensagem quando pressionado botão Teste
User Function MostraMsg()
Local cMessage := "Ponto de entrada funcionando"
MsgInfo( cMessage, "Teste" )
Return