Histórico da Página

Descrição

O ponto de entrada PM200BUT permite incluir botões de usuários na inclusão de um projeto, em Ações relacionadas.

Observações

Exemplos

User Function PM200BUT()
Local aButtons := {}
Aadd( aButtons, {'Novo Botão' , { | | AxPesqui()

},'0',2

}

) 

Return(aButtons)

Preview

Veja também

Idioma

Português(Brasil)

Versões

Microsiga Protheus 11

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

Nenhum

Retorno

aButtom(vetor)
Retorna o array de botões de usuário.

Eventos de chamada do Ponto de Entrada

If nOperation == 3 .and. ExistBlock("PM200BUT")

aUsButtons

:=

ExecBlock("PM200BUT",.F.,.F.)

If

ValType(aUsButtons)

==

"A"

For

nI

:=

1

To

Len(aUsButtons)

oView:AddUserButton(

aUsButtons

[nI

]

[1

],

aUsButtons

[nI

]

[3

],

aUsButtons

[nI

]

[2

],NIL,NIL)

Next

nI

Endif

EndIf

Variáveis

Programa Fonte

PMSA200.PRW