Retorna um array com o nome dos fontes compilados.
GetSrcArray( < cNome >, [ nRPO ] )
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|---|---|---|---|
cNome | caractere | Indica o nome do código fonte ou máscara. Observação: São aceitos os caracteres curingas (* e ?). | X | |
nRPO | numérico | Indica o nome o repositório que será feita a busca. Valores possíveis: 1 - RPO Padrão, 3 - RPO Custom. Caso o parâmetro não seja informado o valor 1 é assumido como padrão. Este parâmetro é válido a partir a release 20.3.0.x (Application Server Harpia) |
Nome | Tipo | Descrição |
|---|---|---|
aFontes | vetor | Retorna um array de strings, contendo o nome dos fontes compilados identificados no repositório. |
User Function exemplo1()
Local aFontes := {}
Local nI , nTaFontes := GetSrcArray("M??R*.PRW")
nT := len(aFontes)
If nT > 0
For nI := 1 to nT
conout("Fonte "+aFontes[nI]+" encontrado.")
Next
MsgInfo("Fontes encontrados. Verifique log de console.")
Else
MsgStop("Nenhum fonte encontrado.")
Endif
Return
// Exemplo válido a partir da versão 20.3.0.x
User Function exemplo2()
Local aFontes := {}
Local nI , nTaFontes := GetSrcArray("M??R*.PRW", 3)
nT := len(aFontes)
If nT > 0
For nI := 1 to nT
conout("Fonte "+aFontes[nI]+" encontrado no RPO Custom.")
Next
MsgInfo("Fontes encontrados. Verifique log de console.")
Else
MsgStop("Nenhum fonte encontrado no RPO Custom.")
Endif
Return
13.2.3.x