Linha Microsiga Protheus

Árvore de páginas

Ponto de Entrada

Descrição:

Este Ponto de Entrada está localizado na rotina Frota de Veiculos (VEICA580), tem como finalidade possibilitar o usuário Incluir Botões no menu da mBrowse.

Localização:

Atualizações / Mov CeV / Frota de Veiculos (VEICA580)

Eventos:

Static Function MenuDef()

Local aRecebe

Local aRotina := { { STR0002 ,"AxPesqui", 0 , 1},; && Pesquisar

{ STR0003 ,"VCA580_2" , 0 , 2},; && Consultar

{ STR0004 ,"VCA580_3" , 0 , 3},; && Incluir

{ STR0005 ,"VCA580_4" , 0 , 4},; && Alterar

{ STR0006 ,"VCA580_5" , 0 , 5}} && Excluir

 

If ExistBlock("PE580AROT")

aRecebe := ExecBlock("PE580AROT",.f.,.f.,{aRotina} )

Endif

If Valtype(aRecebe) == "A"

aRotina := aClone(aRecebe)

Endif

 

 

 

Return aRotina

 

Programa Fonte:

VEICA580                                                                                                                                              

Parâmetros:ParamIxb[1] - Vetor de opçoes originais

Função:

MENUDEF                       

Retorno:

aRet - Vetor com opçoes customizadas

 

Exemplo:

User Function PE580AROT()

 

aRet := ParamIxb[1]

aadd(aRet,{ "NOVA OPÇÂO" ,"M_PE_EXEMPLO" , 0 , 2})

return(aRet)