TCSqlReplay

Permite habilitar e desabilitar a coleta de logs de trace de execuções do DBaccess via TOTVS | Application Server das conexões ativas do processo atual.

Sintaxe

TCSqlReplay( <nOpc> , <@cParmRet> )

Parâmetros

Retorno

Observações

• Caso estejam em uso as configurações SQLReplay no Environment do APPServer.ini, as chamadas da TCSqlReplay vão atuar sobre a coleta de dados do processo atual, podendo interferir com a coleta já em andamento. O objetivo desta função é permitir ao FrameWork AdvPL criar uma forma instrumentada de, dicamicamente de dentro de uma aplicação AdvPl, permitir instrumentar um trecho de código para gerar informações pertinentes a um processamento, para fins de deputação ou mesmo profiler, sem que uma coleta global esteja habilitada no ambiente.

• Existe praticamente um aumento de duas vezes a quantidade de I/O quando utilizamos a coleta de dados de trace do DBAccess no TOTVS | Application Server. Este overhead será mais percebido em ambientes onde o TOTVS Application Server e o DBAccess estão em equipamentos separados por uma rede física. Por estas questões, recomendamos o uso deste recurso apenas em processos onde uma rastreabilidade em maior profundidade seja realmente necessária.

Exemplos

User Function exemplo()
  // VErifica se o recurso esta disponivel 
  cParmRet := ''
  lOk := TCSqlReplay(1,@cParmRet)
  If !lOk 
     MsgStop(cParmRet)
     Return
  Endif 
  // Habilita a coleta de dados em arquivo
  cParmRet := '\sqlreplay\meulog.txt'
  TCSqlReplay(2,@cParmRet)
  DoSomeStuff()
  // desabilita a coleta 
  cParmRet := ''
  TCSqlReplay(3,@cParmRet)
Return

Veja também

• Melhoria - Implementação do AdvSQLReplay
• AdvSQLReplay