Analisando superficialmente o código, se esta STATIC FUNCTION linhaJson() é chamada muitas vezes, de dentro do mesmo contexto de execução, REMOVA as linhas : ZX1->(dbGoTop()) e ZX1->(dbCloseArea()). Você não precisa abrir e fechar o alias ZX1 a cada loop. 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(). Agora, para avaliar o tempo gasto por esta função, e pelas chamadas vindas de dentro dela, a melhor alternativa é usar o Profiler do AdvPL. Por hora, veja na TDN no link [Como executar um Profiler][1]. Embora dessa forma o log gerado vai gerar informações sobre a rotina inteira, a análise do console.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(), e todas as chamadas de funções chamadas de dentro dela. [1]: http://tdn.totvs.com/display/public/PROT/LogProfiler+-+Como+executar