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 |
---|---|
0 - BUILD_FULL | Usuário tem permissão para compilar qualquer tipo de fonte |
2 - BUILD_PARTNER | Permissão de compilação da Fábrica de Software TOTVS |
3 - BUILD_PATCH | Aplicação de Patch |
1 - BUILD_USER | Usuário só pode compilar User Functions |
Exemplos
User function Exemplo() aData := GetAPOInfo("ExemplosTDN.prw") Return
Abrangência
Microsiga Protheus 8.11 , Protheus 10 , TOTVS Application Server 10 , ByYou Application Server