Analisando superficialmente o código, se esta STATIC FUNCTION linhaJson()STATIC FUNCTION linhaJson()
é chamada muitas vezes, de dentro do mesmo contexto de execução, REMOVA as linhas : ZX1->(dbGoTop()) e ZX1->(dbCloseArea())ZX1->(dbGoTop()) e ZX1->(dbCloseArea())
. Você não precisa abrir e fechar o alias ZX1ZX1
a cada looploop. Isso já vai te dar um com ganho de desempenho, de olhos vendados. E também não precisa posicionar no primeiro registro da ordem para fazer um DBSeek()DBSeek()
.
Agora, para avaliar o tempo gasto por esta função, e pelas chamadas vindas de dentro dela, a melhor alternativa é usar o ProfilerProfiler do AdvPLAdvPL. Por hora, veja na TDN no link link Como executar um Profiler. Embora dessa forma o loglog gerado vai gerar informações sobre a rotina inteira, a análise do console.logconsole.log
do Protheus Server gerado após a execução da rotina permite identificar quais as funções que foram chamadas de que ponto do fonte, inclusive todas as chamadas da função LinhaJson()LinhaJson()
, e todas as chamadas de funções chamadas de dentro dela.