Trecho do ponto de entrada que faz a chamada para o Ponto de Entrada que o cliente renomeia para XMA140BUT

// Executa Ponto de Entrada do Cliente que adiciona botões na EnchoiceBar
	If ExistBlock( "XMA140BUT" )
		aUsButtons := ExecBlock( "XMA140BUT", .F., .F. )
		Return aUsButtons
	EndIf

Documentação oficial no TDN

MA140BUT - Inclusão de botões no recebimento - Inclusão de botões no recebimento

MA140BUT - Inclusão de botões no recebimento

Ponto-de-Entrada: MA140BUT - Inclusão de botões no recebimento

Versões:	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 Ma140Bar() responsável pela inclusão de botões.

EM QUE PONTO : É chamado no momento da definicao dos botoes padrao do recebimento.`

Programa Fonte

MATA140.PRW

Sintaxe

MA140BUT - Inclusão de botões no recebimento ( < UPAR> ) --> aBotao

Parâmetros:

	Nome			Tipo			Descrição			Default			Obrigatório			Referência
	UPAR			Nulo			Nenhum						X

Retorno

aBotao

O retorno deve ser um array onde cada elemento deve ser um subarray com aseguinte estrutura:{ "BITMAP", { || Funcao() }, "ToolTip" }Onde:"BITMAP" -> Nome do bitmap do botao. O mesmo deve estar contido nas DLLs derecursos do Protheus.{ || Funcao() } -> CodeBlock contendo a funcao a ser chamada. Esta funcaopode ser um ExecBlock"ToolTip" -> Descricao do Botao.