Retorna um array com informações (nome, linguagem, modo de compilação, data da última modificação e hora/minuto/segundo) de um determinado arquivo de código-fonte (*.PRW).
Sintaxe
GetApoInfo( < cFonte > )
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
---|---|---|---|---|
cFonte | caractere | Indica o nome do arquivo de código fonte (.PRW). | X |
|
Retorno
Nome | Tipo | Descrição |
---|---|---|
aData | vetor | Retorna um array com os dados do arquivo de código fonte. Para informações do formato do array, consulte a tabela Formato do array de retorno, na área Observações. |
Observações
Formato do Array de retorno:
Posição | Valor |
---|---|
aData[1] | Nome do fonte |
aData[2] | Linguagem do fonte. Exemplo: AdvPL, 4GL, ... |
aData[3] | Modo de Compilação |
aData[4] | Data da última modificação do arquiv |
aData[5] | Hora, minutos e segundos da última modificação realizada no arquivo |
Importante: A partir da build 7.00.090818P, foi implementado o 5º elemento no formato do array de retorno desta função.
Desta forma, caso um código fonte seja modificado para utilizar este novo elemento de retorno, e este código fonte pode ser executado em uma build anterior a 7.00.090818P, deve-se proteger a execução verificando a existência do quinto elemento, sob pena de reproduzir a ocorrência de erro fatal AdvPL "Array ou of bounds".
Modos de compilação:
Valor | Descrição |
---|---|
BUILD_FULL - 0 | Usuário tem permissão para compilar qualquer tipo de fonte |
BUILD_PARTNER - 2 | Permissão de compilação da Fábrica de Software TOTVS |
BUILD_PATCH - 3 | Aplicação de Patch |
BUILD_USER - 1 | Usuário só pode compilar User Functions |
Exemplos
User function Exemplo() // Força o erro da aplicação aData := GetAPOInfo("ExemplosTDN.prw") Return
Abrangência
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server