import.css=/download/attachments/6062824/tecnologia.css |
Retorna um array com o nome dos fontes compilados.
GetSrcArray( < cNome > ) |
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 |
|
Nome | Tipo | Descrição |
|---|---|---|
aFontes | vetor | Retorna um array de strings, contendo o nome dos fontes compilados identificados no repositório. |
User Function exemplo()
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
|
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server