Prezado TOTVER, no próximo Sábado (19/10) das 14h às 20h faremos uma bateria de testes para validar os planos de contingência do JIRA, TDN e TFS. Com isso, durante esse período poderão ocorrer algumas instabilidades no acesso e navegação às ferramentas citadas.
Retorna um array com as definições do servidor onde o TOTVS | Application Server foi instanciado.
Sintaxe
GetSrvInfo()
Retorno
Nome
Tipo
Descrição
aSrvInfo
vetor
Retorna um array com informações do Totvs Application Server. Para o formato do array vide observação.
Observações
Estrutura do array de retorno:
Posição
Tipo
Descrição
aSrvInfo[1]
Caractere
Nome do servidor
aSrvInfo[2]
Caractere
Sistema Operacional
aSrvInfo[3]
Caractere
Informações adicionais do sistema operacional
aSrvInfo[4]
Caractere
Memória
aSrvInfo[5]
Caractere
Número de processadores
aSrvInfo[6]
Caractere
Velocidade do processador
aSrvInfo[7]
Caractere
Identificação do processador
aSrvInfo[8]
Caractere
Locale do sistema operacional
aSrvInfo[9](*)
Caractere
Nome do locale do sistema operacional
aSrvInfo[10](**)
Caractere
SMBIOS UUID/Host ID
aSrvInfo[11](***)
Array
Array com as interfaces de rede do servidor*
(*) 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. chmod a+s /usr/sbin/dmidecode) coloque-o no PATH (Ex: export PATH=${PATH}:/usr/sbin).
(***) Disponível em build igual ou superior a 7.00.131227A. Estrutura do Array das interfaces de rede:
Posição
Tipo
Descrição
1
Array
Detalhes da interface
Detalhes da Interface:
Posição
Tipo
Descrição
1
Caractere
Nome da interface
2
Caractere
MAC Address da interface
O processo de resolução de nomes depende inclusive do sistema operacional utilizado, e em algumas distribuições do Linux (exemplo Red Hat, SUSE) podem requerer configurações adicionais do sistema operacional
A partir da build 7.00.1312227A, a função retorna informações do TOTVS | Application Server para e sendo executados em dispositivos Android.
Exemplos
User function exemplo()
local aSrvrInfo := GetSrvInfo()
local cDetails := ""
local i := 0
cDetails := aSrvrInfo[01] + chr(13) + chr(10) // Nome do servidor
cDetails += aSrvrInfo[02] + chr(13) + chr(10) // Sistema Operacional
cDetails += aSrvrInfo[03] + chr(13) + chr(10) // Informações adicionais do sistema operacional
cDetails += aSrvrInfo[04] + chr(13) + chr(10) // Memória
cDetails += aSrvrInfo[05] + chr(13) + chr(10) // Número de processadores
cDetails += aSrvrInfo[06] + chr(13) + chr(10) // Velocidade do processador
cDetails += aSrvrInfo[07] + chr(13) + chr(10) // Identificação do processador
cDetails += aSrvrInfo[08] + chr(13) + chr(10) // Locale do sistema operacional
cDetails += aSrvrInfo[09] + chr(13) + chr(10) // Nome do locale do sistema operacional
cDetails += aSrvrInfo[10] + chr(13) + chr(10) // SMBIOS UUID/Host ID
for i := 1 to len(aSrvrInfo[11])
cDetails += " " + aSrvrInfo[11][i][1] + chr(13) + chr(10) // Nome da interface
cDetails += " " + aSrvrInfo[11][i][2] + chr(13) + chr(10) // Mac Address da interface
next i
msginfo(cDetails)
Return