Árvore de páginas

Você está vendo a versão antiga da página. Ver a versão atual.

Comparar com o atual Ver Histórico da Página

« Anterior Versão 8 Próxima »

Função: GetRemoteType

Identifica a tipo e versão do Smart Client em execução.

GetRemoteType ( [ @cLibVersion] ) --> nRet

 

NomeTipoDescriçãoObrigatórioReferência
cLibVersionCaracterIndica a versão da biblioteca gráfica do Smart Client. X

 

nRet
    (numerico)
  • Retorna o número correspondente ao sistema operacional, em uso, que o Smart Client está sendo executado. Sendo: -1 = Job, Web ou Working Thread (Sem remote); 1 = Ambiente Microsoft Windows ou 2 = Ambiente Linux/Unix.

 

Importante

Função disponível a partir da build 7.00.040308A.

*Em versões superiores à 120420A foi implementado o retorno do sistema operacional à partir do parâmetro cLibVersion (por referência).
Esta característica foi implementada devido aos sistemas operacionais Linux e MacOS retornarem o mesmo código, pois ambos são Unix.
Com a nova implementação teremos os seguintes retornos:

WIN=Windows
LINUX=Linux
MAC=MacOS 

GetRemoteType( @cLib )
QOut( cLib ) // -> "QT-4.5.2 WIN"

 

Tipos de Retorno

-1 = A execução do programa não utiliza o Smart Client, geralmente é um JOB.

0 = Smart Client das versões 6 e 7 em ambiente Windows.

1 = Smart Client das verões 8 e 10 em ambiente Windows (*).

2 = Smart Client das verões 8 e 10 em ambiente Linux /MacOS (*).

3 = Não utilizado.

4 = Sessão TELNET do módulo 4GL.

5 = Smart Client versão HTML.

6 = Não utilizado.

7 = TOTVS Smart Client versão Windows CE (experimental, não homologado)

(*) A partir dos builds superiores a 7.00.080806P - Oct  2 2008 - 11:47:14, pode-se passar parâmetro por referência para obter a versão da biblioteca gráfica em uso pelo Smart Client.

 

Exemplo
#INCLUDE "TOTVS.CH"

USER FUNCTION tstGetRmtT()
	Local cLib

	QOut(GetRemoteType(@cLib)) // -> 1 se executar TOTVS SmartClient em versão Windows
	QOut(cLib) // -> "QT-4.5.2 WIN" -> Retorno do SO implementado em versões superiores a 120420A
RETURN

Abrangência

Microsiga Protheus 8.11 , TOTVS Application Server 10 , ByYou Application Server

 

 

  • Sem rótulos