TOTVSTEC

Árvore de páginas

Versões comparadas

Versão antiga 6

changes.mady.by.user Oberdan de Almeida Santos

Gravado em

comparado com

Nova versão 7

changes.mady.by.user Ricardo Castro Tavares De Lima

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Portuguese

Pagetitle
GetSrvInfo
GetSrvInfo

Função: GetSrvInfo

Retorna um array com as definições do computador (Application Server) que o Smart Client está conectado.
Sintaxe

GetSrvInfo ( ) --> aRet

Retorno
aRet
    (vetor)
  • Retorna um array com as definições do computador (Application Server) que o Smart Client está conectado. Para informações da estrutura do array, consulte a área "Observações".
Observações
Na distribuição RedHat, é necessário setar o nome do host com o comando "/bin/hostname <<nomedohost>>", e informar no /etc/hosts o ip e hostname da máquina para que o GetServerIP funcione.

Estrutura do array de retorno:

aInfoComp[1]: Nome do Computador
aInfoComp[2]: Sistema Operacional
aInfoComp[3]: Informação adicional - [Windows o ServicePack] [Linux o "/proc/version"]
aInfoComp[4]: Memória Física
aInfoComp[5]: Nr. de Processadores
aInfoComp[6]: MHZ Processador
aInfoComp[7]: Descrição Processador
aInfoComp[8]: Linguagem

Os dados abaixo são somente a partir do binário 7.00131227P:

aInfoComp[9]: Nome da Linguagem
aInfoComp[10]: SMBIOS UUID
aInfoComp[11]: Array com todas as interfaces de redes da máquina
aInfoComp[11][1][1]: Nome da 1a interface
aInfoComp[11][1][2]: Mac Address da 1a interface
aInfoComp[11][2][31]: Nome da 2a interface
aInfoComp[11][2][42]: Mac Address da 2a interface
aInfoComp[11][3][51]: ...
aInfoComp[11][63][2]: ...
aInfoComp[11][N*2-][1]: Nome da 'N' interface
aInfoComp[11][N*][2]: Mac Address da 'N' interface
Exemplos
#Include "TOTVS.CH"
User Function GetSrvInfo()
 aInfoComp := GetSrvInfo()
 cInfoComp:= 'Nome do Computador: ' + aInfoComp[1]+chr(13)+chr(10)+;
 'Sistema Operacional: ' + aInfoComp[2]+chr(13)+chr(10)+;
 'Informação adicional: ' + aInfoComp[3]+chr(13)+chr(10)+;
 'Memória: ' + aInfoComp[4]+chr(13)+chr(10)+;
 'Nr. de Processadores: ' + aInfoComp[5]+chr(13)+chr(10)+;
 'MHZ Processador: ' + aInfoComp[6]+chr(13)+chr(10)+;
 'Descrição Processador: ' + aInfoComp[7]+chr(13)+chr(10)+;
 'Linguagem: ' + aInfoComp[8]
 MsgInfo(cInfoComp)
 Return

Preview
Exemplo da função GetSrvInfo()
Abrangência
TOTVS Application Server