GetSrvInfo

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

Resultado do exemplo Windows

Resultado do exemplo Linux

Veja também

Resolução de nomes para TCP/IP

Árvore de páginas