Histórico da Página
Ponto de Entrada
Descrição: | Este Ponto de Entrada será executado na rotina Oportunidades/Interesses (VEICM680) e permite a inclusão de opções no Outras Ações do Browse. | ||||||
Localização: | Atualizações \ Cad C e V \ Oportunid Negócios (VEICM680) | ||||||
Eventos: | /* ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± ±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍ»±± ±±ºPrograma ³ MenuDef º Autor ³ Andre Luis Almeida º Data ³ 15/07/13 º±± ±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍ͹±± ±±ºDescricao ³ MenuDef monta aRotina º±± ±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±± ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±± ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß */ Static Function MenuDef() Local aRotina := { { STR0002 ,"axPesqui", 0 , 1 },; // Pesquisar { STR0003 ,"VCM680" , 0 , 2 },; // Visualizar { STR0004 ,"VCM680I" , 0 , 3 },; // Incluir { STR0005 ,"VCM680" , 0 , 4 },; // Alterar { STR0071 ,"VCM680C" , 0 , 5 },; // Cancelar { STR0081+" <F7>" ,"VCC680FUNIL()", 0 , 1 },; // Funil Interesses <F7> { STR0089 ,"MsDocument", 0 , 4}} // Banco de Conhecimento If (ExistBlock("VCM680MD")) // Ponto de Entrada para adicionar opções no Menu aRotina := ExecBlock("VCM680MD", .f., .f., {aRotina}) EndIf Return aRotina | ||||||
Programa Fonte: | VEICM680.PRW | ||||||
Função: | MENUDEF() | ||||||
Parâmetros: |
| ||||||
Retorno: |
|
---|
Exemplo:
/*
===============================================================================
###############################################################################
##+----------+------------+-------+-----------------------+------+----------+##
##|Função | VCM680MD | Autor | MIL | Data | 06/02/19 |##
##+----------+------------+-------+-----------------------+------+----------+##
##|Descrição | Inclusão no aRotina de Oportunidades/Interesses (VEICM680) |##
##+----------+--------------------------------------------------------------+##
###############################################################################
===============================================================================
*/
User Function VCM680MD()
Local aRot := ParamIxb[1]
aadd(aRot, {"Executar Exemplo", "U_M_EXEMPLO", 0, 6})
Return aRot