Linha Microsiga Protheus

Árvore de páginas

Carregando...
Tempo aproximado para leitura: 4 minutos


01. DADOS GERAIS

Produto:

TOTVS Manutenção de Ativos

Linha de Produto:

Linha Protheus

Segmento:

Manufatura

Módulo:

TOTVS Manufatura (Linha Protheus) - Manutenção de ativos (SIGAMNT)

Função:MNTA265
País:Brasil


02. DESCRIÇÃO

Descrição:

Ponto de Entrada executado na montagem da tela, permite incluir e desabilitar botões na rotina

Localização:

SIGAMNT: Atualizações/Controle de Oficina/Plano de Manutenção/Alteração de O.S.

Eventos:

Alteração de O.S. (MNTA265)

Programa Fonte:

MNTA265.prx

Função:

MNTA2653()

Parâmetros:
NomeTipoDescrição
PARAMIXB[1]ObjetoObjeto do painel de botões
PARAMIXB[2]NuméricoLinha em que os botões serão exibidos
PARAMIXB[3]CaractereReferência da tabela temporária
PARAMIXB[4]Array

Botões que serão carregados na rotina

xTipoDescrição
PARAMIXB[x, 1]CaractereNome do botão
PARAMIXB[x, 2]LogicoIndica se o botão deve ou não ser exibido
Retorno

O ponto de entrada deve retornar um valor apenas quando for necessário desabilitar algum botão existente

na tela. O retorno deve ser o mesmo Array recebido pelo PARAMIXB[4], alterando apenas a segunda

posição dos botões que não devem aparecer para .F..



03. DEMAIS INFORMAÇÕES

Exemplo MNTA2653
#INCLUDE 'PROTHEUS.CH'
  
//-------------------------------------------------------------------
/*/{Protheus.doc} MNTA2653
Inclui botões na rotina MNTA265
  
@author  João Zandoná
@since   15/08/2024
@version P11/P12
/*/
//------------------------------------------------------------------- 
User Function MNTA2653()
   
    Local oPainel := PARAMIXB[1]
    Local nLine   := PARAMIXB[2]
    Local cTRB    := PARAMIXB[3]
    Local aBtn    := PARAMIXB[4]
 
	// Inclui botões
    @ nLine,508 Button 'Ordem?' Size 38,12 Pixel Action { || MsgInfo( 'Ordem: ' + (cTRB)->TJ_ORDEM ) } Of oPainel  //"Ordem"
    @ nLine,553 Button 'Bem?' Size 38,12 Pixel Action { || MsgInfo( 'Bem: ' + (cTRB)->TJ_CODBEM ) } Of oPainel  //"Bem"
 	
	// Desabilita botões
    aBtn[3, 2] := .F.
    aBtn[4, 2] := .F.
    aBtn[6, 2] := .F.
    aBtn[7, 2] := .F.
    aBtn[10, 2] := .F.
    aBtn[ aScan( aBtn, { | x | x[1] == 'Etapas' } ), 2 ] := .F.

Return aBtn


04. ASSUNTOS RELACIONADOS

  • Não se aplica.