Ponto de entrada que permite adicionar botões na inclusão de Solicitação de Serviço (MNTA280)

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

MNTA280

Solicitação de Serviço


Rotina(s) envolvida(s)

Nome Técnico

MNTA2809

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 executado na rotina de Solicitação de Serviço (MNTA280) que permite adicionar botões na tela de inclusão

Localização:SIGAMDI: Atualizações/Controle de Oficina/Solicitação de Serviço/Solicitação

Programa Fonte:

MNTA280.prx

Função:

MNTA2809()
Parâmetros:
NomeTipoDescrição
ParamIXBNuméricoOperação

Retorno:

Nulo
#Include 'Totvs.ch'

User Function MNTA2809()

    Local nVar		:= PARAMIXB[1]

    If nVar == 3
        Aadd(aNgButton,{"PARAMETROS" ,{||MsgInfo(	"Ponto de Entrada" + CHR(13)+CHR(10)+ "Execução do Botão!",;
						"Solicitacao - Ponto de Entrada")},"Solicitacao"})
        _SetOwnerPrvt("aNgButton",aNgButton)
    EndIf

Return

Nesse caso, os parâmetros são passados pelo argumento da User Function. Ao contrário do código Atual, que faz utilização do Array de parâmetros ParamIXB.

Ponto de Entrada

Descrição:

Ponto de entrada executado na rotina de Solicitação de Serviço (MNTA280) que permite adicionar botões na tela de inclusão

Localização:SIGAMDI: Atualizações/Controle de Oficina/Solicitação de Serviço/Solicitação

Programa Fonte:

MNTA280.prx

Função:

MNTA2809()
Parâmetros:
NomeTipoDescrição
ParamIXBNuméricoOperação

Retorno:

Nulo
#Include 'Protheus.ch'      

User Function MNTA2809(nVar),

	Local aNgButton := {}
	
	If nVar == 3	
		Aadd(aNgButton,{"PARAMETROS" ,{||MsgInfo("Ponto de Entrada" + CHR(13)+CHR(10)+ "Execução do Botão!")},;
		"Solicitacao - Ponto de Entrada","Solicitacao"})	
		_SetOwnerPrvt("aNgButton",aNgButton)
	EndIf

Return