Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

PONTO DE ENTRADA QUE PERMITE ADICIONAR BOTÕES NO MENU DA ROTINA DE VEÍCULOS (MNTA084)

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos e Gestão de Frotas

Rotina:

Rotina

Nome Técnico

MNTA084

Cadastro de Veiculos

Rotina(s) envolvida(s)

Nome Técnico

MNTA0843

Ponto de Entrada

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Ponto de Entrada chamado no programa MNTA084.prx, para adicionar botões.

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Bens/Veículos.

Programa Fonte:

MNTA084.prx

Função:

MNTA0843()

VariáveisParâmetro:

NomePosiçãoTipoPode AlterarDescrição
aRotina1ArrayNão

Recebe informações do botão a ser adicionado.Opções do menu padrão (aRotina)

Retorno:
NomeTipoDescriçãoObrigatórioNulo--
ArrayOpções do menu padrão mais as opções adicionadasSim-
Bloco de código
languagesql
firstline1
titleExemplo 1
linenumberstrue
#Include "Protheus.ch"

//---------------------------------------------------------------------
/*/{Protheus.doc} MNTA0843
Ponto de entrada para adicionar botões.
	[n][1]  -  Título da rotina que será exibido no menu
	[n][2]  -  Nome da função que será executada
	[n][3]  -  Parâmetro reservado. Deve ser sempre 0 (zero)
	[n][4]  -  Número da operação que a função executará. As alternativas são:
 		1 = Pesquisa
		2 = Visualização
		3 = Inclusão
		4 = Alteração
		5 = Exclusão
		6 = Alteração sem a permissão para incluir novas linhas. 
	   		  É válido apenas para os objetos GetDados e GetDb.


	[n][5]  -  Esse elemento é opcional. Quando informado, deve conter o número da 
	configuração do arquivo de acessos do Protheus (sigamat.acs), que indica 
	se o usuário terá acesso a essa opção.

 principal
/*/
//---------------------------------------------------------------------
User Function MNTA0843()

    Local aRotina := PARAMIXB[1]

    aAdd( aRotina, {"BOTÃO MNTA0843", "U_fTeste()", 0, 2, 0} )

Return aRotina


User Function fTeste()

    
	MsgInfo("Teste MNTA0843Ponto de entrada executado com sucesso !", "Atenção")

Return .T.