Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
AT450BUT - Inclusão de Botões Padrão da OS
AT450BUT - Inclusão de Botões Padrão da OS

Ponto-de-Entrada: AT450BUT - Inclusão de Botões Padrão da OS
Descrição:
Inclusão de Botões.O ponto é chamado no momento da definição dos botões padrão da O.S. Para adicionar mais de um botão adicionar mais subarrays ao array.
Programa Fonte
.PRW
Sintaxe

AT450BUT - Inclusão de Botões Padrão da OS ( < UPAR> ) --> URET

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
UPARArray of RecordEste ponto não recebe parâmetros.
X
Retorno
    URET(qualquer)
  • O retorno deve ser um array onde cada elemento deve ser um subarray com a
    seguinte estrutura:
    { "BITMAP", { || Função() }, "ToolTip" }

    Onde:
    "BITMAP" -> Nome do bitmap do botão. O mesmo deve estar contido nas DLLs de
    recursos do siga.
    { || Funcao() } -> CodeBlock contendo a função a ser chamada. Esta função
    pode ser um ExecBlock
    "ToolTip" -> Descrição do Botão.

    Exemplo de programação: Para inserir um botão chamando a Base Instalada.

    aBotao := {}
    AAdd( aBotao, { "PRODUTO", { || Teca040() }, "Base Instalada" } )

    __Return( aBotao ) // Protheus : Return( aBotao )