A inclusão de notificações do Event Viewer é um recurso aberto para implementação tanto pelo Produto Padrão quanto por Clientes em suas Customizações, para isso foi disponibilizada a função EventInsert com o objetivo de registrar um Evento e consequentemente notificar todos os usuários inscritos.
Para isso, primeiramente precisamos proceder com o cadastro do evento na tabela genérica E3 (SX5), para isso deveremos acessar o Configurador no menu “Ambiente/Cadastro” e escolher a rotina “Tabelas” (CFGX016).
Finalizado o cadastro, o novo evento passa a ser disponibilizado para inscrição para os usuários que selecionarem o Canal “002 – Ambientes” e a categoria “001 – Módulos” conforme abaixo:
Porém apenas com o cadastro nenhum evento será emitido para os usuários inscritos pois ainda se faz necessária a implementação do "gatilho" em uma rotina, gatilho esse que podemos programar pelo uso da função EventInsert que vamos detalhar melhor abaixo:
EventInsert( cChannel, cCateg, cEventID, nLevel, cCargo, cTitle, cMessage, lPublic )
Parâmetro | Tipo | Descrição | Obrigatório | Deafult |
---|
cChannel | Character | Canal do evento | X |
|
cCateg | Character | Categoria do evento | X |
|
cEventID | Character | Código do evento | X |
|
nLevel | Numeric | Nível do evento, sendo: - 0 - Informação
- 1 - Critico
- 2 - Erro
| X |
|
cCargo | Character | Identificador auxiliar do evento |
| Em branco |
cTitle | Character | Título da mensagem do evento |
| Em branco |
cMessage | Character | Mensagem do evento |
| Em branco |
lPublic | Logical | Indica se é pública, e qualquer inscrito receberá a mensagem (.T.) ou se somente o usuário que disparou o evento. |
| .F. |
#Include "FWEVENTVIEWCONSTS.CH"
Function TstEvent(cMensagem,cTitulo)
Local cEventID := "061"
Default cMensagem := ""
Default cTitulo := "Bloqueio de Processos"
EventInsert(FW_EV_CHANEL_ENVIRONMENT /*"002" */,;
FW_EV_CATEGORY_MODULES /*"001" */,;
cEventID /*cEventID*/,;
FW_EV_LEVEL_INFO /*1 */,;
"" /*cCargo */,;
cTitulo /*cTitle */,;
cMensagem /*cMessage*/,;
.T. /*lPublic */)
Return Nil