Histórico da Página
...
user function calcFatorial()
local n
msgalert("Calculo de Fatoriais")
resultado := "Numero = Fatorial" + chr(13)
for n := 1 to 5 step 2
calcula(n*2)
next
msgAlert(resultado)
return
static function calcula(anNumber)
local x := anNumber
local total := 1
while (x > 1)
total := total * x
x--
end
resultado += str(anNumber,3) + " é "
resultado += transform(total, "@E 9,999,999,999")
resultado += chr(13)
return
Nas configurações do launcher, existe a aba "source", nela você configura onde vai ser feita busca dos arquivos no processo de debug.
Tela 54.1 : Aba Source
Para solucionar o problema de não indicação da linha corrente durante a depuração, marque a opção: "Search for duplicate source files on the path" (Tela 54.1 A).
Selecione a opção "Default" (Tela 54.1 B) e clique em "Remover".(Tela 54.1 C)
Adicione o diretório que você deseja que a busca seja feita, clicando em "Add..."(Tela 54.1 D)
Será apresentada a tela 54.2.:
Tela 54.2: Add Source.
Selecione a opção "Projeto Totvs" (Tela 54.2 A) e depois clique em "OK"(Tela 54.2 B).
Marque o projeto desejado e prossiga.
Após a compilação do arquivo-fonte acima, execute-o acionando o botão "Executar" (se necessário configure um executor). Após encerrar a execução, terá algo semelhante a:
Tela 55: Programa sugerido para depuração
Com o editor ativo (a aba fica destacada), acione Ctrl+F10 e ative a numeração de linhas.
...