VA01AROT - Opções Personalizadas na Rotina Entrada por Compra

Descrição

Este Ponto de Entrada está localizado na rotina Entrada por Compra (VEIXA001). Permite realizar  a inclusão de novas opções personalizadas em Ações Relacionadas no browse da rotina.

Observações

Exemplos

User Function VA01AROT
Local aRet := aClone(ParamIxb1)

Aadd(aRet, { "PONTO DE ENTRADA", "U_FS_TESTE()", 0, 2 } )

Return aClone(aRet)

User Function FS_TESTE()

MsgInfo("Ponto de entrada VA01AROT executado com sucesso.")

Return(.t.)

Preview

Veja também

Idioma

Português(Brasil)

Versões

Todas

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

aRotina

Retorno

aRotina

Eventos de chamada do Ponto de Entrada

Static Function MenuDef()
Local aRotina := {;
{ OemtoAnsi(STR0002) ,"AxPesqui" , 0 , 1},; // Pesquisar
{ OemtoAnsi(STR0003) ,"VXA001" , 0 , 2},; // Visualizar
{ OemtoAnsi(STR0004) ,"VXA001" , 0 , 3},; // Incluir
{ OemtoAnsi(STR0005) ,"VXA001" , 0 , 5},; // Cancelar
{ OemtoAnsi(STR0006) ,"VXA001LEG" , 0 , 6},; // Legenda
{ OemtoAnsi(STR0007) ,"FGX_PESQBRW('E','0')" , 0 , 2}} // Pesq.Avancada

If ExistBlock("VA01AROT")
aRecebe := ExecBlock("VA01AROT",.f.,.f.,{aRotina} )
Endif
If Valtype(aRecebe) == "A"
aRotina := aClone(aRecebe)
Endif

//
Return aRotina

Variáveis

Programa Fonte

VEIXA001.PRW