Retorna um array com as definições do servidor onde o TOTVS | Application Server foi instanciado.
GetSrvInfo() |
Nome | Tipo | Descrição |
---|---|---|
aSrvInfo | vetor | Retorna um array com informações do Totvs Application Server. Para o formato do array vide observação. |
Estrutura do array de retorno:
(*) Disponível em build igual ou superior a 7.00.131227A. (**) Disponível em build igual ou superior a 7.00.131227A. Para o "TOTVSTEC NG" no linux, dê permissão especial de execução no dmidecode (Ex. (***) Disponível em build igual ou superior a 7.00.131227A. Estrutura do Array das interfaces de rede:
Detalhes da Interface:
(****) Disponível em versão igual ou superior a 20.3.1.3 do AppServer. Retorna a arquitetura do processador no formato linux base. Valores possíveis: 32 bits - i686, 64 bits - x86_64, ARM - aarch32, ARM64 - aarch64, Deconhecido - unknown.
|
User function exemplo() local aSrvInfo := GetSrvInfo() local cDetails := "" local i := 0 cDetails := "Nome Computador: " + aSrvInfo[01] + chr(13) + chr(10) // Nome do servidor cDetails += "Sistema Operacional: " + aSrvInfo[02] + chr(13) + chr(10) // Sistema Operacional cDetails += "Informações Adicionais do SO: " + aSrvInfo[03] + chr(13) + chr(10) // Informações adicionais do sistema operacional cDetails += "Memória: " + aSrvInfo[04] + chr(13) + chr(10) // Memória cDetails += "Número de Processadores: " + aSrvInfo[05] + chr(13) + chr(10) // Número de processadores cDetails += "Velocidade do Processador: " + aSrvInfo[06] + chr(13) + chr(10) // Velocidade do processador cDetails += "Identificação do Processador: " + aSrvInfo[07] + chr(13) + chr(10) // Identificação do processador cDetails += "Languagem: " + aSrvInfo[08] + chr(13) + chr(10) // Locale do sistema operacional cDetails += "Nome da Languagem: " + aSrvInfo[09] + chr(13) + chr(10) // Nome do locale do sistema operacional cDetails += "UUID: " + aSrvInfo[10] + chr(13) + chr(10) // SMBIOS UUID/Host ID for i := 1 to len(aSrvInfo[11]) cDetails += "Interface: " + " " + aSrvInfo[11][i][1] + chr(13) + chr(10) // Nome da interface cDetails += "Mac Address: " + " " + aSrvInfo[11][i][2] + chr(13) + chr(10) // Mac Address da interface next i // Novo campo válido a partir da versão 20.3.1.3 do AppServer cDetails += "Arquitetura do Processador: " + aSrvInfo[12] + chr(13) + chr(10) // Arquitetura do processador msginfo(cDetails) Return |