Linha Microsiga Protheus

Árvore de páginas

Ponto de Entrada

Descrição:

Este Ponto de Entrada será executado na rotina Consulta Oport Neg (VEICC680), na tela principal da rotina. A mesma permite a inclusão/ manipulação de opções no Outras Ações.

Localização:

Consultas \ C e V \ Consulta Oport Neg (VEICC680)

Eventos:

//

If ( ExistBlock("VC680BOT") )

aBotAux := ExecBlock("VC680BOT",.F.,.F.)

If ( ValType(aBotAux) == "A" )

aNewBot := aClone(aBotAux)

EndIf

EndIf

Programa Fonte:

VEICC680.PRW

Função:

VEICC680()

Retorno:
NomeTipoDescrição

aBot680

Vetor

Vetor com as novas opções customizadas.

Exemplo:

Include totvs.ch

User Function VC680BOT()

Local aBot680 := {} // Novas opçoes no Acoes Relacionadas da rotina VEICC680

aAdd( aBot680 , { "CONTAINR" , {|| MsgAlert("Opção Teste executada com sucesso!") } , "Opção Teste" } )

Return(aBot680)