Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: AT450BU2 - Cria Botões em Consulta de Atendimentos
Versões: Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10
Descrição: 
Ponto de entrada utilizado para criação de botões de usuário na tela de consulta dos atendimentos
Programa Fonte 
.PRW
Sintaxe

AT450BU2 - Cria Botões em Consulta de Atendimentos ( < Par> ) --> aRetorno

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
Par Array of Record X
Retorno
    aRetorno(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 botão. O mesmo deve estar contido nas DLLs de recursos do siga.
    { || Função() } -> 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 )