Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: MA160BAR - Adiciona botões no Toolbar
Versões: Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
LOCALIZAÇÃO : Function MA160BAR - Função responsável por montar uma enchoice especifica para a analise da cotação. 

EM QUE PONTO : No inico da Função, antes de montar a ToolBar da cotação, deve ser usado para adicionar botões do usuario na toolbar da cotação através do retorno de um Array com a estrutura do botão a adicionar.
Programa Fonte 
MATA160.PRW
Sintaxe

MA160BAR - Adiciona botões no Toolbar ( [ PARAMIXB1 ], [ PARAMIXB2 ], [ PARAMIXB3 ], [ PARAMIXB4 ], [ PARAMIXB5 ], [ PARAMIXB6 ], < PARAMIXB7> , [ PARAMIXB8 ] ) --> aNewButton

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
PARAMIXB1 Numérico Registro posicionado da tabela SC8.
PARAMIXB2 Vetor Array contendo todos os dados da Planilha de Analise
PARAMIXB3 Vetor Array contendo os dados do FOLDER AUDITORIA grava SCE
PARAMIXB4 Vetor Array contendo os dados da cotacao da tabela SC8
PARAMIXB5 Vetor Array contendo os dados utilizados na listbox Fornec.
PARAMIXB6 Vetor Array contendo os Headers de todas as estruturas Util
PARAMIXB7 Vetor Array contendo todas as referencias de impostos SC8 X
PARAMIXB8 Lógico Indica se usa TES padrao/Cotacao
Retorno
    aNewButton(vetor)
  • O retorno deve ser um array onde cada elemento deve ser um subarray com a
    seguinte estrutura:
    { "BITMAP", { || Funcao() }, "ToolTip" }

    Onde:
    "BITMAP" -> Nome do bitmap do botao. O mesmo deve estar contido nas DLLs de
    recursos do siga.
    { || Funcao() } -> CodeBlock contendo a funcao a ser chamada. Esta funcao
    pode ser um ExecBlock
    "ToolTip" -> Descricao do Botao.
Exemplos 
User Function MA160Bar() Local nRegSC8  := PARAMIXB[1]Local aButtons := {}aadd(aButtons,{'BUDGETY',{|| U_RA097PCot(nRegSC8)},'Consulta Aprovacao','Aprovac.'}) Return (aButtons )