OXA100BT Ponto de Entrada para possibilitar adicionar botões na tela de Fechamento de OS (OFIXA100)

Ponto de Entrada

Descrição:

Ponto de Entrada para adicionar botões na tela de fechamento de OS.

Localização:

Atualizações \ Mov Oficina \ Fechamento OS Mod2

Eventos:

Static Function MenuDef()

Local aRotina := {;

{STR0002, "PesqBrw", 0, 1},; // Pesquisar

{STR0003, "OXA100F", 0, 3},; // Fechar

{STR0004, "OXA100LEG", 0, 4, 2, .F.},; // Legenda

{STR0017, "OXA100PESQ", 0, 1}; // Pesquisa Avancada

}

If (ExistBlock("OXA100BT"))

aRotina := ExecBlock("OXA100BT", .F., .F., aRotina)

EndIf

Return aRotina

Programa Fonte:

OFIXA100.PRW

Função:

MENUDEF()

Parâmetros:

Nome	Tipo	Descrição
aRotina	Matriz	Vetor com botões da rotina.

Retorno:

Nome	Tipo	Descrição
aRotina	Matriz	Vetor com botões da rotina e botões customizados.

Exemplo:

User Function OXA100BT()

aRot := PARAMIXB

aadd(aRot, {"Botao Teste", "u_BOTTESTE", 0, 1})

Return aRot

User Function BOTTESTE()

MsgAlert('Botao de Teste Acionado!', 'Botao')

Return