Árvore de páginas

Ponto de entrada que permite ativar/desativar a exibição de alguns botões da rotina

Características do Requisito

Linha de Produto:

Microsiga Protheus

Segmento:

Manufatura

Módulo:

SIGAMNT - Manutenção de Ativos / SIGAGFR - Gestão de Frotas

Rotina:

RotinaNome Técnico
MNTA291Atendimento Facilities

Ponto de Entrada

Descrição:

Ponto de entrada que permite ativar/desativar a exibição de alguns botões da rotina.

Programa Fonte:

MNTA291.PRW

Parâmetros

TipoDescrição
array

Lista contendo os botões possíveis para inativação.

PosiçãoTipoDescrição
1string

Chave para identificar o botão:

ChaveBotão
ORDEM

Ordens de Serviço

FECHAFechamento de S.S.
CANCE

Cancelamento da S.S.

HORASReporte de Horas
2objectObjeto de controle do botão, o qual deve ser inativado ou ativado conforme a regra.
Exemplo do P.E. MNTA2910
#include 'totvs.ch'  
 
User Function MNTA2910()
 
    Local aButtons := ParamIXB[1]
    Local nInd1    := 0
    
    For nInd1 := 1 To Len( aButtons )

        If aButtons[nInd1,1] == 'ORDEM' // Ordem de Serviço

            aButtons[nInd1,2]:Enable()

        EndIf

        If aButtons[nInd1,1] == 'CANCE' // Cancelamento

            aButtons[nInd1,2]:Disable()

        EndIf

        If aButtons[nInd1,1] == 'FECHA' // Fechamento

            aButtons[nInd1,2]:Enable()

        EndIf

        If aButtons[nInd1,1] == 'HORAS' // Reporte de Horas

            aButtons[nInd1,2]:Disable()

        EndIf
        
    Next nInd1
 
Return