Linha Microsiga Protheus

Árvore de páginas

QDOBT050 - Inclusão de Botões

Linha de Produto:Protheus
Segmento:Manufatura
Módulo:SIGAQDO - Controle de Documentos
Idiomas:Português, Espanhol, Inglês
País(es):Todos
Banco(s) de Dados:Todos
Sistema(s) Operacional(is):Todos

Ponto de Entrada

Descrição:QDOBT050 - Inclusão de Botões
Localização:Function QDOA050() - Na criação da barra de botões.
Em que ponto:Ponto de Entrada para acrescentar de 1 à 3 botões na barra de botões da tela de cadatro do documentos.
Programa Fonte:QDOA050.PRX
Sintaxe:QDOBT050 - Inclusão de Botões ( < nOpc,M->QDH_DOCTO,M->QDH_RV> ) --> Array
Retorno:aButtons(vetor)
  • Retornar array dos botões de usuário.
Observações:Array(vetor)
Array multidimensional com ate 3 linhas e 2 colunas, sendo a colunas
1º) o nome do bitmap do botao (imagem)
2º) valor do action do botao. (String com a função a ser executada por Macro Substituição )


Exemplo:

#INCLUDE "RWMAKE.CH"
#INCLUDE "PROTHEUS.CH"

USER FUNCTION QDOBT050()

// Conteúdos retornados no PARAMIX:	
// PARAMIX[1] = Ação da tela
// PARAMIX[2] = Código do Documento posicionado
// PARAMIX[3] = Revisão do Documento posicionado        

Local aArrayBt := PARAMIXB
Local aRotina   := {}
Local cPrograma := "FWAlertInfo('Seu programa executado por Macro Substituição','Executado por Macro Substituição')"

aAdd( aRotina,{"BOTTOM",  cPrograma, "TESTE_1" } )  

RETURN aRotina