Ponto de Entrada
Descrição: | Ponto de Entrada para adicionar opções na rotina Agrega e Desagrega. |
Localização: | Atualizações \ MovAtendimento \ Agrega/desagrega (VEIXA040) |
Eventos: | Static Function MenuDef() Local aRotina := {} ADD OPTION aRotina TITLE STR0017 ACTION 'VA3000021_Visualizar()' OPERATION 2 ACCESS 0 // Visualizar ADD OPTION aRotina TITLE STR0018 ACTION 'VA3000031_Incluir()' OPERATION 3 ACCESS 0 // Incluir ADD OPTION aRotina TITLE STR0019 ACTION 'VA3000041_Alterar()' OPERATION 4 ACCESS 0 // Alterar ADD OPTION aRotina TITLE STR0020 ACTION 'VEIA330()' OPERATION 4 ACCESS 0 // Efetivar ADD OPTION aRotina TITLE STR0094 ACTION 'VA3300131_MostrarDocumentosTela()' OPERATION 2 ACCESS 0 // Documentos Gerados ADD OPTION aRotina TITLE STR0021 ACTION 'VA3000051_Cancelar(0)' OPERATION 5 ACCESS 0 // Cancelar
If ( ExistBlock("VA300BT") ) aRotina := ExecBlock("VA300BT",.f.,.f.,{aRotina}) EndIf
Return aRotina
|
Programa Fonte: | VEIA300.PRW |
Função: | MENUDEF() |
Parâmetros: | Nome | Tipo | Descrição |
---|
PARAMIXB | Array | Vetor que compõe as opções padrão do browse da rotina |
|
Retorno: | Nome | Tipo | Descrição |
---|
aRotina | Array | Vetor que compõe as opções atualizadas pelo ponto de entrada do browse da rotina |
|
Exemplo:
#Include 'Protheus.ch'
User Function VA300BT()
aRot := PARAMIXB[1]
aadd(aRot, {"Botao Teste", "u_BOTTESTE", 0, 1})
Return aRot
User Function BOTTESTE()
MsgAlert('Botao de Teste Acionado!', 'Botao')
Return