Cross Segmento - Backoffice (Linha Protheus) - SIGAACD - Como gerar um Log de auditoria para o ACD?

Como rastrear logs de uso do ACD? para gravar logs dos processos efetuados?

Ambiente

Cross Segmento - TOTVS Backoffice (Linha Protheus - SIGAACD - Todas as releases)

Solução

O ponto de entrada CBLOGALT é executado pela função genérica CBLog sempre que o parâmetro MV_LOGACD estiver ativado. Sua principal função é permitir que o sistema realize gravações customizadas em tabelas específicas do cliente no momento em que o log padrão do ACD é gerado.

Ele disponibiliza o array PARAMIXB com as seguintes posições:

Passos

1. Certifique-se de que o parâmetro MV_LOGACD está configurado como .T. (Ativo) no Configurador (SIGACFG).

2. Implemente a função de usuário U_CBLOGALT em seu ambiente de desenvolvimento.

3. Utilize o array PARAMIXB para identificar a operação e os dados que estão sendo processados.

4. Compile o código e realize os testes nas rotinas de coleta de dados.

Exemplo de implementação:

/*/{Protheus.doc} CBLOGALT
Ponto de entrada para gravação customizada do Log do ACD
@type  Function
@author KCSBuilder
/*/
User Function CBLOGALT()
    Local aArea   := GetArea()
    Local aEstrut := PARAMIXB // Recebe os parâmetros do log
 
    // Exemplo: Gravação em tabela customizada ZZ1
    DbSelectArea("ZZ1")
    If RecLock("ZZ1", .T.)
       ZZ1->ZZ1_FILIAL := xFilial("ZZ1")
       ZZ1->ZZ1_USUARI := __cUserID
       ZZ1->ZZ1_DATA   := DATE()
       ZZ1->ZZ1_HORA   := TIME()
       ZZ1->ZZ1_ROTINA := FUNNAME()
       ZZ1->(MsUnlock())
    Endif
 
    RestArea(aArea)
Return