Perguntas Saber todas as Rotinas dentro do RPO

Prezados,

Estamos em auditoria interna, e o auditor solicitou todas as rotinas do Protheus que podem ser utilizadas nos arquivos XNU, pensei em ler todos os arquivox XNU, porem temos mais de 50 perfis, e em vários temos repetições de rotinas. Para tentar solucionar este problema baixei o programa CheckRPO(), porem ele trás somente os arquivos PRW, e não as funções. Alguem sabe como eu faço para ter as funções que aparecem no Inspetor de repositório do RPO?

Exemplo:
Nome do Fonte LERPO.PRW
Função de Chamada CheckRPO.

Desde já agradeço a ajuda.

Att.

Leonardo,
Existem alguns fontes esparramados por aí que conseguem extrair de dentro do RPO o nome de todas as funções que têm lá. Entretanto, posso afirmar com muita precisão que esse resultado lhe trará dezenas de milhares de funções.
Talvez, o que a turma da sua auditoria deseja, é apenas o nome dos programas que são chamados em primeiro momento.
Separar de dentro de todas as funções do RPO apenas aquelas que são chamadas no menu seria um trabalho bastante grande.
Entretanto, você poderá testar (em ambiente propício, claro), os fontes abaixo:
User function mostra_fonte()

Local aFontes := {}
Local nI , nT
aFontes := GetSrcArray("*.PRW")
nT := len(aFontes)
If nT > 0
For nI := 1 to nT
aData := GetAPOInfo(aFontes[nI])
conout("Fonte "+aData[1]+";"+aData[2]+";"+aData[3]+";"+dtoc(aData[4]))
Next
MsgInfo("Fontes encontrados. Verifique log de console.")
Else
MsgStop("Nenhum fonte encontrado.")
Endif

Return

---

Considere também avaliar esse link:
tdn.totvs.com/display/tec/GetFuncArray


Bom divertimento!