Ponto de entrada executado na rotina deSolicitaçã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:
Nome
Tipo
Descrição
ParamIXB[1]
Numérico
Operação
Retorno:
Nome
Tipo
Descrição
aNgButton
Array
Array com os dados do Botão
Tipo
Descrição
Exemplo
Obrigatório
Caracter
Corresponde ao código da imagem utilizada para o botão.
"PARAMETROS"
X
Bloco de Código
Bloco de código que será executado ao clicar no botão.
{|| MsgStop('Ponto de Entrada U_MNTA420Y') }
X
Caracter
Descrição do botão.
"Gerar S.A."
X
Caracter
Título do botão na tela.
"S.A."
X
Bloco de código
title
Exemplo do Ponto de Entrada MNTA2809()
#Include 'Totvs.ch'
User Function MNTA2809()
Local nVar := PARAMIXB[1]
Local aNgButton := {}
If nVar == 3
Aadd(aNgButton,{"PARAMETROS" ,{||MsgInfoMsgStop( "Ponto de Entrada" + CHR(13)+CHR(10)+ "Execução do Botão!")},;
"Solicitacao - Ponto de Entrada")},"Solicitacao"})
EndIf
Return aNgButton
Card
id
2
label
Anterior a [DATA_EXPEDIÇÃO]
Aviso
title
Mudança nos argumentos da User Function
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 deSolicitaçã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:
Nome
Tipo
Descrição
ParamIXB
Numérico
Operação
Retorno:
Nulo
Bloco de código
title
Exemplo do Ponto de Entrada MNTA2809()
#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