Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 1

changes.mady.by.user Anderson Brunner

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user Anderson Brunner

Gravado em

Chave

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

MA630BUT - Incluir ou Excluir Botões

Linha de Produto:

Protheus

Segmento:

Manufatura

Módulo:

SIGAPCP - Planejamento e Controle da Produção

Parâmetro(s):


Nome
Tipo
Descrição
Default
Obrigatório Referência

ExpN1
Numérico

Opção indicando o modo escolhido pelo operador no cadastro(Visualização, Inclusão, Alteração e Exclusão).



X



ExpA2
Vetor
Array com botões pré-existentes na rotina como por exemplo o botão de exportação de dados para o Excel (caso possua esta alteração), já os botões recortar, copiar,colar, confirmar e cancelar, são obrigatórios e não aparecem neste array.


X


Idiomas:

Espanhol, Inglês

País(es):

Todos

Banco(s) de Dados:

Todos

Sistema(s) Operacional(is):

Todos

Ponto de Entrada

Descrição:

Permite a inclusão ou exclusão de botões de usuário na barra de ferramentas do cadastro de operações.

Localização:

Funções A630Visual() , A630Inclui() , A630Altera().

Programa Fonte:MATA630.PRX

Sintaxe:

MA630BUT - Incluir ou Excluir Botões ( < ExpN1> , < ExpA2> ) --> aBotoes

Retorno:

aBotoes

    (vetor)
  • O retorno deverá ser um array contendo a estrutura de botões incluídas pelo usuário, conforme exemplo.
Observações:


Bloco de código
titleExemplo:
linenumberstrue
User Function M710QTDE()Local cProduto  := paramixb[1]Local nQtdItem  := paramixb[2]Local dDtNecess := paramixb[3]Local nRet := nQtdItemIf Upper(AllTrim(cProduto))=='XYZ' .And. nQtdItem < 1000 nRet := 1000 EndIfReturn nRet
User Function MA010BUT()Local nOpcao  := PARAMIXB[1] //Opção escolhida (Visualização, Inclusão, Alteração ou ExclusãoLocal aBotoes := aClone(PARAMIXB[2]) //Array com botões caso existaaadd(aBotoes, { 'BITMAP', { || Funcao() }, OemtoAnsi('Texto')}})Return(aClone(aBotoes))